home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1993 #2 / Image.iso / cad / jun93.zip / TIP873B.SCR < prev    next >
Lisp/Scheme  |  1993-05-19  |  278b  |  17 lines
  1. (prompt "\nTIP 873B:  ACME-SYM.SCR  copyright 1993, Rey D. Galura")
  2. (setq FD (getvar "FILEDIA"))
  3. (setvar "FILEDIA" 0)
  4. style
  5.  
  6. ,ACME-SYM
  7. 0
  8. 1
  9. 0
  10. n
  11. n
  12. (setvar "FILEDIA" FD)
  13. (setq FD nil)
  14. (PROMPT "\n ACME-SYM.SHX - Loaded...")(PROMPT "\n HAVE A NICE DAY !!!")(PRINC)
  15.  
  16.  
  17.