diff -r b1ec8db513f2 -r 644f93d8f148 hedgewars/uGears.pas --- a/hedgewars/uGears.pas Sat Mar 21 10:49:58 2009 +0000 +++ b/hedgewars/uGears.pas Sun Mar 22 14:32:22 2009 +0000 @@ -74,7 +74,12 @@ implementation uses uWorld, uMisc, uStore, uConsole, uSound, uTeams, uRandom, uCollisions, - uLand, uIO, uLandGraphics, uAIMisc, uLocale, uAI, uAmmos, uTriggers, GL, + uLand, uIO, uLandGraphics, uAIMisc, uLocale, uAI, uAmmos, uTriggers, +{$IFDEF IPHONE} + gles11, +{$ELSE} + GL, +{$ENDIF} uStats, uVisualGears; const MAXROPEPOINTS = 384; @@ -653,6 +658,7 @@ hx, hy, cx, cy, tx, ty, sx, sy, m: LongInt; // hedgehog, crosshair, temp, sprite` lx, ly, dx, dy, ax, ay, aAngle, dAngle: real; // laser, change defaultPos, HatVisible: boolean; + VertexBuffer: array [0..1] of TVertex2f; begin if (Gear^.State and gstHHDeath) <> 0 then begin @@ -1080,11 +1086,16 @@ begin glDisable(GL_TEXTURE_2D); glEnable(GL_LINE_SMOOTH); - glBegin(GL_LINES); + glColor4ub($FF, $00, $00, $C0); - glVertex2i(hx + WorldDx, hy + WorldDy); - glVertex2i(tx + WorldDx, ty + WorldDy); - glEnd(); + VertexBuffer[0].X:= hx + WorldDx; + VertexBuffer[0].Y:= hy + WorldDy; + VertexBuffer[1].X:= tx + WorldDx; + VertexBuffer[1].Y:= ty + WorldDy; + + glEnableClientState(GL_VERTEX_ARRAY); + glVertexPointer(2, GL_FLOAT, 0, @VertexBuffer[0]); + glDrawArrays(GL_LINES, 0, Length(VertexBuffer)); glColor4f(1, 1, 1, 1); glEnable(GL_TEXTURE_2D); glDisable(GL_LINE_SMOOTH);