Apple Drop (ATACOMANS)

Это связано с тем, что я хотел сделать игру из 100 строк кода или меньше на Pico-8. Было весело, хотя и немного утомительно, в основном ближе к концу проекта. Аудио и спрайты были разрешены для моих самоназначенных правил, а прямые загрузки находятся внизу страницы под исходным кодом.

Изначально это было связано с Pico-1k Challenge, но я решил, что мне это не совсем нравится, поэтому пошел своим путем и просто сделал это в «Меньше ста строк кода» (Код иногда накладывается сам на себя, так что я даже не подхожу для этого, лол)

Да, некоторые части этого были сложены (например, в функции рисования), и я не хотел их складывать, но мне не хватило опции. В любом случае, надеюсь, вам понравится!

Исходный код: --яблочный улов, от атакоманов. функция _инит() pt={px=60,py=104,ps=0,pw=8,ph=6,pl=3} -- таблица игроков at={aptime=30} ht={hotime=60} конец функция appledrop() -- сбрасывает яблоки добавить (at, {x = rnd (120), y = 8, s = 1,5, w = 6, h = 6, xs, ys, xd, yd, жизнь = 120, объявление = функция (я) spr (1, self.x, self.y) конец, uad=функция(я) self.y+=self.s -- это приведенный ниже код совпадения. если xd меньше xs (то же самое с yd и yx), то они считаются сталкивающимися self.xs=pt.pw*0,5+self.w*0,5 self.ys=pt.ph*0,5+self.h*0,5 self.xd=abs((pt.px+(pt.pw/2))-(self.x+(self.w/2))) self.yd=abs((pt.py+(pt.ph/2))-(self.y+(self.h/2))) если self.xd120, то pt.px-=2 конец если pt.px<0, то pt.px+=2 конец at.aptime-=1 -- это значение уменьшается до тех пор, пока не достигнет нуля, появится новое яблоко, сброс таймера если at.aptime<1, то яблочная капля() в.aptime=60 конец для всего (в) делать а:уад() конец ht.hotime-=1 -- бросает на игрока опасные вещи если ht.hotime<1, то враждебная капля() ht.hotime=60 конец для h во всех (ht) делать ч: ухд () конец если pt.pl<1, то print("игра окончена ;(",40,60,8) остановка() конец конец функция _draw() cls() карта() строка (0,8,127,8,5) print("счет игроков:",1,1,10) print(pt.ps,49,1,10) print("номер клюшки",60,1,8) spr(2,pt.px,pt.py) --player если pt.pl>2, то пр(7,99,0) конец если pt.pl>1, то пр(7,108,0) конец если pt.pl>0 then пр(7,117,0) конец для всего (в) делать а: объявление() конец для h во всех (ht) делать ч:хд() конец конец