Archive of Volcano Kit. This page c. 2003.

Everything inside Treads of Fury's Director movie, extracted for this archive: pictures, sounds and the compiled scripts.

Play the Game

Treads of Fury: contents

Everything inside the game's Director movie: 83 pictures, 21 sounds and 36 scripts, by cast library. Play the game.

The scripts are compiled Lingo (a projector doesn't keep the source), shown as disassembly: each handler with its arguments, local variables and operations, with names from the movie. Pictures are shown at their own size; click one for the full image.

Cast library 1: Internal

Pictures (6)

19 · treadhead
397×239, 32-bit
20 · toptread
860×46, 32-bit
27
561×316, 32-bit
28
367×257, 32-bit
29 · titleScreen2
163×164, 32-bit
32 · treadbottom
923×58, 32-bit

Sounds (5)

14 0.8 s, 44100 Hz
15 0.8 s, 44100 Hz
16 0.8 s, 44100 Hz
17 0.8 s, 44100 Hz
18 0.8 s, 44100 Hz

Scripts (26)

1 · tank (behavior)properties: pTurretAngle, pTurretPower, pKick, pPlayerNumber, pArmed, pFacing, pAlive, pTurretSprite, pPlateSprite, pHydraulicSprite, pTerrainSlope, pHitPoints, pBaseRotation, pTurretOffsetH, pTurretOffsetV, pPlateOffsetH, pPlateOffsetV, pHydraulicOffsetH, pHydraulicOffsetV, pOldDrawH, pOldDrawV, pAICompensate, pAIStartDelay, pAIStartDelayReset, pWalkCycle, pBaseTredMemberNum
on beginSprite me   -- locals: whatcolor
  pushzero
  setprop pTurretPower
  pushzero
  setprop pArmed
  pushint16 1
  setprop pAlive
  pushzero
  setprop pAICompensate
  pushzero
  setprop pBaseRotation
  getparam me
  getobjprop spriteNum
  pushint16 1
  add
  setprop pTurretSprite
  getparam me
  getobjprop spriteNum
  pushint16 2
  add
  setprop pPlateSprite
  getparam me
  getobjprop spriteNum
  pushint16 1
  sub
  setprop pHydraulicSprite
  pushint16 60
  setprop pAIStartDelayReset
  getprop pAIStartDelayReset
  setprop pAIStartDelay
  getprop pPlayerNumber
  pushint16 1
  eq
  jmpifz 11
  getglobal PLAYER1_COLOR
  setlocal whatcolor
  jmp 8
  getglobal PLAYER2_COLOR
  setlocal whatcolor
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  getlocal whatcolor
  pushcons 'Turret'
  joinstr
  pusharglist 1
  extcall member
  setobjprop member
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getlocal whatcolor
  pushcons 'Plate'
  joinstr
  pusharglist 1
  extcall member
  setobjprop member
  getprop pHydraulicSprite
  pusharglist 1
  extcall sprite
  getlocal whatcolor
  pushcons 'Piston'
  joinstr
  pusharglist 1
  extcall member
  setobjprop member
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getlocal whatcolor
  pushcons 'Treds1'
  joinstr
  pusharglist 1
  extcall member
  setobjprop member
  getprop pHydraulicSprite
  pusharglist 1
  extcall sprite
  getobjprop locH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop locH
  sub
  setprop pHydraulicOffsetH
  getprop pHydraulicSprite
  pusharglist 1
  extcall sprite
  getobjprop locV
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop locV
  sub
  setprop pHydraulicOffsetV
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getobjprop locH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop locH
  sub
  setprop pPlateOffsetH
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getobjprop locV
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop locV
  sub
  setprop pPlateOffsetV
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  getobjprop locH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop locH
  sub
  setprop pTurretOffsetH
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  getobjprop locV
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop locV
  sub
  setprop pTurretOffsetV
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop memberNum
  setprop pBaseTredMemberNum
  pushzero
  setprop pWalkCycle
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 2500
  pusharglist 1
  extcall random
  pushint16 1200
  sub
  setobjprop pDrawH
  getprop pPlayerNumber
  pushint16 1
  eq
  jmpifz 16
  pushcons 0.5
  pusharglist 0
  extcall pi
  mul
  setprop pTurretAngle
  getglobal PLAYER1_HITPOINTS
  setprop pHitPoints
  getprop pPlayerNumber
  pushint16 2
  eq
  jmpifz 87
  getglobal PLAYER2_HITPOINTS
  setprop pHitPoints
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal PLAYER1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  gt
  jmpifz 32
  pushcons 0.5
  inv
  pusharglist 0
  extcall pi
  mul
  setprop pTurretAngle
  getglobal PLAYER1_SPRITE
  pusharglist 1
  extcall sprite
  pushcons 0.5
  pusharglist 0
  extcall pi
  mul
  setobjprop pTurretAngle
  jmp 29
  pushcons 0.5
  pusharglist 0
  extcall pi
  mul
  setprop pTurretAngle
  getglobal PLAYER1_SPRITE
  pusharglist 1
  extcall sprite
  pushcons 0.5
  inv
  pusharglist 0
  extcall pi
  mul
  setobjprop pTurretAngle
  ret
on getPropertyDescriptionList    -- locals: description
  pusharglist 0
  pushproplist
  setlocal description
  getlocal description
  pushsymb pPlayerNumber
  pushsymb default
  pushint16 1
  pushsymb format
  pushsymb integer
  pushsymb comment
  pushcons 'pPlayerNumber:'
  pusharglist 6
  pushproplist
  pusharglistnoret 3
  extcall addProp
  getlocal description
  pusharglistnoret 1
  extcall return
  ret
on updateAI me   -- locals: shotDistance, tankDistance
  getprop pPlayerNumber
  getglobal gActivePlayer
  eq
  jmpifz 128
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  sub
  setlocal shotDistance
  getprop pPlayerNumber
  pushint16 1
  eq
  jmpifz 30
  getglobal PLAYER2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  sub
  setlocal tankDistance
  jmp 27
  getglobal PLAYER1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  sub
  setlocal tankDistance
  getlocal shotDistance
  pusharglist 1
  extcall abs
  getlocal tankDistance
  pusharglist 1
  extcall abs
  gt
  jmpifz 16
  getprop pAICompensate
  pushint16 1
  sub
  setprop pAICompensate
  jmp 13
  getprop pAICompensate
  pushint16 1
  add
  setprop pAICompensate
  ret
on AI me   -- locals: tankDistance, goalAngle, angleSet, goalPower
  getprop pAIStartDelay
  pushint16 1
  sub
  setprop pAIStartDelay
  getprop pAIStartDelay
  pushzero
  gt
  jmpifz 8
  pusharglistnoret 0
  extcall return
  getprop pPlayerNumber
  pushint16 1
  eq
  jmpifz 30
  getglobal PLAYER2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  sub
  setlocal tankDistance
  jmp 27
  getglobal PLAYER1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  sub
  setlocal tankDistance
  getlocal tankDistance
  pushzero
  gt
  jmpifz 15
  pushcons 0.25
  pusharglist 0
  extcall pi
  mul
  setlocal goalAngle
  jmp 13
  pushcons 0.25
  inv
  pusharglist 0
  extcall pi
  mul
  setlocal goalAngle
  pushzero
  setlocal angleSet
  getprop pTurretAngle
  getlocal goalAngle
  lt
  jmpifz 22
  getparam me
  pusharglistnoret 1
  localcall moveTurretClockwise
  getprop pTurretAngle
  getlocal goalAngle
  gt
  jmpifz 8
  pushint16 1
  setlocal angleSet
  getprop pTurretAngle
  getlocal goalAngle
  gt
  jmpifz 22
  getparam me
  pusharglistnoret 1
  localcall moveTurretCounterClockwise
  getprop pTurretAngle
  getlocal goalAngle
  lt
  jmpifz 8
  pushint16 1
  setlocal angleSet
  getprop pTurretAngle
  getlocal goalAngle
  eq
  jmpifz 8
  pushint16 1
  setlocal angleSet
  getlocal angleSet
  jmpifz 49
  getlocal tankDistance
  pushint16 50
  div
  pusharglist 1
  extcall abs
  getprop pAICompensate
  add
  setlocal goalPower
  getprop pTurretPower
  getlocal goalPower
  lt
  jmpifz 12
  getparam me
  pusharglistnoret 1
  localcall increaseTurretPower
  jmp 15
  getprop pAIStartDelayReset
  setprop pAIStartDelay
  getparam me
  pusharglistnoret 1
  localcall atemptFire
  ret
on handleSmoke me   -- locals: totalHitPoints, whatSmoke
  getprop pPlayerNumber
  pushint16 1
  eq
  jmpifz 7
  getglobal PLAYER1_HITPOINTS
  setlocal totalHitPoints
  getprop pPlayerNumber
  pushint16 2
  eq
  jmpifz 7
  getglobal PLAYER2_HITPOINTS
  setlocal totalHitPoints
  getprop pHitPoints
  getlocal totalHitPoints
  pushcons 0.5
  mul
  lt
  jmpifz 91
  pushint16 2
  pusharglist 1
  extcall random
  pushint16 1
  eq
  jmpifz 76
  pushint16 16
  setlocal whatSmoke
  getlocal whatSmoke
  pushint16 26
  lteq
  jmpifz 62
  getlocal whatSmoke
  pusharglist 1
  extcall sprite
  getobjprop pActive
  not
  jmpifz 38
  getlocal whatSmoke
  pushsymb emit
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglistnoret 4
  extcall sendSprite
  jmp 14
  pushint16 1
  getlocal whatSmoke
  add
  setlocal whatSmoke
  endrepeat 65
  ret
on prepareFrame me   -- locals: 
  getparam me
  pusharglistnoret 1
  localcall handleSmoke
  getprop pAlive
  jmpifz 144
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pActive
  not
  jmpifz 72
  getprop pPlayerNumber
  getglobal gActivePlayer
  eq
  jmpifz 63
  getprop pPlayerNumber
  pushint16 1
  eq
  jmpifz 24
  getglobal PLAYER1_HUMAN
  jmpifz 12
  getparam me
  pusharglistnoret 1
  localcall handleInput
  jmp 9
  getparam me
  pusharglistnoret 1
  localcall AI
  getprop pPlayerNumber
  pushint16 2
  eq
  jmpifz 24
  getglobal PLAYER2_HUMAN
  jmpifz 12
  getparam me
  pusharglistnoret 1
  localcall handleInput
  jmp 9
  getparam me
  pusharglistnoret 1
  localcall AI
  getprop pKick
  pushzero
  lt
  jmpifz 13
  getprop pKick
  pushint16 1
  add
  setprop pKick
  getparam me
  pusharglistnoret 1
  localcall handleGravity
  getparam me
  pusharglistnoret 1
  localcall register
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  setprop pOldDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  setprop pOldDrawV
  ret
on requestMove me, whatDirection   -- locals: whatSPeed
  getprop pPlayerNumber
  pushint16 1
  eq
  jmpifz 8
  getglobal PLAYER1_SPEED
  setlocal whatSPeed
  getprop pPlayerNumber
  pushint16 2
  eq
  jmpifz 8
  getglobal PLAYER2_SPEED
  setlocal whatSPeed
  getprop pWalkCycle
  pushcons 0.5
  add
  setprop pWalkCycle
  getprop pWalkCycle
  pushcons 1.5
  gteq
  jmpifz 9
  pushcons 0.4
  inv
  setprop pWalkCycle
  getparam whatDirection
  pushzero
  gt
  jmpifz 91
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  pushcons 0.5
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop width
  mul
  add
  pushint16 40
  sub
  gt
  jmpifz 8
  pusharglistnoret 0
  extcall return
  getprop pTerrainSlope
  pushcons 0.25
  inv
  pusharglist 0
  extcall pi
  mul
  gt
  jmpifz 28
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getlocal whatSPeed
  add
  setobjprop pDrawH
  getparam whatDirection
  pushzero
  lt
  jmpifz 90
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  pushcons 0.5
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop width
  mul
  sub
  pushint16 40
  add
  lt
  jmpifz 8
  pusharglistnoret 0
  extcall return
  getprop pTerrainSlope
  pushcons 0.25
  pusharglist 0
  extcall pi
  mul
  lt
  jmpifz 28
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getlocal whatSPeed
  sub
  setobjprop pDrawH
  ret
on moveTurretCounterClockwise me   -- locals: 
  getprop pTurretAngle
  pushcons 0.04
  sub
  setprop pTurretAngle
  getprop pTurretAngle
  pushcons 0.5
  inv
  pusharglist 0
  extcall pi
  mul
  lt
  jmpifz 13
  pushcons 0.5
  inv
  pusharglist 0
  extcall pi
  mul
  setprop pTurretAngle
  ret
on moveTurretClockwise me   -- locals: 
  getprop pTurretAngle
  pushcons 0.04
  add
  setprop pTurretAngle
  getprop pTurretAngle
  pushcons 0.5
  pusharglist 0
  extcall pi
  mul
  gt
  jmpifz 12
  pushcons 0.5
  pusharglist 0
  extcall pi
  mul
  setprop pTurretAngle
  ret
on increaseTurretPower me   -- locals: 
  pushint16 1
  setprop pArmed
  getprop pTurretPower
  pushint16 1
  add
  setprop pTurretPower
  getprop pTurretPower
  getglobal MAX_TURRET_POWER
  gt
  jmpifz 8
  getglobal MAX_TURRET_POWER
  setprop pTurretPower
  ret
on atemptFire me   -- locals: fired
  pushzero
  setprop pArmed
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getprop pTurretAngle
  getprop pBaseRotation
  add
  getprop pTurretPower
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 5
  objcall fire
  setlocal fired
  getlocal fired
  jmpifz 67
  pushint16 4
  pusharglist 1
  extcall sound
  getprop pTurretPower
  getglobal MAX_TURRET_POWER
  pusharglist 1
  extcall float
  div
  pushint16 230
  mul
  pushint16 20
  add
  setobjprop volume
  pushint16 4
  pusharglist 1
  extcall sound
  pushcons 'bg-sound3'
  pusharglist 1
  extcall member
  pusharglistnoret 2
  objcall play
  pushint16 3
  inv
  getprop pTurretPower
  pushint16 15
  div
  sub
  setprop pKick
  getglobal MIN_TURRET_POWER
  setprop pTurretPower
  ret
on handleInput me   -- locals: 
  pushint16 123
  pusharglist 1
  extcall keyPressed
  jmpifz 33
  getparam me
  pusharglistnoret 1
  localcall moveTurretCounterClockwise
  getprop pTurretAngle
  pushcons 0.5
  inv
  pusharglist 0
  extcall pi
  mul
  eq
  jmpifz 13
  getparam me
  pushint16 1
  inv
  pusharglistnoret 2
  localcall requestMove
  pushint16 124
  pusharglist 1
  extcall keyPressed
  jmpifz 31
  getparam me
  pusharglistnoret 1
  localcall moveTurretClockwise
  getprop pTurretAngle
  pushcons 0.5
  pusharglist 0
  extcall pi
  mul
  eq
  jmpifz 12
  getparam me
  pushint16 1
  pusharglistnoret 2
  localcall requestMove
  pushint16 49
  pusharglist 1
  extcall keyPressed
  jmpifz 9
  getparam me
  pusharglistnoret 1
  localcall increaseTurretPower
  pushint16 49
  pusharglist 1
  extcall keyPressed
  not
  getprop pArmed
  and
  jmpifz 9
  getparam me
  pusharglistnoret 1
  localcall atemptFire
  ret
on handleGravity me   -- locals: terain1Rect, terain2Rect
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop width
  pushcons 0.5
  mul
  sub
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop height
  pushcons 0.5
  mul
  sub
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop width
  pushcons 0.5
  mul
  add
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop height
  pushcons 0.5
  mul
  add
  pusharglist 4
  extcall rect
  setlocal terain1Rect
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop width
  pushcons 0.5
  mul
  sub
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop height
  pushcons 0.5
  mul
  sub
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop width
  pushcons 0.5
  mul
  add
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop height
  pushcons 0.5
  mul
  add
  pusharglist 4
  extcall rect
  setlocal terain2Rect
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  getlocal terain1Rect
  pusharglist 2
  objcall inside
  jmpifz 15
  getparam me
  getglobal TERAIN1_SPRITE
  pusharglistnoret 2
  localcall gravityInTerain
  jmp 124
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  getlocal terain2Rect
  pusharglist 2
  objcall inside
  jmpifz 15
  getparam me
  getglobal TERAIN2_SPRITE
  pusharglistnoret 2
  localcall gravityInTerain
  jmp 75
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getlocal terain1Rect
  getobjprop top
  lt
  jmpifz 29
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pushint16 10
  add
  setobjprop pDrawV
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getlocal terain1Rect
  getobjprop bottom
  gt
  jmpifz 9
  getparam me
  pusharglistnoret 1
  localcall killTank
  ret
on gravityInTerain me, whatTerainSprite   -- locals: checkH, checkV, theColor, whitecolor, onGround, point1V, point1H, point2V, point2H
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam whatTerainSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam whatTerainSprite
  pusharglist 1
  extcall sprite
  getobjprop width
  pushcons 0.5
  mul
  sub
  sub
  setlocal checkH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getparam whatTerainSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getparam whatTerainSprite
  pusharglist 1
  extcall sprite
  getobjprop height
  pushcons 0.5
  mul
  sub
  sub
  setlocal checkV
  getparam whatTerainSprite
  pusharglist 1
  extcall sprite
  getobjprop member
  getobjprop image
  getlocal checkH
  getlocal checkV
  pusharglist 3
  objcall getPixel
  setlocal theColor
  pushint16 248
  pushint16 248
  pushint16 248
  pusharglist 3
  extcall rgb
  setlocal whitecolor
  getlocal theColor
  getlocal whitecolor
  eq
  getlocal theColor
  pushzero
  eq
  or
  jmpifz 144
  pushzero
  setlocal onGround
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pushint16 10
  add
  setobjprop pDrawV
  getlocal checkV
  pushint16 10
  add
  setlocal checkV
  getparam whatTerainSprite
  pusharglist 1
  extcall sprite
  getobjprop member
  getobjprop image
  getlocal checkH
  getlocal checkV
  pusharglist 3
  objcall getPixel
  setlocal theColor
  getlocal theColor
  getlocal whitecolor
  nteq
  getlocal theColor
  pushzero
  nteq
  and
  jmpifz 68
  pushint16 1
  setlocal onGround
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pushint16 2
  sub
  setobjprop pDrawV
  getlocal checkV
  pushint16 2
  sub
  setlocal checkV
  getparam whatTerainSprite
  pusharglist 1
  extcall sprite
  getobjprop member
  getobjprop image
  getlocal checkH
  getlocal checkV
  pusharglist 3
  objcall getPixel
  setlocal theColor
  endrepeat 75
  jmp 107
  pushint16 1
  setlocal onGround
  getlocal theColor
  getlocal whitecolor
  nteq
  getlocal theColor
  pushzero
  nteq
  and
  jmpifz 63
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pushint16 2
  sub
  setobjprop pDrawV
  getlocal checkV
  pushint16 2
  sub
  setlocal checkV
  getparam whatTerainSprite
  pusharglist 1
  extcall sprite
  getobjprop member
  getobjprop image
  getlocal checkH
  getlocal checkV
  pusharglist 3
  objcall getPixel
  setlocal theColor
  endrepeat 70
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pushint16 2
  add
  setobjprop pDrawV
  getlocal onGround
  jmpifz 212
  getlocal checkV
  setlocal point1V
  getlocal checkH
  setlocal point1H
  getlocal checkH
  pushint16 10
  add
  setlocal checkH
  getlocal checkV
  pushint16 15
  add
  setlocal checkV
  getlocal checkH
  getparam whatTerainSprite
  pusharglist 1
  extcall sprite
  getobjprop width
  gt
  jmpifz 18
  getlocal point1V
  setlocal point2V
  getlocal point1H
  pushint16 10
  add
  setlocal point2H
  jmp 86
  getparam whatTerainSprite
  pusharglist 1
  extcall sprite
  getobjprop member
  getobjprop image
  getlocal checkH
  getlocal checkV
  pusharglist 3
  objcall getPixel
  setlocal theColor
  getlocal theColor
  getlocal whitecolor
  nteq
  jmpifz 47
  getlocal checkV
  pushint16 2
  sub
  setlocal checkV
  getparam whatTerainSprite
  pusharglist 1
  extcall sprite
  getobjprop member
  getobjprop image
  getlocal checkH
  getlocal checkV
  pusharglist 3
  objcall getPixel
  setlocal theColor
  getlocal checkV
  pushzero
  lt
  jmpifz 6
  jmp 6
  endrepeat 49
  getlocal checkV
  setlocal point2V
  getlocal checkH
  setlocal point2H
  getlocal point2V
  getlocal point1V
  sub
  pushint16 10
  pusharglist 1
  extcall float
  div
  pusharglist 1
  extcall atan
  setprop pTerrainSlope
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pOldDrawH
  nteq
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getprop pOldDrawV
  nteq
  or
  jmpifz 19
  getprop pBaseRotation
  pushint16 6
  mul
  getprop pTerrainSlope
  add
  pushcons 7.0
  div
  setprop pBaseRotation
  ret
on register me   -- locals: whatAngle, whatDistance
  getprop pTurretAngle
  pushzero
  gt
  jmpifz 54
  pushint16 1
  setprop pFacing
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop flipH
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop flipV
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop flipH
  getprop pHydraulicSprite
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop flipH
  jmp 60
  pushint16 1
  inv
  setprop pFacing
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop flipH
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop flipV
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop flipH
  getprop pHydraulicSprite
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop flipH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getprop pWalkCycle
  getprop pBaseTredMemberNum
  add
  setobjprop memberNum
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getprop pBaseRotation
  pusharglist 0
  extcall pi
  div
  pushint16 180
  mul
  setobjprop rotation
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  getprop pTurretAngle
  pusharglist 0
  extcall pi
  div
  pushint16 180
  mul
  pushint16 90
  sub
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop rotation
  add
  setobjprop rotation
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getobjprop pActive
  not
  jmpifz 23
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop rotation
  setobjprop rotation
  getprop pHydraulicSprite
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop rotation
  setobjprop rotation
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pTurretOffsetH
  getprop pTurretAngle
  pusharglist 1
  extcall sin
  getprop pKick
  mul
  add
  getprop pFacing
  mul
  add
  setobjprop pDrawH
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getprop pTurretOffsetV
  add
  getprop pTurretAngle
  pusharglist 1
  extcall cos
  getprop pKick
  mul
  sub
  getprop pTurretAngle
  pusharglist 1
  extcall cos
  pushint16 6
  mul
  sub
  setobjprop pDrawV
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getobjprop pActive
  not
  jmpifz 65
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getprop pPlateOffsetV
  add
  getprop pTurretAngle
  pusharglist 1
  extcall cos
  pushint16 4
  mul
  sub
  setobjprop pDrawV
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pPlateOffsetH
  getprop pFacing
  mul
  add
  setobjprop pDrawH
  getprop pHydraulicSprite
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getprop pHydraulicOffsetV
  add
  getprop pTurretAngle
  pusharglist 1
  extcall cos
  pushint16 8
  mul
  sub
  setobjprop pDrawV
  getprop pHydraulicSprite
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pHydraulicOffsetH
  getprop pFacing
  mul
  add
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  pusharglist 2
  extcall getAngle
  setlocal whatAngle
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  pusharglist 2
  extcall getDistance
  setlocal whatDistance
  getlocal whatAngle
  getprop pBaseRotation
  add
  setlocal whatAngle
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getlocal whatAngle
  pusharglist 1
  extcall sin
  getlocal whatDistance
  mul
  add
  setobjprop pDrawH
  getprop pTurretSprite
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getlocal whatAngle
  pusharglist 1
  extcall cos
  getlocal whatDistance
  mul
  sub
  setobjprop pDrawV
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  pusharglist 2
  extcall getAngle
  setlocal whatAngle
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  pusharglist 2
  extcall getDistance
  setlocal whatDistance
  getlocal whatAngle
  getprop pBaseRotation
  add
  setlocal whatAngle
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getobjprop pActive
  not
  jmpifz 65
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getlocal whatAngle
  pusharglist 1
  extcall sin
  getlocal whatDistance
  mul
  add
  setobjprop pDrawH
  getprop pPlateSprite
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getlocal whatAngle
  pusharglist 1
  extcall cos
  getlocal whatDistance
  mul
  sub
  setobjprop pDrawV
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  getprop pHydraulicSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pHydraulicSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  pusharglist 2
  extcall getAngle
  setlocal whatAngle
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  getprop pHydraulicSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pHydraulicSprite
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  pusharglist 2
  extcall getDistance
  setlocal whatDistance
  getlocal whatAngle
  getprop pBaseRotation
  add
  setlocal whatAngle
  getprop pHydraulicSprite
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getlocal whatAngle
  pusharglist 1
  extcall sin
  getlocal whatDistance
  mul
  add
  setobjprop pDrawH
  getprop pHydraulicSprite
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getlocal whatAngle
  pusharglist 1
  extcall cos
  getlocal whatDistance
  mul
  sub
  setobjprop pDrawV
  ret
on checkProximityExplosion me   -- locals: proximity, damage
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  pusharglist 2
  extcall getDistance
  setlocal proximity
  getlocal proximity
  pushint16 70
  lt
  jmpifz 116
  pushint16 6
  pusharglist 1
  extcall sound
  pushint16 70
  getlocal proximity
  sub
  pushcons 70.0
  div
  pushint16 250
  mul
  pushzero
  add
  setobjprop volume
  pushint16 6
  pusharglist 1
  extcall sound
  pushsymb member
  pushcons 'bg-sound8'
  pusharglist 1
  extcall member
  pushsymb rateShift
  pushint16 5
  pusharglist 1
  extcall random
  pusharglist 4
  pushproplist
  pusharglistnoret 2
  objcall play
  pushint16 70
  getlocal proximity
  sub
  setlocal damage
  getlocal damage
  pushzero
  lt
  jmpifz 6
  pushzero
  setlocal damage
  getprop pHitPoints
  getlocal damage
  sub
  setprop pHitPoints
  getprop pPlateSprite
  pushsymb explodeTankParticles
  pusharglistnoret 2
  extcall sendSprite
  getprop pHitPoints
  pushzero
  lt
  jmpifz 9
  getparam me
  pusharglistnoret 1
  localcall killTank
  ret
on killTank me   -- locals: 
  getprop pAlive
  jmpifz 53
  pushzero
  setprop pAlive
  pusharglistnoret 0
  extcall registerTankKill
  getprop pHydraulicSprite
  pushsymb explodeTankParticles
  pusharglistnoret 2
  extcall sendSprite
  getprop pPlateSprite
  pushsymb explodeTankParticles
  pusharglistnoret 2
  extcall sendSprite
  getprop pTurretSprite
  pushsymb explodeTankParticles
  pusharglistnoret 2
  extcall sendSprite
  getparam me
  getobjprop spriteNum
  pushsymb explodeTankParticles
  pusharglistnoret 2
  extcall sendSprite
  ret
2 · shell (behavior)properties: pDeltaH, pDeltaV, pH, pV, pActive, pFramesInAir
on beginSprite me   -- locals: 
  pushzero
  setprop pFramesInAir
  pushzero
  setprop pActive
  pushzero
  setprop pDeltaH
  pushzero
  setprop pDeltaV
  pushzero
  setprop pH
  pushzero
  setprop pV
  ret
on prepareFrame me   -- locals: whatAngle
  getprop pActive
  jmpifz 164
  getprop pDeltaV
  getglobal gravity
  add
  setprop pDeltaV
  getprop pDeltaH
  pushcons 0.997
  mul
  setprop pDeltaH
  getprop pH
  getprop pDeltaH
  add
  setprop pH
  getprop pV
  getprop pDeltaV
  add
  setprop pV
  pushzero
  pushzero
  pusharglist 2
  extcall point
  getprop pDeltaH
  getprop pDeltaV
  pusharglist 2
  extcall point
  pusharglist 2
  extcall getAngle
  setlocal whatAngle
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getlocal whatAngle
  pusharglist 0
  extcall pi
  div
  pushint16 180
  mul
  pushint16 90
  sub
  setobjprop rotation
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getprop pH
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getprop pV
  setobjprop pDrawV
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  getprop pFramesInAir
  pushint16 1
  gt
  jmpifz 9
  getparam me
  pusharglistnoret 1
  localcall checkCollision
  getprop pFramesInAir
  pushint16 1
  add
  setprop pFramesInAir
  jmp 15
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop visible
  ret
on checkCollision me   -- locals: collision, player1Collision, player2Collision, groundCollision, groundSafetyCollision
  pushzero
  setlocal collision
  pushint16 1
  setlocal player1Collision
  pushint16 2
  setlocal player2Collision
  pushint16 4
  setlocal groundCollision
  pushint16 3
  setlocal groundSafetyCollision
  getprop pV
  pushint16 480
  gt
  jmpifz 7
  getlocal groundSafetyCollision
  setlocal collision
  getparam me
  getobjprop spriteNum
  getglobal TERAIN1_SPRITE
  ontospr
  jmpifz 7
  getlocal groundCollision
  setlocal collision
  getparam me
  getobjprop spriteNum
  getglobal TERAIN2_SPRITE
  ontospr
  jmpifz 7
  getlocal groundCollision
  setlocal collision
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  getglobal PLAYER1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal PLAYER1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  pusharglist 2
  extcall getDistance
  pushint16 50
  lt
  jmpifz 7
  getlocal player1Collision
  setlocal collision
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  getglobal PLAYER2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal PLAYER2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pusharglist 2
  extcall point
  pusharglist 2
  extcall getDistance
  pushint16 50
  lt
  jmpifz 7
  getlocal player2Collision
  setlocal collision
  getlocal collision
  getlocal groundSafetyCollision
  eq
  jmpifz 34
  pushzero
  setprop pActive
  getglobal PLAYER1_SPRITE
  pushsymb updateAI
  pusharglistnoret 2
  extcall sendSprite
  getglobal PLAYER2_SPRITE
  pushsymb updateAI
  pusharglistnoret 2
  extcall sendSprite
  pusharglistnoret 0
  extcall changePlayer
  getlocal collision
  getlocal groundCollision
  eq
  getlocal collision
  getlocal player1Collision
  eq
  or
  getlocal collision
  getlocal player2Collision
  eq
  or
  jmpifz 124
  pushint16 5
  pusharglist 1
  extcall sound
  pushint16 120
  setobjprop volume
  pushint16 5
  pusharglist 1
  extcall sound
  pushsymb member
  pushcons 'bg-sound9'
  pusharglist 1
  extcall member
  pushsymb rateShift
  pushint16 5
  pusharglist 1
  extcall random
  pusharglist 4
  pushproplist
  pusharglistnoret 2
  objcall play
  pushzero
  setprop pActive
  getglobal CONTROLLER_SPRITE
  pushsymb explodeGround
  pusharglistnoret 2
  extcall sendSprite
  pushsymb explodeGroundParticles
  pusharglistnoret 1
  extcall sendAllSprites
  getglobal PLAYER1_SPRITE
  pushsymb checkProximityExplosion
  pusharglistnoret 2
  extcall sendSprite
  getglobal PLAYER2_SPRITE
  pushsymb checkProximityExplosion
  pusharglistnoret 2
  extcall sendSprite
  getglobal PLAYER1_SPRITE
  pushsymb updateAI
  pusharglistnoret 2
  extcall sendSprite
  getglobal PLAYER2_SPRITE
  pushsymb updateAI
  pusharglistnoret 2
  extcall sendSprite
  pusharglistnoret 0
  extcall changePlayer
  ret
on fire me, whatAngle, whatPower, whatH, whatV   -- locals: turretLength, pAtLeastOneFrame, fired
  getprop pActive
  not
  jmpifz 84
  getparam whatAngle
  pusharglist 1
  extcall sin
  getparam whatPower
  mul
  setprop pDeltaH
  getparam whatAngle
  pusharglist 1
  extcall cos
  inv
  getparam whatPower
  mul
  setprop pDeltaV
  pushint16 45
  setlocal turretLength
  getparam whatH
  getparam whatAngle
  pusharglist 1
  extcall sin
  getlocal turretLength
  mul
  add
  setprop pH
  getparam whatV
  getparam whatAngle
  pusharglist 1
  extcall cos
  getlocal turretLength
  mul
  sub
  setprop pV
  pushzero
  setlocal pAtLeastOneFrame
  pushint16 1
  setprop pActive
  pushint16 1
  setlocal fired
  jmp 6
  pushzero
  setlocal fired
  getlocal fired
  pusharglistnoret 1
  extcall return
  ret
on endSprite me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  ret
3 · menu loop (behavior)
on exitFrame me   -- locals: 
  pusharglist 0
  thebuiltin frame
  pusharglistnoret 1
  extcall go
  ret
4 · MenuScroller (behavior)
on beginSprite me   -- locals: 
  pushcons 'activeGround1'
  pusharglist 1
  extcall member
  pushcons 'srcGround'
  pusharglist 1
  extcall member
  getobjprop image
  setobjprop image
  pushcons 'activegroundMask1'
  pusharglist 1
  extcall member
  pushcons 'srcGroundMask'
  pusharglist 1
  extcall member
  getobjprop image
  setobjprop image
  pushcons 'activeGround2'
  pusharglist 1
  extcall member
  pushcons 'srcGround'
  pusharglist 1
  extcall member
  getobjprop image
  setobjprop image
  pushcons 'activegroundMask2'
  pusharglist 1
  extcall member
  pushcons 'srcGroundMask'
  pusharglist 1
  extcall member
  getobjprop image
  setobjprop image
  ret
on prepareFrame me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop locH
  getparam me
  getobjprop spriteNum
  sub
  setobjprop locH
  getparam me
  getobjprop spriteNum
  pushint8 1
  add
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop locH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop width
  add
  setobjprop locH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop right
  pushzero
  lt
  jmpifz 26
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pushint8 1
  add
  pusharglist 1
  extcall sprite
  getobjprop locH
  setobjprop locH
  ret
5 · MENU colorpick (behavior)properties: pColor, pPlayer
on mouseUp me   -- locals: 
  getprop pPlayer
  pushint16 1
  eq
  jmpifz 12
  getprop pColor
  setglobal PLAYER1_COLOR
  jmp 9
  getprop pColor
  setglobal PLAYER2_COLOR
  ret
on mouseEnter me   -- locals: 
  ret
on prepareFrame me   -- locals: Match
  pushzero
  setlocal Match
  getprop pPlayer
  pushint16 1
  eq
  jmpifz 21
  getglobal PLAYER1_COLOR
  getprop pColor
  eq
  jmpifz 8
  pushint16 1
  setlocal Match
  jmp 18
  getglobal PLAYER2_COLOR
  getprop pColor
  eq
  jmpifz 8
  pushint16 1
  setlocal Match
  getlocal Match
  pushint16 1
  eq
  jmpifz 20
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 100
  setobjprop blend
  jmp 17
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 30
  setobjprop blend
  ret
on getPropertyDescriptionList    -- locals: description
  pusharglist 0
  pushproplist
  setlocal description
  getlocal description
  pushsymb pPlayer
  pushsymb default
  pushint16 1
  pushsymb format
  pushsymb integer
  pushsymb comment
  pushcons 'pPlayer'
  pusharglist 6
  pushproplist
  pusharglistnoret 3
  extcall addProp
  getlocal description
  pushsymb pColor
  pushsymb default
  pushcons 'blue'
  pushsymb format
  pushsymb string
  pushsymb comment
  pushcons 'pColor'
  pusharglist 6
  pushproplist
  pusharglistnoret 3
  extcall addProp
  getlocal description
  pusharglistnoret 1
  extcall return
  ret
6 · snow2 (behavior)properties: pDeltaH, pDeltaV, pDrawH, pDrawV
on beginSprite me   -- locals: 
  getparam me
  pusharglistnoret 1
  localcall repop
  ret
on endSprite me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  ret
on repop me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 700
  pusharglist 1
  extcall random
  pushint16 100
  sub
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 100
  pusharglist 1
  extcall random
  pushint16 100
  sub
  setobjprop pDrawV
  pushint16 1
  inv
  setprop pDeltaH
  pushint16 7
  pusharglist 1
  extcall random
  pushint16 4
  add
  pushint16 2
  pusharglist 1
  extcall float
  div
  setprop pDeltaV
  getprop pDeltaV
  pushint16 3
  gt
  jmpifz 21
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushcons 'snow4'
  pusharglist 1
  extcall member
  setobjprop member
  getprop pDeltaV
  pushint16 5
  gt
  jmpifz 21
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushcons 'snow5'
  pusharglist 1
  extcall member
  setobjprop member
  ret
on prepareFrame me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pDeltaH
  add
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getprop pDeltaV
  add
  setobjprop pDrawV
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pushint16 480
  gt
  jmpifz 9
  getparam me
  pusharglistnoret 1
  localcall repop
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getprop pDrawH
  getprop pDrawV
  pusharglist 2
  extcall point
  setobjprop loc
  ret
7 · Hanger1ColorChange (behavior)
on prepareFrame me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushcons 'hanger'
  getglobal PLAYER1_COLOR
  joinstr
  pusharglist 1
  extcall member
  setobjprop member
  ret
8 · Player2HangerColorChange (behavior)
on prepareFrame me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushcons 'hanger'
  getglobal PLAYER2_COLOR
  joinstr
  pusharglist 1
  extcall member
  setobjprop member
  ret
9 · tree (behavior)properties: pDeltaV, pDead, pActive, pDelay
on beginSprite me   -- locals: whatTerain, hoffset, whitecolor, voffset, whatcolor
  pushzero
  setprop pDeltaV
  pushint16 1
  setprop pActive
  pushzero
  setprop pDead
  pushzero
  setprop pDelay
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 6
  setobjprop locZ
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1500
  pusharglist 1
  extcall random
  pushint16 600
  sub
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  pushcons 0.5
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop width
  mul
  add
  lt
  jmpifz 11
  getglobal TERAIN1_SPRITE
  setlocal whatTerain
  jmp 8
  getglobal TERAIN2_SPRITE
  setlocal whatTerain
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getlocal whatTerain
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  pushcons 0.5
  getlocal whatTerain
  pusharglist 1
  extcall sprite
  getobjprop width
  mul
  sub
  sub
  setlocal hoffset
  pushint16 248
  pushint16 248
  pushint16 248
  pusharglist 3
  extcall rgb
  setlocal whitecolor
  pushint16 10
  setlocal voffset
  getlocal voffset
  pushint16 400
  lteq
  jmpifz 62
  getlocal voffset
  pushint16 10
  add
  setlocal voffset
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop member
  getobjprop image
  getlocal hoffset
  getlocal voffset
  pusharglist 3
  objcall getPixel
  setlocal whatcolor
  getlocal whatcolor
  getlocal whitecolor
  nteq
  getlocal whatcolor
  pushzero
  nteq
  and
  jmpifz 6
  jmp 14
  pushint16 1
  getlocal voffset
  add
  setlocal voffset
  endrepeat 65
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pushcons 0.5
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop height
  mul
  sub
  getlocal voffset
  add
  pushint16 10
  add
  setobjprop pDrawV
  ret
on prepareFrame me   -- locals: 
  getprop pActive
  jmpifz 97
  getprop pDead
  jmpifz 91
  getprop pDelay
  pushint16 1
  sub
  setprop pDelay
  getprop pDelay
  pushzero
  lt
  jmpifz 73
  getprop pDeltaV
  pushint16 2
  add
  setprop pDeltaV
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getprop pDeltaV
  add
  setobjprop pDrawV
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pushint16 600
  gt
  jmpifz 19
  pushzero
  setprop pActive
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop visible
  ret
on endSprite me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  ret
10 (behavior)
on exitFrame me   -- locals: 
  pushint8 40
  pusharglistnoret 1
  extcall puppetTempo
  pushint16 150
  pusharglistnoret 1
  extcall go
  ret
11 · camera (behavior)properties: pTrackSpeed, pTarget, pDelay, pOldTarget, pCameraH, pCameraV, pCameraAngle, pCameraSpeed, pCameraAccel, pMaxCameraV, pMinCameraV, pMinCameraH, pMaxCameraH, goalH, goalV
on beginSprite me   -- locals: 
  pushzero
  setglobal gScrollH
  pushzero
  setglobal gScrollV
  getglobal PLAYER1_SPRITE
  setprop pTarget
  pushint16 3
  setprop pTrackSpeed
  pushzero
  setprop pDelay
  pushint16 1
  setprop pCameraAccel
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop locH
  setprop pCameraH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop locV
  setprop pCameraV
  pushzero
  setprop pCameraAngle
  pushzero
  setprop pCameraSpeed
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop visible
  ret
on endSprite me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  ret
on prepareFrame me   -- locals: 
  pusharglistnoret 0
  localcall getBoundries
  getparam me
  pusharglistnoret 1
  localcall setSubject
  pusharglist 0
  thebuiltin mouseDown
  jmpifz 12
  getparam me
  pusharglistnoret 1
  localcall manualCamera
  jmp 9
  getparam me
  pusharglistnoret 1
  localcall autoCamera
  ret
on getBoundries    -- locals: 
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pushcons 0.5
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop height
  mul
  add
  getglobal SCREEN_HEIGHT
  pushcons 0.5
  mul
  sub
  setprop pMaxCameraV
  pushint16 1800
  inv
  setprop pMinCameraV
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  pushcons 0.5
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop width
  mul
  sub
  getglobal SCREEN_WIDTH
  pushcons 0.5
  mul
  add
  setprop pMinCameraH
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  pushcons 0.5
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop width
  mul
  add
  getglobal SCREEN_WIDTH
  pushcons 0.5
  mul
  sub
  setprop pMaxCameraH
  ret
on manualCamera me   -- locals: speedH, speedV
  pusharglist 0
  thebuiltin mouseH
  pushint16 256
  sub
  setlocal speedH
  pusharglist 0
  thebuiltin mouseV
  pushint16 171
  sub
  setlocal speedV
  getlocal speedH
  pushint16 10
  div
  setlocal speedH
  getlocal speedV
  pushint16 20
  div
  setlocal speedV
  getprop pCameraH
  getlocal speedH
  add
  setprop pCameraH
  getprop pCameraV
  getlocal speedV
  add
  setprop pCameraV
  pusharglistnoret 0
  localcall constrainCamera
  getprop pCameraH
  pushint16 256
  sub
  setglobal gScrollH
  getprop pCameraV
  pushint16 171
  sub
  setglobal gScrollV
  getprop pDelay
  pushint16 1
  sub
  setprop pDelay
  ret
on autoCamera me   -- locals: angleToObject, distanceToObject, goalSpeed, whatAccel
  getprop pDelay
  pushzero
  lt
  jmpifz 430
  getprop pTarget
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  setprop goalH
  getprop pTarget
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  setprop goalV
  getprop pTarget
  getglobal PLAYER1_SPRITE
  eq
  getprop pTarget
  getglobal PLAYER2_SPRITE
  eq
  or
  jmpifz 143
  getprop pTarget
  pusharglist 1
  extcall sprite
  getobjprop pFacing
  pushzero
  gt
  jmpifz 66
  getprop pTarget
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  pushcons 0.35
  pusharglist 0
  extcall pi
  mul
  pusharglist 1
  extcall sin
  pushint16 150
  mul
  add
  setprop goalH
  getprop pTarget
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pushcons 0.35
  pusharglist 0
  extcall pi
  mul
  pusharglist 1
  extcall cos
  pushint16 150
  mul
  sub
  setprop goalV
  jmp 65
  getprop pTarget
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  pushcons 0.35
  inv
  pusharglist 0
  extcall pi
  mul
  pusharglist 1
  extcall sin
  pushint16 150
  mul
  add
  setprop goalH
  getprop pTarget
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pushcons 0.35
  inv
  pusharglist 0
  extcall pi
  mul
  pusharglist 1
  extcall cos
  pushint16 150
  mul
  sub
  setprop goalV
  getprop goalV
  getprop pMaxCameraV
  gt
  jmpifz 9
  getprop pMaxCameraV
  setprop goalV
  getprop pCameraH
  getprop pCameraV
  pusharglist 2
  extcall point
  getprop goalH
  getprop goalV
  pusharglist 2
  extcall point
  pusharglist 2
  extcall getAngle
  setlocal angleToObject
  getprop pCameraH
  getprop pCameraV
  pusharglist 2
  extcall point
  getprop goalH
  getprop goalV
  pusharglist 2
  extcall point
  pusharglist 2
  extcall getDistance
  setlocal distanceToObject
  getlocal distanceToObject
  pushint16 3
  div
  setlocal goalSpeed
  getprop pCameraAccel
  setlocal whatAccel
  getlocal distanceToObject
  pushint16 320
  pushcons 0.75
  mul
  gt
  jmpifz 11
  getlocal whatAccel
  pushint16 2
  mul
  setlocal whatAccel
  getlocal distanceToObject
  pushint16 320
  gt
  jmpifz 11
  getlocal whatAccel
  pushint16 2
  mul
  setlocal whatAccel
  getprop pCameraSpeed
  getlocal goalSpeed
  lt
  jmpifz 26
  getprop pCameraSpeed
  getlocal whatAccel
  add
  setprop pCameraSpeed
  getprop pCameraSpeed
  getlocal goalSpeed
  gt
  jmpifz 8
  getlocal goalSpeed
  setprop pCameraSpeed
  getprop pCameraSpeed
  getlocal goalSpeed
  gt
  jmpifz 27
  getprop pCameraSpeed
  pushint16 4
  div
  setprop pCameraSpeed
  getprop pCameraSpeed
  getlocal goalSpeed
  lt
  jmpifz 8
  getlocal goalSpeed
  setprop pCameraSpeed
  getlocal distanceToObject
  getprop pCameraSpeed
  lt
  jmpifz 8
  getlocal distanceToObject
  setprop pCameraSpeed
  getprop pCameraH
  getlocal angleToObject
  pusharglist 1
  extcall sin
  getprop pCameraSpeed
  mul
  add
  setprop pCameraH
  getprop pCameraV
  getlocal angleToObject
  pusharglist 1
  extcall cos
  getprop pCameraSpeed
  mul
  sub
  setprop pCameraV
  pusharglistnoret 0
  localcall constrainCamera
  getprop pCameraH
  pushint16 256
  sub
  setglobal gScrollH
  getprop pCameraV
  pushint16 171
  sub
  setglobal gScrollV
  getprop pDelay
  pushint16 1
  sub
  setprop pDelay
  ret
on constrainCamera    -- locals: 
  getprop pCameraV
  getprop pMaxCameraV
  gt
  jmpifz 9
  getprop pMaxCameraV
  setprop pCameraV
  getprop pCameraV
  getprop pMinCameraV
  lt
  jmpifz 9
  getprop pMinCameraV
  setprop pCameraV
  getprop pCameraH
  getprop pMaxCameraH
  gt
  jmpifz 9
  getprop pMaxCameraH
  setprop pCameraH
  getprop pCameraH
  getprop pMinCameraH
  lt
  jmpifz 9
  getprop pMinCameraH
  setprop pCameraH
  ret
on setSubject me   -- locals: 
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pActive
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pFramesInAir
  pushint16 1
  gteq
  and
  jmpifz 18
  getglobal SHELL_SPRITE
  setprop pTarget
  pushint16 3
  setprop pTrackSpeed
  jmp 79
  getglobal EXPLOSION_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pLife
  pushint16 30
  lt
  jmpifz 18
  getglobal EXPLOSION_SPRITE
  setprop pTarget
  pushint16 3
  setprop pTrackSpeed
  jmp 47
  getglobal gActivePlayer
  pushint16 1
  eq
  jmpifz 15
  getglobal PLAYER1_SPRITE
  setprop pTarget
  pushint16 20
  setprop pTrackSpeed
  getglobal gActivePlayer
  pushint16 2
  eq
  jmpifz 15
  getglobal PLAYER2_SPRITE
  setprop pTarget
  pushint16 20
  setprop pTrackSpeed
  getprop pTarget
  getprop pOldTarget
  nteq
  jmpifz 27
  getprop pOldTarget
  getglobal PLAYER1_SPRITE
  eq
  getprop pOldTarget
  getglobal PLAYER2_SPRITE
  eq
  or
  jmpifz 9
  pushint16 2
  setprop pDelay
  getprop pTarget
  setprop pOldTarget
  ret
12 · terain (behavior)
on beginSprite me   -- locals: 
  pushcons 'activeGround1'
  pusharglist 1
  extcall member
  getobjprop image
  pushcons 'srcGround'
  pusharglist 1
  extcall member
  getobjprop image
  pushcons 'srcGround'
  pusharglist 1
  extcall member
  getobjprop rect
  pushcons 'srcGround'
  pusharglist 1
  extcall member
  getobjprop rect
  pusharglistnoret 4
  objcall copyPixels
  pushcons 'activegroundMask1'
  pusharglist 1
  extcall member
  getobjprop image
  pushcons 'srcGroundMask'
  pusharglist 1
  extcall member
  getobjprop image
  pushcons 'srcGroundMask'
  pusharglist 1
  extcall member
  getobjprop rect
  pushcons 'srcGroundMask'
  pusharglist 1
  extcall member
  getobjprop rect
  pusharglistnoret 4
  objcall copyPixels
  pushcons 'activeGround2'
  pusharglist 1
  extcall member
  getobjprop image
  pushcons 'srcGround'
  pusharglist 1
  extcall member
  getobjprop image
  pushcons 'srcGround'
  pusharglist 1
  extcall member
  getobjprop rect
  pushcons 'srcGround'
  pusharglist 1
  extcall member
  getobjprop rect
  pusharglistnoret 4
  objcall copyPixels
  pushcons 'activegroundMask2'
  pusharglist 1
  extcall member
  getobjprop image
  pushcons 'srcGroundMask'
  pusharglist 1
  extcall member
  getobjprop image
  pushcons 'srcGroundMask'
  pusharglist 1
  extcall member
  getobjprop rect
  pushcons 'srcGroundMask'
  pusharglist 1
  extcall member
  getobjprop rect
  pusharglistnoret 4
  objcall copyPixels
  ret
on explodeGround me   -- locals: explosionH, explosionV, transferRect, srcRect, whatTree
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop width
  pushcons 0.5
  mul
  sub
  sub
  setlocal explosionH
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getglobal TERAIN1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop height
  pushcons 0.5
  mul
  sub
  sub
  setlocal explosionV
  getlocal explosionH
  pushint16 100
  sub
  getlocal explosionV
  pushint16 100
  sub
  getlocal explosionH
  pushint16 100
  add
  getlocal explosionV
  pushint16 100
  add
  pusharglist 4
  extcall rect
  setlocal transferRect
  pushzero
  pushzero
  pushint16 200
  pushint16 200
  pusharglist 4
  extcall rect
  setlocal srcRect
  getlocal transferRect
  pushcons 'activeGround1'
  pusharglist 1
  extcall member
  getobjprop rect
  pusharglist 2
  objcall intersect
  pushzero
  pushzero
  pushzero
  pushzero
  pusharglist 4
  extcall rect
  nteq
  jmpifz 117
  pushcons 'activeGround1'
  pusharglist 1
  extcall member
  getobjprop image
  pushcons 'craterFill'
  pusharglist 1
  extcall member
  getobjprop image
  getlocal transferRect
  getlocal srcRect
  pushsymb ink
  pushint16 35
  pusharglist 2
  pushproplist
  pusharglistnoret 5
  objcall copyPixels
  pushcons 'activeGroundMask1'
  pusharglist 1
  extcall member
  getobjprop image
  pushcons 'craterMask'
  pusharglist 1
  extcall member
  getobjprop image
  getlocal transferRect
  getlocal srcRect
  pushsymb ink
  pushint16 36
  pusharglist 2
  pushproplist
  pusharglistnoret 5
  objcall copyPixels
  pushcons 'activeGround1'
  pusharglist 1
  extcall member
  getobjprop image
  pushcons 'activegroundMask1'
  pusharglist 1
  extcall member
  getobjprop image
  getlocal transferRect
  getlocal transferRect
  pushsymb ink
  pushint16 3
  pusharglist 2
  pushproplist
  pusharglistnoret 5
  objcall copyPixels
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop width
  pushcons 0.5
  mul
  sub
  sub
  setlocal explosionH
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getglobal TERAIN2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop height
  pushcons 0.5
  mul
  sub
  sub
  setlocal explosionV
  getlocal explosionH
  pushint16 100
  sub
  getlocal explosionV
  pushint16 100
  sub
  getlocal explosionH
  pushint16 100
  add
  getlocal explosionV
  pushint16 100
  add
  pusharglist 4
  extcall rect
  setlocal transferRect
  pushzero
  pushzero
  pushint16 200
  pushint16 200
  pusharglist 4
  extcall rect
  setlocal srcRect
  getlocal transferRect
  pushcons 'activeGround2'
  pusharglist 1
  extcall member
  getobjprop rect
  pusharglist 2
  objcall intersect
  pushzero
  pushzero
  pushzero
  pushzero
  pusharglist 4
  extcall rect
  nteq
  jmpifz 119
  pushcons 'activeGround2'
  pusharglist 1
  extcall member
  getobjprop image
  pushcons 'craterFill'
  pusharglist 1
  extcall member
  getobjprop image
  getlocal transferRect
  getlocal srcRect
  pushsymb ink
  pushint16 35
  pusharglist 2
  pushproplist
  pusharglistnoret 5
  objcall copyPixels
  pushcons 'activeGroundMask2'
  pusharglist 1
  extcall member
  getobjprop image
  pushcons 'craterMask'
  pusharglist 1
  extcall member
  getobjprop image
  getlocal transferRect
  getlocal srcRect
  pushsymb ink
  pushint16 36
  pusharglist 2
  pushproplist
  pusharglistnoret 5
  objcall copyPixels
  pushcons 'activeGround2'
  pusharglist 1
  extcall member
  getobjprop image
  pushcons 'activegroundMask2'
  pusharglist 1
  extcall member
  getobjprop image
  getlocal transferRect
  getlocal transferRect
  pushsymb ink
  pushint16 3
  pusharglist 2
  pushproplist
  pusharglistnoret 5
  objcall copyPixels
  getglobal TREE_ZERO_SPRITE
  pushint16 1
  add
  setlocal whatTree
  getlocal whatTree
  getglobal TREE_ZERO_SPRITE
  getglobal TREE_SPRITE_COUNT
  add
  lteq
  jmpifz 145
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getlocal whatTree
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  sub
  pusharglist 1
  extcall abs
  pushint16 100
  lt
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getlocal whatTree
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  sub
  pusharglist 1
  extcall abs
  pushint16 200
  lt
  and
  jmpifz 72
  getlocal whatTree
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop pDead
  getlocal whatTree
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop pDelay
  getlocal whatTree
  pusharglist 1
  extcall sprite
  pushint16 100
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getlocal whatTree
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  sub
  pusharglist 1
  extcall abs
  sub
  inv
  pushint16 4
  div
  pushint16 5
  add
  setobjprop pDeltaV
  pushint16 1
  getlocal whatTree
  add
  setlocal whatTree
  endrepeat 152
  ret
13 · MovieScript (movie script)
on prepareMovie    -- locals: PLAYER3_SPRITE, PLAYER4_SPRITE
  pusharglistnoret 0
  extcall clearGlobals
  pushzero
  setglobal gGameOver
  pushint16 1
  setglobal gActivePlayer
  pushint16 5
  setglobal CONTROLLER_SPRITE
  pushint16 6
  setglobal SHELL_SPRITE
  pushint16 8
  setglobal PLAYER1_SPRITE
  pushint16 13
  setglobal PLAYER2_SPRITE
  pushint16 18
  setlocal PLAYER3_SPRITE
  pushint16 23
  setlocal PLAYER4_SPRITE
  pushint16 42
  setglobal EXPLOSION_SPRITE
  pushint16 27
  setglobal TERAIN1_SPRITE
  pushint16 28
  setglobal TERAIN2_SPRITE
  pushint16 50
  setglobal MAX_TURRET_POWER
  pushcons 0.1
  setglobal MIN_TURRET_POWER
  pushcons 1.5
  setglobal PLAYER1_SPEED
  pushcons 1.5
  setglobal PLAYER2_SPEED
  pushint16 60
  setglobal PLAYER1_HITPOINTS
  pushint16 60
  setglobal PLAYER2_HITPOINTS
  pushint16 1
  setglobal PLAYER1_HUMAN
  pushint16 1
  setglobal PLAYER2_HUMAN
  pushint16 512
  setglobal SCREEN_WIDTH
  pushint16 342
  setglobal SCREEN_HEIGHT
  pushint16 1
  setglobal PLAYER1_AI_SKILL
  pushint16 1
  setglobal PLAYER2_AI_SKILL
  pushcons 'blue'
  setglobal PLAYER1_COLOR
  pushcons 'orange'
  setglobal PLAYER2_COLOR
  pushint16 188
  setglobal TREE_ZERO_SPRITE
  pushint16 12
  setglobal TREE_SPRITE_COUNT
  pushcons 0.5
  setglobal gravity
  ret
on changePlayer    -- locals: 
  getglobal gGameOver
  not
  jmpifz 45
  getglobal gActivePlayer
  pushint16 1
  eq
  jmpifz 14
  pushint16 2
  setglobal gActivePlayer
  pusharglistnoret 0
  extcall return
  getglobal gActivePlayer
  pushint16 2
  eq
  jmpifz 14
  pushint16 1
  setglobal gActivePlayer
  pusharglistnoret 0
  extcall return
  ret
on registerTankKill    -- locals: 
  pushint16 1
  setglobal gGameOver
  getglobal PLAYER1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pAlive
  jmpifz 9
  pushint16 1
  setglobal gActivePlayer
  getglobal PLAYER2_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pAlive
  jmpifz 9
  pushint16 2
  setglobal gActivePlayer
  ret
21 · scrollSpriteLayer2 (behavior)properties: pDrawH, pDrawV
on beginSprite me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 10
  inv
  setobjprop locZ
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop locH
  setprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop locV
  setprop pDrawV
  ret
on prepareFrame me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getprop pDrawH
  getglobal gScrollH
  pushint16 2
  div
  sub
  setobjprop locH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getprop pDrawV
  getglobal gScrollV
  pushint16 2
  div
  sub
  setobjprop locV
  ret
22 · scrollSprite (behavior)properties: pDrawH, pDrawV
on beginSprite me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop locH
  setprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop locV
  setprop pDrawV
  ret
on prepareFrame me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getprop pDrawH
  getglobal gScrollH
  sub
  setobjprop locH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getprop pDrawV
  getglobal gScrollV
  sub
  setobjprop locV
  ret
23 · frameLoop (behavior)properties: pFrames, startTick
on beginSprite me   -- locals: pFrame
  pushzero
  setglobal gGameOver
  pushint16 1
  setglobal gActivePlayer
  pushzero
  setlocal pFrame
  pusharglist 0
  thebuiltin ticks
  setprop startTick
  ret
on exitFrame me   -- locals: tickCount
  getprop pFrames
  pushint16 1
  add
  setprop pFrames
  pusharglist 0
  thebuiltin ticks
  getprop startTick
  sub
  setlocal tickCount
  getlocal tickCount
  pushint16 60
  gt
  jmpifz 26
  getprop pFrames
  getlocal tickCount
  pushint16 60
  pusharglist 1
  extcall float
  div
  pusharglist 1
  extcall float
  div
  setglobal fps
  pusharglist 0
  thebuiltin frame
  pusharglistnoret 1
  extcall go
  ret
24 · util (movie script)
on getAngle point1, point2   -- locals: point3, angle
  getparam point1
  getparam point2
  sub
  setlocal point3
  getlocal point3
  getobjprop locH
  pushzero
  eq
  jmpifz 9
  getlocal point3
  pushcons 0.01
  setobjprop locH
  getlocal point3
  getobjprop locV
  getlocal point3
  getobjprop locH
  pusharglist 1
  extcall float
  div
  pusharglist 1
  extcall atan
  pusharglist 0
  extcall pi
  add
  setlocal angle
  getparam point2
  getobjprop locH
  getparam point1
  getobjprop locH
  lt
  jmpifz 12
  getlocal angle
  pusharglist 0
  extcall pi
  add
  setlocal angle
  getlocal angle
  pushcons 0.5
  pusharglist 0
  extcall pi
  mul
  sub
  setlocal angle
  getlocal angle
  pusharglistnoret 1
  extcall return
  ret
on deIncAngle angle, Amount   -- locals: 
  getparam angle
  pushint16 2
  pusharglist 0
  extcall pi
  mul
  add
  getparam Amount
  sub
  setparam angle
  getparam angle
  pushint16 2
  pusharglist 0
  extcall pi
  mul
  gt
  jmpifz 18
  getparam angle
  pushint16 2
  pusharglist 0
  extcall pi
  mul
  sub
  setparam angle
  endrepeat 27
  getparam angle
  pusharglistnoret 1
  extcall return
  ret
on incAngle angle, Amount   -- locals: 
  getparam angle
  getparam Amount
  add
  setparam angle
  getparam angle
  pushint16 2
  pusharglist 0
  extcall pi
  mul
  gt
  jmpifz 18
  getparam angle
  pushint16 2
  pusharglist 0
  extcall pi
  mul
  sub
  setparam angle
  endrepeat 27
  getparam angle
  pushzero
  lt
  jmpifz 18
  getparam angle
  pushint16 2
  pusharglist 0
  extcall pi
  mul
  add
  setparam angle
  endrepeat 20
  getparam angle
  pusharglistnoret 1
  extcall return
  ret
on getAim Current, goal   -- locals: counterClockwise, clockwise
  getparam Current
  getparam goal
  lt
  jmpifz 26
  getparam goal
  getparam Current
  sub
  setlocal counterClockwise
  getparam Current
  pushint16 2
  pusharglist 0
  extcall pi
  mul
  add
  getparam goal
  sub
  setlocal clockwise
  getparam Current
  getparam goal
  gt
  jmpifz 26
  getparam Current
  getparam goal
  sub
  setlocal clockwise
  pushint16 2
  pusharglist 0
  extcall pi
  mul
  getparam Current
  sub
  getparam goal
  add
  setlocal counterClockwise
  getlocal clockwise
  getlocal counterClockwise
  lt
  jmpifz 15
  pushint16 1
  inv
  pusharglistnoret 1
  extcall return
  jmp 11
  pushint16 1
  pusharglistnoret 1
  extcall return
  ret
on getAngleDif Current, goal   -- locals: counterClockwise, clockwise
  getparam Current
  getparam goal
  lt
  jmpifz 26
  getparam goal
  getparam Current
  sub
  setlocal counterClockwise
  getparam Current
  pushint16 2
  pusharglist 0
  extcall pi
  mul
  add
  getparam goal
  sub
  setlocal clockwise
  getparam Current
  getparam goal
  gt
  jmpifz 26
  getparam Current
  getparam goal
  sub
  setlocal clockwise
  pushint16 2
  pusharglist 0
  extcall pi
  mul
  getparam Current
  sub
  getparam goal
  add
  setlocal counterClockwise
  getlocal clockwise
  getlocal counterClockwise
  lt
  jmpifz 14
  getlocal clockwise
  inv
  pusharglistnoret 1
  extcall return
  jmp 10
  getlocal counterClockwise
  pusharglistnoret 1
  extcall return
  ret
on getDistance point1, point2   -- locals: point3
  getparam point1
  getparam point2
  sub
  setlocal point3
  getlocal point3
  getlocal point3
  mul
  setlocal point3
  getlocal point3
  getobjprop locH
  getlocal point3
  getobjprop locV
  add
  pusharglist 1
  extcall sqrt
  pusharglistnoret 1
  extcall return
  ret
25 · titletread (behavior)properties: scroll
on beginSprite me   -- locals: 
  pushzero
  setprop scroll
  ret
on prepareFrame me   -- locals: 
  getprop scroll
  pushint8 10
  sub
  setprop scroll
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushzero
  inv
  getprop scroll
  pushint8 58
  mod
  add
  setobjprop locH
  ret
26 · bumperScript (behavior)
on exitFrame me   -- locals: 
  pushint8 20
  pusharglistnoret 1
  extcall puppetTempo
  ret
on beginSprite me   -- locals: n
  pushint8 1
  setlocal n
  getlocal n
  pushint16 200
  lteq
  jmpifz 22
  getlocal n
  pusharglist 1
  extcall sprite
  pushint8 1
  setobjprop visible
  pushint8 1
  getlocal n
  add
  setlocal n
  endrepeat 26
  ret
30 · titleTreadBottom (behavior)properties: scroll
on beginSprite me   -- locals: 
  pushzero
  setprop scroll
  ret
on prepareFrame me   -- locals: 
  getprop scroll
  pushint8 10
  add
  setprop scroll
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushzero
  inv
  getprop scroll
  pushint8 58
  mod
  add
  setobjprop locH
  ret
31 · powerMeter (behavior)
on prepareFrame me   -- locals: trackTank, position
  getglobal gActivePlayer
  pushint16 1
  eq
  jmpifz 11
  getglobal PLAYER1_SPRITE
  setlocal trackTank
  jmp 8
  getglobal PLAYER2_SPRITE
  setlocal trackTank
  getlocal trackTank
  pusharglist 1
  extcall sprite
  getobjprop pFacing
  pushint16 1
  eq
  jmpifz 21
  pushint16 30
  inv
  pushint16 20
  inv
  pusharglist 2
  extcall point
  setlocal position
  jmp 17
  pushint16 30
  pushint16 20
  inv
  pusharglist 2
  extcall point
  setlocal position
  getlocal trackTank
  pusharglist 1
  extcall sprite
  getobjprop pTurretPower
  getglobal MIN_TURRET_POWER
  gt
  getlocal trackTank
  pusharglist 1
  extcall sprite
  getobjprop pAlive
  and
  jmpifz 173
  getparam me
  getobjprop spriteNum
  pushint16 1
  sub
  pusharglist 1
  extcall sprite
  getlocal trackTank
  pusharglist 1
  extcall sprite
  getobjprop loc
  getlocal position
  add
  setobjprop loc
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getlocal trackTank
  pusharglist 1
  extcall sprite
  getobjprop loc
  getlocal position
  add
  setobjprop loc
  getparam me
  getobjprop spriteNum
  pushint16 1
  add
  pusharglist 1
  extcall sprite
  getlocal trackTank
  pusharglist 1
  extcall sprite
  getobjprop loc
  getlocal position
  add
  setobjprop loc
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 50
  getglobal MAX_TURRET_POWER
  getglobal MIN_TURRET_POWER
  sub
  pusharglist 1
  extcall float
  div
  getlocal trackTank
  pusharglist 1
  extcall sprite
  getobjprop pTurretPower
  getglobal MIN_TURRET_POWER
  sub
  mul
  setobjprop height
  getparam me
  getobjprop spriteNum
  pushint16 1
  sub
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  getparam me
  getobjprop spriteNum
  pushint16 1
  add
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  jmp 47
  getparam me
  getobjprop spriteNum
  pushint16 1
  sub
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop visible
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop visible
  getparam me
  getobjprop spriteNum
  pushint16 1
  add
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop visible
  ret
on endSprite me   -- locals: 
  getparam me
  getobjprop spriteNum
  pushint16 1
  sub
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  getparam me
  getobjprop spriteNum
  pushint16 1
  add
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  ret
41 · snow (behavior)properties: pDeltaH, pDeltaV, pCamSnow
on beginSprite me   -- locals: 
  getparam me
  pusharglistnoret 1
  localcall repop
  pushint16 100
  pusharglist 1
  extcall random
  pushint16 50
  lt
  setprop pCamSnow
  ret
on endSprite me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  ret
on repop me   -- locals: 
  getprop pCamSnow
  jmpifz 56
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getglobal gScrollH
  pushint16 600
  pusharglist 1
  extcall random
  add
  pushint16 50
  sub
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getglobal gScrollV
  pushint16 100
  pusharglist 1
  extcall random
  sub
  setobjprop pDrawV
  jmp 49
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 3200
  pusharglist 1
  extcall random
  pushint16 1400
  sub
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 3000
  pusharglist 1
  extcall random
  pushint16 2500
  sub
  setobjprop pDrawV
  pushint16 1
  inv
  setprop pDeltaH
  pushint16 7
  pusharglist 1
  extcall random
  pushint16 4
  add
  pushint16 2
  pusharglist 1
  extcall float
  div
  setprop pDeltaV
  getprop pDeltaV
  pushint16 3
  gt
  jmpifz 21
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushcons 'snow2'
  pusharglist 1
  extcall member
  setobjprop member
  getprop pDeltaV
  pushint16 5
  gt
  jmpifz 21
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushcons 'snow3'
  pusharglist 1
  extcall member
  setobjprop member
  ret
on prepareFrame me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pDeltaH
  add
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getprop pDeltaV
  add
  setobjprop pDrawV
  getprop pCamSnow
  jmpifz 102
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getglobal gScrollV
  pushint16 800
  add
  gt
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getglobal gScrollV
  pushint16 400
  sub
  lt
  or
  jmpifz 9
  getparam me
  pusharglistnoret 1
  localcall repop
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal gScrollH
  pushint16 1000
  add
  gt
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getglobal gScrollH
  pushint16 400
  sub
  lt
  or
  jmpifz 9
  getparam me
  pusharglistnoret 1
  localcall repop
  jmp 27
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pushint16 480
  gt
  jmpifz 9
  getparam me
  pusharglistnoret 1
  localcall repop
  ret
42 · groundExplosionParticles (behavior)properties: pDeltaH, pDeltaV, pLife
on prepareFrame me   -- locals: collision
  getprop pLife
  pushzero
  gt
  jmpifz 198
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pDeltaH
  add
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getprop pDeltaV
  add
  setobjprop pDrawV
  pushzero
  setlocal collision
  getparam me
  getobjprop spriteNum
  getglobal TERAIN1_SPRITE
  ontospr
  jmpifz 8
  pushint16 1
  setlocal collision
  getparam me
  getobjprop spriteNum
  getglobal TERAIN2_SPRITE
  ontospr
  jmpifz 8
  pushint16 1
  setlocal collision
  pushint16 3
  pusharglist 1
  extcall random
  pushint16 1
  eq
  getlocal collision
  pushint16 1
  eq
  and
  jmpifz 18
  getprop pDeltaV
  pusharglist 1
  extcall abs
  inv
  pushcons 0.8
  mul
  setprop pDeltaV
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop rotation
  getprop pDeltaH
  pushint16 4
  mul
  add
  setobjprop rotation
  getprop pDeltaV
  getglobal gravity
  pushint16 3
  mul
  add
  setprop pDeltaV
  getprop pLife
  pushint16 1
  sub
  setprop pLife
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  jmp 15
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop visible
  ret
on explodeGroundParticles me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  pushint16 50
  pusharglist 1
  extcall random
  add
  pushint16 25
  sub
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  pushint16 50
  pusharglist 1
  extcall random
  add
  pushint16 25
  sub
  setobjprop pDrawV
  pushint16 10
  pusharglist 1
  extcall random
  pushint16 5
  sub
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDeltaH
  pushint16 10
  div
  add
  setprop pDeltaH
  pushint16 10
  pusharglist 1
  extcall random
  inv
  pushint16 10
  sub
  setprop pDeltaV
  pushint16 50
  setprop pLife
  ret
on endSprite me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  ret
43 · explosion (behavior)properties: pLife, pBaseMemberNum
on beginSprite me   -- locals: 
  pushint16 10
  setprop pLife
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop memberNum
  setprop pBaseMemberNum
  ret
on prepareFrame me   -- locals: 
  getprop pLife
  pushint16 8
  lt
  jmpifz 82
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  setobjprop pDrawV
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getprop pLife
  getprop pBaseMemberNum
  add
  setobjprop memberNum
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  jmp 15
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop visible
  getprop pLife
  pushint16 1
  add
  setprop pLife
  ret
on explodeGroundParticles me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getglobal SHELL_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  setobjprop pDrawV
  pushzero
  setprop pLife
  ret
on endSprite me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  ret
44 · tankbits (behavior)properties: pDeltaH, pDeltaV, pLife, pActive
on beginSprite me   -- locals: 
  pushzero
  setprop pActive
  ret
on prepareFrame me   -- locals: collision
  getprop pActive
  pushzero
  nteq
  jmpifz 225
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pDeltaH
  add
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getprop pDeltaV
  add
  setobjprop pDrawV
  pushzero
  setlocal collision
  getparam me
  getobjprop spriteNum
  getglobal TERAIN1_SPRITE
  ontospr
  jmpifz 8
  pushint16 1
  setlocal collision
  getparam me
  getobjprop spriteNum
  getglobal TERAIN2_SPRITE
  ontospr
  jmpifz 8
  pushint16 1
  setlocal collision
  getlocal collision
  pushint16 1
  eq
  jmpifz 62
  getprop pLife
  pushint16 1
  sub
  setprop pLife
  getprop pLife
  pushzero
  lt
  jmpifz 26
  pushzero
  setprop pActive
  pushint16 1
  inv
  setprop pActive
  getprop pDeltaV
  pushcons 1.5
  div
  setprop pDeltaV
  jmp 18
  getprop pDeltaV
  pusharglist 1
  extcall abs
  inv
  pushcons 0.75
  mul
  setprop pDeltaV
  jmp 17
  getprop pDeltaV
  getglobal gravity
  pushint16 3
  mul
  add
  setprop pDeltaV
  getprop pDeltaH
  pushcons 0.95
  mul
  setprop pDeltaH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop rotation
  getprop pDeltaH
  pushint16 4
  mul
  add
  setobjprop rotation
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  ret
on explodeTankParticles me, whatTank   -- locals: 
  pushint16 10
  pusharglist 1
  extcall random
  pushint16 5
  sub
  setprop pDeltaH
  pushint16 10
  pusharglist 1
  extcall random
  inv
  pushint16 10
  sub
  setprop pDeltaV
  pushint16 7
  setprop pLife
  pushint16 1
  setprop pActive
  ret
61 · MENU player/cpu toggle (behavior)properties: pHuman, pPlayer
on mouseUp me   -- locals: 
  getprop pPlayer
  pushint16 1
  eq
  jmpifz 12
  getprop pHuman
  setglobal PLAYER1_HUMAN
  jmp 9
  getprop pHuman
  setglobal PLAYER2_HUMAN
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushzero
  pushzero
  pushzero
  pusharglist 3
  extcall rgb
  setobjprop color
  ret
on mouseEnter me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop blend
  pushint16 100
  lt
  jmpifz 24
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 150
  pushzero
  pushzero
  pusharglist 3
  extcall rgb
  setobjprop color
  ret
on mouseLeave me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushzero
  pushzero
  pushzero
  pusharglist 3
  extcall rgb
  setobjprop color
  ret
on prepareFrame me   -- locals: Match
  pushzero
  setlocal Match
  getprop pPlayer
  pushint16 1
  eq
  jmpifz 21
  getglobal PLAYER1_HUMAN
  getprop pHuman
  eq
  jmpifz 8
  pushint16 1
  setlocal Match
  jmp 18
  getglobal PLAYER2_HUMAN
  getprop pHuman
  eq
  jmpifz 8
  pushint16 1
  setlocal Match
  getlocal Match
  pushint16 1
  eq
  jmpifz 20
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 100
  setobjprop blend
  jmp 17
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 50
  setobjprop blend
  ret
on getPropertyDescriptionList    -- locals: description
  pusharglist 0
  pushproplist
  setlocal description
  getlocal description
  pushsymb pPlayer
  pushsymb default
  pushint16 1
  pushsymb format
  pushsymb integer
  pushsymb comment
  pushcons 'pPlayer'
  pusharglist 6
  pushproplist
  pusharglistnoret 3
  extcall addProp
  getlocal description
  pushsymb pHuman
  pushsymb default
  pushint16 1
  pushsymb format
  pushsymb boolean
  pushsymb comment
  pushcons 'pHuman'
  pusharglist 6
  pushproplist
  pusharglistnoret 3
  extcall addProp
  getlocal description
  pusharglistnoret 1
  extcall return
  ret

Other members (1)

34 (shape)

Cast library 2: Misc Graphics

Pictures (28)

1
96×90, 32-bit
2
150×157, 32-bit
3
187×174, 32-bit
4
213×177, 32-bit
5
213×177, 32-bit
6
187×174, 32-bit
7
150×157, 32-bit
8
96×90, 32-bit
9
25×27, 32-bit
10
18×14, 32-bit
11
14×16, 32-bit
13 · craterMask
200×200, 32-bit
14 · craterFill
200×200, 16-bit
16
11×8, 16-bit
17
6×7, 16-bit
19 · snow1
2×2, 16-bit
20 · snow2
3×3, 16-bit
21 · snow3
6×6, 16-bit
24 · atree
88×158, 32-bit
28 · snow4
6×6, 16-bit
29
50×50, 32-bit
30
37×36, 32-bit
31
10×56, 32-bit
32
6×52, 32-bit
33
6×52, 32-bit
34
6×2, 16-bit
38 · snow5
50×47, 32-bit
39 · smoke
37×37, 32-bit

Scripts (1)

12 · tankSmoke (behavior)properties: pActive, pDeltaH, pDeltaV, pLife, pRadius
on beginSprite me   -- locals: 
  pushzero
  setprop pActive
  ret
on prepareFrame me   -- locals: 
  getprop pActive
  jmpifz 161
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  getprop pLife
  pushint16 1
  sub
  setprop pLife
  getprop pLife
  pushint16 1
  lt
  jmpifz 6
  pushzero
  setprop pActive
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 100
  setobjprop blend
  getprop pLife
  pushint16 10
  lt
  jmpifz 19
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getprop pLife
  pushint16 10
  mul
  setobjprop blend
  getprop pRadius
  pushcons 1.5
  add
  setprop pRadius
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getprop pRadius
  setobjprop width
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getprop pRadius
  setobjprop height
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawH
  getprop pDeltaH
  add
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop pDrawV
  getprop pDeltaV
  add
  setobjprop pDrawV
  getprop pDeltaV
  pushcons 0.1
  sub
  setprop pDeltaV
  jmp 14
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop visible
  ret
on emit me, whatH, whatV   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam whatH
  pushint16 20
  add
  pushint16 40
  pusharglist 1
  extcall random
  sub
  setobjprop pDrawH
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam whatV
  pushint16 10
  sub
  pushint16 15
  pusharglist 1
  extcall random
  sub
  setobjprop pDrawV
  pushint16 1
  setprop pActive
  pushint16 25
  pushint16 15
  pusharglist 1
  extcall random
  add
  setprop pLife
  pushint16 100
  pusharglist 1
  extcall random
  inv
  pushcons 190.0
  div
  setprop pDeltaV
  pushcons 0.5
  pushint16 100
  pusharglist 1
  extcall random
  pushcons 100.0
  div
  sub
  setprop pDeltaH
  pushint16 3
  setprop pRadius
  ret
on endSprite me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  ret

Cast library 3: terain

Pictures (7)

1 · srcGround
1926×415, 16-bit
2 · activeGround1
1926×415, 16-bit
3 · activeGround2
1926×415, 16-bit
11 · srcGroundMask
1926×415, 16-bit
12 · activeGroundMask1
1926×415, 16-bit
13 · activeGroundMask2
1926×415, 16-bit
17
1160×532, 16-bit

Scripts (1)

4 · revealStage (behavior)
on prepareFrame me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop blend
  pushzero
  gt
  jmpifz 40
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop blend
  pushint8 20
  sub
  setobjprop blend
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop blend
  pusharglistnoret 1
  extcall put
  ret

Other members (1)

5 (script)

Cast library 4: Player 1

Pictures (19)

1 · plate
26×28, 32-bit
2 · bluePlate
27×29, 32-bit
4 · greyPlate
26×28, 32-bit
6 · orangePlate
26×28, 32-bit
9 · tred
72×81, 32-bit
10 · blueTreds1
66×30, 32-bit
11 · blueTreds2
66×31, 32-bit
12 · greyTreds1
66×30, 32-bit
13 · greyTreds2
69×31, 32-bit
14 · orangeTreds1
66×30, 32-bit
15 · orangeTreds2
69×31, 32-bit
17 · turret
89×68, 32-bit
18 · blueTurret
58×30, 32-bit
20 · greyTurret
62×37, 32-bit
22 · orangeTurret
62×37, 32-bit
25
28×28, 16-bit
26 · bluePiston
28×35, 32-bit
28 · greyPiston
28×35, 32-bit
30 · orangePiston
28×35, 32-bit

Cast library 5: non engine Assets

Pictures (22)

1 · player 1
512×332, 32-bit
2
229×149, 16-bit
8 · playervplayer
512×332, 32-bit
11
61×19, 32-bit
12
34×19, 32-bit
13
5×18, 32-bit
14
9×18, 32-bit
15
9×19, 32-bit
16
3×17, 32-bit
21
63×19, 32-bit
22
18×18, 32-bit
23
18×18, 32-bit
24
18×18, 32-bit
28
493×141, 32-bit
31
113×51, 32-bit
37
214×165, 32-bit
38
214×166, 32-bit
39 · hangerGrey
68×45, 32-bit
40 · hangerOrange
68×48, 32-bit
41 · hangerBlue
68×49, 32-bit
42 · playertwowins
379×53, 16-bit
43 · playeronewins
371×51, 16-bit

Scripts (5)

3 · MENU play button (behavior)
on mouseUp me   -- locals: 
  pushcons 'FIGHT'
  pusharglistnoret 1
  extcall go
  ret
4 · TitleScreenAdvancer (behavior)
on mouseUp me   -- locals: 
  pushcons 'options'
  pusharglistnoret 1
  extcall go
  ret
5 · hideTillWin (behavior)properties: pDelay
on beginSprite me   -- locals: 
  pushint16 40
  setprop pDelay
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushzero
  setobjprop visible
  ret
on prepareFrame me   -- locals: 
  getglobal gGameOver
  jmpifz 31
  getprop pDelay
  pushint16 1
  sub
  setprop pDelay
  getprop pDelay
  pushzero
  lt
  jmpifz 16
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  ret
on endSprite me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1
  setobjprop visible
  ret
6 · AnnounceWinner (behavior)
on mouseDown me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop visible
  jmpifz 25
  pusharglist 0
  thebuiltin mouseDown
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall rollover
  and
  jmpifz 9
  pushcons 'options'
  pusharglistnoret 1
  extcall go
  ret
on prepareFrame me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  getobjprop visible
  jmpifz 49
  getglobal PLAYER1_SPRITE
  pusharglist 1
  extcall sprite
  getobjprop pAlive
  jmpifz 22
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushcons 'playeronewins'
  pusharglist 1
  extcall member
  setobjprop member
  jmp 19
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushcons 'playertwowins'
  pusharglist 1
  extcall member
  setobjprop member
  ret
7 · backgrounder (behavior)
on beginSprite me   -- locals: 
  getparam me
  getobjprop spriteNum
  pusharglist 1
  extcall sprite
  pushint16 1000
  inv
  setobjprop locZ
  ret

Other members (1)

44 (shape)

Cast library 6: audio

Pictures (1)

22
6×8, 16-bit

Sounds (16)

1 · fuzz 6.1 s, 44100 Hz
2 · dun 4.9 s, 44100 Hz
3 · horns 5.3 s, 44100 Hz
4 · happy 3.5 s, 44100 Hz
5 · glitch1 1.2 s, 44100 Hz
6 · glitch2 0.7 s, 44100 Hz
7 · glitch3 0.3 s, 44100 Hz
8 · talk1 4.9 s, 44100 Hz
9 · talk2 2.3 s, 44100 Hz
10 · talk3 2.9 s, 44100 Hz
11 · bg-sound3 3.5 s, 44100 Hz
13 · bg-sound9 2.1 s, 44100 Hz
14 · Tank 0.8 s, 22050 Hz
19 · wardrum 3.4 s, 44100 Hz
21 · bg-sound9lower 2.1 s, 44100 Hz
28 · bounce 0.0 s, 44100 Hz

Scripts (3)

23 · opening music (behavior)properties: hornDelay, dunDelay
on beginSprite me   -- locals: 
  pushint16 200
  setprop hornDelay
  pushint16 80
  setprop dunDelay
  ret
on prepareFrame me   -- locals: 
  pushint16 1
  pusharglist 1
  extcall sound
  pushint16 255
  setobjprop volume
  pushint16 2
  pusharglist 1
  extcall sound
  pushint16 100
  setobjprop volume
  pushint16 3
  pusharglist 1
  extcall sound
  pushint16 150
  setobjprop volume
  pushint16 1
  pusharglist 1
  extcall sound
  pusharglist 1
  objcall isBusy
  not
  jmpifz 20
  pushint16 1
  pusharglist 1
  extcall sound
  pushcons 'fuzz'
  pusharglist 1
  extcall member
  pusharglistnoret 2
  objcall play
  pushint16 2
  pusharglist 1
  extcall sound
  pusharglist 1
  objcall isBusy
  not
  jmpifz 66
  getprop dunDelay
  pushint16 1
  sub
  setprop dunDelay
  getprop dunDelay
  pushzero
  lt
  jmpifz 51
  pushint16 2
  pusharglist 1
  extcall sound
  pushsymb member
  pushcons 'wardrum'
  pusharglist 1
  extcall member
  pushsymb rateShift
  pushint16 3
  pusharglist 1
  extcall random
  pushint16 3
  sub
  pusharglist 4
  pushproplist
  pusharglistnoret 2
  objcall play
  pushint16 60
  pushint16 100
  pusharglist 1
  extcall random
  add
  setprop dunDelay
  pushint16 3
  pusharglist 1
  extcall sound
  pusharglist 1
  objcall isBusy
  not
  jmpifz 31
  getprop hornDelay
  pushint16 1
  sub
  setprop hornDelay
  getprop hornDelay
  pushzero
  lt
  jmpifz 16
  pushint16 100
  pushint16 200
  pusharglist 1
  extcall random
  add
  setprop hornDelay
  ret
on endSprite me   -- locals: 
  pushint16 2
  pusharglist 1
  extcall sound
  pushint16 1800
  pusharglistnoret 2
  objcall fadeOut
  ret
24 · options music (behavior)properties: glitchDelay
on beginSprite me   -- locals: 
  pushint16 20
  setprop glitchDelay
  ret
on prepareFrame me   -- locals: 
  pushint16 1
  pusharglist 1
  extcall sound
  pusharglist 1
  objcall isBusy
  not
  jmpifz 20
  pushint16 1
  pusharglist 1
  extcall sound
  pushcons 'fuzz'
  pusharglist 1
  extcall member
  pusharglistnoret 2
  objcall play
  pushint16 2
  pusharglist 1
  extcall sound
  getobjprop volume
  pushint16 10
  lt
  jmpifz 14
  pushint16 2
  pusharglist 1
  extcall sound
  pusharglistnoret 1
  objcall stop
  pushint16 2
  pusharglist 1
  extcall sound
  pusharglist 1
  objcall isBusy
  not
  jmpifz 198
  getprop glitchDelay
  pushint16 1
  sub
  setprop glitchDelay
  getprop glitchDelay
  pushzero
  lt
  jmpifz 183
  pushint16 2
  pusharglist 1
  extcall sound
  pushint16 30
  pushint16 70
  pusharglist 1
  extcall random
  add
  setobjprop volume
  pushint16 3
  pusharglist 1
  extcall random
  peek 0
  pushint16 1
  eq
  jmpifz 41
  pushint16 2
  pusharglist 1
  extcall sound
  pushsymb member
  pushcons 'talk1'
  pusharglist 1
  extcall member
  pushsymb rateShift
  pushint16 3
  pusharglist 1
  extcall random
  pushint16 4
  sub
  pusharglist 4
  pushproplist
  pusharglistnoret 2
  objcall play
  jmp 94
  peek 0
  pushint16 2
  eq
  jmpifz 41
  pushint16 2
  pusharglist 1
  extcall sound
  pushsymb member
  pushcons 'talk2'
  pusharglist 1
  extcall member
  pushsymb rateShift
  pushint16 3
  pusharglist 1
  extcall random
  pushint16 4
  sub
  pusharglist 4
  pushproplist
  pusharglistnoret 2
  objcall play
  jmp 47
  peek 0
  pushint16 3
  eq
  jmpifz 38
  pushint16 2
  pusharglist 1
  extcall sound
  pushsymb member
  pushcons 'talk3'
  pusharglist 1
  extcall member
  pushsymb rateShift
  pushint16 3
  pusharglist 1
  extcall random
  pushint16 4
  sub
  pusharglist 4
  pushproplist
  pusharglistnoret 2
  objcall play
  pop 1
  pushint16 300
  pusharglist 1
  extcall random
  pushint16 60
  add
  setprop glitchDelay
  ret
25 · fight music (behavior)properties: glitchDelay, hornDelay
on beginSprite me   -- locals: 
  pushint16 20
  setprop glitchDelay
  pushint16 100
  setprop hornDelay
  ret
on prepareFrame me   -- locals: 
  pushint16 1
  pusharglist 1
  extcall sound
  pusharglist 1
  objcall isBusy
  not
  jmpifz 20
  pushint16 1
  pusharglist 1
  extcall sound
  pushcons 'fuzz'
  pusharglist 1
  extcall member
  pusharglistnoret 2
  objcall play
  pushint16 2
  pusharglist 1
  extcall sound
  getobjprop volume
  pushint16 10
  lt
  jmpifz 14
  pushint16 2
  pusharglist 1
  extcall sound
  pusharglistnoret 1
  objcall stop
  pushint16 2
  pusharglist 1
  extcall sound
  pusharglist 1
  objcall isBusy
  not
  jmpifz 196
  getprop glitchDelay
  pushint16 1
  sub
  setprop glitchDelay
  getprop glitchDelay
  pushzero
  lt
  jmpifz 181
  pushint16 2
  pusharglist 1
  extcall sound
  pushzero
  pushint16 30
  pusharglist 1
  extcall random
  add
  setobjprop volume
  pushint16 3
  pusharglist 1
  extcall random
  peek 0
  pushint16 1
  eq
  jmpifz 41
  pushint16 2
  pusharglist 1
  extcall sound
  pushsymb member
  pushcons 'talk1'
  pusharglist 1
  extcall member
  pushsymb rateShift
  pushint16 3
  pusharglist 1
  extcall random
  pushint16 4
  sub
  pusharglist 4
  pushproplist
  pusharglistnoret 2
  objcall play
  jmp 94
  peek 0
  pushint16 2
  eq
  jmpifz 41
  pushint16 2
  pusharglist 1
  extcall sound
  pushsymb member
  pushcons 'talk2'
  pusharglist 1
  extcall member
  pushsymb rateShift
  pushint16 3
  pusharglist 1
  extcall random
  pushint16 4
  sub
  pusharglist 4
  pushproplist
  pusharglistnoret 2
  objcall play
  jmp 47
  peek 0
  pushint16 3
  eq
  jmpifz 38
  pushint16 2
  pusharglist 1
  extcall sound
  pushsymb member
  pushcons 'talk3'
  pusharglist 1
  extcall member
  pushsymb rateShift
  pushint16 3
  pusharglist 1
  extcall random
  pushint16 4
  sub
  pusharglist 4
  pushproplist
  pusharglistnoret 2
  objcall play
  pop 1
  pushint16 30
  pusharglist 1
  extcall random
  pushint16 30
  add
  setprop glitchDelay
  pushint16 3
  pusharglist 1
  extcall sound
  pusharglist 1
  objcall isBusy
  not
  jmpifz 86
  getprop hornDelay
  pushint16 1
  sub
  setprop hornDelay
  getprop hornDelay
  pushzero
  lt
  jmpifz 71
  pushint16 3
  pusharglist 1
  extcall sound
  pushint16 50
  pusharglist 1
  extcall random
  pushint16 10
  add
  setobjprop volume
  pushint16 3
  pusharglist 1
  extcall sound
  pushsymb member
  pushcons 'wardrum'
  pusharglist 1
  extcall member
  pushsymb rateShift
  pushint16 10
  pusharglist 1
  extcall random
  pushint16 5
  sub
  pusharglist 4
  pushproplist
  pusharglistnoret 2
  objcall play
  pushint16 150
  pushint16 300
  pusharglist 1
  extcall random
  add
  setprop hornDelay
  ret

Other members (1)

12 · bg-sound8 (sound)