equal
deleted
inserted
replaced
176 var i, t: LongInt; |
176 var i, t: LongInt; |
177 r: TSDL_Rect; |
177 r: TSDL_Rect; |
178 tdx, tdy: Double; |
178 tdx, tdy: Double; |
179 grp: TCapGroup; |
179 grp: TCapGroup; |
180 s: string[15]; |
180 s: string[15]; |
181 cWaveWidth, cWaveHeight: LongWord; |
|
182 |
181 |
183 procedure DrawRepeated(spr: TSprite; Shift: LongInt); |
182 procedure DrawRepeated(spr: TSprite; Shift: LongInt); |
184 var i, w: LongInt; |
183 var i, w: LongInt; |
185 begin |
184 begin |
186 w:= SpritesData[spr].Width; |
185 w:= SpritesData[spr].Width; |