home *** CD-ROM | disk | FTP | other *** search
/ Amiga Times / AmigaTimes.iso / demos / spiele / NapalmDemo_v1.1 / Napalm < prev    next >
Encoding:
Text File  |  1998-10-06  |  788 b   |  45 lines
  1. if not exists "ENV:"
  2.  Assign ENV: RAM:
  3. endif
  4. if not exists "T:"
  5.  Assign T: RAM:
  6. endif
  7.  
  8. if exists "Devs:monitors/PAL"
  9.  DEVS:MONITORS/PAL
  10. endif
  11.  
  12.  
  13. assign Napalm: ""
  14. assign Napalm_M: missions
  15. assign Napalm_O: objects
  16. assign Napalm_G: graphics
  17. assign Napalm_U: units
  18. assign Napalm_I: images
  19. assign Napalm_S: sounds
  20. assign Napalm_E: exec
  21. assign Napalm_X: store
  22. assign Napalm_Y: setup
  23.  
  24. if exists "ENV:RtgMaster_old"
  25.  delete >NIL: ENV:RtgMaster_old ALL
  26. endif
  27.  
  28. if exists "ENV:RtgMaster"
  29.  rename ENV:RtgMaster ENV:RtgMaster_old
  30. endif
  31.  
  32. Makedir >NIL: ENV:RtgMaster
  33. Copy >NIL: Napalm_Y:c2p to ENV:RtgMaster
  34. Copy >NIL: Napalm_Y:c2pcurr to ENV:RtgMaster
  35.  
  36. Stack 16384
  37. CrimsonCrisis
  38.  
  39. if exists "ENV:RtgMaster_old"
  40.  delete >NIL: ENV:RtgMaster ALL
  41.  rename >NIL: ENV:RtgMaster_old ENV:RtgMaster
  42. endif
  43.  
  44. ; end
  45.