0,q]S}Wup8d%qy)6o;]əi?̻̻̻̻̻̻̻̻̻̻̻̻̻̻̻̻̻̻|̻gV̻wU|gf̻{weVwfg̻{wdffwwgfg̻{GCfvU|wwVffV̻wgdFfU|wgUVeV{wff4dfLCLCwwffVUfwFfUFufU̜dLClwgvgfUfw4TUffT\lĜ\wgvgfVVwFffeFC\lL\9wgvfeff}gwVefd\4̜|gffUvg}wvvgfV\Ll|wffwvVwgvwf\\wgvwfUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUeVUUUUUUUUUUUUUUUUUUUUUUeVUUUUeVUUUlUUUeVUUUUeVUUeVUUUeUUfUvgUUUUvgUUUlUUUvgUUUUvgUUvgUUUvUewVqVUUeqVUe|VUeqVUUeqUeqVUefvggffvqVUvݽgUegffvqfvqVUvwqqwwgfݻqfvqwwwgfqw̻wqw1333311̻33331111313313313̼1331331313333333333333333133133331313333333313331331331331331333313333111U\UUU111131313]w]U\UUUUUU1313133333331}vUUwUVUU\lUUwUwuwWU333333313131313UmfwwfWVUwU\ewwfWfgfwUU]UVUUU3313131313uUfffUvUwvgUU|UffUvfffvWU]UUuvWUUU331gufVfWfWUffUWwVfWfffVewWUUuWufwwUu1egfvUvfUuffwvffvUvfUUvgfW]UugvgffVugVgfffWefwgfffffffWefuwUefw}UgfffefvvVU11fVefvefgffVef]UUffgfgfwgfevmwfVUUefffUw111313lvUufWfffVVUU}WUefffVUfffUeUffVuwgffVuff131333331lfwwevfUUUvwWvUUfffvwUefwguffvgfVVevgff33333131313lfVUUffvwuffWUmfwwfVeefwgUUgVffffvvgffUU33131313lVUUgffvgffwWmffffvggfffUwVUffUUefffVUu331\U|wwffffffffvmUUUeffVUUfwfUvwffWugfUfUUg1uwffUfVefVUwWUUUfvWufffwUUevgfVUfwwfgfVffuewgfUUvwwfvwUfffmwUUffwuwffff1VUvlWUfffwwݭwjff]UfwwfffwfVUUU113UwvU̬zwf""ݽ"ݻwfffffUefUUuw13331wfjw̪""ݽ*""ݽݻfffUwgfwwg3331313l"f̪""ݽ*""zjff331313U'"̬""ݻ""wwU*331wfʬ*"*ݻ*"*{wfV*1̬*""ݽ"""*wiffUݭ****"*ݽ""*{wlVݭ"*,"*ݫ**"**{gifUݭ""\33̬*""ݫ*""""*wfVflfVMCԭ""U\\U\\33\̬""*"ݝ}ݫ*""*"wvUfUffVdMC"*"UD33U̬"*"""wVխ"""*"wfkfUvVmԪ"*""""U4U3\\\̬"""*""m}Wf-"""*"kwef9yVM]*""""\UUlDU31\̪"""*""]}vWV**"""[wgkeef4""*"*"\\V\eV\eV\33̬*"}gfV"Z""**R*wwfgggVM"**"*"eV\e\\e313̬"U*ZUZgeբUUZ{wgwgVUݪ*"\ef\fV\fUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUVUUUUUUUUUUUUeVUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUeVUUUUUUUUUUUUeiUUUeVUUUUeVUUUiUUUeVUUUUeVUUUeVUUUUUUUUUeVUUUeVUUUUUUUUUeVUUUeVUUUUUUUUUeVUUUiUUUeVUUUUeVUUUiUUUvgUUUUvgUUUiUUUvgUUUUvgUUUvgUUUUUfUUUvgUUUvgUUUUUfUUUvgUUUvgUUUUUfUUUvgUUUiUUUvgUUUUvgUUU13xVUeqVUUeqVUeyVUeqVUUeqVUeqVefUewVUeqVUeqVefUewVUeqVUeqVefUewVUeqVUexVUeqVUUeqVUe333gUegffvqVUvgUegffvqVUvqfvwfvgfvqVUvqfvwfvgfvqVUvqfvwfvgfvqVUvgUegffvqVUv3313qfvqwwgfqfvqwwgfwwqwgfwwqwgfwwqwgfqfvqwwgf31wqwwqwqwqwqwwqw333311311313333111333311313313313333331331333133133133133133333333331333133333133333333333333333133133333133331333133331313333313331313333333313333333133331333333333313331311113331113331133333131331333333133133133133311333313131133333133333333333313333313333113131313333133333333133313313333133131331331333313313333333331333333333313313331331133313331333133131331331333333333333333333331333313333331333133313333313331133311333133313333333313133133133331333333333331331331333111113333111333311311333313333333133333313313333333133331333133311333133313331333133313333333331333333333113333133333113333113333331331133313333133313333333331333311333313331133111133133313311133333331313333333333333133133133111331333313133333333313133331333313333313131311311333313313313333133133331331313331333313333331333133333313313331333133313333113333333313131333331333333333333333333333131333333333313331333113331133311333133133313333333131331333333333333333133131333131113333333313113133333131313131313333131333331331333133333331333133313333313331333133313331333133313133313333133333133331333333333333333333333333333331333333133311113331333113331133311333113331133313331333111331333133333333333333133333113111311311111111313333133133133133133133331331333111333113331333133313331333133313331333113113333333313131313131133333113331331333313333333331333313333333331333333333333333113313333313333333333333333333333333333331333331333333333333333333333333133333%-- title: Plateformer -- author: OdiStudio Games, odistudio4444@gmail.com, etc. -- desc: plateformer sprites and tiles -- site: website link -- license: MIT License (change this to your license of choice) -- version: 0.1 -- script: lua t=0 x=96 y=24 -- cloud1 tc=0 cc=0 mc=0 cloud={} cloud1={} function addCloud(x,y) local c={} c.x=x c.y=y c.dx=math.random(30.0)/100.0 c.dy=math.random(-100.0,100.0)/180.0 c.r=math.random(4,20) c.fm=math.random(5) c.co=12 table.insert(cloud,c) end function ticCloud() for k,c in pairs(cloud) do c.x=c.x-c.dx c.y=c.y+c.dy if c.fm==1 then circ(c.x-c.r,c.y,c.r,c.co) circ(c.x+c.r,c.y,c.r,c.co) circ(c.x,c.y-c.r,c.r,c.co) elseif c.fm==2 then circ(c.x-c.r,c.y-c.r,c.r,c.co) circ(c.x-c.r,c.y,c.r,c.co) circ(c.x+c.r,c.y,c.r,c.co) circ(c.x,c.y-c.r,c.r,c.co) circ(c.x,c.y,c.r,c.co) elseif c.fm==3 then circ(c.x-c.r,c.y,c.r,c.co) circ(c.x+c.r,c.y,c.r,c.co) circ(c.x,c.y-c.r,c.r,c.co) circ(c.x,c.y+c.r,c.r,c.co) elseif c.fm==4 then circ(c.x,c.y,c.r,c.co) elseif c.fm==5 then circ(c.x,c.y,c.r,c.co) circ(c.x-c.r,c.y,c.r,c.co) circ(c.x,c.y-c.r,c.r,c.co) circ(c.x+c.r,c.y,c.r,c.co) circ(c.x+c.r*2,c.y,c.r,c.co) circ(c.x+c.r*2,c.y+c.r,c.r,c.co) circ(c.x+c.r*2,c.y-c.r,c.r,c.co) end if c.x<=-300 then table.remove(cloud,k) end end end -- cloud 1 function addCloud1(x,y) local c1={} c1.x=x c1.y=y c1.dx=math.random(30.0)/100.0 c1.dy=math.random(-100.0,100.0)/180.0 c1.r=math.random(4,20) c1.fm=math.random(5) c1.co=13 table.insert(cloud1,c1) end function ticCloud1() for k,c1 in pairs(cloud1) do c1.x=c1.x-c1.dx c1.y=c1.y+c1.dy if c1.fm==1 then circ(c1.x-c1.r,c1.y,c1.r,c1.co) circ(c1.x+c1.r,c1.y,c1.r,c1.co) circ(c1.x,c1.y-c1.r,c1.r,c1.co) elseif c1.fm==2 then circ(c1.x-c1.r,c1.y-c1.r,c1.r,c1.co) circ(c1.x-c1.r,c1.y,c1.r,c1.co) circ(c1.x+c1.r,c1.y,c1.r,c1.co) circ(c1.x,c1.y-c1.r,c1.r,c1.co) circ(c1.x,c1.y,c1.r,c1.co) elseif c1.fm==3 then circ(c1.x-c1.r,c1.y,c1.r,c1.co) circ(c1.x+c1.r,c1.y,c1.r,c1.co) circ(c1.x,c1.y-c1.r,c1.r,c1.co) circ(c1.x,c1.y+c1.r,c1.r,c1.co) elseif c1.fm==4 then circ(c1.x,c1.y,c1.r,c1.co) elseif c1.fm==5 then circ(c1.x,c1.y,c1.r,c1.co) circ(c1.x-c1.r,c1.y,c1.r,c1.co) circ(c1.x,c1.y-c1.r,c1.r,c1.co) circ(c1.x+c1.r,c1.y,c1.r,c1.co) circ(c1.x+c1.r*2,c1.y,c1.r,c1.co) circ(c1.x+c1.r*2,c1.y+c1.r,c1.r,c1.co) circ(c1.x+c1.r*2,c1.y-c1.r,c1.r,c1.co) end if c1.x<=-300 then table.remove(cloud1,k) end end end -- draw cloud function drawCloud() tc=tc+1 mc=math.random(0,80) ticCloud1() ticCloud() if tc>=10 then addCloud(280,mc) addCloud1(280,mc) tc=0 end end -- end cloud -- scrolling horizontale t=0 tt=0 ttt=0 para1={} para2={} para3={} -- para 1 function addPara1(x,y) local p1={} p1.x=x p1.y=y p1.dx=5 p1.dy=0 p1.t=0 table.insert(para1,p1) end function ticPara1() for k,p1 in pairs(para1) do p1.x=p1.x-p1.dx p1.y=p1.y-p1.dy spr(256,p1.x,p1.y,0,2,0,0,6,2) if p1.x<=-250 then table.remove(para1,k) end end end -- para 2 function addPara2(x,y) local p2={} p2.x=x p2.y=y p2.dx=3 p2.dy=0 p2.t=0 table.insert(para2,p2) end function ticPara2() for k,p2 in pairs(para2) do p2.x=p2.x-p2.dx p2.y=p2.y-p2.dy spr(258,p2.x,p2.y,0,1,0,0,4,2) if p2.x<=-200 then table.remove(para2,k) end end end -- para 3 function addPara3(x,y) local p3={} p3.x=x p3.y=y p3.dx=2 p3.dy=0 p3.t=0 table.insert(para3,p3) end function ticPara3() for k,p3 in pairs(para3) do p3.x=p3.x-p3.dx p3.y=p3.y-p3.dy spr(262,p3.x,p3.y,0,1,0,0,4,1) if p3.x<=-200 then table.remove(para3,k) end end end function drawPara() ticPara3() ticPara2() ticPara1() if t>=18 then addPara1(240,104) t=0 end if tt>=10 then addPara2(240,88) tt=0 end if ttt>=16 then addPara3(240,80) ttt=0 end t=t+1 tt=tt+1 ttt=ttt+1 end -- end srolling function TIC() cls(11) drawCloud() drawPara() map(0,0,30,17,0,0,11) end