kazik

local file = fs.open("lgame/lgame","r")
if file then
    file.close()
os.loadAPI('/lg/lg')
lg.setup('term')
os.loadAPI("uap")
local lgamec = require("../lgame/lgame")
lgamec.setup("term")
lg.fillScreen(colors.black)
local im1 = fs.open("/kazik/1.nfp","r")
if im1 then
  im1.close()
else
  lg.drawText(1,6,colors.white,colors.black,"Downloading sprites...")
  shell.run("pastebin","get","Ewsn8TYn","/kazik/archive")
  lg.drawText(1,6,colors.white,colors.black,"Downloading sprites... DONE")
  lg.drawText(1,7,colors.white,colors.black,"Unpacking...")
  local arch = fs.open("archive/archive","r")
  if not arch then
     lg.drawText(1,7,colors.red,colors.black,"DOWNLOAD ARCHIVE FROM UPDATER!")
     os.sleep(4)
     os.reboot()
  end
  shell.run("archive/archive unpack","/kazik/archive","/kazik/")
  lg.drawText(1,7,colors.white,colors.black,"Unpacking... DONE")
  os.sleep(2)
  shell.run("delete","/kazik/archive")
  os.sleep(1)
  lg.fillScreen(colors.black)

end
local lg = require("../lgame/lgame")
lg.setup("term")
function entryAnim(digit,x)
  for i=1,4 do
    game:moveSprite("ui",2,1)
    game:moveSprite(digit,x,i,false)
      if digit == "digit1" then
    game:moveSprite("digit2",12,4,false)
    game:moveSprite("digit3",19,4,false)
  elseif digit == "digit2" then
    game:moveSprite("digit1",5,4,false)
    game:moveSprite("digit3",19,4,false)
  else
    game:moveSprite("digit2",12,4,false)
    game:moveSprite("digit1",5,4,false)
  end
    game:moveSprite("pane",3,1,false)
    os.sleep(0.1)
    lg.drawBT("roll",4,11,13,15,colors.white,colors.gray,"  ROLL!")
  end

end
function redrawDigit(digit,image)
game:changeImage(digit,"kazik/"..image)
game:moveSprite("ui",2,1)
dx = {digit1 = 5, digit2 = 12, digit3 = 19}
entryAnim(digit, dx[digit])
  if digit == "digit1" then
    game:moveSprite("digit2",12,4,false)
    game:moveSprite("digit3",19,4,false)
  elseif digit == "digit2" then
    game:moveSprite("digit1",5,4,false)
    game:moveSprite("digit3",19,4,false)
  else
    game:moveSprite("digit2",12,4,false)
    game:moveSprite("digit1",5,4,false)
  end
game:moveSprite("pane",3,1,false)
lg.drawBT("roll",4,11,13,15,colors.white,colors.gray,"  ROLL!")
end
game = lg.createScene(1,1,lg.getSize().x,lg.getSize().y,true)
game:fillScreen(colors.black)
game:drawSprite("ui",2,1,"kazik/ui.nfp")
game:drawSprite("digit1",5,4,"kazik/7.nfp")
game:drawSprite("digit2",12,4,"kazik/7.nfp")
game:drawSprite("digit3",19,4,"kazik/7.nfp")
game:drawSprite("pane",3,1,"kazik/pane.nfp")
lg.drawBT("roll",4,11,13,15,colors.white,colors.red,"  ROLL!")
myTable = {"7.nfp","emerald.nfp","1.nfp","1.nfp","1.nfp","emerald.nfp"}
winnings = {n7 = "32AR",nemerald = "16AR",n1 = "8AR"}
while true do
  local event, button, x, y = os.pullEvent( "mouse_click" )
  if lg.isButton(x,y) == "roll" then
    local r1 = myTable[math.random(#myTable)]
    local r2 = myTable[math.random(#myTable)]
    local r3 = myTable[math.random(#myTable)]
    os.sleep(0.3)
    redrawDigit("digit1",r1)
    os.sleep(0.3)
    redrawDigit("digit2",r2)
    os.sleep(0.3)
    redrawDigit("digit3",r3)
    game:moveSprite("ui",2,1)
    game:moveSprite("digit2",12,4,false)
    game:moveSprite("digit3",19,4,false)
    game:moveSprite("digit1",5,4,false)
    game:moveSprite("pane",3,1,false)
    lg.drawBT("roll",4,11,13,15,colors.white,colors.red,"  ROLL!")
    if (string.find(r1,r2) and string.find(r1,r3)) then
        lg.drawText(6,lg.getSize().y-3,colors.orange,colors.white,"YOU WIN!")
    else
      lg.drawText(6,lg.getSize().y-3,colors.red,colors.white,"YOU LOOSE!")
    end
  end
end
lg.exit()
else
    term.clear()
    term.setCursorPos(1,2)
    term.write("Install lgame from updater!")
    uap.upd()
end