quest regenbogen1 begin
state start begin
when 50512.use begin
local tab={{50108, 2},{50107, 5},
{50011, 20},{27100, 1},{27101, 1},
{27102, 1},{27103, 1},{27104, 1},
{27106, 1},{50037, 10},}
if pc.getqf("use")>=10 then
pc.remove_item(item.get_vnum(), 1)
pc.delqf("use")
return
end
if pc.getqf("wait_time") > get_time() then
chat("du kannst "..item_name(item.get_vnum()).." noch nicht benutzen")
return
end
pc.setqf("use",pc.getqf("use")+1)
pc.give_item2(tab[number(1,tab)][1],tab[number(1,tab)][2])
chat("du hast "..item_name(tab[number(1,tab)][1]).." erhalten")
pc.setqf("wait_time", get_time()+60*2)
end
end
end

60*2 - 2 минуты, редактируйте своё время

quest voucher begin
state start begin
when 30093.use or 80015.use or 80016.use begin
local p = 100
pc.remove_item(30093, 1)
if item.get_vnum() == 80015 then
p = 500
elseif item.get_vnum() == 80016 then
p = 1000
end
local accountid = mysql_query("SELECT * FROM player.player WHERE name='"..pc.get_name().."'","root","olbaid","player","192.168.13.100")
local coins = mysql_query("SELECT * FROM account.account WHERE id='"..accountid.account_id[1].."'","root","olbaid","account","192.168.13.100")
say_title("Drachenmünzen Gutschein")
say(" Привет "..pc.get_name()..".")
say(" хотите ли Вы использовать свиток ")
say(" с "..p.." Драконьими Монетами? ")
if select ("Ja","Nein") == 2 then return end
local updatecoins = mysql_query("UPDATE account.account SET coins='"..coins.coins[1]+p.."' WHERE id='"..accountid.account_id[1].."'","root","olbaid","account","192.168.13.100")
chat("Deine Drachenmünzen wurden dir erfolgreich gutgeschrieben.")
end
end
end

192.168.13.100 - айпи Сервера
root - Логин Навиката
olbaid - пароль навиката

30093 80015 80016 меняем на ид Предмета
pc.remove_item(30093, 1) пишем под нашим предметом, что бы Он ИСчезал ПОсле использования

quest traenke begin
state start begin
when letter begin
send_letter("TrA?A¤nke kaufen")
end
when info or button begin
say_title(" Магазин ")
say(" Привет.")
say(" Тут Вы Можете купить товары")
say(" которые Соответствуют Вашему желанию .")
say(" что Вы хотите КУпить??")
local a = select("200 Красных Банок ", "200 Синих Банок ", "200 Фиолетовых Банок ", "200 Зелёнх Банок ", " НИчего ")
if a == 5 then
send_letter("TrA?A¤nke kaufen")
return
elseif a == 1 then
if pc.money>=30000 then
pc.changemoney("-30000")
pc.give_item2(27003, 200)
say_title(" Красные Банки ")
say("Du hast folgendes Item erhalten:")
say("")
say("")
say_item_vnum(27003)
end
elseif a == 2 then
if pc.money>=30000 then
pc.changemoney("-30000")
pc.give_item2(27006, 200)
say_title("Blaue TrA?A¤nke")
say("Du hast folgendes Item erhalten:")
say("")
say("")
say_item_vnum(27006)
end
elseif a == 3 then
if pc.money>=50000 then
pc.changemoney("-50000")
pc.give_item2(27115, 200)
say_title("Violette TrA?A¤nke")
say("Du hast folgendes Item erhalten:")
say("")
say("")
say_item_vnum(27115)
end
elseif a == 4 then
if pc.money>=300000 then
pc.changemoney("-300000")
pc.give_item2(27112, 200)
say_title("GrA?A?ne TrA?A¤nke")
say("Du hast folgendes Item erhalten:")
say("")
say("")
say_item_vnum(27112)
send_letter("TrA?A¤nke kaufen")
end
end
end
end
end

Исправьте пару багов С Идом