LIKO-12 Pong AC by Watola

local code = [[--LIKO 12 Pong AC
--By Watola, with physics accumulator added by Taehl
function _init()
 --Default values
 ball_x=24
 ball_y=24
 ball_r=3
 ball_c=8
 ball_sx=1.6
 ball_sy=1.6
 pad_x=85
 pad_y=120
 pad_w=30
 pad_h=4
 pad_sx=0
 pad_c=8
 score=0
 lives=3
 acc=0
 frame=1/120  --update at 120 FPS
end
function _update(dt)
 acc = acc+dt
 if acc < frame then return end
 acc = acc-frame
 draw()
 movepaddle()
 bouncewall()
 bouncepaddle()
 loseball()
end
function draw()
 --Clear the screen
 clear(14)
 --Draw the score
 color(15) print("Score:",2,2)
 color(15) print(score,26,2)
 --Draw the lives
 color(15) print("Lives:",165,2)
 color(15) print(lives,189,2)
 --Draw the paddle
 rect(pad_x,pad_y,pad_w,pad_h,pad_c)
 --Draw the ball
 color(ball_c) circle(ball_x,ball_y,ball_r)
end
function movepaddle()
 --Left
 if (btn(0)) then
  if pad_x > 13 then
   pad_sx = pad_sx-1
  end
 end
 --Right
 if (btn(1)) then
  if pad_x < 150 then
   pad_sx = pad_sx+1
  end
 end
 --Speed
 pad_sx=pad_sx/1.3
 pad_x=pad_x+pad_sx
end
function bouncewall()
 --Bouncing
 ball_x=ball_x+ball_sx
 ball_y=ball_y+ball_sy
 --Wall collision
 if ball_x > 190 or ball_x <2 then
  ball_sx = -ball_sx
 end
 if ball_y <2 then
  ball_sy = -ball_sy
 end
end
function bouncepaddle()
 --Ball collision with paddle
 if ball_x>=pad_x-4 and
  ball_x<=pad_x+pad_w+4 and
  ball_y>pad_y-4 then
  ball_sy = -ball_sy
 --Adding score
  score=score+1
 end
end
function loseball()
 if ball_y > 117 then
  lives=lives-1
  ball_y = 24
 end
 if lives < 1 then
  ball_sy=0
  ball_sx=0
  ball_y=24
  ball_x=24
  pad_sx=-1000
  color(15) print("GAME OVER",80,52)
  color(15) print("PRESS DOWN TO RESTART",58,62)
  color(15) print("CREATED BY WATOLA",66,72)
 end
 if lives < 1 then
  if (btn(3)) then
   _init()
  end
 end
end]]


local spritemap =
'iVBORw0KGgoAAAANSUhEUgAAAMAAAABgAgMAAAA2rpV6AAAACVBMVEUAAAD/8enDw8a4vf5CAAAAAXRSTlMAQObYZgAAADtJREFUeJzty6ERwCAABEEmDk8L6QcBM0hKoYn0mxpes6vvSkm1Hg5zhMO3wuHd4VBPODxhDwAAAHCNHyE6AwvViDPqAAAAAElFTkSuQmCC'

local tilemap =
'iVBORw0KGgoAAAANSUhEUgAAABgAAAAJAQAAAAAAhtFrAAAAAnRSTlMAAHaTzTgAAAALSURBVHicY2AgDAAAJAABtmbfBAAAAABJRU5ErkJggg=='

return {code=code,spritemap=spritemap,tilemap=tilemap}