Prgm
  InputStr "Enter a string", s
  Loop
    Prompt integer
    If integer ≠ 75000 Then
      Disp "That wasn't 75000."
    Else
      Exit
    EndIf
  EndLoop
EndPrgm