daily pastebin goal
87%
SHARE
TWEET

kazina

Kirdykbabaevitch Jan 22nd, 2019 55 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. local component = require("component")
  2. local computer = require("computer")
  3. local term = require("term")
  4. local event = require("event")
  5. local sides = require("sides")
  6. local shell = require("shell")
  7. local fs = require("filesystem")
  8. local g = component.gpu
  9. local w, h = g.maxResolution()
  10. local redstone = component.redstone
  11. --local cb = component.chat_box
  12. local b = 0
  13. local f_path = "games.lua"
  14. local batya_name = "Duno"
  15. local warp_name = "Джой Казино"
  16. --cb.setName("§cBOT§7")
  17. local BOT_NAME = "§8[§6Warp 18+§8] §aКазино§f: "
  18. local COLOR1 = "§b"
  19. local COLOR = "§6"
  20. t=1
  21. function greeting()
  22.   print("Введите шанс выиграша без '%'(вводить нужно не больше 50):")
  23.   b = io.read()
  24.   print("Введите какие будут призы:")
  25.   p = io.read()
  26.   print("Введите что нужно кидать:")
  27.   c = io.read()
  28.   term.clear()
  29.   screen()
  30.   info()
  31. end
  32.  
  33. function screen()
  34.   g.fill(1, 1, w, h, " ")
  35.   g.setResolution(w/3, h/3)
  36.   term.clear()
  37.   g.setForeground(0x66d9ff)
  38.   g.set(1,1,"╔══════════════════════════════════════════════════════╗")
  39.   g.set(1,10,"══════════════════════════════════════════════════════")
  40.   g.set(1,16,"══════════════════════════════════════════════════════")
  41.   g.fill(1,2,1,30,"║")
  42.   g.fill(1,1,1,40,"║")
  43.   g.setForeground(0xff00ff)
  44.   g.set(20,15," By "..batya_name.." Для "..warp_name.." (>.<) ")
  45. end
  46.  
  47. function random()
  48.   r = 100/15
  49.   a = math.random(r)
  50.   --cb.say(BOT_NAME .. COLOR1 .. "Крутим рулетку! Ваше число §k1")
  51.   if a == 1 then
  52.     g.setForeground(0xFFDA00)
  53.     os.sleep(t/2)
  54.     --g.set(1,1,ravno)
  55.     --g.set(1,16,ravno)
  56.     g.fill(53,1,1,30,"║")
  57.     g.fill(1,1,1,40,"║")
  58.     g.setForeground(0xff00ff)
  59.     g.set(7,7,"ВЫ ВЫИГРАЛИ!!! ☺ Выпало число: " .. a)
  60.     --cb.say(BOT_NAME .. COLOR1 .. "Вы выиграли! ☺ Выпало число: ".. COLOR .. a)
  61.     redstone.setOutput(sides.back, 15)
  62.     os.sleep(t)
  63.     redstone.setOutput(sides.back, 0)
  64.     term.clear()
  65.     screen()
  66.     info()
  67.   elseif a >= 2 then
  68.     g.setForeground(0xff00ff)
  69.     os.sleep(1)
  70.     --g.set(1,1,ravno)
  71.     --g.set(1,16,ravno)
  72.     g.fill(53,1,1,30,"║")
  73.     g.fill(1,1,1,40,"║")
  74.     g.setForeground(0x00FFD1)
  75.     g.set(7,7,"Вы проиграли(( Выпало число: " .. a)
  76.     --cb.say(BOT_NAME .. COLOR1 .. "Вы проиграли :с Выпало число: " .. COLOR .. a)
  77.     os.sleep(2)
  78.     term.clear()
  79.     screen()
  80.     info()
  81.   else
  82.     print("Что-то пошло не так")  
  83.   end
  84. end
  85.  
  86. function info()
  87. file = io.open(shell.getWorkingDirectory() .. "/"..f_path, "r")
  88. schet = file:read(9999999)
  89.   term.setCursor(1, 1)
  90.   g.setForeground(0xff00ff)
  91.   g.set(15,2,"     ► Джой Казино ")
  92.   g.set(5,3,"► На основе Рандома! ツ")
  93.   g.set(5,4,"► Бросать в трубу только ставки со стены")
  94.   g.set(5,5,"► Призы разные")
  95.   g.set(5,6,"► /warp bazar ")
  96.   g.set(5,7,"► Шанс выигрыша равен 30%"
  97.   g.set(5,8,"► Счётчик: " .. schet)
  98.   g.set(7,11,"► Если выпадает число 1 вы выиграли")
  99.   g.set(7,12,"► А если выпадет другое, ")
  100.   g.set(7,13," тогда вы проиграли :с")
  101.     while true do
  102.       event.pull("redstone")
  103.       if redstone.getInput(sides.front) >= 1 then
  104.         schet = schet+1
  105.         file = io.open(shell.getWorkingDirectory() .. "/"..f_path, "w")
  106.       file:write(schet)
  107.       file:close()
  108.         print("Поступил приз")
  109.         term.clear()
  110.         random()
  111.       end
  112.   end
  113. end
  114.  
  115. greeting()
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top