TXTINP
 NEW S,N
 WRITE "Enter a string: "
 READ S,!
 WRITE "Enter the number 75000: "
 READ N,!
 KILL S,N
 QUIT