odp1a$ = PrawidłowaOdp Print ("Pytanie?") odp1$ = InKeyStr (#ALPHABETICAL) If (CompareStr (odp$1, odp1a$)) = 0 Print ("Tak") Else Print ("Nie") EndIf Wait(200)
@recedent, post #6
@selur, post #9
CompareStr (MidStr(odpA$, 0), MidStr(odpB$, 0), FALSE)
If odp1a$ = odp1$ ...
@recedent, post #7
If CompareStr("nie","dupa") Then DebugPrint("jest OK") If CompareStr("duuyyyy","dupa") Then DebugPrint("jest OK")
If CompareStr("d","dupa")=0 Then DebugPrint("tego nie zobaczysz")
CompareStr("d","dupa")
if CompareStr("d","dupa")
@peceha, post #13
@peceha, post #14
@selur, post #15
DebugPrint(CompareStr ("dupa","Dupa",False)) DebugPrint(CompareStr ("dupa","dupa")) DebugPrint(CompareStr ("d","dupa")) DebugPrint(CompareStr ("dupa","d"))
@SuperBuster, post #26