100 Plus Great Games 2/100PLUSV2.BIN/games/Aim&Fire.dxr/00008_gunScript.ls

Text File | 2002-01-25 | 1.8 KB | 63 lines

property spriteNum, diff, theRect, theMove
global gFadeFlare, gPaused

on beginSprite
  theRect = sprite(spriteNum).rect
end

on exitFrame
  if gPaused = 0 then
    if mouseH() > 314 then
      if sprite(spriteNum).member.name <> "gun0005" then
        sprite(spriteNum).member = "gun0005"
        sprite(48).member = "gun0005_flare"
      end if
    else
      if mouseH() > 264 then
        if sprite(spriteNum).member.name <> "gun0004" then
          sprite(spriteNum).member = "gun0004"
          sprite(48).member = "gun0004_flare"
        end if
      else
        if mouseH() > 214 then
          if sprite(spriteNum).member.name <> "gun0003" then
            sprite(spriteNum).member = "gun0003"
            sprite(48).member = "gun0003_flare"
          end if
        else
          if mouseH() > 164 then
            if sprite(spriteNum).member.name <> "gun0002" then
              sprite(spriteNum).member = "gun0002"
              sprite(48).member = "gun0002_flare"
            end if
          else
            if mouseH() > 114 then
              if sprite(spriteNum).member.name <> "gun0001" then
                sprite(spriteNum).member = "gun0001"
                sprite(48).member = "gun0001_flare"
              end if
            else
              if sprite(spriteNum).member.name <> "gun0000" then
                sprite(spriteNum).member = "gun0000"
                sprite(48).member = "gun0000_flare"
              end if
            end if
          end if
        end if
      end if
    end if
    diff = (the mouseLoc)[2] - 220
    theRect = sprite(spriteNum).rect
    theRect[2] = 360 + diff
    if theRect[2] > 300 then
      theRect[2] = 300
    else
      if theRect[2] < 220 then
        theRect[2] = 220
      end if
    end if
    sprite(spriteNum).rect = theRect
    sprite(48).rect = theRect
  end if
end