81 |
81 |
82 TAmmoType = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer, |
82 TAmmoType = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer, |
83 amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch, amWhip, |
83 amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch, amWhip, |
84 amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch, |
84 amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch, |
85 amGirder, amTeleport, amSwitch, amMortar, amKamikaze, amCake, |
85 amGirder, amTeleport, amSwitch, amMortar, amKamikaze, amCake, |
86 amSeduction, amWatermelon, amHellishBomb, amNapalm, amDrill, amBallgun, amRCPlane); |
86 amSeduction, amWatermelon, amHellishBomb, amNapalm, amDrill, amBallgun, amRCPlane, amLowGravity, amExtraDamage, amInvulnerable, amExtraTime); |
87 |
87 |
88 THWFont = (fnt16, fntBig, fntSmall); |
88 THWFont = (fnt16, fntBig, fntSmall); |
89 |
89 |
90 TCapGroup = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume); |
90 TCapGroup = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume); |
91 |
91 |
218 gm_Animate= $00001000; // with param |
218 gm_Animate= $00001000; // with param |
219 gm_Precise= $00002000; |
219 gm_Precise= $00002000; |
220 gmAllStoppable = gm_Left or gm_Right or gm_Up or gm_Down or gm_Attack or gm_Precise; |
220 gmAllStoppable = gm_Left or gm_Right or gm_Up or gm_Down or gm_Attack or gm_Precise; |
221 |
221 |
222 cMaxSlotIndex = 8; |
222 cMaxSlotIndex = 8; |
223 cMaxSlotAmmoIndex = 3; |
223 cMaxSlotAmmoIndex = 4; |
224 |
224 |
225 ammoprop_Timerable = $00000001; |
225 ammoprop_Timerable = $00000001; |
226 ammoprop_Power = $00000002; |
226 ammoprop_Power = $00000002; |
227 ammoprop_NeedTarget = $00000004; |
227 ammoprop_NeedTarget = $00000004; |
228 ammoprop_ForwMsgs = $00000008; |
228 ammoprop_ForwMsgs = $00000008; |
231 ammoprop_AttackingPut = $00000080; |
231 ammoprop_AttackingPut = $00000080; |
232 ammoprop_DontHold = $00000100; |
232 ammoprop_DontHold = $00000100; |
233 ammoprop_AltAttack = $00000200; |
233 ammoprop_AltAttack = $00000200; |
234 ammoprop_AltUse = $00000400; |
234 ammoprop_AltUse = $00000400; |
235 ammoprop_NotBorder = $00000800; |
235 ammoprop_NotBorder = $00000800; |
|
236 ammoprop_Utility = $00001000; |
236 |
237 |
237 AMMO_INFINITE = 9; |
238 AMMO_INFINITE = 9; |
238 |
239 |
239 EXPLAllDamageInRadius = $00000001; |
240 EXPLAllDamageInRadius = $00000001; |
240 EXPLAutoSound = $00000002; |
241 EXPLAutoSound = $00000002; |
1163 minAngle: 0; |
1164 minAngle: 0; |
1164 maxAngle: 0; |
1165 maxAngle: 0; |
1165 isDamaging: true; |
1166 isDamaging: true; |
1166 SkipTurns: 4; |
1167 SkipTurns: 4; |
1167 PosCount: 1; |
1168 PosCount: 1; |
|
1169 PosSprite: sprWater), |
|
1170 (NameId: sidLowGravity; |
|
1171 NameTex: nil; |
|
1172 Probability: 200; |
|
1173 NumberInCase: 1; |
|
1174 Ammo: (Propz: ammoprop_NoCrosshair or |
|
1175 ammoprop_DontHold or |
|
1176 ammoprop_Utility; |
|
1177 Count: 1; |
|
1178 NumPerTurn: 0; |
|
1179 Timer: 0; |
|
1180 Pos: 0; |
|
1181 AmmoType: amLowGravity); |
|
1182 Slot: 8; |
|
1183 TimeAfterTurn: 0; |
|
1184 minAngle: 0; |
|
1185 maxAngle: 0; |
|
1186 isDamaging: false; |
|
1187 SkipTurns: 0; |
|
1188 PosCount: 1; |
|
1189 PosSprite: sprWater), |
|
1190 (NameId: sidExtraDamage; |
|
1191 NameTex: nil; |
|
1192 Probability: 200; |
|
1193 NumberInCase: 1; |
|
1194 Ammo: (Propz: ammoprop_NoCrosshair or |
|
1195 ammoprop_DontHold or |
|
1196 ammoprop_Utility; |
|
1197 Count: 1; |
|
1198 NumPerTurn: 0; |
|
1199 Timer: 0; |
|
1200 Pos: 0; |
|
1201 AmmoType: amExtraDamage); |
|
1202 Slot: 8; |
|
1203 TimeAfterTurn: 0; |
|
1204 minAngle: 0; |
|
1205 maxAngle: 0; |
|
1206 isDamaging: false; |
|
1207 SkipTurns: 0; |
|
1208 PosCount: 1; |
|
1209 PosSprite: sprWater), |
|
1210 (NameId: sidInvulnerable; |
|
1211 NameTex: nil; |
|
1212 Probability: 200; |
|
1213 NumberInCase: 1; |
|
1214 Ammo: (Propz: ammoprop_NoCrosshair or |
|
1215 ammoprop_DontHold or |
|
1216 ammoprop_Utility; |
|
1217 Count: 1; |
|
1218 NumPerTurn: 0; |
|
1219 Timer: 0; |
|
1220 Pos: 0; |
|
1221 AmmoType: amInvulnerable); |
|
1222 Slot: 8; |
|
1223 TimeAfterTurn: 0; |
|
1224 minAngle: 0; |
|
1225 maxAngle: 0; |
|
1226 isDamaging: false; |
|
1227 SkipTurns: 0; |
|
1228 PosCount: 1; |
|
1229 PosSprite: sprWater), |
|
1230 (NameId: sidExtraTime; |
|
1231 NameTex: nil; |
|
1232 Probability: 200; |
|
1233 NumberInCase: 1; |
|
1234 Ammo: (Propz: ammoprop_NoCrosshair or |
|
1235 ammoprop_DontHold or |
|
1236 ammoprop_Utility; |
|
1237 Count: 1; |
|
1238 NumPerTurn: 0; |
|
1239 Timer: 0; |
|
1240 Pos: 0; |
|
1241 AmmoType: amExtraTime); |
|
1242 Slot: 7; |
|
1243 TimeAfterTurn: 0; |
|
1244 minAngle: 0; |
|
1245 maxAngle: 0; |
|
1246 isDamaging: false; |
|
1247 SkipTurns: 0; |
|
1248 PosCount: 1; |
1168 PosSprite: sprWater) |
1249 PosSprite: sprWater) |
1169 ); |
1250 ); |
1170 |
1251 |
1171 var CountTexz: array[1..9] of PTexture; |
1252 var CountTexz: array[1..9] of PTexture; |
1172 |
1253 |