home *** CD-ROM | disk | FTP | other *** search
- on mouseUp
- set h to the mouseH
- set num to the clickOn
- puppetSound(3, 100)
- cursor(200)
- set the cursor of sprite 41 to 0
- set the cursor of sprite 42 to 0
- if num = 42 then
- okh()
- else
- nph(h)
- end if
- end
-
- on okh
- set the castNum of sprite 42 to 232
- updateStage()
- repeat while soundBusy(3)
- nothing()
- end repeat
- puppetSound(3, 94)
- set the castNum of sprite 40 to 225
- set the locV of sprite 41 to 412
- set the castNum of sprite 42 to 231
- set the locV of sprite 46 to 273
- set the castNum of sprite 46 to 225
- puppetTransition(15, 1, 4, 1)
- updateStage()
- puppetSprite(40, 0)
- puppetSprite(46, 0)
- if the frame < 20 then
- go("m")
- else
- startgame()
- go(marker(-3) + 1)
- end if
- end
-
- on nph h
- if h < 51 then
- lefth()
- else
- righth()
- end if
- repeat while soundBusy(3)
- nothing()
- end repeat
- puppetSound(3, 93)
- updateStage()
- go(marker(0) + 1)
- end
-
- on lefth
- global gnum1
- set the castNum of sprite 41 to 207
- updateStage()
- set gnum1 to gnum1 - 1
- if gnum1 < 1 then
- set gnum1 to 10
- end if
- set the castNum of sprite 40 to gnum1 + 210
- puppetTransition(1, 1, 8, 1)
- end
-
- on righth
- global gnum1
- set the castNum of sprite 41 to 208
- set gnum1 to gnum1 + 1
- if gnum1 > 10 then
- set gnum1 to 1
- end if
- updateStage()
- set the castNum of sprite 40 to gnum1 + 210
- puppetTransition(2, 1, 8, 1)
- end
-