Cod: Selectaţi tot

quest barren begin
    state start begin
    
                when 80007.use begin
                say_title("Lingou aur 1.5 miliard (1.5kkk)")
                say("Valoarea acestui lingou este 1.5 miliard (1.5kkk)")
                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()<=1499999999 then
                pc.change_money(1499999999)
                pc.remove_item(80007)
                elseif s == 1 and pc.get_gold()>=1499999999 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 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(80005) and pc.get_gold()<=1499999999 then
                pc.change_money(500000000)
                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 500 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 (100kk)")
                say("Valoarea acestui lingou 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(80004) and pc.get_gold()<=1899999999 then
                pc.change_money(10000000)
                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 100 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 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(80006) and pc.get_gold()<=999999999 then
                pc.change_money(1000000000)
                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 1 miliard!")
                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 50 milioane (50kk)")
                say("Valoarea acestui lingou este 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(80003) and pc.get_gold()<=999999999 then
                pc.change_money(50000000)
                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 50 milioane!")
                say_reward("Nu ezita,cand mai ai,schimba-l in bani")
                end
    
                if s == 2 then
                return
                end
            end
           end 
    end