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: