36 |
36 |
37 procedure doPut(putX, putY: LongInt; fromAI: boolean); |
37 procedure doPut(putX, putY: LongInt; fromAI: boolean); |
38 |
38 |
39 implementation |
39 implementation |
40 uses uMisc, uStore, Types, uConsts, uGears, uTeams, uIO, uKeys, uWorld, uLand, |
40 uses uMisc, uStore, Types, uConsts, uGears, uTeams, uIO, uKeys, uWorld, uLand, |
41 uRandom, uAmmos, uTriggers, uStats, uGame, uChat, SDLh, uSound, uVisualGears, uScript; |
41 uRandom, uAmmos, uStats, uGame, uChat, SDLh, uSound, uVisualGears, uScript; |
42 |
42 |
43 const cLineWidth: LongInt = 0; |
43 const cLineWidth: LongInt = 0; |
44 cLinesCount = 256; |
44 cLinesCount = 256; |
45 |
45 |
46 type PVariable = ^TVariable; |
46 type PVariable = ^TVariable; |
228 RegisterVariable('proto' , vtCommand, @chCheckProto , true ); |
228 RegisterVariable('proto' , vtCommand, @chCheckProto , true ); |
229 RegisterVariable('spectate', vtBoolean, @fastUntilLag , false); |
229 RegisterVariable('spectate', vtBoolean, @fastUntilLag , false); |
230 RegisterVariable('capture' , vtCommand, @chCapture , true ); |
230 RegisterVariable('capture' , vtCommand, @chCapture , true ); |
231 RegisterVariable('rotmask' , vtCommand, @chRotateMask , true ); |
231 RegisterVariable('rotmask' , vtCommand, @chRotateMask , true ); |
232 RegisterVariable('addteam' , vtCommand, @chAddTeam , false); |
232 RegisterVariable('addteam' , vtCommand, @chAddTeam , false); |
233 RegisterVariable('addtrig' , vtCommand, @chAddTrigger , false); |
|
234 RegisterVariable('rdriven' , vtCommand, @chTeamLocal , false); |
233 RegisterVariable('rdriven' , vtCommand, @chTeamLocal , false); |
235 RegisterVariable('map' , vtCommand, @chSetMap , false); |
234 RegisterVariable('map' , vtCommand, @chSetMap , false); |
236 RegisterVariable('theme' , vtCommand, @chSetTheme , false); |
235 RegisterVariable('theme' , vtCommand, @chSetTheme , false); |
237 RegisterVariable('seed' , vtCommand, @chSetSeed , false); |
236 RegisterVariable('seed' , vtCommand, @chSetSeed , false); |
238 RegisterVariable('template_filter', vtLongInt, @cTemplateFilter, false); |
237 RegisterVariable('template_filter', vtLongInt, @cTemplateFilter, false); |