Func CK($USERNAME, $PASSWORD)
Local $txt = FileOpen('password.txt'), $ck
While 1
Local $line = FileReadLine($txt)
If @error = -1 Then ExitLoop
Local $sS = StringSplit($line, ' ')
If @error Or $sS[0] <> 3 Then ContinueLoop
If $sS[1] = $USERNAME And $sS[2] = $PASSWORD And $sS[3] == 1 Then
$ck = 1
ExitLoop
EndIf
WEnd
FileClose($txt)
If $ck Then Return 0
Return 1
EndFunc ;==>CK