home *** CD-ROM | disk | FTP | other *** search
- property spriteNum
- global gLeftTowerList, gCenterTowerList, gRightTowerList, gReleaseBall, gLevel, gDiscNum, gPosX, gPosY, gOriginX, gOriginY, gCheckList, gStackSide, gPlaced, gSingle, gMoves, gPoints, gConstant
-
- on mouseEnter me
- puppetSound(3, "ButtonOver")
- sprite(spriteNum).member = member("continueOver")
- end
-
- on mouseLeave me
- sprite(spriteNum).member = member("continueNorm")
- puppetSound(4, "ButtonOver")
- end
-
- on mouseDown me
- puppetSound(5, "reset")
- gLeftTowerList = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
- gCenterTowerList = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
- gRightTowerList = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
- gDiscNum = 20
- gPosX = 100
- gPosY = 150
- gMoves = 0
- member("MovesText").text = string(gMoves)
- gLevel = gLevel + 1
- member("DiscsText").text = string(gLevel + 2)
- gCheckList = 1
- gStackSide = 4
- gPlaced = 0
- gReleaseBall = 1
- gSingle = 0
- sprite(22).visible = 0
- sprite(23).visible = 0
- sprite(24).visible = 0
- sprite(25).visible = 0
- sprite(26).visible = 0
- if gLevel = 2 then
- gLeftTowerList[1] = 17
- gLeftTowerList[2] = 18
- gLeftTowerList[3] = 19
- sprite(20).visible = 1
- sprite(19).visible = 1
- sprite(18).visible = 1
- sprite(17).visible = 1
- sprite(16).visible = 0
- sprite(15).visible = 0
- sprite(14).visible = 0
- sprite(13).visible = 0
- sprite(12).visible = 0
- sprite(11).visible = 0
- stack()
- go(17)
- end if
- if gLevel = 3 then
- gLeftTowerList[1] = 16
- gLeftTowerList[2] = 17
- gLeftTowerList[3] = 18
- gLeftTowerList[4] = 19
- sprite(20).visible = 1
- sprite(19).visible = 1
- sprite(18).visible = 1
- sprite(17).visible = 1
- sprite(16).visible = 1
- sprite(15).visible = 0
- sprite(14).visible = 0
- sprite(13).visible = 0
- sprite(12).visible = 0
- sprite(11).visible = 0
- stack()
- go(25)
- end if
- if gLevel = 4 then
- gLeftTowerList[1] = 15
- gLeftTowerList[2] = 16
- gLeftTowerList[3] = 17
- gLeftTowerList[4] = 18
- gLeftTowerList[5] = 19
- sprite(20).visible = 1
- sprite(19).visible = 1
- sprite(18).visible = 1
- sprite(17).visible = 1
- sprite(16).visible = 1
- sprite(15).visible = 1
- sprite(14).visible = 0
- sprite(13).visible = 0
- sprite(12).visible = 0
- sprite(11).visible = 0
- stack()
- go(32)
- end if
- if gLevel = 5 then
- gLeftTowerList[1] = 14
- gLeftTowerList[2] = 15
- gLeftTowerList[3] = 16
- gLeftTowerList[4] = 17
- gLeftTowerList[5] = 18
- gLeftTowerList[6] = 19
- sprite(20).visible = 1
- sprite(19).visible = 1
- sprite(18).visible = 1
- sprite(17).visible = 1
- sprite(16).visible = 1
- sprite(15).visible = 1
- sprite(14).visible = 1
- sprite(13).visible = 0
- sprite(12).visible = 0
- sprite(11).visible = 0
- stack()
- go(39)
- end if
- if gLevel = 6 then
- gLeftTowerList = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
- gCenterTowerList = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
- gRightTowerList = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
- gLevel = 1
- member("DiscsText").text = string(gLevel + 2)
- gDiscNum = 20
- gPosX = 100
- gPosY = 150
- gLeftTowerList[1] = 18
- gLeftTowerList[2] = 19
- gCheckList = 1
- gStackSide = 4
- gPlaced = 0
- gReleaseBall = 1
- gSingle = 0
- gConstant = 7
- gMoves = 0
- gMoveFix = 1
- member("MovesText").text = string(gMoves)
- gPoints = 0
- member("PointsText").text = string(integer(gPoints))
- sprite(23).visible = 1
- sprite(24).visible = 1
- sprite(25).visible = 1
- sprite(20).visible = 1
- sprite(19).visible = 1
- sprite(18).visible = 1
- sprite(17).visible = 0
- sprite(16).visible = 0
- sprite(15).visible = 0
- sprite(14).visible = 0
- sprite(13).visible = 0
- sprite(12).visible = 0
- sprite(11).visible = 0
- stack()
- go(1)
- end if
- end
-