home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1998 January / macformat-059.iso / mac / Demos / Martial Arts Demo / media / arts.Dxr / Internal_11.ls < prev    next >
Encoding:
Text File  |  1997-09-30  |  476 b   |  22 lines
  1. on exitFrame
  2.   global backSound, artsRange
  3.   if backSound = 1 then
  4.     puppetSound(2, member 5 of castLib "internal sounds")
  5.   end if
  6.   unloadMember()
  7.   set the loc of sprite 40 to point(320, 240)
  8.   set the loc of sprite 41 to point(320, 240)
  9.   puppetSprite(40, 1)
  10.   puppetSprite(41, 1)
  11.   case 1 of
  12.     (artsRange = 1):
  13.       go("japanese")
  14.     (artsRange = 2):
  15.       go("korean")
  16.     (artsRange = 3):
  17.       go("chinese")
  18.     (artsRange = 4):
  19.       go("other")
  20.   end case
  21. end
  22.