equal
deleted
inserted
replaced
94 if AMxShift > 0 then dec(AMxShift, MENUSPEED); |
94 if AMxShift > 0 then dec(AMxShift, MENUSPEED); |
95 end else |
95 end else |
96 begin |
96 begin |
97 if AMxShift = 0 then |
97 if AMxShift = 0 then |
98 begin |
98 begin |
99 CursorPoint.X:= cScreenWidth div 2; |
99 CursorPoint.X:= cScreenWidth shr 1; |
100 CursorPoint.Y:= cScreenHeight div 2; |
100 CursorPoint.Y:= cScreenHeight shr 1; |
101 prevPoint:= CursorPoint; |
101 prevPoint:= CursorPoint; |
102 SDL_WarpMouse(CursorPoint.X + cScreenWidth div 2, cScreenHeight - CursorPoint.Y) |
102 SDL_WarpMouse(CursorPoint.X + cScreenWidth div 2, cScreenHeight - CursorPoint.Y) |
103 end; |
103 end; |
104 if cReducedQuality then |
104 if cReducedQuality then |
105 AMxShift:= 210 |
105 AMxShift:= 210 |
112 Pos:= -1; |
112 Pos:= -1; |
113 with CurrentHedgehog^ do |
113 with CurrentHedgehog^ do |
114 begin |
114 begin |
115 if Ammo = nil then exit; |
115 if Ammo = nil then exit; |
116 SlotsNum:= 0; |
116 SlotsNum:= 0; |
117 x:= cScreenWidth div 2 - 210 + AMxShift; |
117 x:= (cScreenWidth shr 1) - 210 + AMxShift; |
118 y:= cScreenHeight - 40; |
118 y:= cScreenHeight - 40; |
119 dec(y); |
119 dec(y); |
120 DrawSprite(sprAMBorders, x, y, 0); |
120 DrawSprite(sprAMBorders, x, y, 0); |
121 dec(y); |
121 dec(y); |
122 DrawSprite(sprAMBorders, x, y, 1); |
122 DrawSprite(sprAMBorders, x, y, 1); |
343 //glScalef(1.0, 1.0, 1.0); |
343 //glScalef(1.0, 1.0, 1.0); |
344 |
344 |
345 {$IFDEF IPHONEOS} |
345 {$IFDEF IPHONEOS} |
346 {* see the code in MainLoop *} |
346 {* see the code in MainLoop *} |
347 SDL_GetMouseState(0, @x, @y); |
347 SDL_GetMouseState(0, @x, @y); |
348 if (x > 100) and (x < 220) and (y > 200) and (y < 280) then |
348 if ((x > 100) and (x <= 220) and (y > 200) and (y <= 280)) and bShowAmmoMenu <> false then |
349 {$ENDIF} |
349 {$ENDIF} |
350 if not isPaused then MoveCamera; |
350 if not isPaused then MoveCamera; |
351 |
351 |
352 if not cReducedQuality then |
352 if not cReducedQuality then |
353 begin |
353 begin |
357 |
357 |
358 DrawVisualGears(0); |
358 DrawVisualGears(0); |
359 end; |
359 end; |
360 |
360 |
361 // Waves |
361 // Waves |
362 DrawWaves( 1, 0, - (cWaveHeight * 2)); |
362 DrawWaves( 1, 0, - (cWaveHeight shl 1)); |
363 DrawWaves(-1, 100, - (cWaveHeight + cWaveHeight div 2)); |
363 DrawWaves(-1, 100, - (cWaveHeight + (cWaveHeight shr 1))); |
364 |
364 |
365 |
365 |
366 DrawLand(WorldDx, WorldDy); |
366 DrawLand(WorldDx, WorldDy); |
367 |
367 |
368 DrawWater(255); |
368 DrawWater(255); |