100 Plus Great Games 2/100PLUSV2.BIN/games/Cubed.dxr/00005_GamePlay.ls

Text File | 2002-01-25 | 10.0 KB | 304 lines

property pTimeLoop, pTimeLoop2, pTimeLoop3, pTimeLoop4, pTimeLoop5
global gPlayerUpRight, gPlayerUpLeft, gPlayerDownRight, gPlayerDownLeft, gEnemy1UpRight, gEnemy1UpLeft, gEnemy1DownRight, gEnemy1DownLeft, gEnemy2UpRight, gEnemy2UpLeft, gEnemy2DownRight, gEnemy2DownLeft, gEnemy3UpRight, gEnemy3UpLeft, gEnemy3DownRight, gEnemy3DownLeft, gEnemy4UpRight, gEnemy4UpLeft, gEnemy4DownRight, gEnemy4DownLeft, gLevelTime, gJumpSpeed, gLevel, gPaused, gMoveBady, gMoveBady2, gMoveBady3, gMoveBady4, gCue, gCue2, gCue3, gCue4, pAnimBounce, pAnimBounce2, pAnimBounce3, pAnimBounce4, pAnimBounce5, pJump

on beginSprite
  pJump = 0
  pAnimBounce2 = 1
  pAnimBounce = 1
  pAnimBounce3 = 1
  pAnimBounce4 = 1
  pAnimBounce5 = 1
  gCue = 0
  gCue2 = 0
  gCue3 = 0
  gCue4 = 0
end

on exitFrame me
  if gPaused = 0 then
    if gPlayerUpRight = 1 then
      if (sprite(200).member.name = "Balltest_Animated01") or (pJump = 1) then
        if pAnimBounce <= 12 then
          pJump = 1
          sprite(200).locH = sprite(200).locH + 3
          sprite(200).locV = sprite(200).locV - 4
          pAnimBounce = pAnimBounce + 1
        else
          if pAnimBounce > 12 then
            sprite(200).locH = sprite(200).locH + 1
            MoveHikerUpRight()
            EnemyCollision()
            Enemy2Collision()
            Enemy3Collision()
            Enemy4Collision()
            flipBlock()
            checkLevelComplete()
            pAnimBounce = 1
            pJump = 0
            gPlayerUpRight = 0
          end if
        end if
      end if
    else
      if gPlayerUpLeft = 1 then
        if (sprite(200).member.name = "Balltest_Animated01") or (pJump = 1) then
          if pAnimBounce <= 12 then
            pJump = 1
            sprite(200).locH = sprite(200).locH - 3
            sprite(200).locV = sprite(200).locV - 4
            pAnimBounce = pAnimBounce + 1
          else
            if pAnimBounce > 12 then
              sprite(200).locH = sprite(200).locH - 1
              MoveHikerUpLeft()
              EnemyCollision()
              Enemy2Collision()
              Enemy3Collision()
              Enemy4Collision()
              flipBlock()
              checkLevelComplete()
              pAnimBounce = 1
              pJump = 0
              gPlayerUpLeft = 0
            end if
          end if
        end if
      else
        if gPlayerDownRight = 1 then
          if (sprite(200).member.name = "Balltest_Animated01") or (pJump = 1) then
            if pAnimBounce <= 12 then
              pJump = 1
              sprite(200).locH = sprite(200).locH + 3
              sprite(200).locV = sprite(200).locV + 4
              pAnimBounce = pAnimBounce + 1
            else
              if pAnimBounce > 12 then
                sprite(200).locH = sprite(200).locH + 1
                MoveHikerDownRight()
                EnemyCollision()
                Enemy2Collision()
                Enemy3Collision()
                Enemy4Collision()
                flipBlock()
                checkLevelComplete()
                pAnimBounce = 1
                pJump = 0
                gPlayerDownRight = 0
              end if
            end if
          end if
        else
          if gPlayerDownLeft = 1 then
            if (sprite(200).member.name = "Balltest_Animated01") or (pJump = 1) then
              if pAnimBounce <= 12 then
                pJump = 1
                sprite(200).locH = sprite(200).locH - 3
                sprite(200).locV = sprite(200).locV + 4
                pAnimBounce = pAnimBounce + 1
              else
                if pAnimBounce > 12 then
                  sprite(200).locH = sprite(200).locH - 1
                  MoveHikerDownLeft()
                  EnemyCollision()
                  Enemy2Collision()
                  Enemy3Collision()
                  Enemy4Collision()
                  flipBlock()
                  checkLevelComplete()
                  pAnimBounce = 1
                  pJump = 0
                  gPlayerDownLeft = 0
                end if
              end if
            end if
          end if
        end if
      end if
    end if
  end if
  if gPaused = 0 then
    if gEnemy1UpRight = 1 then
      if (sprite(205).member.name = "Balltest2_Animated01") or (gCue = 1) then
        gCue = 1
        if pAnimBounce2 <= 12 then
          sprite(205).locH = sprite(205).locH + 3
          sprite(205).locV = sprite(205).locV - 4
          pAnimBounce2 = pAnimBounce2 + 1
        else
          if pAnimBounce2 > 12 then
            sprite(205).locH = sprite(205).locH + 1
            MoveEnemyUpRight()
            enemy1FlipBlock()
            gMoveBady = 0
            gEnemy1UpRight = 0
            checkLevelComplete()
            pAnimBounce2 = 1
            gCue = 0
          end if
        end if
      end if
    else
      if gEnemy1UpLeft = 1 then
        if (sprite(205).member.name = "Balltest2_Animated01") or (gCue = 1) then
          gCue = 1
          if pAnimBounce2 <= 12 then
            sprite(205).locH = sprite(205).locH - 3
            sprite(205).locV = sprite(205).locV - 4
            pAnimBounce2 = pAnimBounce2 + 1
          else
            if pAnimBounce2 > 12 then
              sprite(205).locH = sprite(205).locH - 1
              MoveEnemyUpLeft()
              enemy1FlipBlock()
              gMoveBady = 0
              gEnemy1UpLeft = 0
              checkLevelComplete()
              pAnimBounce2 = 1
              gCue = 0
            end if
          end if
        end if
      else
        if gEnemy1DownRight = 1 then
          if (sprite(205).member.name = "Balltest2_Animated01") or (gCue = 1) then
            gCue = 1
            if pAnimBounce2 <= 12 then
              sprite(205).locH = sprite(205).locH + 3
              sprite(205).locV = sprite(205).locV + 4
              pAnimBounce2 = pAnimBounce2 + 1
            else
              if pAnimBounce2 > 12 then
                sprite(205).locH = sprite(205).locH + 1
                MoveEnemyDownRight()
                enemy1FlipBlock()
                gMoveBady = 0
                gEnemy1DownRight = 0
                checkLevelComplete()
                pAnimBounce2 = 1
                gCue = 0
              end if
            end if
          end if
        else
          if gEnemy1DownLeft = 1 then
            if (sprite(205).member.name = "Balltest2_Animated01") or (gCue = 1) then
              gCue = 1
              if pAnimBounce2 <= 12 then
                sprite(205).locH = sprite(205).locH - 3
                sprite(205).locV = sprite(205).locV + 4
                pAnimBounce2 = pAnimBounce2 + 1
              else
                if pAnimBounce2 > 12 then
                  sprite(205).locH = sprite(205).locH - 1
                  MoveEnemyDownLeft()
                  enemy1FlipBlock()
                  gMoveBady = 0
                  gEnemy1DownLeft = 0
                  checkLevelComplete()
                  gCue = 0
                  pAnimBounce2 = 1
                end if
              end if
            end if
          end if
        end if
      end if
    end if
  end if
  if gPaused = 0 then
    if gEnemy2UpRight = 1 then
      if (sprite(206).member.name = "Balltest2_Animated01") or (gCue2 = 1) then
        gCue2 = 1
        if pAnimBounce3 <= 12 then
          sprite(206).locH = sprite(206).locH + 3
          sprite(206).locV = sprite(206).locV - 4
          pAnimBounce3 = pAnimBounce3 + 1
        else
          if pAnimBounce3 > 12 then
            sprite(206).locH = sprite(206).locH + 1
            MoveEnemy2UpRight()
            enemy2FlipBlock()
            gMoveBady2 = 0
            gEnemy2UpRight = 0
            checkLevelComplete()
            pAnimBounce3 = 1
            gCue2 = 0
          end if
        end if
      end if
    else
      if gEnemy2UpLeft = 1 then
        if (sprite(206).member.name = "Balltest2_Animated01") or (gCue2 = 1) then
          gCue2 = 1
          if pAnimBounce3 <= 12 then
            sprite(206).locH = sprite(206).locH - 3
            sprite(206).locV = sprite(206).locV - 4
            pAnimBounce3 = pAnimBounce3 + 1
          else
            if pAnimBounce3 > 12 then
              sprite(206).locH = sprite(206).locH - 1
              MoveEnemy2UpLeft()
              enemy2FlipBlock()
              gMoveBady2 = 0
              gEnemy2UpLeft = 0
              checkLevelComplete()
              pAnimBounce3 = 1
              gCue2 = 0
            end if
          end if
        end if
      else
        if gEnemy2DownRight = 1 then
          if (sprite(206).member.name = "Balltest2_Animated01") or (gCue2 = 1) then
            gCue2 = 1
            if pAnimBounce3 <= 12 then
              sprite(206).locH = sprite(206).locH + 3
              sprite(206).locV = sprite(206).locV + 4
              pAnimBounce3 = pAnimBounce3 + 1
            else
              if pAnimBounce3 > 12 then
                sprite(206).locH = sprite(206).locH + 1
                MoveEnemy2DownRight()
                enemy2FlipBlock()
                gMoveBady2 = 0
                gEnemy2DownRight = 0
                checkLevelComplete()
                pAnimBounce3 = 1
                gCue2 = 0
              end if
            end if
          end if
        else
          if gEnemy2DownLeft = 1 then
            if (sprite(206).member.name = "Balltest2_Animated01") or (gCue2 = 1) then
              gCue2 = 1
              if pAnimBounce3 <= 12 then
                sprite(206).locH = sprite(206).locH - 3
                sprite(206).locV = sprite(206).locV + 4
                pAnimBounce3 = pAnimBounce3 + 1
              else
                if pAnimBounce3 > 12 then
                  sprite(206).locH = sprite(206).locH - 1
                  MoveEnemy2DownLeft()
                  enemy2FlipBlock()
                  gMoveBady2 = 0
                  gEnemy2DownLeft = 0
                  checkLevelComplete()
                  pAnimBounce3 = 1
                  gCue2 = 0
                end if
              end if
            end if
          end if
        end if
      end if
    end if
    AnimatePlayer()
    AnimateEnemy1()
    AnimateEnemy2()
    ShowTime()
    moveStarField()
  end if
  go(the frame)
end