Facebook
From Sludgy Dove, 5 Years ago, written in Plain Text.
Embed
Download Paste or View Raw
Hits: 252
  1. quest tombola begin
  2.         state start begin
  3.                 function tablica(vnum, pozycja, pozycja2)
  4.                         local itemy = {
  5.                                                         {
  6.                                                         --{ID,ILOŚĆ}
  7.                                                                 {71001, 1},
  8.                                                                 {71084, 25},
  9.                                                                 {71085, 25},
  10.                                                                 {25040, 3},
  11.                                                                 {27992, 2},
  12.                                                                 {27993, 2},
  13.                                                                 {27994, 2},
  14.                                                                 {27987, 5},
  15.                                                                 {72002, 1},
  16.                                                                 {71027, 5},
  17.                                                                 {71028, 5},
  18.                                                                 {71029, 5},
  19.                                                                 {71030, 5},
  20.                                                                 {71036, 1},
  21.                                                                 {50008, 15},
  22.                                                                 {70021, 3},
  23.                                                                 {71001, 1},
  24.                                                         },
  25.                                                         {
  26.                                                                 {25041, 1},
  27.                                                                 {71084, 25},
  28.                                                                 {71085, 25},
  29.                                                                 {25040, 3},
  30.                                                                 {27992, 2},
  31.                                                                 {27993, 2},
  32.                                                                 {27994, 2},
  33.                                                                 {27987, 5},
  34.                                                                 {72002, 1},
  35.                                                                 {71027, 5},
  36.                                                                 {71028, 5},
  37.                                                                 {71029, 5},
  38.                                                                 {71030, 5},
  39.                                                                 {71036, 1},
  40.                                                                 {50008, 15},
  41.                                                                 {70021, 3},
  42.                                                                 {25041, 1},
  43.                                                         }
  44.                                                 }
  45.                                 return itemy[vnum][pozycja][pozycja2]
  46.                         end
  47.                        
  48.                 when login begin
  49.                         cmdchat("tombola "..q.getcurrentquestindex())
  50.                 end
  51.                
  52.                 when 50027.use begin
  53.                         local losowo = number(1,2)
  54.                         local str = " "
  55.                         for i = 1,16 do
  56.                                 if i == 16 then
  57.                                         str = str..tombola.tablica(losowo, i, 1).."|"..tombola.tablica(losowo, i, 2)
  58.                                 else
  59.                                         str = str..tombola.tablica(losowo, i, 1).."|"..tombola.tablica(losowo, i, 2).."|"
  60.                                 end
  61.                         end
  62.                         cmdchat("OnPrepare"..str)
  63.                         cmdchat("openTombola")
  64.                         setskin(NOWINDOW)
  65.                 end
  66.                 when info or button begin
  67.             local losowo = number(1,2)
  68.                         if pc.count_item(50027) >= 1 then
  69.                                 local str = " "
  70.                                 for i = 1,16 do
  71.                                         if i == 16 then
  72.                                                 str = str..tombola.tablica(losowo, i, 1).."|"..tombola.tablica(losowo, i, 2)
  73.                                         else
  74.                                                 str = str..tombola.tablica(losowo, i, 1).."|"..tombola.tablica(losowo, i, 2).."|"
  75.                                         end
  76.                                 end
  77.                                 cmdchat("OnPrepare"..str)
  78.                                 if pc.get_empty_inventory_count() < 3 then
  79.                                         syschat("Nie możesz losować, gdyż masz za mało miejsca w ekwipunku.")
  80.                                         cmdchat("TombolaSetEnable")
  81.                                         return
  82.                                 end
  83.                                 cmdchat("GetInputStart")
  84.                                 local czynnosc = input(cmdchat("get_input_value"))
  85.                                 cmdchat("GetInputStop")
  86.                                 if czynnosc == "tombola|begin" then
  87.                                         pc.setqf("slot", number(1, 16))
  88.                                         cmdchat("OnRun "..number(2,3)*16+pc.getqf("slot").."|5")
  89.                                 elseif czynnosc == "tombola|end" then
  90.                                         pc.remove_item(50027, 1)
  91.                                         syschat("Gratulacje! Otrzymałeś "..tombola.tablica(losowo, pc.getqf("slot")+1, 2).."x "..item_name(tombola.tablica(losowo, pc.getqf("slot")+1, 1)).." jako nagroda w Tomboli!")
  92.                                         pc.give_item2(tombola.tablica(losowo, pc.getqf("slot")+1, 1), tombola.tablica(losowo, pc.getqf("slot")+1, 2))
  93.                                 end
  94.                         else
  95.                                 syschat("Nie możesz losować, gdyż masz za mało losów!")
  96.                                 cmdchat("TombolaSetEnable")
  97.                                 return
  98.                         end
  99.                 end
  100.         end
  101. end