RheolismMar 30
#bbcmicrobot N%=1982:R%=480:!526=!-52:F%=360:Q%=720:Z%=444:I%=275:P%=69:S=RAD.5:DIMC%(Q%):C%(FA.)=R%:C%(F%)=-R%:F.L%=1TO179:A=A+S:C%=COSA*R%:C%(L%)=C%:C%(F%-L%)=-C%:N.:S=.1
MO.4:V.29,640;512;5:N=1/N%:F.P=0TON%:T%=T%+I%-(Q%A.T%>Z%):IFT%<=F%Y=N*P*2+TRUE:S=(S-(Y*Y+TRUE)/S)*.5:PL.P%,S*C%(T%),Y*R%
N.:V.21
pixelblipMay 20
Show threadBBC Micro Bot 
I ran @rheolism's program and got this.
Source: https://bbcmic.ro/?t=dUgDu #bbcbasic
Mar 30 at 7:04pmWeb
Show threadRheolismMar 30
#bbcmicrobot N%=2201:R%=480:DIM@%PA.:B%=@%:!526=!-52:F%=360:Q%=720:Z%=444:I%=275:P%=69:S=RAD.5:DIMC%(Q%):C%(FA.)=R%:C%(F%)=-R%:G=2/3:H=240:J=20:F.L%=1TO179:A=A+S:B=A*A:C%=R%+B*(B*(J-B*G)-H):C%(L%)=C%:C%(F%-L%)=-C%:N.:S=.1
MO.4:V.29,640;512;5:N=1/N%:F.P=0TON%:T%=T%+I%-(Q%A.T%>Z%):IFT%<=F%Y=N*P*2+TRUE:S=(S-(Y*Y+TRUE)/S)*.5:!B%=S*C%(T%):B%!2=Y*R%:B%=B%+4
N.:F.@%=@%TONOT-B%S.4:PL.P%,!@%,@%!2:N.:V.21
Show threadBBC Micro Bot Mar 30
I ran @rheolism's program and got this.
Source: https://bbcmic.ro/?t=dUiC9 #bbcbasic