Code:
quest barren begin
state start begin
when 80007.use begin
say_title("Lingou aur 1 miliard (1kkk)")
say("Valoarea acestui lingou este 1 miliard (1kkk)")
say("Ai posibilitatea sa-l transformi in yang.")
say("Lingoul va disparea,dupa ce primesti banii.")
say("")
say_reward("Esti sigur ca vrei sa-l transformi in bani?")
local s = select("Desigur,am nevoie..", "Nu")
if s == 1 and pc.count_item(80007) and pc.get_gold()<=999999999 then
pc.change_money(999999999)
pc.remove_item(80007)
elseif s == 1 and pc.get_gold()>=999999999 then
say("Ai prea mult yang in inventar!")
say("Poti purta la tine doar 2kkk (2 miliarde)!")
say_reward("Schimba-l cand ai spatiu suficient")
elseif s == 1 and pc.count_item(80007)==0 then
say("Schimbarea a reusit,esti mai bogat cu un miliard!")
say_reward("Nu ezita,cand mai ai,schimba-l in bani")
end
if s == 2 then
return
end
end
when 80005.use begin
say_title("Lingou aur 100 milioane (100kk)")
say("Valoarea acestui lingou este 100 milioane (100kk)")
say("Ai posibilitatea sa-l transformi in yang.")
say("Lingoul va disparea,dupa ce primesti banii.")
say("")
say_reward("Esti sigur ca vrei sa-l transformi in bani?")
local s = select("Desigur,am nevoie..", "Nu")
if s == 1 and pc.count_item(80005) and pc.get_gold()<=1499999999 then
pc.change_money(100000000)
pc.remove_item(80005)
elseif s == 1 and pc.get_gold()>=1499999999 then
say("Poti purta la tine doar 2kkk (2 miliarde)!")
say_reward("Schimba-l cand ai spatiu suficient!")
elseif s == 1 and pc.count_item(80005)==0 then
say("Schimbarea a reusit,esti mai bogat cu 100 miliaone!")
say_reward("Nu ezita,cand mai ai,schimba-l in bani")
end
if s == 2 then
return
end
end
when 80004.use begin
say_title("Lingou argint 50 milioane (50kk)")
say("Valoarea acestui lingou 50 milioane (50kk)")
say("Ai posibilitatea sa-l transformi in yang.")
say("Lingoul va disparea,dupa ce primesti banii.")
say("")
say_reward("Esti sigur ca vrei sa-l transformi in bani?")
local s = select("Desigur,am nevoie..", "Nu")
if s == 1 and pc.count_item(80004) and pc.get_gold()<=1899999999 then
pc.change_money(50000000)
pc.remove_item(80004)
elseif s == 1 and pc.get_gold()>=1899999999 then
say("Poti purta la tine doar 2kkk (2 miliarde)!")
say_reward("Schimba-l cand ai spatiu suficient!")
elseif s == 1 and pc.count_item(80004)==0 then
say("Schimbarea a reusit,esti mai bogat cu 50 milioane!")
say_reward("Nu ezita,cand mai ai,schimba-l in bani")
end
if s == 2 then
return
end
end
when 80006.use begin
say_title("Lingou aur 500 milioane (500kk)")
say("Valoarea acestui lingou este 500 milioane (500kk)")
say("Ai posibilitatea sa-l transformi in yang.")
say("Lingoul va disparea,dupa ce primesti banii.")
say("")
say_reward("Esti sigur ca vrei sa-l transformi in bani?")
local s = select("Desigur,am nevoie..", "Nu")
if s == 1 and pc.count_item(80006) and pc.get_gold()<=999999999 then
pc.change_money(500000000)
pc.remove_item(80006)
elseif s == 1 and pc.get_gold()>=999999999 then
say("Ai prea mult yang in inventar!")
say("Poti purta la tine doar 2kkk (2 miliarde)!")
say_reward("Schimba-l cand ai spatiu suficient")
elseif s == 1 and pc.count_item(80006)==0 then
say("Schimbarea a reusit,esti mai bogat cu 500 milioane!")
say_reward("Nu ezita,cand mai ai,schimba-l in bani")
end
if s == 2 then
return
end
end
when 80003.use begin
say_title("Lingou argint 10 milioane (10kk)")
say("Valoarea acestui lingou este 10 milioane (10kk)")
say("Ai posibilitatea sa-l transformi in yang.")
say("Lingoul va disparea,dupa ce primesti banii.")
say("")
say_reward("Esti sigur ca vrei sa-l transformi in bani?")
local s = select("Desigur,am nevoie..", "Nu")
if s == 1 and pc.count_item(80003) and pc.get_gold()<=999999999 then
pc.change_money(10000000)
pc.remove_item(80003)
elseif s == 1 and pc.get_gold()>=999999999 then
say("Ai prea mult yang in inventar!")
say("Poti purta la tine doar 2kkk (2 miliarde)!")
say_reward("Schimba-l cand ai spatiu suficient")
elseif s == 1 and pc.count_item(80003)==0 then
say("Schimbarea a reusit,esti mai bogat cu 10 milioane!")
say_reward("Nu ezita,cand mai ai,schimba-l in bani")
end
if s == 2 then
return
end
end
end
end
Tutorial instalare quest:
1. Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu nume_quest.quest .
2. Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).
3. Îl puneţi acolo (să fie .quest) şi da-ţi permisiuni 777.
4. Te loghezi în FreeBSD / putty şi scrii în felul următor: cd /usr/home/game/share/locale/germany/quest apoi ./qc nume_quest.quest
5. Intraţi pe server şi scrieţi /reload q .
6. Testaţi quest-ul .
Imagini: