home *** CD-ROM | disk | FTP | other *** search
/ Curio City 11 / CURIO11.bin / pc / movie / shop / jjmain.dir / 00361_ãóLÉnÉìÉhÉâ.ls < prev    next >
Encoding:
Text File  |  1998-01-01  |  2.5 KB  |  105 lines
  1. on pushbutton1 markername
  2.   set spnum to clickOn()
  3.   set nowcastnum to the memberNum of sprite spnum
  4.   puppetSprite(spnum, 1)
  5.   repeat while the stillDown
  6.     if rollOver(spnum) then
  7.       set the memberNum of sprite spnum to nowcastnum + 1
  8.     else
  9.       set the memberNum of sprite spnum to nowcastnum
  10.     end if
  11.     updateStage()
  12.   end repeat
  13.   updateStage()
  14.   if rollOver(spnum) then
  15.     wait(30)
  16.     puppetSprite(spnum, 0)
  17.     updateStage()
  18.     go(markername)
  19.   end if
  20.   puppetSprite(spnum, 0)
  21.   updateStage()
  22. end
  23.  
  24. on pushbutton2 markername
  25.   set spnum to clickOn()
  26.   set nowcasth to the locH of sprite spnum
  27.   set nowcastv to the locV of sprite spnum
  28.   puppetSprite(spnum, 1)
  29.   repeat while the stillDown
  30.     if rollOver(spnum) then
  31.       set the locH of sprite spnum to nowcasth + 4
  32.       set the locV of sprite spnum to nowcastv + 4
  33.     else
  34.       set the locH of sprite spnum to nowcasth
  35.       set the locV of sprite spnum to nowcastv
  36.     end if
  37.     updateStage()
  38.   end repeat
  39.   set the locH of sprite spnum to nowcasth
  40.   set the locV of sprite spnum to nowcastv
  41.   updateStage()
  42.   if rollOver(spnum) then
  43.     wait(30)
  44.     puppetSprite(spnum, 0)
  45.     updateStage()
  46.     go(markername)
  47.   end if
  48.   puppetSprite(spnum, 0)
  49.   updateStage()
  50. end
  51.  
  52. on btndown2
  53.   set spnum to clickOn()
  54.   set nowcastnum to the memberNum of sprite spnum
  55.   puppetSprite(spnum, 1)
  56.   repeat while stillDown()
  57.     if rollOver(clickOn()) then
  58.       set the memberNum of sprite spnum to nowcastnum + 1
  59.     else
  60.       set the memberNum of sprite spnum to nowcastnum
  61.     end if
  62.     updateStage()
  63.   end repeat
  64.   wait(30)
  65.   set the memberNum of sprite spnum to nowcastnum
  66.   puppetSprite(spnum, 0)
  67.   updateStage()
  68.   if rollOver(clickOn()) then
  69.     return 1
  70.   end if
  71.   return 0
  72. end
  73.  
  74. on btndown3
  75.   set spnum to clickOn()
  76.   set nowcastnum to the memberNum of sprite spnum
  77.   puppetSprite(spnum, 1)
  78.   repeat while stillDown()
  79.     if rollOver(clickOn()) then
  80.       set the cursor of sprite 22 to [member "yubiG", member "yubiGM"]
  81.       set the memberNum of sprite spnum to nowcastnum + 1
  82.     else
  83.       set the cursor of sprite 22 to [member "yubiP", member "yubiPM"]
  84.       set the memberNum of sprite spnum to nowcastnum
  85.     end if
  86.     updateStage()
  87.   end repeat
  88.   wait(20)
  89.   set the cursor of sprite 22 to [member "yubiP", member "yubiPM"]
  90.   set the memberNum of sprite spnum to nowcastnum
  91.   puppetSprite(spnum, 0)
  92.   updateStage()
  93.   if the mouseUp then
  94.     return 1
  95.   end if
  96.   return 0
  97. end
  98.  
  99. on wait t
  100.   set endtime to the ticks + t
  101.   repeat while the ticks <= endtime
  102.     nothing()
  103.   end repeat
  104. end
  105.