home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today - The Disc! 9 / cdrt09.iso / mac / UTAHDEMO / SHARED.DIR / 00733_Script_733 < prev    next >
Text File  |  1995-01-13  |  341b  |  18 lines
  1. -- map preload
  2. on preloadMaps num
  3.  
  4. repeat with n = 1 to num
  5.   preload label("map"&num)
  6. end repeat
  7.  
  8.  
  9. on loadMap num
  10.   global prevMapChoice
  11.   preload label("map"&num) + 2, label("map"&(num+1)) - 1
  12.   set prevMapChoice = num + 5
  13.  
  14.  
  15. on unloadMap num
  16.   global prevMapChoice
  17.   unload label("map"&num) + 2, label("map"&(num+1)) - 1
  18.