changeset 871 | f1bf00b7fd5a |
parent 866 | ac6f6c95c23f |
child 883 | 07a568ba44e0 |
870:dd418d9c18c5 | 871:f1bf00b7fd5a |
---|---|
34 procedure doPut(putX, putY: LongInt; fromAI: boolean); |
34 procedure doPut(putX, putY: LongInt; fromAI: boolean); |
35 |
35 |
36 implementation |
36 implementation |
37 {$J+} |
37 {$J+} |
38 uses uMisc, uStore, Types, uConsts, uGears, uTeams, uIO, uKeys, uWorld, uLand, |
38 uses uMisc, uStore, Types, uConsts, uGears, uTeams, uIO, uKeys, uWorld, uLand, |
39 uRandom, uAmmos, uTriggers, GL, uSound; |
39 uRandom, uAmmos, uTriggers, GL, uStats; |
40 const cLineWidth: LongInt = 0; |
40 const cLineWidth: LongInt = 0; |
41 cLinesCount = 256; |
41 cLinesCount = 256; |
42 |
42 |
43 type PVariable = ^TVariable; |
43 type PVariable = ^TVariable; |
44 TVariable = record |
44 TVariable = record |