| changeset 866 | ac6f6c95c23f |
| parent 841 | 0700e3d3474d |
| child 871 | f1bf00b7fd5a |
| 865:a4a5ec6c61d4 | 866:ac6f6c95c23f |
|---|---|
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; |
39 uRandom, uAmmos, uTriggers, GL, uSound; |
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 |