API tools faq
paste
UrsaMauris

restaurant pc v 6.0

UrsaMauris
Dec 1st, 2017
528
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 15.61 KB | None | 0 0
raw download clone embed print report diff
  1. function welcomescreen()
  2.     term.clear()
  3.     term.setCursorPos(1,1)
  4.     print("-----------------------------")  -- pokud je volny slot, vypis poptavku
  5.     print("Objednavka: ", pocet, "x ", jidlo)
  6.     print("Vyplata: ", cena," kreditu.")
  7.    
  8.     print("Pro splneni objednavky zadejte O, pro vareni jidla zadejte J")
  9. end
  10.  
  11. function fcscreen()
  12.     loop1 = true
  13.         while loop1 == true do -- loop na cykleni vareni/zakazek 1.1.2.2.1.0.0
  14.         welcomescreen()
  15.        
  16.         local prikaz = read()
  17.         if prikaz == "J" then  -- vareni jidla 1.1.2.2.1.1.0
  18.             print("Kolik jste uvarili jidla?")
  19.             local uvareno = tonumber(read())
  20.            
  21.             print("Pouzili jste nadobi? (y/n)")
  22.             local nadobi = read()
  23.             if nadobi == "y" then   -- pouziti nadobi 1.1.2.2.1.1.1
  24.              mod1 = 5
  25.             else mod1 = 0
  26.             end                     -- 1.1.2.2.1.1.1E
  27.  
  28.             print("Pouzili jste pri vareni pristroj? (y/n)")
  29.             local pristroj = read()
  30.             if pristroj == "y" then -- pouziti pristroje 1.1.2.2.1.1.2
  31.              mod2 = 5
  32.             else mod2 = 0
  33.             end                     -- 1.1.2.2.1.1.2E
  34.  
  35.             print("Byl potreba pri vareni craftici mezikrok? (y/n)")
  36.             local mezikrok = read()
  37.             if mezikrok == "y" then -- pouziti mezikroku 1.1.2.2.1.1.3
  38.             mod3 = 5
  39.             else mod3 = 0
  40.             end                     -- 1.1.2.2.1.1.3E
  41.            
  42.             mzda = uvareno * ( 5 + mod1 + mod2 + mod3)
  43.            
  44.             passwordD = "david"
  45.             passwordF = "filip"
  46.  
  47.             local heslonerozpoznano = true
  48.             while heslonerozpoznano do      -- 1.1.2.2.1.1.4.0
  49.                 print("Pokud chcete stornovat prikaz, misto hesla zadejte STORNO")
  50.                 write("Heslo: ")
  51.                 local input = read("*")
  52.                 if input == passwordD then  -- 1.1.2.2.1.1.4.1
  53.                     heslonerozpoznano = false
  54.                     print ("Mzda vyplacena. Na ucet David bylo pripsano " .. mzda .. " kreditu.")
  55.                     rednet.open("top")
  56.                     rednet.broadcast("poptavka", "ucel")
  57.                     rednet.broadcast("David","kdo")
  58.                     rednet.broadcast(mzda,"kolik")
  59.                     sleep(2,5)
  60.                
  61.                 elseif input == passwordF then
  62.                     heslonerozpoznano = false
  63.                     print ("Mzda vyplacena. Na ucet Filip bylo pripsano " .. mzda .. " kreditu.")
  64.                     rednet.open("top")
  65.                     rednet.broadcast("poptavka", "ucel")
  66.                     rednet.broadcast("Filip","kdo")
  67.                     rednet.broadcast(mzda,"kolik")
  68.                     sleep(2,5)
  69.                
  70.                 elseif input == "STORNO" then
  71.                 heslonerozpoznano = false
  72.                 print("Prikaz stornovan")
  73.                 sleep(1)
  74.          
  75.                 else print("Heslo nerozpoznano")
  76.            
  77.                 end                         -- konec overeni hesla 1.1.2.2.1.1.4.1E
  78.             end                             -- 1.1.2.2.1.1.4.0E
  79.            
  80.         elseif prikaz == "O" then  -- objednavka jidla 1.1.2.2.1.1.0 Cont
  81.        
  82.         passwordD = "david"
  83.         passwordF = "filip"
  84.  
  85.         local heslonerozpoznano = true
  86.         while heslonerozpoznano do   -- 1.1.2.2.1.1.5.0
  87.             print(myID)
  88.             write("Heslo: ")
  89.             local input = read("*")
  90.             if input == passwordD then -- 1.1.2.2.1.1.5.1
  91.                 heslonerozpoznano = false
  92.                 print ("Objednavka prijata. Na ucet David bylo pripsano " .. cena .. " kreditu.")
  93.                 rednet.open("top")
  94.                 rednet.broadcast("poptavka", "ucel")
  95.                 rednet.broadcast("David","kdo")
  96.                 rednet.broadcast(cena,"kolik")
  97.                 slot = 0
  98.                 hotovot = {}
  99.                 hotovot[4] = myID
  100.                 hotovot[5] = "F"
  101.                 local msg = textutils.serialize(hotovot)
  102.                 rednet.broadcast(msg, "offer")
  103.                 fs.delete("currentoffer")
  104.                 loop1 = false
  105.                 sleep(3)
  106.      
  107.             elseif input == passwordF then
  108.                 heslonerozpoznano = false
  109.                 print ("Objednavka prijata. Na ucet Filip bylo pripsano " .. cena .. " kreditu.")
  110.                 rednet.open("top")
  111.                 rednet.broadcast("poptavka", "ucel")
  112.                 rednet.broadcast("Filip","kdo")
  113.                 rednet.broadcast(cena,"kolik")
  114.                 slot = 0
  115.                 hotovot = {}
  116.                 hotovot[4] = myID
  117.                 hotovot[5] = "F"
  118.                 local msg = textutils.serialize(hotovot)
  119.                 rednet.broadcast(msg, "offer")
  120.                 fs.delete("currentoffer")
  121.                 loop1 = false
  122.                 sleep(3)
  123.            
  124.             else print("Heslo nerozpoznano")
  125.             sleep(1)
  126.             end      -- konec overeni hesla 1.1.2.2.1.1.5.1E
  127.         end  -- konec loopu pro heslo 1.1.2.2.1.1.5.0E
  128.      end -- konec loopu pro vyber J/O 1.1.2.2.1.1.0E
  129.      end -- konec while loopu pro cykleni mezi J/O 1.1.2.2.1.0.0E
  130. end
  131.  
  132. --- ZACATEK PROGRAMU ---
  133.  
  134. myID = os.getComputerID()
  135. while true do  -- 1.0.0.0.0.0.0
  136.  znovu = 1
  137.  slot = 0
  138.  if fs.exists("currentoffer") then  -- pokud jiz existuje ulozena objednavka, nacte se ze souboru currentoffer  1.1.0.0.0.0.0
  139.    znovu = 0
  140.    slot = 1
  141.    fileCO = fs.open("currentoffer", "r")
  142.    local line = fileCO.readAll()
  143.    fileCO.close()
  144.    offertable = textutils.unserialize(line)
  145.    
  146.    pocet = offertable[1]
  147.    jidlo = offertable[2]
  148.    cena = offertable[3]
  149.      
  150.    fcscreen()
  151.  
  152.  else -- generace nove poptavky pokud neexistuje poptavka 1.1.0.0.0.0Cont
  153.    znovu = 1
  154.    rednet.open("top")
  155.    while znovu == 1 do       -- generuj, dokud se neuvolni slot 1.1.2.0.0.0
  156.     while slot == 0 do       --generuj, dokud se to nepovede 1.1.2.1.0.0
  157.         slot = 1
  158.         sleep(180)
  159.         n = math.random(1,200)
  160.         pocet = math.random(32,65)
  161.    
  162.         if pocet == 65 then -- 1.1.2.1.1.0
  163.         pocet = 128
  164.         end -- 1.1.2.1.1E
  165.    
  166.        if n >= 1 and n <= 19 then                                   -- VEGGIES 
  167.         local veggies = math.random(1,33)
  168.        
  169.         if veggies >= 1 and veggies <= 9 then                       -- veggies1
  170.          cenajidla = 10
  171.          local veggies1 = math.random(1,9)
  172.          if veggies1 == 1 then jidlo = "PMP spinach"
  173.          elseif veggies1 == 2 then jidlo = "PMP cucumber"
  174.          elseif veggies1 == 3 then jidlo = "PMP bell pepper"
  175.          elseif veggies1 == 4 then jidlo = "PMP lettuce"
  176.          elseif veggies1 == 5 then jidlo = "PMP beet"
  177.          elseif veggies1 == 6 then jidlo = "PMP tomato"
  178.          elseif veggies1 == 7 then jidlo = "PMP onion"
  179.          elseif veggies1 == 8 then jidlo = "carrot"
  180.          elseif veggies1 == 9 then jidlo = "PMP celery"
  181.          end
  182.  
  183.         elseif veggies >= 10 and veggies <= 13 then                 -- veggies2
  184.          cenajidla = 15
  185.          local veggies2 = math.random(1,4)
  186.          if veggies2 == 1 then jidlo = "HC avocado"
  187.          elseif veggies2 == 2 then jidlo = "cactus"
  188.          elseif veggies2 == 3 then jidlo = "olive"
  189.          elseif veggies2 == 4 then jidlo = "HC bamboo shoot"
  190.          end
  191.  
  192.         elseif veggies >= 14 and veggies <= 33 then                 -- veggies3
  193.          cenajidla = 5
  194.          local veggies3 = math.random(1,20)
  195.          if veggies3 == 1 then jidlo = "HC pea"
  196.          elseif veggies3 == 2 then jidlo = "cactus"
  197.          elseif veggies3 == 3 then jidlo = "HC olive"
  198.          elseif veggies3 == 4 then jidlo = "HC soybean"
  199.          elseif veggies3 == 5 then jidlo = "HC asparagus"
  200.          elseif veggies3 == 6 then jidlo = "HC broccoli"
  201.          elseif veggies3 == 7 then jidlo = "HC zucchini"
  202.          elseif veggies3 == 8 then jidlo = "HC celery"
  203.          elseif veggies3 == 9 then jidlo = "HC onion"
  204.          elseif veggies3 == 10 then jidlo = "HC sea weed"
  205.          elseif veggies3 == 11 then jidlo = "HC mushrooms"
  206.          elseif veggies3 == 12 then jidlo = "HC eggplant"
  207.          elseif veggies3 == 13 then jidlo = "HC leek"
  208.          elseif veggies3 == 14 then jidlo = "HC bean"
  209.          elseif veggies3 == 15 then jidlo = "HC tomato"
  210.          elseif veggies3 == 16 then jidlo = "HC lettuce"
  211.          elseif veggies3 == 17 then jidlo = "HC beet"
  212.          elseif veggies3 == 18 then jidlo = "HC bellpepper"
  213.          elseif veggies3 == 19 then jidlo = "HC cucumber"
  214.          elseif veggies3 == 20 then jidlo = "HC spinach"
  215.          end
  216.         end
  217.  
  218.        
  219.        elseif n >= 20 and n <= 36 then                              -- FRUITS
  220.         local fruits = math.random(1,27)
  221.         if fruits >= 1 and fruits <= 16 then
  222.          cenajidla = 5
  223.          local fruits1 = math.random(1,16)                          -- fruits1
  224.          if fruits1 == 1 then jidlo = "watermelon"
  225.          elseif fruits1 == 2 then jidlo = "PMP blueberry"
  226.          elseif fruits1 == 3 then jidlo = "PMP strawberry"
  227.          elseif fruits1 == 4 then jidlo = "PMP blackberry"
  228.          elseif fruits1 == 5 then jidlo = "PMP whiteberry"
  229.          elseif fruits1 == 6 then jidlo = "PMP gooseberry"
  230.          elseif fruits1 == 7 then jidlo = "PMP beautyberry"
  231.          elseif fruits1 == 8 then jidlo = "PMP orangeberry"
  232.          elseif fruits1 == 9 then jidlo = "HC plum"
  233.          elseif fruits1 == 10 then jidlo = "HC rhubarb"
  234.          elseif fruits1 == 11 then jidlo = "HC grape"
  235.          elseif fruits1 == 12 then jidlo = "HC cherry"
  236.          elseif fruits1 == 13 then jidlo = "HC peach"
  237.          elseif fruits1 == 14 then jidlo = "HC apricot"
  238.          elseif fruits1 == 15 then jidlo = "HC blueberry"
  239.          elseif fruits1 == 16 then jidlo = "HC blackberry"
  240.         end
  241.  
  242.         elseif fruits >= 17 and fruits <= 27 then                   -- fruits2
  243.          cenajidla = 15
  244.          local fruits2 = math.random(1,11)
  245.          if fruits2 == 1 then jidlo = "HC lemon"
  246.          elseif fruits2 == 2 then jidlo = "HC coconut"
  247.          elseif fruits2 == 3 then jidlo = "HC orange"
  248.          elseif fruits2 == 4 then jidlo = "HC banana"
  249.          elseif fruits2 == 5 then jidlo = "HC grapefruit"
  250.          elseif fruits2 == 6 then jidlo = "HC fig"
  251.          elseif fruits2 == 7 then jidlo = "HC pomegranate"
  252.          elseif fruits2 == 8 then jidlo = "HC lime"
  253.          elseif fruits2 == 9 then jidlo = "HC date"
  254.          elseif fruits2 == 10 then jidlo = "HC cantaloupe"
  255.          elseif fruits2 == 11 then jidlo = "HC mango"
  256.         end
  257.        end
  258.  
  259.        
  260.         elseif n >= 37 and n <= 52 then                             -- CARBS
  261.         local carbs = math.random(1,9)
  262.         if carbs >= 1 and carbs <= 5 then                           -- carbs1
  263.          cenajidla = 5
  264.          local carbs1 = math.random(1,5)
  265.          if carbs1 == 1 then jidlo = "PMP corn"
  266.          elseif carbs1 == 2 then jidlo = "wheat"
  267.          elseif carbs1 == 3 then jidlo = "potato"
  268.          elseif carbs1 == 4 then jidlo = "HC barley"
  269.          elseif carbs1 == 5 then jidlo = "HC rye"
  270.         end
  271.  
  272.         elseif carbs >= 6 and n <= 9 then                           -- carbs2
  273.          local carbs2 = math.random(1,4)
  274.          if carbs2 == 1 then jidlo = "PMP wild rice"
  275.             cenajidla = 30
  276.          elseif carbs2 == 2 then jidlo = "HC rice"
  277.             cenajidla = 15
  278.          elseif carbs2 == 3 then jidlo = "PMP asian rice"
  279.             cenajidla = 30
  280.          elseif carbs2 == 4 then jidlo = "PMP corn"
  281.             cenajidla = 10
  282.         end
  283.        end
  284.  
  285.         elseif n >= 53 and n <= 66 then                             -- PROTEIN
  286.          local protein = math.random(1,8)
  287.          if protein == 1 then jidlo = "raw mutton"
  288.                 cenajidla = 20
  289.          elseif protein == 2 then jidlo = "raw beef"
  290.                 cenajidla = 15
  291.          elseif protein == 3 then jidlo = "HC raw turkey"
  292.                 cenajidla = 50
  293.         elseif protein == 4 then jidlo = "HC raw venison"
  294.                 cenajidla = 50
  295.         elseif protein == 5 then jidlo = "HC raw rabbit"   
  296.                 cenajidla = 50
  297.         elseif protein == 6 then jidlo = "raw chicken"
  298.                 cenajidla = 10
  299.         elseif protein == 7 then jidlo = "raw pork"
  300.                 cenajidla = 20
  301.         elseif protein == 8 then jidlo = "eggs"
  302.                 cenajidla = 5
  303.         end  
  304.  
  305.         elseif n >= 67 and n <= 76 then                             -- SPICES
  306.          local spices = math.random(1,13)
  307.          if spices == 1 then jidlo = "sugar"
  308.                 cenajidla = 5
  309.          elseif spices == 2 then jidlo = "HC chilli"
  310.                 cenajidla = 15
  311.          elseif spices == 3 then jidlo = "HC garlic"
  312.                 cenajidla = 5
  313.          elseif spices == 4 then jidlo = "HC mustard"
  314.                 cenajidla = 5
  315.         elseif spices == 5 then jidlo = "HC maple syrup"
  316.                 cenajidla = 10
  317.         elseif spices == 6 then jidlo = "HC cinnamon"
  318.                 cenajidla = 30
  319.         elseif spices == 7 then jidlo = "HC vanilla bean"
  320.                 cenajidla = 15
  321.         elseif spices == 8 then jidlo = "HC black pepper"
  322.                 cenajidla = 15
  323.         elseif spices == 9 then jidlo = "HC ginger"
  324.                 cenajidla = 15
  325.         elseif spices == 10 then jidlo = "HC honey"
  326.                 cenajidla = 10
  327.         elseif spices == 11 then jidlo = "HC sesame"
  328.                 cenajidla = 15
  329.         elseif spices == 12 then jidlo = "HC curry leaves"
  330.                 cenajidla = 15
  331.         elseif spices == 13 then jidlo = "salt"
  332.                 cenajidla = 30
  333.        end    
  334.  
  335.         elseif n >= 77 and n<= 90 then                              -- FISH
  336.         local fish = math.random(1,28)
  337.         if fish >= 1 and fish <= 17 then                            -- fish1
  338.          cenajidla = 25
  339.          local fish1 = math.random(1, 17)
  340.          if fish1 == 1  then jidlo = "ryba"   -- 1.1.2.1.2.1
  341.           elseif fish1 == 2  then jidlo = "HC raw bass"
  342.           elseif fish1 == 3  then jidlo = "HC raw carp"
  343.           elseif fish1 == 4  then jidlo = "HC raw catfish"
  344.           elseif fish1 == 5  then jidlo = "HC raw grouper"                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        
  345.           elseif fish1 == 6  then jidlo = "HC raw herring"                    
  346.           elseif fish1 == 7  then jidlo = "HC raw tilapia"
  347.           elseif fish1 == 8  then jidlo = "HC raw tuna"
  348.           elseif fish1 == 9  then jidlo = "HC raw walleye"
  349.           elseif fish1 == 10 then jidlo = "HC raw green heart fish"
  350.           elseif fish1 == 11 then jidlo = "HC raw charr"
  351.           elseif fish1 == 12 then jidlo = "HC raw mudfish"
  352.           elseif fish1 == 13 then jidlo = "HC raw trout"
  353.           elseif fish1 == 14 then jidlo = "HC raw anchovy"
  354.           elseif fish1 == 15 then jidlo = "HC raw perch"
  355.           elseif fish1 == 16 then jidlo = "HC raw snapper"
  356.           elseif fish1 == 17 then jidlo = "HC raw eel"
  357.          end -- 1.1.2.1.2.1E
  358.  
  359.         elseif fish >= 18 and fish <= 28 then                       -- fish2
  360.          cenajidla = 25
  361.          local fish2 = math.random(18,28)
  362.          if fish2 == 1 then jidlo = "HC raw crab"
  363.          elseif fish2 == 2 then jidlo = "HC raw crayfish"
  364.          elseif fish2 == 4 then jidlo = "HC raw frog"
  365.          elseif fish2 == 5 then jidlo = "HC raw octopus"
  366.          elseif fish2 == 6 then jidlo = "HC raw scallop"
  367.          elseif fish2 == 7 then jidlo = "HC raw shrimp"
  368.          elseif fish2 == 8 then jidlo = "HC raw snail"
  369.          elseif fish2 == 9 then jidlo = "HC raw turtle"
  370.          elseif fish2 == 10 then jidlo = "HC raw calamari"
  371.          elseif fish2 == 11 then jidlo = "salmon"
  372.         end
  373.        end
  374.        
  375.         elseif n >= 91 and n <= 100 then                            -- DRY PRODUCTS
  376.          local dries = math.random(1,11)
  377.          if dries == 1 then jidlo = "PMP peanuts"
  378.             cenajidla = 30
  379.          elseif dries == 2 then jidlo = "HC tea leaf"
  380.             cenajidla = 15
  381.          elseif dries == 3 then jidlo = "HC chestnut"
  382.             cenajidla = 5
  383.          elseif dries == 4 then jidlo = "HC cashew"
  384.             cenajidla = 15
  385.          elseif dries == 5 then jidlo = "HC almond"
  386.             cenajidla = 15
  387.          elseif dries == 6 then jidlo = "HC coffee"
  388.             cenajidla = 15
  389.          elseif dries == 7 then jidlo = "HC pistachio"
  390.             cenajidla = 15
  391.          elseif dries == 8 then jidlo = "HC peanut"
  392.             cenajidla = 15
  393.          elseif dries == 9 then jidlo = "HC walnut"
  394.             cenajidla = 5
  395.          elseif dries == 10 then jidlo = "cocoa"
  396.             cenajidla = 30
  397.          elseif dries == 11 then jidlo = "HC pecan"
  398.             cenajidla = 15
  399.         end
  400.      
  401.         elseif n >= 101 and n <= 200 then
  402.          slot = 0
  403.  
  404.            
  405.         end    -- konec rng jidla 1.1.2.1.2.0E
  406.       end -- konec while loop pro generaci poptavky 1.1.2.1.0.0E
  407.  
  408.    
  409.     cena = cenajidla * pocet
  410.     local t = {}          
  411.     t[1] = pocet
  412.     t[2] = jidlo
  413.     t[3] = cena
  414.     t[4] = myID
  415.     t[5] = "F"
  416.     t[6] = "Dave's Corner"
  417.     local msg = textutils.serialize(t)
  418.    
  419.     rednet.open("top")
  420.     rednet.broadcast(msg, "offer")
  421.     local id, msg = rednet.receive(2)
  422.     if msg == "full" then   -- overi dostupnost slotu - pokud neni volny, opakuj gen 1.1.2.2.0.0
  423.         sleep(3)
  424.         znovu = 1
  425.    
  426.     else
  427.         znovu = 0
  428.        
  429.         local savetable = {}
  430.         cena = cenajidla * pocet
  431.         savetable[1] = pocet
  432.         savetable[2] = jidlo
  433.         savetable[3] = cena
  434.    
  435.         local fileWT = fs.open("currentoffer", "w")
  436.         fileWT.write(textutils.serialize(savetable))
  437.         fileWT.close()
  438.  
  439.         fcscreen()
  440.     end  -- konec overeni dostupnosti slotu 1.1.2.2.0.0E
  441.     end -- konec znovu loopu 1.1.1.0.0.0.0E
  442.     znovu = 1
  443.    end -- konec while loopu pro gen poptavky 1.1.0.0.0.0.0E
  444.   end -- konec if statement pro overeni existence currentoffer 1.0.0.0.0.0.0E
Add Comment
Please, Sign In to add comment
Public Pastes
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
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!