home *** CD-ROM | disk | FTP | other *** search
/ SKIP - The Laundry Guide / LEVER_CD.iso / lever / ccdd.dir / 00021.ls < prev    next >
Encoding:
Text File  |  1997-02-21  |  1.0 KB  |  33 lines
  1. on exitFrame
  2.   global languagechosen
  3.   setup()
  4.   puppetSprite(3, 1)
  5.   puppetSprite(2, 1)
  6.   set the member of sprite 2 to member "CCDDBrand" of castLib languagechosen
  7.   set the locH of sprite 2 to 389
  8.   set the locV of sprite 2 to 153
  9.   repeat with i = 5 to 15
  10.     set the visible of sprite i to 0
  11.   end repeat
  12.   set the text of member "CCDDAdvice" to " "
  13.   set the visible of sprite 17 to 0
  14.   puppetSprite(17, 1)
  15.   set the member of sprite 17 to member "CCDDDo" of castLib languagechosen
  16.   set the ink of sprite 17 to 36
  17.   set the locH of sprite 17 to 155
  18.   set the locV of sprite 17 to 230
  19.   set the visible of sprite 18 to 0
  20.   puppetSprite(18, 1)
  21.   set the member of sprite 18 to member "CCDDDont" of castLib languagechosen
  22.   set the ink of sprite 18 to 36
  23.   set the locH of sprite 18 to 155
  24.   set the locV of sprite 18 to 230
  25.   puppetSprite(16, 1)
  26.   set the member of sprite 16 to member "CCDDTitle1" of castLib languagechosen
  27.   set the ink of sprite 16 to 36
  28.   set the locV of sprite 16 to 29
  29.   sound stop 1
  30.   sound stop 2
  31.   setsection(1)
  32. end
  33.