home *** CD-ROM | disk | FTP | other *** search
/ ftp.wwiv.com / ftp.wwiv.com.zip / ftp.wwiv.com / pub / BBS / JLUT531.ZIP / QST.ZIP / QUEST010.@JL < prev    next >
Text File  |  1994-05-11  |  301b  |  17 lines
  1. @@DE=|
  2. @@TI=
  3. ASSIGNUSERFILE
  4. :J01
  5. GOTOLOGGEDONUSER
  6. @@CO=Your Name: @ActUser.Name:B.30@
  7. @@CO=    Level: @ActUser.Level:B.30@
  8. @@CO=     City: @ActUser.City:B.30@
  9. C01=|Enter your Level:|1|3|1|1|1|2
  10. IF C01 = ActUser.Level THEN GOTO :CLOSE
  11. CHANGELEVELTO C01
  12. GOTO :J01
  13.  
  14. :CLOSE
  15. CLOSEUSERFILE
  16.  
  17.