home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / TowerOfHanoy.dxr / 00027.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  1.8 KB  |  73 lines
  1. property spriteNum
  2. global gLeftTowerList, gCenterTowerList, gRightTowerList, gReleaseBall, gLevel, gDiscNum, gPosX, gPosY, gOriginX, gOriginY, gCheckList, gStackSide, gPlaced, gSingle, gMoves, gPoints, gConstant
  3.  
  4. on mouseEnter me
  5.   puppetSound(3, "ButtonOver")
  6.   sprite(spriteNum).member = member("restartOver")
  7. end
  8.  
  9. on mouseLeave me
  10.   sprite(spriteNum).member = member("RestartNorm")
  11.   puppetSound(4, "ButtonOver")
  12. end
  13.  
  14. on mouseDown me
  15.   puppetSound(5, "reset")
  16.   gLeftTowerList = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
  17.   gCenterTowerList = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
  18.   gRightTowerList = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
  19.   gDiscNum = 20
  20.   gPosX = 100
  21.   gPosY = 150
  22.   gMoves = 0
  23.   member("MovesText").text = string(gMoves)
  24.   gLevel = gLevel + 1
  25.   member("DiscsText").text = string(gLevel + 2)
  26.   gCheckList = 1
  27.   gStackSide = 4
  28.   gPlaced = 0
  29.   gReleaseBall = 1
  30.   gSingle = 0
  31.   sprite(22).visible = 0
  32.   sprite(23).visible = 0
  33.   sprite(24).visible = 0
  34.   sprite(25).visible = 0
  35.   sprite(26).visible = 0
  36.   gLeftTowerList = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
  37.   gCenterTowerList = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
  38.   gRightTowerList = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
  39.   gLevel = 1
  40.   member("DiscsText").text = string(gLevel + 2)
  41.   gDiscNum = 20
  42.   gPosX = 100
  43.   gPosY = 150
  44.   gLeftTowerList[1] = 18
  45.   gLeftTowerList[2] = 19
  46.   gCheckList = 1
  47.   gStackSide = 4
  48.   gPlaced = 0
  49.   gReleaseBall = 1
  50.   gSingle = 0
  51.   gConstant = 7
  52.   gMoves = 0
  53.   gMoveFix = 1
  54.   member("MovesText").text = string(gMoves)
  55.   gPoints = 0
  56.   member("PointsText").text = string(integer(gPoints))
  57.   sprite(23).visible = 1
  58.   sprite(24).visible = 1
  59.   sprite(25).visible = 1
  60.   sprite(20).visible = 1
  61.   sprite(19).visible = 1
  62.   sprite(18).visible = 1
  63.   sprite(17).visible = 0
  64.   sprite(16).visible = 0
  65.   sprite(15).visible = 0
  66.   sprite(14).visible = 0
  67.   sprite(13).visible = 0
  68.   sprite(12).visible = 0
  69.   sprite(11).visible = 0
  70.   stack()
  71.   go(1)
  72. end
  73.