2

Cart #40152 | 2017-05-03 | Code ▽ | License: CC4-BY-NC-SA
2

 t=0::_::cls()for i=1,7 do j=i-1 r={4,1,2,1.7,2,3,1.9}k=t*r[i]/i circfill(64+j*12*cos(k),64+j*12*sin(k+.1),r[i],9+i%7)end t+=.02 flip()goto _

help I have a crippling tweetjam addiction

P#40153 2017-05-03 09:01 ( Edited 2017-05-03 13:01)
2

Cart #40155 | 2017-05-03 | Code ▽ | License: CC4-BY-NC-SA
2

Spring time, folks!

P#40156 2017-05-03 10:48 ( Edited 2017-05-03 14:54)

Cart #40187 | 2017-05-04 | Code ▽ | License: CC4-BY-NC-SA

 x,y,u,v=0,0,0,0::_::cls()v=y>64 and(btn(4)and-2 or 0)or v+.1 u=(btn(0)and-1 or btn(1)and 1 or u*0.9)y+=v x=(x+u)%128 pset(x,y,8)flip()goto _

The most basic possible platformer. I wanted to see could I fit something that "felt" like an ok platformer into one of these.

P#40188 2017-05-04 13:20 ( Edited 2017-05-04 17:20)
3

Cart #40212 | 2017-05-05 | Code ▽ | License: CC4-BY-NC-SA
3

 r=rnd f=100 ::a:: f=mid(40,f+r(8)-4,200) e=flr(r()+.01) cls(e*7) for n=1,f do a=r(240) b=a+r(10)-f/2 line(a,0,b,127,e*5+1) end flip() goto a
P#40213 2017-05-05 08:45 ( Edited 2017-05-05 12:45)
1

Cart #40217 | 2017-05-05 | Code ▽ | License: CC4-BY-NC-SA
1

 f=64 a=0 y=0 x=0::v::for n=0,4637 do m=a+a*flr(rnd(3))x=.5*(x+sin(m)*f)y=.5*(y-cos(m)*f)pset(f+x,f+y,a*9%15+1)end flip()cls()a+=.003 goto v
P#40216 2017-05-05 11:32 ( Edited 2017-05-05 15:51)
:: irdumb
1

Get ready to use your arrow keys, cause there's no restarting ;)

Cart #40516 | 2017-05-13 | Code ▽ | License: CC4-BY-NC-SA
1

 m=127z=0s=1p={-1,1,-m,m}function _draw()for i=0,3 do if(btn(i))s=i+1 end z+=p[s]*2 z%=m*m x=z%m if(x<2or pget(x,z/m)>0)cls(8) pset(x,z/m)end
P#40517 2017-05-12 20:35 ( Edited 2017-05-13 00:35)
 y=9 p=0q=0 n=1 while n>0 do cls()circfill(9,y,9,7)y+=q;q+=p;p+=0.001 if(y>(99))q=q*(-0.9*n); n-=0.03 flip()end print("#pico8 #tweetjam",9,9)

Putting these here: https://github.com/mattleblanc/picotweets

P#40689 2017-05-17 03:42 ( Edited 2017-05-17 07:42)
1

Cart #40861 | 2017-05-22 | Code ▽ | License: CC4-BY-NC-SA
1

 q=128t=0::r::x=0 t+=.5 cls()::c::c=x%q r=64+x/q h=1+(cos(c/60)/2+.5)*.6+sin(r/50-t*.1)*.1 ?n,c,q-(q-r)*h,h*9 x+=5 if(r
P#40862 2017-05-22 13:44 ( Edited 2017-05-22 17:44)

Cart #40865 | 2017-05-22 | Code ▽ | License: CC4-BY-NC-SA

 t=0w=128::_::x=0::n:: ?t,rnd(w),rnd(w),(t+1)*5%4 x+=1 if(x
P#40866 2017-05-22 13:54 ( Edited 2017-05-22 17:54)
:: irdumb
3

embedded tag :P

Cart #40912 | 2017-05-24 | Code ▽ | License: CC4-BY-NC-SA
3

 cls()m='#pico8'x=0::a::n=0y=x x=rnd(128)for i=-4,4 do if(pget(x-1+i%3,y+i/3)>0)n+=1 end ?m,52,63,1 ?m,52,62,n*2 if(n>5)n=0 pset(x,y,n)goto a
P#40913 2017-05-24 00:55 ( Edited 2017-05-24 05:32)
3

Cart #41012 | 2017-05-26 | Code ▽ | No License
3

 t=127l=t while l do cls()for x=0,l do for y=0,l do if((x%9+y%9==0))line(x,y,x+cos(sin(t*y))*9,y+cos(sin(x*t))*9) end end t+=1/9999 flip()endw
P#41013 2017-05-26 17:12 ( Edited 2017-05-26 21:12)
3

Cart #41085 | 2017-05-28 | Code ▽ | License: CC4-BY-NC-SA
3

 q,t=128,0::z::for x=t%2,q,2 do for y=t/2%2,q,2 do pset(x,y,max(0,pget(x,y)-1))end end circfill(cos(t%q)*q+64,sin(t/q)*q,42,15)t+=1.01 goto z
P#41087 2017-05-28 13:36 ( Edited 2017-05-28 17:36)

Cart #41104 | 2017-05-29 | Code ▽ | License: CC4-BY-NC-SA

 ::_::t=time()/9 r=0::y::c=0::x:: circ(c*3+rnd(3),r*3+rnd(3),1,sin(c*r*.024+t*5)+sin(t)*2+13)c+=1 if(c<44)goto x r+=1 if(r<44)goto y goto _
P#41105 2017-05-29 06:22 ( Edited 2017-05-29 10:22)
2

Cart #41186 | 2017-05-31 | Code ▽ | License: CC4-BY-NC-SA
2

 ::_::t=time()cls()x=0::d::q=x%16*8+4w=flr(x/16)*8+4s=sin(t+(q-64)/((w-64)*10))*7 circfill(q,w,s,5+s*.8)x+=1 if(x<256)goto d flip()goto _
P#41187 2017-05-31 19:10 ( Edited 2017-05-31 23:10)
3

Cart #41229 | 2017-06-02 | Code ▽ | License: CC4-BY-NC-SA
3

 t=0::_::cls()t+=.05 y=0::l::o=64+sin(t/7+y/256)*10+cos(y/99+t)*12 line(o-1,y-11,o-1,y,2)line(o,y-11,o,y,8)y+=1 if(y<140)goto l flip()goto _
P#41230 2017-06-02 03:40 ( Edited 2017-06-02 07:40)
3

This tweetjam turns Pico-8 screen into a 64 bits number, incrementing 55,000 times / second. Which is rather quick, right? Not if you're the leftmost bit: you won't be set to 1 before 5,317,658 years. That is, 2^63/55000/3600/24/365. Quite a bit. And all bars will be light blue in no more that twice that duration.

Cart #41239 | 2017-06-02 | Code ▽ | License: CC4-BY-NC-SA
3

P#41243 2017-06-02 12:15 ( Edited 2017-06-02 16:15)
1

Side effect: stare at the center then pause the animation, it now comes to get you.

Cart #41883 | 2017-06-23 | Code ▽ | License: CC4-BY-NC-SA
1

P#41884 2017-06-23 09:29 ( Edited 2017-06-23 13:29)
:: irdumb

Cart #42001 | 2017-06-29 | Code ▽ | License: CC4-BY-NC-SA

messing with band + reflecting

 z=65t=0poke(0x5f2c,7)cls()s=sin::a::f=s(t)*z t+=.0003 for x=0,z,5 do for y=0,z,5 do circ(x,y,s(f/z)*6,band(s(f/y)*x,s(f/x)*y))end end goto a
P#42002 2017-06-29 06:54 ( Edited 2017-06-29 10:54)
:: irdumb

Cart #42115 | 2017-07-01 | Code ▽ | License: CC4-BY-NC-SA

some more patterns settling

 t=64poke(24364,7)s=sin::a::f=t*s(t) t+=.002 for i=0,t*t,5 do y=i/t--#pico8 x=i%t--#guam circ(x,y,s(f/t)*6,band(s(f/y)*x,s(f/x)*y))end goto a
P#42116 2017-07-01 08:44 ( Edited 2017-07-01 12:44)

Cart #42139 | 2017-07-02 | Code ▽ | License: CC4-BY-NC-SA

 cls()r=rnd::a::s="\x89" for b=0,999 do ?s,0,1,8+r(3) x=r(24)y=r(6)c=pget(x%6,y) ?s,0,1,0 circ(x*7-2,y*20-sin(c/5)*15,r(2),c)end;flip()goto a
P#42140 2017-07-02 08:33 ( Edited 2017-07-02 12:33)
7

Cart #42177 | 2017-07-04 | Code ▽ | License: CC4-BY-NC-SA
7

 memcpy(0,24576,8192)t=0.7::_::cls()t+=.01;s=sin(t)for i=0,abs(cos(t)*5) do sspr(0,0,36,10,60-s*60+5+i,41+cos(t)*8,120*s,30)end flip()goto _
P#42178 2017-07-04 09:03 ( Edited 2017-07-04 13:03)
:: irdumb

Cart #43202 | 2017-08-13 | Code ▽ | License: CC4-BY-NC-SA

can anyone guess what's on the screen?

 z=64y=sin::_::cls()t=time()/3k=4+y(t)for s=0,k do a=(t+s+k*2)%4o=z*y(a/4) if(a>2)sspr(s*8,0,8,8,z+(y((a-1)/4)*z+o)/2,z,-o,z)end flip()goto _
P#43203 2017-08-13 00:59 ( Edited 2017-08-13 04:59)
:: Jusiv

@irdumb I'm almost positive that's "The Slow and the Curious"

Also hey I finally started making some tweetcarts, too:
Vortex Clock

Cart #43207 | 2017-08-13 | Code ▽ | License: CC4-BY-NC-SA

 cls() a=0 r=0 function _draw() for i=0,150 do r+=1 if r>150 then r*=-1 end a=(a+5)%360 pset(63+r*cos(a/360), 63+r*sin(a/360),r%16) end end

(I also found an easy way to get 180 patterns out of this by changing one value, so I made a little visual toy for doing that: Patterns)

Scrolling Ordered Chaos

Cart #43208 | 2017-08-13 | Code ▽ | License: CC4-BY-NC-SA

 p=0 o=1 function _draw() for p=0,127 do for i=0,128 do pset(p,i-o%2,(p+i*o)/16) o+=1 pset(p,i-o%2,(p+i*o)/16) end end o+=1 end --wtf is this

I made this effect almost completely by accident.

P#43210 2017-08-13 10:50 ( Edited 2017-08-13 14:50)

Falling brick

 y=0 x=rnd(120) function _update() y=y+rnd(10) if y>128 then y=0 x=rnd(120) end end function _draw() cls() rectfill(x,y,x+7,y+7,7) end

how do I make you able to play the code?

P#43215 2017-08-13 14:53 ( Edited 2017-08-13 18:53)
1

Cart #43231 | 2017-08-13 | Code ▽ | No License
1

Mouse controlled!

 poke(24365,1)h,v,a,b=0,0,2,2::g::x=stat(32)cls(1)h=(h+a)%128 v=(v+b)%128rect(x,59,x+8,60) if(pget(h,v)!=1)b=-b a=h-x-4 pset(h,v)flip()goto g
P#43232 2017-08-13 18:18 ( Edited 2017-08-13 22:18)
:: irdumb

Yup! That is most definitely The Slow and the Curious @Jusiv !

P#44144 2017-09-13 01:55 ( Edited 2017-09-13 05:55)
1

Cart #44373 | 2017-09-19 | Code ▽ | License: CC4-BY-NC-SA
1

 t=0::l::for i=0,99 do x,y=rnd(128),rnd(128) circ(x,y,1,7+(x/30+y/30+cos(t/4))%8)end t+=0.01 flip()goto l

49 chars

P#44374 2017-09-19 15:09 ( Edited 2017-09-19 19:09)
:: Felice

I love how incredibly useful that one-pixel-radius circle is on Pico-8. :)

P#44376 2017-09-19 18:31 ( Edited 2017-09-19 22:31)

New 140 character tweetcart

Cart #46785 | 2017-11-28 | Code ▽ | License: CC4-BY-NC-SA

Implementation of the [url=http://fabiensanglard.net/fizzlefade/index.php] linear-feedback shift register
fade[/url] used for the Wolfenstein 3D death animation. Colours each pixel on the screen red in a chaotic fashion (other than 0,0 which has to be set outside the main loop) without repetition until the cycle starts from the beginning again. And unlike the Wolfenstein 3D version there's no wasted iterations where you have to skip drawing.

A less terse version of the code:

 pset(0,0,8) repeat b=band(v,1) v=flr(shr(v,1)) if b!=0 then v=bxor(v, 0x3802) end i+=1 if i%128==0 then flip() end pset(shr(band(v,0x3f80),7),band(v,0x7f),8) until(v==1)

Could be useful for anyone who wants to implement this kind of fade effect or anything else where you want to chaotically loop over a range of values without repetition or wasting CPU cycles by calling rnd() repeatedly and checking if you've previously gotten the same result.

P#46787 2017-11-28 12:05 ( Edited 2017-11-28 17:06)
1

Cart #47745 | 2017-12-29 | Code ▽ | License: CC4-BY-NC-SA
1

 c=cos;s=sin;t=5::_::t+=.01for i=0,990 do;x=rnd(127)y=rnd(127)p=x;o=y;w=80+10*s(t);x+=s(o/w+t)*9y+=c(p/w-t)*9q=60+30*c(t/2)v=mid(8,11.3+(s(x/q+t-x/q/2)*.7+s(t/4)*.3+c(y/q-t-y/q/2)*.7+c(t/4)*.3)*1.7,14)fillp()circ(p,o,2,v)fillp(23130.5)circ(p,o,2,v+.5)end;flip()goto _
P#47746 2017-12-29 08:38 ( Edited 2017-12-29 13:38)
:: seleb

new year, new collection of all my tweetjam carts: https://seansleblanc.itch.io/tweetcarts-2017

P#47791 2018-01-01 07:54 ( Edited 2018-01-01 12:54)
:: elneil

Cart #47792 | 2018-01-01 | Code ▽ | No License

 e={}x=8u=0::_:: if(u>0)u-=2 if(btnp(5)and u<1)u=8 cls()for i=#e,1,-1 do e[i]-=1pset(e[i],8) if(e[i]<1)del(e,0)x+=1end if(rnd(25)<1)add(e,128) ?x-8 if(pget(x,8-u)<1)pset(x,8-u)flip()goto _

187 chars, but need to reset cart when you die.

P#47793 2018-01-01 08:23 ( Edited 2018-01-01 13:23)
2

Cart #48828 | 2018-02-01 | Code ▽ | License: CC4-BY-NC-SA
2

 n=128;r=rnd;c=circ::_::a=0::y::c(64,64,55+a/7,7)a+=1;c(74+a*.9,38+a*2,9-a/5)c(35+a*1.5,35,3.5)c(69-a,41+a*1.5,5.5-a/13)c(33+a/2,39,7)c(59,63,a/5)c(61,58,2) if(a<26)goto y memcpy(0,n*192,n*64)p=0::m::x=r(n)y=r(n)j=sget(x,y) if(r(j)<3)c(x,y,1,j) p+=1if(p
P#48829 2018-02-01 08:50 ( Edited 2018-02-01 13:50)
3

Cart #50810 | 2018-03-25 | Code ▽ | No License
3

 t,f,s,j=0,0,1/10,1/10 ::_:: cls() t+=.007 f+=1 for a=0,s,j do x,y=0,0 for r=0,10+50*min(t,1),.5 do b=a+r/900 p,g,h=sin(r/(360*j*1.5)+t),64+r*cos(b-t)+r/3*sin(p),64+r*sin(b-t/2)+r/3*cos(p) if(r!=0)rect(g,h,x,y,a*15) x,y=g,h end end if (f%10==0)s=min(s+j,1) flip() goto _
P#50811 2018-03-25 16:40 ( Edited 2018-03-25 20:40)
3

Cart #53545 | 2018-06-14 | Code ▽ | License: CC4-BY-NC-SA
3

 t,q,c=0,sin,circfill::_::t+=.01cls(1)for i=0,128 do s=cos(t+i/25)y=i*2-(t%1*100) a=64+47*q(t+i/25)b=10+i/8.3%3 if(s<=0)fillp(23130.5) c(a,y,3.75+s,b)fillp()end for j=-10,2800 do k=59+j%10+q(-t*1+j/3)*39l=j/10+flr(t*50)%2 c(k,l,0,pget(k,l)+12)end flip()goto _
P#53546 2018-06-14 05:53 ( Edited 2018-06-14 09:53)
2

Cart #53559 | 2018-06-14 | Code ▽ | License: CC4-BY-NC-SA
2

 ::_::r,s,p,t=rnd,sin,srand,time()/60p(t)for i=0,1999 do x=r(128)y=r(128+r())s(x)c=pget(x,y)circ(x-1+r(2),y-3,1,(c+r())%4+8) if(c==0)pset(x,y,r(3))end for i=0,20 do p(i)x=49+r(30)y=49+r(30)x=x+20*s(x*t)y=y+20*s(y*t)circfill(x,y,r(12)+s(t*60)*3,0)end flip()goto _
P#53560 2018-06-14 13:47 ( Edited 2018-06-14 17:47)
2

Cart #53666 | 2018-06-20 | Code ▽ | License: CC4-BY-NC-SA
2

 l,f,t,w,p=line,fillp,0,23130.5,sin::_::t+=.0151cls(1)y=0::m::c=62+p(y/50-t)*((y/3+9))+p(-y/30-t)*9 x=0 for x=0,5,.5 do s=9+((y-t*49.5)/3)%4.5+2+2*p(x/(5+y)) if(flr(s)%3==0)f(w) l(c+x,y,c+x,127,s)f()end f(w)l(c,y,c+5,y,13)f()y+=1-y/300 if(y<128)goto m flip()goto _
P#53667 2018-06-20 15:34 ( Edited 2018-06-20 19:34)

Cart #53954 | 2018-07-05 | Code ▽ | License: CC4-BY-NC-SA

 pal(7,1)n,q,r=127,64,rnd::_::for i=0,1390 do x,y=r(n),r(n)a,s=q-x,q-y l=(max(abs(a),abs(s))/5000)*sin(time()/10)z,u=cos(l),sin(l)w,d=z*a-u*s,u*a+z*s circ(q+w*1.07,q+d*1.07,1,max(7,pget(q+a,q+s)-flr(r(2))))end for i=0,3 do circfill(r(n),r(n),r(3),15)end goto _
P#53955 2018-07-05 10:59 ( Edited 2018-07-05 14:59)

Cart #53960 | 2018-07-06 | Code ▽ | License: CC4-BY-NC-SA

 o,s,j=19,sin,{2,4,9,10,7}cls()::_::t=time()for i=0,512 do x,y=i%o,flr(i/o)v,b=9+s(t/10)*6-x,13-cos(t/10)*6-y a,l=atan2(v,b),sqrt(v*v+b*b)c=j[flr((s(a*s(t/20)*10+l/15+t)/5+s((v*b)/150+t)/5)*5.5+3.5)] ?"◆",x*7-4+(1-y%2)*3+rnd(2),y*5-4+rnd(2),c end goto _
P#53961 2018-07-06 04:35 ( Edited 2018-07-06 08:35)