0,]']>S}Wup8d%qy)6o;]AsVl33ZR2B32#2CCR#"B3"RSS3C#BCSR"S2B"22B3R3C#"#2S" I      @  p}m]]M M<<<0@ Wj m^ O<(               q ?             ."""""""""""""" L""""""""""""""̙D""""""""""""""̙L""""""""""""""""""""""""""""̙""""""""""""""̙̙DD""""""""""""""33̙̙̜LDD,""""""""""""""""""""23̜̙̉@@,""""""""""""""""""""20̙̉̉,"D@D,""""""""""""""""""""23̙̉̉DDDD,""""""""""""""""""""233̙̉."D@D.""""""""""""""""""""03̜L@,""""""""""""""""""""2̜Ι̙DD,""""""""""""""""""""23̙Ι""" """"""//Ι33<""" """"""/"Ι<333""" """""""/Ι00<""" """"""//Ι303""" """"""""Ι3333""" """""" """303ND""" """""" """Ι<0""""""" """""""""""""Ι33""""""""" """""""""""""DD"",""""""""" """""""""""""LDD,""  """"""" """"""""""@@̙" """""""" """""""""/"DO̙""""""""""" """""""""/"ODO̙" """""""" """"""""/""O@O, """"""""""""""""""""""""/L̙""""""""""""""""""""""""""""""DD̙""""""""""""""""""""""""""""̙""""""""""""""""""""""""""""̙>3""""""""""""""""""""""""""""̙""""""""""""""""""""""""""""̙"""""""""""""""""""""""/""̙"""""""""" """"""""""""""""" """"""̙"""""""""" """""""̙"""""""""" """""/̙"""""""""" """"""""""̙"""""""""" """"""""""̙"""""""""" """"""""""̙,""" """""""""̙.""" """"""""",""" """""""""̙,""" """""""""̙DD,""" """""""""̙LDD<,""" """""""""̙@@3,""" """""""""̙D@D<""""""""""""""̙DDDD""""""""""""""̙D@D""""""""""""""L@ND""""""""""""""̙DD""""""""""""""̙""""""""""""""̙""""""""""""""̙>3̙̙̙3333333333333333̙3333333333333333̙3333333333333333""̙."3333333333333333,""̙L3333333333333333  ̙>3D3333333333333333" "̙L3333333333333333""""̙3333333333333333" "333333333333333333333333, ̙333333333333333333333333""̙333333333333333333333333̙333333333333333333333333̙333333333333333333333333Ι333333333333333333333333Ι333333333333333333333333Ι3333333333333333333333333333333333333333Ι3333333333333333Ι̙3333333333333333""̙Ι̜3333333333333333,""̜Ι̉3333333333333333  ̉Ι̉3333333333333333" "̉Ι̉3333333333333333""""̉Ι3333333333333333" "̜333333333333333333333333, ̜̙̙333333333333333333333333""̙̙333333333333333333333333̙̙333333333333333333333333̜̙333333333333333333333333̙̉333333333333333333333333̙̉333333333333333333333333̙̉DDDDDDDD333333333333333333333333DDDDDDDD33333333333333333333333333333333̜̙DDDDDDDD33333333333333333333333333333333̙̙DDDDDDDD33333333333333333333333333333333DD̙3DDDDDDDDDDDD33333333333333333333333333333333."LDD̙3DDDDDDDDDDDD33333333333333333333333333333333L@@30DDDDDDDDDDDD,"33333333333333333333333333333333DD@D<30DDDDDDDDDDDD33333333333333333333333333333333LDDDDDDDDDDDD33333333333333333333333333333333D@DDDDDDDDD333333333333333333333333L@NDDDDDDDDD333333333333333333333333DDDDDDDDDD33333333333333333333333333̙DDDDDDDDDDDD333333333333333333333333<33̜DDDDDDDDDDDD33333333333333333333333300̉>3DDDDDDDDDDDD333333333333333333333333303̉DDDDDDDDDDDD3333333333333333333333333333̉DDDDDDDDDDDDDDDD333333333333333333333333303DDDDDDDDDDDDDDDD, 3333333333333333<0̜DDDDDDDDDDDDDDDD"333333333333333333̙DDDDDDDDDDDDDDDD3333333333333333""DDDDDDDDDDDD3333333333333333,""DDDDDDDDDDDD3333333333333333  DDDDDDDDDDDD3333333333333333" "DDDDDDDDDDDD3333333333333333""""DDDDDDDD3333333333333333" "DDDDDDDD3333333333333333, DDDDDDDD3333333333333333""DDDDDDDD3333333333333333"DDDDDD"D3333333333333333,"."""BD""$""."3333333333333333"".".B"$"DD"D"3333333333333333""","D$"DD"D"3333333333333333"".",""""."."3333333333333333 -- title: Virus -- author: OdiStudio Games -- desc: Destroys all virus! -- script: lua t=0 x=86 y=24 p=0 -- score score={ sc=0; hingh=10000; } -- player player={} live=3 imu=100 nm=0 ccc=0 -- hit mouse hot="" hotTime=100 hotPrint=0 hit=150 nhit=0 clhit=1 function addPlayer(x,y) p={} p.x=x p.y=y p.c=8 p.r=4 p.v=1 p.t=0 table.insert(player,p) end function ticPlayer() ticPp() ticPpc() for k,p in pairs(player) do p.t=p.t+1 circ(p.x,p.y,p.r,p.c) circb(p.x,p.y,p.r,p.c+1) spr(34,158,125,12) print("x",167,127,0) print(""..#jo,175,127,0) print("/20",185,127,0) -- move player if nm>7 then nm=7 end ccc=math.random(8,9) if nm>5 then addPp(p.x,p.y,ccc) addPp(p.x,p.y,ccc) print("Hot Chase!!!",167,119,p.t) end if nhit==0 then nm=0 end if btn(0) and p.y>5 then p.y=p.y-p.v-nm end if btn(1) and p.y<130 then p.y=p.y+p.v+nm end if btn(2) and p.x>5 then p.x=p.x-p.v-nm end if btn(3) and p.x<235 then p.x=p.x+p.v+nm end -- hit if nhit>=1 then hit=hit-clhit end if nhit>=3 and hit<=0 then sfx(4,"E-4") score.sc=score.sc+nhit*10 hit=150 nhit=0 hotPrint=1 elseif hit==0 then score.sc=score.sc+nhit*10 hit=150 nhit=0 hotPrint=1 end if hotPrint==1 then hotTime=hotTime-clhit end if hotTime==0 then hot="" hotPrint=0 hotTime=100 end -- print hit if nhit>=3 and nhit<=5 then hot="Good" end if nhit>=6 and nhit<=10 then hot="Amazing" end if nhit>=11 and nhit<=15 then hot="Beautiful" end if nhit>=16 then hot="Divine" end if nhit>1 then print("Hit "..nhit,5,30,0) -- barre hit rect(5,40,150//10,5,0) rect(5,40,hit//10,5,4) rectb(5,40,150//10,5,1) end if hotPrint==1 then print(""..hot,5,40,p.t,0,2) end -- destroy player for v,j in pairs(jo) do if #jo>20 and imu==100 then imu=0 live=live-1 addPpc(p.x,p.y) sfx(0,"E-4") end for v,pc in pairs(ppc) do if pc.x<=j.x+2*pc.t and pc.x>=j.x-11*pc.t and pc.y<=j.y+2*pc.t and pc.y>=j.y-11*pc.t then score.sc=score.sc+10 sfx(3,"E-4") table.remove(jo,v) for s=1,1 do for x=0,3,1 do for y=0,3,1 do addPp(j.x+x,j.y+y,j.c) end end end end end end if imu<100 then imu=imu+clhit end if limite<=25 then limite=25 end -- print live spr(33,210,125,0) print("x",220,126,0) print(live.."",226,126.8,0) -- destroy mouse for v,j in pairs(jo) do if p.x<=j.x+2 and p.x>=j.x-11 and p.y<=j.y+4 and p.y>=j.y-11 then score.sc=score.sc+10 limite=limite-1 table.remove(jo,v) sfx(3,"E-4") nhit=nhit+1 nm=nm+1/8 hit=150 for s=1,1 do for x=0,3,1 do for y=0,3,1 do addPp(j.x+x,j.y+y,j.c) end end end end end end end -- explode mouse pp={} function addPp(x,y,c) p={} p.x=x p.y=y p.c=c p.t=0 p.dx=math.random(-50,50)//30 p.dy=math.random(-50,50)//30 table.insert(pp,p) end function ticPp() for k,p in pairs(pp) do p.x=p.x+p.dx p.y=p.y+p.dy p.t=p.t+1 pix(p.x,p.y,p.c) if p.t>20 then table.remove(pp,k) end end end -- destroy mouse ppc={} function addPpc(x,y) pc={} pc.x=x pc.y=y pc.c=0 pc.t=0 pc.r=0 pc.dx=math.random(-50,50)//30 pc.dy=math.random(-50,50)//30 table.insert(ppc,pc) end function ticPpc() for k,pc in pairs(ppc) do pc.x=pc.x pc.y=pc.y pc.t=pc.t+3 circb(pc.x,pc.y,pc.r+pc.t,0) if pc.t>100 then table.remove(ppc,k) end end end -- spawn for mouse sm={} cc=0 function addSm(x,y,c) s={} s.x=x s.y=y s.c=c s.r=7 s.t=0.08 table.insert(sm,s) end function ticSm() for k,s in pairs(sm) do s.r=s.r-s.t circb(s.x,s.y,s.r,s.c) if s.r<=0 then table.remove(sm,k) addJo(s.x,s.y,s.c) end end end -- end spawn for mouse -- mouse jo={} -- spawn position xr=0 yr=0 function addJo(x,y,c) j={} j.x=x j.y=y j.dx=0 j.dy=0 j.d=math.random(4) j.rd=30 j.cdx=100 j.cdy=100 j.c=c j.r=3 j.v=1.5 table.insert(jo,j) end function ticJo() for k,j in pairs(jo) do j.x=j.x+j.dx j.y=j.y+j.dy j.rd=j.rd+1 if j.cdx<100 then j.cdx=j.cdx+1 end if j.cdy<100 then j.cdy=j.cdy+1 end -- direction brut if j.d==1 then j.dx=1.5 end if j.d==2 then j.dx=-1.5 end if j.d==3 then j.dy=1.5 end if j.d==4 then j.dy=-1.5 end if j.d==1 or j.d==2 then j.dy=0 elseif j.d==3 or j.d==4 then j.dx=0 end ----------- -- direction intelligente if j.x>230 and j.cdx==100 then j.d=math.random(3,4) j.cdx=0 end if j.x<10 and j.cdx==100 then j.d=math.random(3,4) j.cdx=0 end if j.y>125 and j.cdy==100 then j.d=math.random(1,2) j.cdy=0 end if j.y<10 and j.cdy==100 then j.d=math.random(1,2) j.cdy=0 end if j.rd>=30 then j.d=math.random(4) j.rd=0 end -- graphisme circ(j.x,j.y,j.r,j.c) -- condition de supression de la bc if j.x<0 then j.x=240 end if j.x>240 then j.x=0 end if j.y>140 then j.y=0 end if j.y<0 then j.y=140 end end end -- end mouse die=0 function update() if score.sc>=score.hingh then score.hingh=score.sc end if live<=0 then die=die+1 print("infestation",60,60,die,0,2) end if die>=200 then for v,j in pairs(jo) do table.remove(jo,v) end for v,j in pairs(sm) do table.remove(sm,v) end die=0 score.sc=score.sc-score.sc nhit=0 lspawn=100 limite=100 live=3 imu=100 hot="" hotTime=100 hotPrint=0 hit=150 nhit=0 zero=over end t=t+1 end -- spawn virus lspawn=100 limite=100 function drawGame() cls(14) map() print("Score : "..score.sc,5,5,0) print("Hingh Score : "..score.hingh,135,5,0) ---------- ticJo() ticPlayer() ticSm() -- spawn player if p==0 then addPlayer(80,80) p=1 end -- spawn virus if lspawn>=limite and live>0 then addSm(xr,yr,cc) sfx(1,"E-4") lspawn=0 t=0 end ------- xr=math.random(5,235) yr=math.random(5,135) cc=math.random(2,4) t=t+1 lspawn=lspawn+1 end x=86 y=24 function zero() cls() zero=menu end function menu() if btnp(0) then y=y-10 end if btnp(1) then y=y+10 end if y <= 24 then y = 24 elseif y >= 44 then y = 44 end if y == 24 and btnp(5) then zero=start end if y == 34 and btnp(5) then zero=about end if y == 44 and btnp(5) then zero=exitt end cls(13) map(60,0) spr(50,130,10,12,12) spr(34,50,10,12,7) spr(35,20,70,12,8) spr(51,200,100,12,4) print(">",x,y) print("Start",96,24) print("About",96,34) print("Exit",96,44) print("select x",190,128,2) print("VIRUS",86,123,16,0,2) print("--------------------",76,125,16) print("Score : "..score.sc,5,5,0) print("Hingh Score : "..score.hingh,135,5,0) end function start() cls() drawGame() end function about() cls() print("contact me: odistudio4444@gmail.com",26,44) print("Donate me : hodykodi@gmail.com",46,54) print("version 1.0.0",96,64) if btnp(5) then zero=menu end end function exitt() cls() trace("Thanks for playing",15) trace("Hingh Score : "..score.hingh,3) exit() end z=0 function over() cls() print("Game Over",50,40,8,0,3) print("Hingh Score : "..score.hingh,10,70,t,0,2) if z>200 then z=0 zero=menu end z=z+1 end function TIC() zero() update() end