X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fnogl%2FnoGLES1.inc;h=6142e2e4ee6c148f254d365c166ed62be90f986e;hb=d52e9d7b6bcc5c1846c82c3908a4688339e736f3;hp=15765bf36253d22e81842b4e8c830ca7beb34049;hpb=ebd974ffe03b41f787eb8421cf0985f55688b606;p=d2df-sdl.git diff --git a/src/nogl/noGLES1.inc b/src/nogl/noGLES1.inc index 15765bf..6142e2e 100644 --- a/src/nogl/noGLES1.inc +++ b/src/nogl/noGLES1.inc @@ -232,15 +232,16 @@ implementation begin i := Length(x); vpx := Length(v); - if (cmds.mode = GL_QUADS) and (i div vpx mod 4 = 3) then + if (cmds.mode = GL_QUADS) and (i div vpx mod 6 = 3) then begin - for j := 0 to vpx - 1 do - AddFloatRaw(x, x[i - 3*vpx + j]); - for j := 0 to vpx - 1 do - AddFloatRaw(x, x[i - 1*vpx + j]); + for j := 0 to vpx - 1 do AddFloatRaw(x, x[i - 1*vpx + j]); + for j := 0 to vpx - 1 do AddFloatRaw(x, v[j]); + for j := 0 to vpx - 1 do AddFloatRaw(x, x[i - 3*vpx + j]); + end + else + begin + for j := 0 to vpx - 1 do AddFloatRaw(x, v[j]); end; - for j := 0 to vpx - 1 do - AddFloatRaw(x, v[j]); end; (* ---------- end internals ---------- *)