Advertisement
Guest User

kazik

a guest
Oct 24th, 2023
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 2.61 KB | None | 0 0
  1. local lg = require("../lgame/lgame")
  2. lg.setup("term")
  3. function entryAnim(digit,x)
  4.   for i=1,4 do
  5.     game:moveSprite("ui",2,1)
  6.     game:moveSprite(digit,x,i,false)
  7.       if digit == "digit1" then
  8.     game:moveSprite("digit2",12,4,false)
  9.     game:moveSprite("digit3",19,4,false)    
  10.   elseif digit == "digit2" then
  11.     game:moveSprite("digit1",5,4,false)
  12.     game:moveSprite("digit3",19,4,false)
  13.   else
  14.     game:moveSprite("digit2",12,4,false)
  15.     game:moveSprite("digit1",5,4,false)
  16.   end
  17.     game:moveSprite("pane",3,1,false)  
  18.     os.sleep(0.1)
  19.     lg.drawBT("roll",4,11,13,15,colors.white,colors.gray,"  ROLL!")
  20.   end
  21.  
  22. end
  23. function redrawDigit(digit,image)
  24. game:changeImage(digit,image)
  25. game:moveSprite("ui",2,1)
  26. dx = {digit1 = 5, digit2 = 12, digit3 = 19}
  27. entryAnim(digit, dx[digit])
  28.   if digit == "digit1" then
  29.     game:moveSprite("digit2",12,4,false)
  30.     game:moveSprite("digit3",19,4,false)    
  31.   elseif digit == "digit2" then
  32.     game:moveSprite("digit1",5,4,false)
  33.     game:moveSprite("digit3",19,4,false)
  34.   else
  35.     game:moveSprite("digit2",12,4,false)
  36.     game:moveSprite("digit1",5,4,false)
  37.   end
  38. game:moveSprite("pane",3,1,false)
  39. lg.drawBT("roll",4,11,13,15,colors.white,colors.gray,"  ROLL!")
  40. end
  41. game = lg.createScene(1,1,lg.getSize().x,lg.getSize().y,true)
  42. game:fillScreen(colors.black)
  43. game:drawSprite("ui",2,1,"ui.nfp")
  44. game:drawSprite("digit1",5,4,"7.nfp")
  45. game:drawSprite("digit2",12,4,"7.nfp")
  46. game:drawSprite("digit3",19,4,"7.nfp")
  47. game:drawSprite("pane",3,1,"pane.nfp")
  48. lg.drawBT("roll",4,11,13,15,colors.white,colors.red,"  ROLL!")
  49. myTable = {"7.nfp","emerald.nfp","1.nfp","1.nfp","1.nfp","emerald.nfp"}
  50. winnings = {n7 = "32AR",nemerald = "16AR",n1 = "8AR"}
  51. while true do
  52.   local event, button, x, y = os.pullEvent( "mouse_click" )
  53.   if lg.isButton(x,y) == "roll" then
  54.     local r1 = myTable[math.random(#myTable)]
  55.     local r2 = myTable[math.random(#myTable)]
  56.     local r3 = myTable[math.random(#myTable)]
  57.     os.sleep(0.3)
  58.     redrawDigit("digit1",r1)
  59.     os.sleep(0.3)
  60.     redrawDigit("digit2",r2)
  61.     os.sleep(0.3)
  62.     redrawDigit("digit3",r3)
  63.     game:moveSprite("ui",2,1)
  64.     game:moveSprite("digit2",12,4,false)
  65.     game:moveSprite("digit3",19,4,false)
  66.     game:moveSprite("digit1",5,4,false)
  67.     game:moveSprite("pane",3,1,false)  
  68.     lg.drawBT("roll",4,11,13,15,colors.white,colors.red,"  ROLL!")
  69.     if (r1 == r2 == r3) then
  70.         lg.drawText(6,lg.getSize().y-3,colors.orange,colors.white,"YOU WIN: "..winnings["n"..string.gsub(r1, "", 4)])
  71.     else
  72.       lg.drawText(6,lg.getSize().y-3,colors.red,colors.white,"YOU LOOSE!")
  73.     end
  74.   end
  75. end
  76. lg.exit()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement