quest tombola begin state start begin function tablica(vnum, pozycja, pozycja2) local itemy = { { --{ID,ILOŚĆ} {71001, 1}, {71084, 25}, {71085, 25}, {25040, 3}, {27992, 2}, {27993, 2}, {27994, 2}, {27987, 5}, {72002, 1}, {71027, 5}, {71028, 5}, {71029, 5}, {71030, 5}, {71036, 1}, {50008, 15}, {70021, 3}, {71001, 1}, }, { {25041, 1}, {71084, 25}, {71085, 25}, {25040, 3}, {27992, 2}, {27993, 2}, {27994, 2}, {27987, 5}, {72002, 1}, {71027, 5}, {71028, 5}, {71029, 5}, {71030, 5}, {71036, 1}, {50008, 15}, {70021, 3}, {25041, 1}, } } return itemy[vnum][pozycja][pozycja2] end when login begin cmdchat("tombola "..q.getcurrentquestindex()) end when 50027.use begin local losowo = number(1,2) local str = " " for i = 1,16 do if i == 16 then str = str..tombola.tablica(losowo, i, 1).."|"..tombola.tablica(losowo, i, 2) else str = str..tombola.tablica(losowo, i, 1).."|"..tombola.tablica(losowo, i, 2).."|" end end cmdchat("OnPrepare"..str) cmdchat("openTombola") setskin(NOWINDOW) end when info or button begin local losowo = number(1,2) if pc.count_item(50027) >= 1 then local str = " " for i = 1,16 do if i == 16 then str = str..tombola.tablica(losowo, i, 1).."|"..tombola.tablica(losowo, i, 2) else str = str..tombola.tablica(losowo, i, 1).."|"..tombola.tablica(losowo, i, 2).."|" end end cmdchat("OnPrepare"..str) if pc.get_empty_inventory_count() < 3 then syschat("Nie możesz losować, gdyż masz za mało miejsca w ekwipunku.") cmdchat("TombolaSetEnable") return end cmdchat("GetInputStart") local czynnosc = input(cmdchat("get_input_value")) cmdchat("GetInputStop") if czynnosc == "tombola|begin" then pc.setqf("slot", number(1, 16)) cmdchat("OnRun "..number(2,3)*16+pc.getqf("slot").."|5") elseif czynnosc == "tombola|end" then pc.remove_item(50027, 1) 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!") pc.give_item2(tombola.tablica(losowo, pc.getqf("slot")+1, 1), tombola.tablica(losowo, pc.getqf("slot")+1, 2)) end else syschat("Nie możesz losować, gdyż masz za mało losów!") cmdchat("TombolaSetEnable") return end end end end