0 Members and 1 Guest are viewing this topic.
Hmm, why don't you simplify the math to A*16 and B*16 respectively? It would be faster and smaller, I think, unless Axe auto-simplifies? (multiplication by a power of 2 is a pretty cheap operation).
(I suck at WabbitEmu settings)Code: [Select].WTFDiagnosticOff#ExprOnFullClrDrawStorePicWhile 1For(C,1,40)RecallPicFor(A,0,6)For(B,0,4)If (A^2) and (B^2)RectI(A*16-(C*2),B*14-(C),C*4,C*2)ElseRectI(A*16-(C),B*14-(C*2),C*2,C*4)EndEndEndDispGraphIf getKey(41)Pause 1000EndReturnIf getKey(15)!If C^20StorePicEndEndEnd
.WTFDiagnosticOff#ExprOnFullClrDrawStorePicWhile 1For(C,1,40)RecallPicFor(A,0,6)For(B,0,4)If (A^2) and (B^2)RectI(A*16-(C*2),B*14-(C),C*4,C*2)ElseRectI(A*16-(C),B*14-(C*2),C*2,C*4)EndEndEndDispGraphIf getKey(41)Pause 1000EndReturnIf getKey(15)!If C^20StorePicEndEndEnd