Neo6502 - sample/cube refactor

tebe6502 · Sep 1, 2024 · 2b30e41 · 2b30e41
1 parent 4fcedd6
commit 2b30e41
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/samples/neo6502/demoeffects/cube.pas b/samples/neo6502/demoeffects/cube.pas
@@ -55,7 +55,7 @@ procedure rotatePoints;
         v2 := vertecs[n,2];
         tmp1 := s * v0 + c * v1;
         tmp2 := s * (c * v0 - s * v1) + c * v2;
-        cube[n,0] := Trunc((- c * c * v0 + c * s * v1 + s * v2) * scale + originX);
+        cube[n,0] := Trunc((c * (-c * v0 + s * v1) + s * v2) * scale + originX);
         cube[n,1] := Trunc((c * tmp1 - s * tmp2) * scale + originY);
         cube[n,2] := Trunc((s * tmp1 + c * tmp2) * scale);        
     end;