changeset 6898 | 344b0dbd9690 |
parent 6885 | 53a87a4c7b35 |
child 6982 | 8d41d22a291d |
6897:a9126661f613 | 6898:344b0dbd9690 |
---|---|
1115 |
1115 |
1116 procedure initModule; |
1116 procedure initModule; |
1117 var ai: TAmmoType; |
1117 var ai: TAmmoType; |
1118 i: LongInt; |
1118 i: LongInt; |
1119 begin |
1119 begin |
1120 RegisterVariable('fullscr', vtCommand, @chFullScr, true); |
1120 RegisterVariable('fullscr', @chFullScr, true); |
1121 |
1121 |
1122 SDLPrimSurface:= nil; |
1122 SDLPrimSurface:= nil; |
1123 |
1123 |
1124 cScaleFactor:= 2.0; |
1124 cScaleFactor:= 2.0; |
1125 Step:= 0; |
1125 Step:= 0; |