home *** CD-ROM | disk | FTP | other *** search
/ SKIP - The Laundry Guide / LEVER_CD.iso / lever / sswa.dir / 00265.ls < prev    next >
Encoding:
Text File  |  1997-03-07  |  2.0 KB  |  58 lines
  1. on exitFrame
  2.   global languagechosen, movieplaying, countryName, sequenceNumber, updownneeded
  3.   set countryName to "kenya"
  4.   puppetSound(1, countryName)
  5.   puppetSprite(37, 1)
  6.   puppetSprite(38, 1)
  7.   set the visible of sprite 35 to 0
  8.   set YVar to "sswa" & countryName & "text"
  9.   set the member of sprite 34 to member YVar of castLib languagechosen
  10.   set the text of member "sswalantextbox" to the text of member "sswalantextboxkenya" of castLib languagechosen
  11.   if languagechosen = "Greek" then
  12.     set the textFont of field "sswalantextbox" to "arial greek"
  13.     set the visible of sprite 37 to 1
  14.     set the visible of sprite 38 to 1
  15.   else
  16.     if the number of lines in field "sswalantextbox" > 5 then
  17.       set updownneeded to 1
  18.       set the visible of sprite 37 to 0
  19.       set the visible of sprite 38 to 0
  20.     else
  21.       set updownneeded to 0
  22.       set the visible of sprite 37 to 0
  23.       set the visible of sprite 38 to 1
  24.     end if
  25.   end if
  26.   set the member of sprite 33 to member "sswapopkenya" of castLib languagechosen
  27.   set the visible of sprite 33 to 1
  28.   set the visible of sprite 34 to 1
  29.   set the locH of sprite 35 to 210
  30.   set the locV of sprite 35 to 309
  31.   set the visible of sprite 35 to 1
  32.   set the ink of sprite 28 to 8
  33.   set the ink of sprite 29 to 8
  34.   set the ink of sprite 30 to 8
  35. end
  36.  
  37. on enterFrame
  38.   global positionofFrame, positionTable
  39.   set tempglobe to "globe" & positionofFrame
  40.   set the member of sprite 3 to member tempglobe
  41.   set the visible of sprite 37 to 0
  42.   set the visible of sprite 38 to 0
  43.   set the locV of sprite 37 to 397
  44.   set the locV of sprite 38 to 397
  45.   set the locH of sprite 37 to 386
  46.   set the locH of sprite 38 to 357
  47.   set the visible of sprite 37 to 1
  48.   set the visible of sprite 38 to 1
  49.   set pos to 1
  50.   repeat with counter = 13 to 21
  51.     puppetSprite(counter, 1)
  52.     set templocV to getAt(positionTable, pos)
  53.     set the locV of sprite counter to templocV
  54.     set the locH of sprite counter to getAt(positionTable, pos + 1)
  55.     set pos to pos + 2
  56.   end repeat
  57. end
  58.