Rocket 1K
ROCKET 1K
Remember those Rocket Games you might have played on your phone - or kerbal space program? Get ready to try to get as high as possible in this highly accurate fun Rocket Simulator!
How To Play
Construct your rocket, spent your money wisely and try to go as high as possible.
Buy with X(x on keyboard) and choose parts with the Arrow keys.
Accelerate with X(x on keyboard) and seperate the three stages of your rocket with O(C on keyboard).
Why?
It was created for PICO-1K 2024, the code is exactly 1000 compressed bytes, have a look right here.
โ=128a=โ o=rectfill ๐ต=0d=0๐ฐ=circfill ๐ข={.003,.2,1.1}๐ด=0t=2๐ฎ={{.004,.005,.006},{.6,.5,.4},{1.3,1.2,1.1}}c={"n๐ฐ๐ป๐ป๐ญ๐ฆ","f๐ถ๐ฆ๐ญ๐ต๐ข๐ฏ๐ฌ","b๐ฐ๐ฅ๐บ","c๐ฉ๐ฆ๐ข๐ฑ ","s๐ต๐ข๐ฏ๐ฅ๐ข๐ณ๐ฅ ","p๐ณ๐ฆ๐ฎ๐ช๐ถ๐ฎ "}f=1e=700i=1s={}n=rnd function _draw()cls(0)๐ฉ(๐ต)o(63,87,65,87+t*6,7)pset(64,86)o(1,โ-a,0,โ)pset(โ-1,โ-๐ต/3000*โ)pset(0,64,2)if(๐ต<999)๐ณ(n(128),0,n(.5)-.25,.2+n(.5),1,13) if f>4do ๐ฆ("g๐ข๐ฎ๐ฆ o๐ท๐ฆ๐ณ",50)๐ฆ("t๐ฉ๐ฆ h๐ช๐จ๐ฉ๐ฆ๐ด๐ต p๐ฐ๐ช๐ฏ๐ต ๐ธ๐ข๐ด",60)๐ฆ("p๐ณ๐ฆ๐ด๐ด ๐ พ๏ธ ๐ต๐ฐ ๐ต๐ณ๐บ ๐ข๐จ๐ข๐ช๐ฏ",120)๐ฆ(flr(๐ด/10).."๐ฌ๐ฎ!",66)if(btnp(๐ พ๏ธ))f=1๐ต=0e=700t=2d=0a=โ elseif f>3and f<5do if(btnp(โ)and a>0)d+=๐ข[1]a-=๐ข[2] if(btnp(๐ พ๏ธ)and t>0and ๐ต>1)t-=1a=min(t*54+10,a)๐ข[3]-=.15๐ข[1]*=1.3 if(๐ต+d>0)๐ต+=d d-=.0005*๐ข[3]if(btn(โ)and a>0)๐ณ(62+n(4),90+t*6,n(.5)-.25,d*(4+n(1)),n(4),n{13,5,6,9,10}) ๐ฆ("s๐ฑ๐ฅ:"..flr(d*โ).."|h๐ฆ๐ช๐จ๐ฉ๐ต:"..flr(๐ต/10).."๐ฌ๐ฎ|b๐ฆ๐ด๐ต:"..flr(๐ด/10).."๐ฌ๐ฎ",122)๐ฆ("โa๐ค๐ค๐ฆ๐ญ๐ฆ๐ณ๐ข๐ต๐ฆ ๐ พ๏ธs๐ฆ๐ฑ๐ฆ๐ณ๐ข๐ต๐ฆ s๐ต๐ข๐จ๐ฆ๐ด",2)if(๐ต>๐ด)๐ด=๐ต if(๐ต>999and n(1)<.1)๐ณ(n(128),-2,0,0,1,9+n(2)) if(๐ต>5and ๐ต<800and n(1)<.05)๐ณ(n(โ),-50,0,0,20+rnd(30),6)๐ณ(n(โ),-50,0,0,20+rnd(30),6) if(d<-.005)f=5 elseif f<4do ๐ฆ("c๐ฉ๐ฐ๐ฐ๐ด๐ฆ y๐ฐ๐ถ๐ณ "..c[f],40,7)if(e>=i*100or sin(time())>0)๐ฆ(e.."$",46)๐ฆ("โ"..c[i+3]..c[f],52)๐ฆ("โฌ ๏ธ"..i.."00$โก๏ธ",59) if(btnp(โ)and e>=i*100)e-=i*100๐ข[f]=๐ฎ[f][i]f+=1 if(btnp(โก๏ธ)and i<3)i+=1 if(btnp(โฌ ๏ธ)and i>1)i-=1 end end function ๐ฉ(f)o(0,55537+f*10,โ,โ,1)o(0,20+f*10,โ,โ,3)fillp(โ)o(0,54537+f*10,โ,55537+f*10,1)๐ฐ(64,99+f*10,30,11)๐ฐ(80,36536+f*10,50,15)fillp()๐ฐ(64,99+f*10,10,13)for n in all(s)do ๐ฐ(n[1],n[2]+f*10,n[5],n[6])n[1]+=n[3]n[2]+=n[4]n[5]*=.999if(n[2]>168)del(s,n) end end function ๐ณ(n,f,i,๐ฆ,d,a)add(s,{n,f-๐ต*10,i,๐ฆ,d,a})end function ๐ฆ(n,f)?n,64-print(n,0,โ)/2,f,7 end
Status | Released |
Platforms | HTML5 |
Rating | Rated 5.0 out of 5 stars (1 total ratings) |
Author | taxicomics |
Genre | Simulation |
Made with | PICO-8 |
Tags | Flying, Game Jam, PICO-8, rocket |
Comments
Log in with itch.io to leave a comment.
Wonderful sense of depth, height and speed.