0 Members and 1 Guest are viewing this topic.
:.0:://CIRCLE TEST:.MAG15:0→A→B→C:1→F:9→G:Repeat getKey(15:ClrDraw:A→Z:prgmLbl "CIRCO:Circle(C,B,5,1:Circle(C,B,3,1:A+128→Z:prgmLbl "CIRCO:Circle(C,B,5,1:Circle(C,B,3,1:A+64→Z:prgmLbl "CIRCO:Circle(C,B,5,1:Circle(C,B,3,1:A+64+128→Z:prgmLbl "CIRCO:Circle(C,B,5,1:Circle(C,B,3,1:DispGraph:A+F→A:G+getKey(53:-getKey(52:→G:F+getKey(54:-getKey(48:→F:D+getKey(3:-getKey(2:→D:E+getKey(1:-getKey(4:→E:End:.CIRCO:128+cos(Z:10+D+Ans/G→B:128+sin(Z:10+E+Ans/G→C:End:Stop
3→N256/N→I0→A →B →C ;need spaces here!1→F9→GRepeat getKey(15ClrDrawA→ZFor(H,1,N128+cos(Z10+D+Ans/G→B128+sin(Z10+E+Ans/G→CCircle(C,B,3,1Circle(C,B,5,1Z+I→ZEndDispGraphA+F→AG+getKey(53-getKey(52→GF+getKey(54-getKey(48→FD+getkey(3-getKey(2→DE+getkey(1-getKey(4→EgetKey(10-getKey(11If +N+N→N 256/N→IEndStop
:.0:://CIRCLE TEST:.MAG15:0→A →D →E:1→F →N:9→G →H:Repeat getKey(15:ClrDraw:256/N→M:For(O,1,N:O-1:*M:+A→Z:prgmLbl "CIRCO:Circle(C,B,5,1:Circle(C,B,3,1:End:If A^2:Fill(1:DispGraph:A+F→A:G+getKey(53:-getKey(52:→G:F+getKey(54:-getKey(48:→F:D+getKey(3:-getKey(2:→D:E+getKey(1:-getKey(4:→E:N+getKey(51:-getKey(50:If ! :N:→N:H+getKey(47:-getKey(46:→H:End:.CIRCO:128+cos(Z:10+D+Ans/G→B:128+sin(Z:10+E+Ans/H→C:End:Stop
There are folks that want a flight simulator and they think Grammer can do it after seeing this They are serious about this, by the way o.o for you