home *** CD-ROM | disk | FTP | other *** search
/ SKIP - The Laundry Guide / LEVER_CD.iso / lever / sswa.dir / 00146.ls < prev    next >
Encoding:
Text File  |  1997-03-07  |  564 b   |  18 lines
  1. on mouseUp
  2.   global countryName, positionofFrame, positionTable, previousFrameNumber
  3.   set previousFrameNumber to the frame
  4.   set positionTable to []
  5.   repeat with counter = 13 to 21
  6.     set the visible of sprite counter to 0
  7.     add(positionTable, the locV of sprite counter)
  8.     add(positionTable, the locH of sprite counter)
  9.   end repeat
  10.   set countryName to "safr"
  11.   set tempglobe to "globe" & positionofFrame
  12.   set the member of sprite 3 to member tempglobe
  13.   set the visible of sprite 35 to 0
  14.   set the visible of sprite 22 to 0
  15.   cursor(4)
  16.   go("safr")
  17. end
  18.