quest tombola begin state start begin function tablica(vnum, pozycja, pozycja2) local itemy = { { --{ID,ILOŚĆ} {71001, 5}, {72001, 1}, {72004, 1}, {25040, 3}, {27992, 2}, {27993, 2}, {27994, 2}, {27987, 10}, {50125, 10}, {50182, 1}, {70064, 5}, {70063, 1}, {50131, 50}, {71036, 1}, {50249, 1}, {70102, 5}, {71001, 5}, }, { {25041, 1}, {72001, 1}, {72004, 1}, {25040, 3}, {27992, 2}, {27993, 2}, {27994, 2}, {27987, 10}, {50125, 10}, {50182, 1}, {70064, 5}, {70063, 1}, {50131, 50}, {71036, 1}, {50249, 1}, {70102, 5}, {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("GetInputBegin") local czynnosc = input(cmdchat("get_input_value")) cmdchat("GetInputEnd") if czynnosc == "tombola|begin" then pc.remove_item(50027, 1) pc.setqf("slot", number(1, 16)) cmdchat("OnRun "..number(2,3)*16+pc.getqf("slot").."|5") elseif czynnosc == "tombola|end" then 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