$typos = 0
While $typos < 3
  Send($PassW)
  Sleep(10)
  Send("+{HOME}")
  Sleep(10)
  Send("^C")
  Sleep(10)
  $checkTypo = ClipGet()
  ClipPut("")
  If $checkTypo = $PassW Then
	$typos = 100
  Else
	$typos = $typos + 1
	Beep(700,200)
	Sleep(1000)
  EndIf
WEnd