Tezos

bad radar

Creator

tz1St3n29AbYXZXV8W1BG41qYzz86J2CFAW7

Description

-- bad radar -- alexthescott -- 8/23/21 circ_c=1 t=0 v=.001 p={8,136,2,12,140,1,11,139,131} pal(p,1) cls() ::♥:: if time()<2 then print("bad radar",46,64,1) else --burn pixels for c=0, 512 do local x=rnd(128) local y=rnd(128) local f=pget(x,y) if f%3>0 then pset(x,y,f+1) else pset(x,y,0) end end -- draw 6 lines for i=1,6do x=33+((cos(t+i/6)+1)/2)*63 y=33+((sin(t+i/6)+1)/2)*63 x2=-32+((cos(t+i/6)+1)/2)*192 y2=-32+((sin(t+i/6)+1)/2)*192 line(x,y,x2,y2,(1+(i-1)*3)%9) end -- invert v if btnp(4) or btnp(5) then v*=-1 end t+=v if t==abs(1)then t=0 end -- draw inner circle s=(cos(0.375+time()/16)+1)/2 if s==0 then circ_c+=3 circ_c%=9 end circfill(64,64,29*s,circ_c) flip() end goto ♥

Traits

Tag

pico8

Token

Contract: KT1RJ6...xton
Token ID: 222867

View on marketplace