RosettaCodeData/Task/User-input-Text/TI-89-BASIC/user-input-text.basic

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