q >?   홺         ݞ ݭ  ܠ    퐩  骪 ꠪ ݮ ݮ ݞ  ݮݞ ܐݮ       ݝ        ݺ ݺ ݺ      ޭ ݭ ݪ ݭݮ ݭ  ݮ ݮ  ݙݮݮ ݞݮ ݮ ݪ ݞ̝  ݙ  ޝ    ޝ ݙ ݮ              ੪ݭ ޝ퐪퐪 ܙ ݝ ݮ   ݮ   ݞ ݞ     ݞ ݮ ݩ ݮ  પݮ   ݞ  ݞ ݮ      홙    -- title: skull generator - 6 -- author: potato imaginator -- desc: Press Left / Right to change speed . Press 'Z' to reset -- script: lua cls() spr(2,68,18,0,3,0,0,2,2) spr(2,180-56,18,0,3,1,0,2,2) spr(2,68,68,0,3,2,0,2,2) spr(2,180-56,68,0,3,3,0,2,2) spr(0,120-32,68-32,0,4,0,0,2,2) color={} for i=9,11 do color[i]=i-1 end for i=12,15 do color[i]=i+1 end a={} for i=-80,240+80 do a[i]={} for j=-80,136+80 do a[i][j]=pix(i,j) end end spd=10 c={} for i=1,80 do c[i]={} cls(12) circ(120,68,i,5) -- Green ( 5 ) for j=-i,i do c[i][j]={} for k=-i,i do c[i][j][k]=pix(120+j,68+k) end end end function check(_x,_y,num) for i=-num,num do for j=-num,num do if c[num][i][j]==5 and pix(_x+i,_y+j)==0 then if a[_x+i][_y+j]==a[_x][_y] then else return false end elseif c[num][i][j]==5 and pix(_x+i,_y+j)~=0 then return false end end end return true end cls() function OVR() for i=-1,1 do for j=-1,1 do print('SPD : '..spd,10+i,10+j,7) end end print('SPD : '..spd,10,10,5) end function TIC() for i=1,spd do x=math.random(0,239) y=math.random(0,135) if check(x,y,1) then col=a[x][y] if col==0 then col=math.random(10,11) end r=2 repeat r=r+1 until check(x,y,r)==false circ(x,y,r-1,col) circb(x,y,r-1,color[col]) end end if btn(2) then spd=math.max(1,spd-1) cls() elseif btn(3) then spd=spd+1 cls() end if btnp(4) then cls() end end