home *** CD-ROM | disk | FTP | other *** search
/ Black Box 4 / BlackBox.cdr / proglang / ladybug1.arj / HELP.BUG < prev    next >
Text File  |  1991-01-13  |  668b  |  27 lines
  1. to help
  2. ct
  3. print "'Press      For a description of'
  4. print "'  1        Graphics commands  '
  5. print "'  2        Sound making commands'
  6. print "'  3        Input and Output
  7. print "'  4        Control commands'
  8. print "'  5        Workspace commands'
  9. print "'  6        Running Procedures'
  10. print "'  7        Expressions and functions'
  11. print "'  8        Tools in workspaces
  12. print "'  0        To exit from HELP
  13. print "' '
  14. type "'Press a key '
  15. local "key
  16. make "key rc
  17. if not number? :key    [erase "help ct stop]
  18. if :key < 1  [erase "help ct stop] 
  19. if :key > 8  [erase "help ct stop] 
  20. make "key word "help :key
  21. load :key
  22. help
  23. print "' '
  24. end
  25.  
  26. help
  27.