home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / comm / qmscr41.zip / UPSEL.MOD < prev    next >
Text File  |  1989-04-01  |  531b  |  38 lines
  1. ;LANS  10-18-88  06:55  UPSEL.MOD
  2. ;
  3. IF '$1' = '' select1
  4. IF '$2' = '' select2
  5. IF '$3' = '' select3
  6. IF '$4' = '' select4
  7. IF '$5' = '' select5
  8. IF '$6' = '' select6
  9. IF '$7' = '' select7
  10. IF '$8' = '' select8
  11. go_back:
  12. RETURN
  13. select1:
  14. SCRIPT Upsel.001
  15. GOTO $0
  16. select2:
  17. SCRIPT Upsel.002
  18. GOTO $0
  19. select3:
  20. SCRIPT Upsel.003
  21. GOTO $0
  22. select4:
  23. SCRIPT Upsel.004
  24. GOTO $0
  25. select5:
  26. SCRIPT Upsel.005
  27. GOTO $0
  28. select6:
  29. SCRIPT Upsel.006
  30. GOTO $0
  31. select7:
  32. SCRIPT Upsel.007
  33. GOTO $0
  34. select8:
  35. SCRIPT Upsel.008
  36. RETURN
  37. ;
  38.