home *** CD-ROM | disk | FTP | other *** search
/ AM/FM: Amiga Musicians' Freeware Magazine 18 / AM-FM 18.adf / AMFM-18 < prev    next >
Encoding:
AmigaDOS Script File  |  1994-02-06  |  731 b   |  38 lines
  1. .key foo
  2.  
  3. :c/cd :
  4.  
  5. ;:c/type :Text/AMFM.ansi
  6. :c/assign libs: :libs
  7. :c/assign s: :s
  8. :c/assign c: :c
  9. :c/assign devs: :devs
  10. :c/assign ENV: RAM:
  11.  
  12. :c/MemCheck 600000
  13. if not warn
  14.     :c/Copy :c/Wait RAM:
  15.     :c/AMFMMenu :s/Music-menu
  16. else
  17.     echo "Sorry - not enough free memory for background music..."
  18. endif
  19.  
  20. Echo "  When the picture appears, you can get rid of it by pressing"
  21. Echo "  the mouse button."
  22. :c/Decrunch >nil: :Graphics/Floyd.mrs.pp ram:
  23. :c/IFF >nil: ram:Floyd.mrs
  24. :c/Delete >nil: ram:Floyd.mrs
  25. ;:c/Echo "Sorry, no disk space for any front-picture this time..."
  26.  
  27. :c/Zoomwindows quiet
  28. :c/amfmmenu :s/menu
  29.  
  30. :c/Zoomwindows quiet
  31. :c/BreakAMFMPlay
  32.  
  33. assign s: sys:s
  34. assign c: sys:c
  35. assign libs: sys:libs
  36. assign devs: sys:devs
  37. cd sys:
  38.