^ю юлл юлл ллллллллюлл юлл ю л л л л л л л л и 0?0000000000000000000000000000┘;tю?алалалал""ал!>MтщщщттЦрс=.алрDМ>т1т#!чМал!мтц-р■│1-ал!м-црчал!д-д-0алмЛщЛалб<рдралялА,о,Aал!лбялAллнэА,Алялл1л !=щЦбляллмэрэ.2-АэлAлл1л бэябдЛAллнэяэ1ллЛялл!л !лЯAЛлЛрллалнЛм лЛМллцЛ1л 1л1л ллл нЛ!нЛял ллял!лА!л блллаЛаЛяAллLллб мрмэ1л ллм л-!л млалд1э!ал ялалля ямлM#!рлЛалэа Ц!лЛчлэЦалЛаАал алЛаBдлалЛа!Алл1=#!с!щ!с#!..ятД1ралЛрЛяБяЦM1эяалЛящч-Адл яL!я<ян1лЮцлA=бя-сАлл!лБаэд!л1ллящАралLнL!цэЮ!л млалЛA=-Ц1-длЭ1л Ц1лЛал Bл цл ящя1ДАлл млблЧялЭцл!лллл!"N.рДблл1лЛлэ!блЩ!ллблЛ1лэБН"чщщтмл цл ял чмлялэлл блЭ!.Бцл!1ллллал АлLцл аллдл рБ.!ллнлЛялЛбляалЭллбл яллББямл!ллал аЛцл ялLлл блЛя."""""""AцлблЛаля Цллбл▄1дл!лл #БНББНННННБапД!ллбл1Ч.AлЛмл .лэялл1Б..""""""янлнLЦнл лл!л слэ!.ББНБ.НБН.11лЩбэ!лллЛБм ябл 1ННН.".Б"."Б.-!дЛяЛчялэл ц #мл !""".НБ.НБНББя!мМ!э1бл ц Ба1Нлл1БНННБ".Б"."."Нч1м-O!МлляАЯЭМялЛЮ.Б"..НБ.НБ..И"стЦсCщчЦ!.ОНЮсблЭ.!Б.Н"Б".Б".БН"Н"!ННлл АББ"Н.НБ.щщщ"Н"Н0лэ!"."Н"Б"чщщDтщщН"бл БНБН"ИБр=ттс=тт#Нрмл ."."Н"щщщщщщщщщщ-ч.ллБ..Н"чMMM=M=т4MMщсялЛ.БН"НщщщщщщщщщщщMщрбл Б."НртC==т4M=M==тCрлл.БН"рщщщщщщщллэщщщ3рАлэБ.Б▓щ4MMM=MллллллMщ1-ал .Б..щщщщщщлллллллл3щмлБ.БртC=4=ллллллллллB.!лЛ.БНчщщщщмллллллллллэ-ал Б."M=тттллллллллллллBцэ!БчщщщщмллллллллллллАл Б.р4M=млллллллллллллл!аL!Бчщщщллллллллллллллляд А.ртCMллллллллллллллл1яэБчщщмлллллллллллллллАмБрCMцлллллллллллллллл1B-!рщщлллллллллллллллллярМчтсллллллллллллллллл>=ящщллллллллллллллллл4тллллллллллллллллллщмлллллллллллллллллл1мллллллллллллллллллямлллллллллллллллллл1мллллллллллллллллллямлллллллллллллллллл!"цлллллллллллллллллАНаллллллллллллллллл!"ллллллллллллллллл!НлллллллллллллллллА"ллллллллллллллллл!НаллллллллллллллллН"лллллллллллллллтщлллллллллллллллщщаллллллллллллллCMллллллллллллллщщаллллллллллллтсллллллллллллллаллллллллллллаллллллллллаллллллллалллллллллалалалалалалалалалалалалаллллллллллллллллллллллллл┤-- title: pong -- author: to1ex -- desc: this is my first TIC-80 project. it's just an average pong clone to get things going. -- license: MIT License -- version: 1.1 -- input: keyboard -- script: lua function init() ball={x=30,y=40,dirx=1,diry=1,width=8,height=8} lp={x=3,y=20,score=0,width=3,height=5} rp={x=229,y=107,score=0,width=3,height=5} helptimer=7*60 end function resetball() if ball.dirx==1 then ball.x=lp.x+10 elseif ball.dirx==-1 then ball.x=rp.x-10 end --lp.y=68 --rp.y=68 end function addscore() if ball.dirx==1 then lp.score=lp.score+1 elseif ball.dirx==-1 then rp.score=rp.score+1 end sfx(6,"C-5",100) resetball() end function moveball() ball.x=ball.x+1*ball.dirx if (ball.xrp.x and ball.yrp.y) or (ball.xlp.x+5 and ball.ylp.y) then -- aabb collision detection with paddles, `+5` in the code is origin conpensation when the sprite gets flipped ball.dirx=ball.dirx*-1 if ball.dirx==1 then poke2((0x4058E),2) elseif ball.dirx==-1 then poke2((0x4058E),1) end sfx(1,"D-6",10) end ball.y=ball.y+1*ball.diry if ball.y>=135-ball.height or ball.y<=0 then ball.diry=ball.diry*-1 end if ball.x<0-ball.width or ball.x>239 then addscore() end end function input() if key(6) and not(lp.y>127) then lp.y=lp.y+1 end if key(18) and not(lp.y<1) then lp.y=lp.y-1 end if key(10) and not(rp.y>127) then rp.y=rp.y+1 end if key(9) and not(rp.y<1) then rp.y=rp.y-1 end end init() function TIC() cls(1) spr(1,ball.x,ball.y,0) -- ball spr(2,lp.x,lp.y,0,1,1) -- paddle L spr(2,rp.x,rp.y,0) -- paddle R print(lp.score,110,10,3) -- score L print(rp.score,130,10,3) -- score R if helptimer>=0 then print([[F and R to move]],20,60,11) print([[J and I to move]],174,60,11) helptimer = helptimer-1 end input() moveball() end