[#]bbcmicrobot 🚀
MODE1
VDU29,639;383;5
N=11
T=PI/N*2
DIMX(N),Y(N)
FORI=.25TON
X(I)=1280COS(TI)
Y(I)=1280SIN(TI)
NEXT
I=(I+RND(N-7)+3)MODN
X=X(I)/2+X/2
Y=Y(I)/2+Y/2
R=INT(RND(10)/10)
P=POINT(X,Y)
IFP=0 P=1 ELSE P=P-R*(P<3)
GCOL0,P
PLOT69,X,Y:PLOT69,X/2,Y/2
GOTO100
=> More informations about this toot | More toots from geoffl@mastodon.me.uk
I ran @geoffl's program and got this.
Source: https://bbcmic.ro/?t=ba86x #bbcbasic
=> More informations about this toot | More toots from bbcmicrobot@mastodon.me.uk
[#]bbcmicrobot 🚀
MODE1:GCOL0,2:V.19,0,4;0;
P.SPC12"Australia 2145"
VDU29,639;511;5
N=15
T=PI/N*2
DIMX(N),Y(N)
FORI=.25TON
X(I)=800COS(TI)
Y(I)=-500SIN(TI*2)
NEXT
I=(I+RND(5)+2)MODN
X=X(I)/2+X/2
Y=Y(I)/2+Y/2
PLOT69,X,Y
GOTO110
=> More informations about this toot | More toots from geoffl@mastodon.me.uk
I ran @geoffl's program and got this.
Source: https://bbcmic.ro/?t=babUq #bbcbasic
=> More informations about this toot | More toots from bbcmicrobot@mastodon.me.uk
@bbcmicrobot @geoffl Australia evolves from lion to dragon... Impressive!
=> More informations about this toot | More toots from Jinx@infosec.exchange
[#]bbcmicrobot @geoffl 🚀MO.1:GC.0,2:P.SPC53"Australia 2145"''''''''''''''''''''''"Perth>":V.19;4;0;29,639;479;5:N=15:T=PI/N2:DIMX(N),Y(N):F.I=.25TON:X(I)=400COS(TI):Y(I)=250SIN(TI2):N.:REP.I=(I+RND(5)+2)MODN:X=X(I)+X/2:Y=Y/2-Y(I):PL.69,X,Y:U.0
=> More informations about this toot | More toots from rheolism@oldbytes.space
I ran @rheolism's program and got this.
Source: https://bbcmic.ro/?t=baeF3 #bbcbasic
=> More informations about this toot | More toots from bbcmicrobot@mastodon.me.uk This content has been proxied by September (3851b).Proxy Information
text/gemini