Ghostblasters

Снова время года! Уничтожайте призраков, пока они не сбегут с кладбища и не станут преследовать всех!

Управление:
Прицеливание — Мышь
Стрелять — Кнопка мыши

тыкать(0x5f2d,1)b={}d={}e={}l={}k=0t=171w=24h=16p=3c=6x=0y=0m=0a=0g=0z=10q=128o= раскол ("600606060660666066666666", "") приятель (разделить ("10,7,6,8,5,1",",")) f=статистика с=спр а = добавить г = рнд для i = 0, (w * h-1) сделать v=ord("ky####く#wy%#レ(ホ#より%シ𝘧◆ヲ𝘥wy%レシ◆ッ𝘧wy%𝘧チ#レ#wk%(チ#レ#/#セ(チ#レ###シ𝘢チ#レ###シ𝘢チ𝘨#)#'シ𝘢チ𝘨$*#'シ𝘢チ#𝘯$##シ𝘢チ#𝘯*?ほタ𝘢チ𝘨𝘯𝘯##シ𝘢チ𝘮𝘮$#'シ𝘢チ#𝘮##'シッッ(𝘨#",i\p+1)-35sset(i%w,i\w,v\c^(i%p)%c) конец для i=0,q сделать если (i%2<1)a(b,r(120))a(d,-i*20-q)a(e,r(q)\8*8)a(l,r(112)\ 8*8) конец функция _draw()cls()for i=32,q do line(0,i,q,i,o[(i-32)\4])end если (m>0 и j<1)j=1s(18,x,y)?"\as4i6x5c1" для i=1,q сделать с(2,е[я],л[я]) если(i<=#b)s(0,sin(d[i]/48)*6+b[i],d[i]) если(i<52или i>76)s(17,i\8*8,120) конец s(1,56,112,1,2)s(1,64,112,1,2,true)s(16,x,y)?"left:"..#b,0,0,8 ?"л.с.:"..z,0,8 если(z<1)"игра окончена",46,0 конец функция _update60() если (z<1) вернуть х,у=f(32)-1,f(33)-1m=f(34)n={} для i=1,#b сделать d[i]+=.8if d[i]>q тогда a(n,i)z-=1end if(abs(x-b[i])<3and abs(y-d[i] )<3)тогда если g>0и m>0тог=0a(n,i)end end end для i=1,#n do deli(b,n[i])deli(d,n[i])?"\as4e1e2" конец если(м<1)j=0g=1 конец