Log In  
Follow
Yopenatal
:: Unfold ::

Cart #devils_thrill-0 | 2022-09-03 | Code ▽ | Embed ▽ | License: CC4-BY-NC-SA
5

Z or X to Shoot

Arrow keys to Move

This game was made for Pico-1k 22. The game was made in 1011 characters of code

Puny mode is required to paste this code(ctrl+p in Pico-8)

s=">L>7e¥゜$*i>.3'A>¥H¥)#[email protected]$]#SUZ7=$I7R_CKeKRiE7dUSi#@#=i79iA64"w=39t=0for i=1,62do b=ord(s,i,i)-15for q=1,b\10do sset(7-t\w,t%w,b%10)sset(8+t\w,t%w,b%10)t+=1end end
function o()p=2f=128z=300w=64e=0l=112x=56y=80u=-16i=0d=1k=0v={}n={}s=z end
c=spr
t=rnd
o()b=btn::b::flip()cls(p)circfill(w,w,s,0)for i in all(n)do circ(i.x,i.y,s,p)end circ(w,w,i,u)k=t(-1)
if(b(0)and x>0)x-=2
if(b(1)and x<l)x+=2
if(b(2)and y>0)y-=2
c(0,x,y,2,2)if s>0then
if(b(3)and y<l)y+=2
if(btnp(4))add(v,{x=x+4,y=y})
if(#n<z-s)add(n,{x=u+4,y=i,r=sin(k),t=cos(k),o=0})
for q in all(v) do
q.y-=4h=q.x
j=q.y
if(h>u-4and h<u+11and j<i+8and j>i)s-=5del(v,q)?"\ad"
c(w,h,j,1,1)if(j<0)del(v,q)
end
for q in all(n)do
q.x+=q.r
q.y+=q.t
h=q.x
j=q.y
if(h>f or h<0or j>f or j<0)del(n,q)
if(h>x+4and h<x+9and j>y+4and j<y+10)o()?"\aa"
c(w,h-4,j-4,1,1)end
s-=.1c(32,u-4,i,2,2)?"\ag000"
end
if(e>l or e<-l)e=0d=k
if(d>0)d=z/s
if(d<0)d=-z/s
u=w-sin(s/z)*w*sin(e/l)i=y+w*cos(e/l)e+=d
if(s<0)s=-1y-=2p=8?"!fin",w,u,1
if(y<0)p=14?"by alex roe",48,l,1
goto b
P#116828 2022-09-03 16:04 ( Edited 2022-09-03 20:28)

:: Unfold ::

Cart #tonic_solace-9 | 2022-11-17 | Code ▽ | Embed ▽ | License: CC4-BY-NC-SA
23

Controls

Z/C SHOOT
X/V BOMBS
ARROW keys MOVE

Weapons

-Weapon 1 is standard shot.
-Weapon 2 is flamethrower.
-Weapon 3 is homing shot.

P#107791 2022-03-01 10:16 ( Edited 2022-11-17 21:44)

:: Unfold ::

Cart #heartattack-1 | 2022-04-23 | Code ▽ | Embed ▽ | License: CC4-BY-NC-SA
4

The final update for Heart Attack.

This version includes.

-A revamped music player
-A hiscore board that saves
-Beautiful bullets to replace the laser.
-Improved enemy spawning

All of this to create an engaging challenge in exactly 560 characters of code.

cartdata("hay")function w()h=dget(0)b={}x=50l=127s=0e={}y=84k=0end
w()c=btn::b::flip()cls(k%4)k=.04+k%28?"\aa"..sub("deffdeffeddeffdeffeddcedc",k,k)
if(c(0))x-=2
if(c(1))x+=2
if(c(2))y-=2
if(c(3))y+=2
x=x%90?"pt:"..s,95,0,7
y=y%l?"hi:"..h
if(btnp(4))add(b,{x=x,y=y})
for i in all(e)do
u=i.v*k
p=i.x?"♥",p,u,8
if(#e>l)del(e,i)
if(x<p+3and p<x+3and u<y+3and y<u+3)w()?"\a"
for o in all(b)do?"a",o.x+2,o.y,12
o.y-=.1if(o.y<0)del(b,o)
if(o.x<p+9and p<o.x+9and u<o.y+9and o.y<u)s+=1del(e,i)?"★\ab",7
end
end?"☉",x,y,7
add(e,{x=rnd(90),v=k%6})if(s>h)dset(0,s)
goto b

old versions


Cart #heartattack-0 | 2022-01-11 | Code ▽ | Embed ▽ | License: CC4-BY-NC-SA
4

Another great game made in under 560 characters.

This bad boy has

-Music
-Sound effects
-Particles
-Endless gameplay

Update

-slowed down player speed for better mobile play.

Cart #heartattackyopenatal-0 | 2022-01-07 | Code ▽ | Embed ▽ | License: CC4-BY-NC-SA
4

d=0v=0m="deffdeffeddeffdeffeddceddceddeecceddceddee"function w()b={}x=64y=99s=0e={}l=136end w()c=btn::b::flip()cls()d=1+d%4if(d==3)add(e,{x=rnd(l),y=0,v=rnd(6)})v=1+v%#m?"\a"..sub(m,v,v)
if(c(0))x=-2+x%l
if(c(1))x=2+x%l
if(c(2))y=-2+y%l
if(c(3))y=2+y%l
if(btnp(4))add(b,{y=y})
for i in all(e)do
i.y+=i.v
p=i.x
k=i.y?"♥",p-8,k-8,8
if(x<p+8and p<x+4and k<y+4and y<k+8)w()?"\a"
if(k>l)del(e,i)
for o in all(b)do o.y-=1if(o.y<0)del(b,o)
if(x<p+6and p<x+6and k<o.y+8and o.y<k)s+=1del(e,i)?"★\aaa",7
?".",x-6,o.y-9
end
end?"☉",x-8,y-7,7
?"score:"..s,0,0
goto b

P#104458 2022-01-07 12:40 ( Edited 2022-04-23 15:15)

:: Unfold ::

Cart #zudonfah-0 | 2021-12-05 | Code ▽ | Embed ▽ | License: CC4-BY-NC-SA
2

A simple ball bouncing game made in under 560 characters.

Update 1.1

-Increased ball speed
-Fixed ball speed bug that made the ball faster than the paddle
-Graphical and sound changes
-Still under 560(555 according to Pico-8)

cartdata("paddle")p=dget(0,p)d=1c=btn
function v()r=rnd(-1)e=0w=64x=32y=0a=w
f=1g=1l=128s=w
if(r<0)d=-1
end
v()::b::flip()cls(1)for i=0,l do circ(8*i%l+sin(x/256)*i/2,8*i%l,(r*i)%l,5)end
if(c(0)and x>0)x-=2*g
if(c(1)and x<l-w)x+=2*g
a+=d*g
s+=f*g
if(a+4>l or a-4<0)d=-d ?"\ab"
if(s+4>l)f=-f ?"\ac"
if(s<0)v()
if(a+4>x and a-4<x+w and y+12>s and y<s)s=y+12f=-f e+=1y+=1w-=.5g+=.1 ?"\ad"
if(y>l)y=0g=1p+=l
if(g>5)g=5
if(w<32)w=32
if(e>p)p=e dset(0,p)
rectfill(x,y,w+x,8+y,9)circfill(a,s,4)
?e,x+w/2,y+2,5
?"hiscore "..p,0,l-16,9
?"by yopenatal",0,l-6
goto b

old version


Cart #fukobegeya-0 | 2021-11-18 | Code ▽ | Embed ▽ | License: CC4-BY-NC-SA
2

cartdata("paddle")c=btn
p=dget(0,p)o=rectfill
function v()r=rnd(-1)e=0w=64x=32y=0a=w
d=1g=1f=1l=128s=w end v()::b::flip()cls(1)
if(c(0)and x>0)x-=2*g
if(c(1)and x<l-w)x+=2*g
for i=0,l do circ(8*i%l,8*i%l,r*i%l,5)end a+=d*g s+=f*g
if(a>l or a<0)d=-d*g ?"\ab"
if(s>l)f=-f*g ?"\ab"
if(s<0)v()
if(a>x and a<x+w and y+9>s and y<s)s=y+9 f=-f*g e+=1y+=1w-=.5 g+=.001 ?"\ab"
if(g>5)g=5
if(w<32)w=32
if(e>p)p=e dset(0,p)
o(x,y,w+x,8+y,9)o(a-4,s-4,a+4,s+4,9)
?e,x+w/2,y+2,5
?"hiscore "..p,0,l-16,9
?"by yopenatal",0,l-6
goto b

P#100379 2021-11-18 23:17 ( Edited 2021-12-05 17:44)

:: Unfold ::

Cart #pigeo1k-1 | 2022-05-07 | Code ▽ | Embed ▽ | License: CC4-BY-NC-SA
9

Pigeo is starving, help Pigeo feed by collecting flying berries.

This enhanced remake includes

-Sprites with animation
-Sound effects
-Music
-berry ai
-Terminal velocity

All of this was made with 1023 characters of code.

This wouldn't have been possible without @cheepicus's Chr Editor(https://www.lexaloffle.com/bbs/?tid=45943) and @Liquidream's Boulder Dash TTJ walkthrough(https://www.patreon.com/posts/59514050)

Update

-Fixed an exploit
-Fixed Background to save characters
-Pigeo and the flying berry get faster with every point earned.
-Fixed cart label

k="pige0"cartdata(k)g=136function d()b=0a=0r=0s=0h=dget(0)x=72n=0m=0f=0v=1t={}l=0o=40w=0y=x u=x end
function p(a,b,c)?a,b+1,c,7
q=sspr?a,b,c,1
end cls()p(k.." ⁶:0e0b0efe76743010 ⁶:002e6b6ebe5e3c18 ⁶:81c3c3183c3c1800 ⁶:0000dbbdbd180000",0,0)pset(8,0,1)memcpy(0,6^13,g*g)d()c=btn::b::flip()cls(9)for j=0,255 do
circ((j%16)*8+4,(j\16)*8+4,b,14)end
if(c(2)and m>-9)m-=a*2f=(f+1)%2r=1w=1+w%2
if(r==0)q(0,0,o,5,9,32,g,20)p("up to start",42,80)p("by yopenatal",41,118)b=l%g
if r==1 then
a=s/g+.1b=s
for q in all(t)do
if(x<q.x+5and q.x<x+9and q.y<y+9and y<q.y+5)d()?"\aggg"
p("⁶:63772a1c2a776300",q.x-5,q.y-5)end
if(x<u+7 and x+8>u and y<o+8 and y+8>o)s+=1add(t,{x=(x\8)*8,y=((y\8)*8-64)%g})u=rnd(g)o=u*3?"\addff"
x=n+x%g y=m+y%g
if(c(0)and-9<n)v=1n-=a
if(c(1)and n<9)v=-1n+=a
q(24+12*(w-1),0,9,9,x-4*v,y-3,9*v,9)q(48+12*flr(o%2),0,9,9,u-7,o-7)if(m<9)m+=a
u=sin(l/g)*.9-v*a+u%g
o=cos(l/g)*.2-a+o%g
if(s>h)dset(0,s)h=s?"\afafafaf"
end
p("sc0re:"..s,1,10)p("hisc0re:"..h,1,1)l=1+l%g?"\a1"..sub("cdfecffecdfecdde",l/8,l/8).."1"
goto b

past versions


Cart #pigeo-0 | 2021-09-19 | Code ▽ | Embed ▽ | License: CC4-BY-NC-SA
9

My project for the Pico-1k jam.

Collect the green ball and avoid the red balls

--pigeo by yopenatal
cartdata("pigeo")function py(a,b,c)p(a,b+1,c,7)p(a,b,c,1)end
c=btn
r=rnd
p=print
s=circfill
x=68ll=0y=68t=0wa=0ma=0e=8+r(120)d=8+r(120)n=.1g={}z=0a=dget(0,a)st=0ti="pigeo"ef=0cx=ef
::b::flip()w=cos(ef/36)
if(ll>0)cls(7)ll-=1
if ll<=0then
ll=0cls(9)for kx=1,16 do for y=1,16do circ(kx*8-4,y*8-4,cx%36,14)end end if st==0then ef=(ef+1)%36cx=ef/2for i=1,3 do p(ti,53,48+w*5+w*i,7)end p(ti,53,48+w*5,1)py("made by yopenatal",32,118)py("press z to start",32,80)
if(btnp(4))st=1 g={}
end end
if st==1then
cx=z
x=(x+wa)%136y=(y+ma)%136ma+=n if(c(0))wa-=n
if(c(1))wa+=n
if(c(2))ma-=n*2t=(t+1)%2
if(c(3))ma+=n
if(x<e+9)and(x+9>e)and(y<d+9)and(y+9>d)then u={x=-flr(e/8)*8+128,y=-flr(d/8)*8+128}add(g,u)z+=1e=8+r(120)d=8+r(120) end
if(z>=a)a=z dset(0,a)
for o in all(g)do if(x<o.x+8)and(x+8>o.x)and(y<o.y+8)and(y+8>o.y)then x=68z=0y=68wa=0ma=0ll=15st=0end end for o in all(g)do circ(o.x-8,o.y-8,4,8)end s(x-8,y-8,4,13)s(e-8,d-8,4,11)end
py("score : "..z,1,10)py("hiscore : "..a,1,1)goto b

P#97554 2021-09-19 18:57 ( Edited 2022-05-07 19:44)

Follow Lexaloffle:          
Generated 2022-12-10 02:56:33 | 0.082s | Q:35