Notices by bazzargh@hachyderm.io

@bbcmicrobot @scruss #bbcmicrobot ë1
æ64,0
ì500,800:ð&99,130,70:ð&99,20,0
æ32,0
ì600,400:ð&99,-80,300:ð&99,200,0
æ0,3:ì600,400:ì370,200:ð&A9,700,200
ãA=0¸3
B=A*1.6-.6:S=µB:C=ƛB
çA>0ƀA<3:ì500+60*C,800+60*S:æ16,0:ð&99,30,0:ì500+60*C,800+60*S:æ0,0:ð&99,10,0
æ32,0:ì600+330*C,400+330*S:ð&99,60*C,60*S:ð&99,40*C,40*S
ãJ=1¸5
U=µ(B-J/2):V=ƛ(B-J/2)
ì600+390*C-50*U,400+390*S+50*V:ð&99,8,0
í,
æ0,0:ì510,720:ð&99,20,0
Z=¦(2750)
æ0,3
ãI=1¸17:ìI*1280/17+20,0:ð97,1280/80,1024:Z=¦(6):í

@geoffl #bbcmicrobot 🚀 MODE0
R=100
r=22:G=R+r
FORW=0TO450STEP93
S=SINRAD(W+33)
C=COSRAD(W+33)
FORX%=0TOG:F=X%:IFF<R-r:F=R-r
FORI=0TO60:K=F+I*(G-F)/60
IFABS(K)<ABS(X%)GOTO160
Z%=S*SQR(r*r-(K-R)*(K-R))
Y%=C*SQR(K*K-X%*X%)
FORM%=-1TO1STEP2:FORN%=-1TO1STEP2:FORO%=-1TO1STEP2
A%=M%*X%+W*1.5:B%=N%*Y%+O%*Z%+256:J%=(7*(A% MOD4)+5*(B% MOD4))MOD16
IF(N%*Y%*S/C+O%*Z%*C/S)+300>35*J%:PLOT69,2*A%,2*B%
NEXT,,
NEXT,,

@bbcmicrobot @geoffl Messing with the maths, which I probably got wrong-I see I left in an unnecessary if abs(K)<abs(X). At each value of x from -(R+r) to (R+r) and each value of K=(R+rcosv) I get the 4 points on the surface and plot them. Seems to have enough density to avoid bleed, but the shading looks wrong to me, I think I have incorrect Z-values in there

@bbcmicrobot @geoffl I had a sign flipped 🤦 also fixed the z-offset, shading looks much better now I think.

@bbcmicrobot @DazedAndDiffused #bbcmicrobot 🚀 MODE0:DIMS(360):FORI=0TO360:S(I)=SINRADI:NEXT
W=53:R=16
FORA=20TO320STEP70
T=((2+(A DIV70))*80)MOD360
FORU=0TO360
FORV=0TO90
X=A+(W+R*S(4*V))*S(U)
Y=INT((W+R*S(4*V))*S((U+90)MOD360))
Z=R*S((4*V+90)MOD360)
M=Y*S((T+90)MOD360)+Z*S(T)
N=Y*S(T)-Z*S((T+90)MOD360)+R
C=1/16:IFN>0:C=C+N/R*.2
IFC>(7*(4*(X MOD4)+(M MOD4))MOD16)/16:PLOT69,4*INTX,512+4*INTM
NEXT,,

@bbcmicrobot @DazedAndDiffused it struck me thinking about your image-where illumination is based on depth-that with an ordered dither you wouldn't need to decide which surface is in the foreground, and I felt that was worth coding up

@geoffl another way to get more points is, for each calculation, use it to plot a 4x4 block of pixels (covering all 16 thresholds in the dither pattern). I wasn't sure if that's what your original did since the pixels look fatter - I haven't tried to decode how it works

@geoffl #bbcmicrobot 🚀 MODE0:DIMS(182):FORI=0TO182:S(I)=SINRAD(2*I):NEXT
W=27:R=7
FORA=20TO160STEP35
T=((2+(A DIV35))*40)MOD180
FORU=0TO181
FORV=0TO45
X=A+(W+R*S(4*V))*S(U)
Y=INT((W+R*S(4*V))*S((U+45)MOD180))
Z=R*S((4*V+45)MOD180)
M=Y*S((T+45)MOD180)+Z*S(T)
N=Y*S(T)-Z*S((T+45)MOD180)+R*3
C=1/16:IFN>0:C=C+N/R*.1
FORI=0TO3
FORJ=0TO3
IFC>(7*(4*I+J)MOD16)/13:PLOT69,2*I+8*INTX,512+2*J+8*INTM
NEXT,,,,

#bbcmicrobot 🚀 ë1
S=µ.03:C=ƛ.03
X=260:Y=20:U=0:V=1
ãA=80¸1200
X=X+U:Y=Y+V
K=´(ƛ(A/45)*ƛ(A*.0138)):T=U:U=U*C-K*V*S:V=V*C+K*T*S
Z=24-A ƃ10
ãB=-Z ¸Z
R=1-80/A
æ0,1+(¨(3*Ɣ(ƛ(B*.3+(A Ɓ4ƃ2)*¯/2+.4)))=A ƃ4)-(ƔB>16)
ð69,4*¨(X+R*B*V),4*¨(Y-R*B*U)
í,
ï29,640;700;
K=190
ãJ=0¸K
R=(200-80*ƛ(J*3*¯/K))*(.8+.5*ƛ(J*13*¯/K)*ƛ(J*13*¯/K))
ãI=0¸R ƈ5
æ0,1.3+(I/R)-(J Ɓ20=4)*(2*(I Ɓ15=3)+1)-(J Ɓ12=14)*(I Ɓ30=3)
S=µ(J*¯/K):C=ƛ(J*¯/K):V=8*µ(I/16)
ð69,I*S+V*C,I*C+V*S
ð69,-(I*S+V*C),I*C+V*S
í,
à

@bbcmicrobot I know it's not new year till saturday but I couldn't sit on that one any more. I had like 5 failed attempts at making a head (various fractals, random triangles, etc) before I came up with that one; the scales were easy but it was hours of tweaking to get an acceptably curvy tail. Nice result tho.

@ggtr1138 @bbcmicrobot in the Earthsea trilogy it explains that it's hard to summon a dragon because their true name is 23 lines of hacky basic and you run out of breath

#bbcmicrobot 🚀 ë0
Ü52,93,0,40,1,0,48,52,93,2,80,22,51,64,2,42,30,2,10,1,42,45,2,28,2,42,45,60,36,2,128,70,80,22,2,96,3,129,25,3,80,13,120,28,3,128,38,65,3,2,128,38,72,25,2
õ
Z=³(11):÷:ãI=1¸Z:óA,B,C,D,W:í
ãI=1¸7
K=³(3)
X=C-A:Y=D-B
çW=1:P=A-Y*.3:Q=B+X*.3:R=A+X*.4:S=B+Y*.4
çW=2:P=A+X*.4-Y/8:Q=B+Y*.4+X/8:R=C-X*.4-Y/8:S=D-Y*.4+X/8
çW=3:P=A+X*.3+Y*.1:Q=B+Y*.3-X*.1:R=A+X*.2:S=B+Y*.2
çK=1:C=P:D=Q
çK=2:A=P:B=Q:C=R:D=S
çK=3:A=R:B=S
í
ì10*A,10*B:ß10*C,10*D
ý0

#bbcmicrobot 🚀 ë0:ï29,640;480;5:Z=9
Ü.8,0,.012,.75,-.3,.015,.5,-.1,.036,.3,.2,.03,-.1,.4,.06,-.4,0,.14,-.3,-.4,.05,.1,.1,.015,.5,-.4,.008
M=-.3:N=-.6:O=0.03:Q=.0001
õ
H=³(1)<.8:çH:E=0:F=0:G=1:ƋE=M:F=N:G=O
X=2*G*³(1)-G:Y=2*G*³(1)-G:L=1
çX*X+Y*Y>G*G:å160
X=X+E:Y=Y+F:çX*X+Y*Y>³(1):å160
X=X+.2:Y=Y-.1:çX*X+Y*Y>1:å160
ç¬H å140
÷:ãI=1¸Z:óA,B,C
V=X-A:W=Y-B:çV*V+W*W<C:L=.38:I=Z
í
ç³(1)<L :ð69,480*X,480*Y
ç³(1)<Q:M=2*³(1)-1:N=2*³(1)-1:O=³(1)*.012:Q=.003
ý0