home *** CD-ROM | disk | FTP | other *** search
/ Curio City 11 / CURIO11.bin / pc / movie / shop / home_2.dir / 00114_ãóLÉnÉìÉhÉâ.ls < prev    next >
Encoding:
Text File  |  1998-01-01  |  3.4 KB  |  152 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 + 2
  32.       set the locV of sprite spnum to nowcastv + 2
  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.   puppetSprite(spnum, 0)
  66.   updateStage()
  67.   set the memberNum of sprite spnum to nowcastnum
  68.   puppetSprite(spnum, 0)
  69.   updateStage()
  70.   if rollOver(clickOn()) then
  71.     return 1
  72.   end if
  73.   return 0
  74. end
  75.  
  76. on btndown3
  77.   set spnum to clickOn()
  78.   set nowcastnum to the memberNum of sprite spnum
  79.   puppetSprite(spnum, 1)
  80.   repeat while stillDown()
  81.     if rollOver(clickOn()) then
  82.       set the memberNum of sprite spnum to nowcastnum + 1
  83.     else
  84.       set the memberNum of sprite spnum to nowcastnum
  85.     end if
  86.     updateStage()
  87.   end repeat
  88.   wait(20)
  89.   puppetSprite(spnum, 0)
  90.   updateStage()
  91.   set the memberNum of sprite spnum to nowcastnum
  92.   puppetSprite(spnum, 0)
  93.   updateStage()
  94.   if the mouseUp then
  95.     return 1
  96.   end if
  97.   return 0
  98. end
  99.  
  100. on wait t
  101.   set endtime to the ticks + t
  102.   repeat while the ticks <= endtime
  103.     nothing()
  104.   end repeat
  105. end
  106.  
  107. on pushbutton3
  108.   set spnum to clickOn()
  109.   set nowcastnum to the memberNum of sprite spnum
  110.   puppetSprite(spnum, 1)
  111.   repeat while the stillDown
  112.     if rollOver(spnum) then
  113.       set the memberNum of sprite spnum to nowcastnum + 1
  114.     else
  115.       set the memberNum of sprite spnum to nowcastnum
  116.     end if
  117.     updateStage()
  118.   end repeat
  119.   updateStage()
  120.   if rollOver(spnum) then
  121.     wait(30)
  122.     puppetSprite(spnum, 0)
  123.     updateStage()
  124.     go(#previous)
  125.   end if
  126.   puppetSprite(spnum, 0)
  127.   updateStage()
  128. end
  129.  
  130. on pushbutton4
  131.   set spnum to clickOn()
  132.   set nowcastnum to the memberNum of sprite spnum
  133.   puppetSprite(spnum, 1)
  134.   repeat while the stillDown
  135.     if rollOver(spnum) then
  136.       set the memberNum of sprite spnum to nowcastnum + 1
  137.     else
  138.       set the memberNum of sprite spnum to nowcastnum
  139.     end if
  140.     updateStage()
  141.   end repeat
  142.   updateStage()
  143.   if rollOver(spnum) then
  144.     wait(30)
  145.     puppetSprite(spnum, 0)
  146.     updateStage()
  147.     go(#next)
  148.   end if
  149.   puppetSprite(spnum, 0)
  150.   updateStage()
  151. end
  152.