Cod: Selectaţi tot

quest system_banca begin
state start begin
when 20095.chat."Informatii" begin
say_title("Informatii")
say("Salutare, noi ne ocupam cu schimbarea")
say("de yang in lingouri. Oricine doreste sa")
say("schimbe yang-ul in lingouri este asteptat la noi")
say("Schimbam sume de 100 milioane, 500 milioane,")
say("un miliard si 1.5 miliarde.")
say("")
say("O zi buna!")
end

when 20095.chat."Administrare" begin
say_title("Administrare")
say("Bun venit in zona de administrare.")
say("Ce doresti sa faci ?")
local s = select("Schimba in lingou","Schimba in yang","Nimic")
if s == 3 then
return

elseif s == 1 then
say_title("Schimba in lingouri")
say("Ce suma doresti sa schimbi in lingou ?")
local v = select("100.000.000 Yang","500.000.000 Yang","1 Miliard","1.5 Miliarde","Nici una")
if s == 5 then
return

elseif v == 1 then
say_title("Confirmare")
say("Chiar doresti sa schimbi")
say("100.000.000 Yang intr-un lingou ?")
local q = select("Da", "Nu")
if q == 2 then
return

elseif pc.get_gold()<100000000 then
say_title("Schimba 100.000.000")
say("Nu ai 100.000.000 Yang.")
return
end
say_title("Felicitari")
say("Felicitari, tranzactia a reusit.")
say("Verifica in inventar.")
say("Daca apar probleme, nu ezitati")
say("sa ne contactati pe forum")
pc.give_item2(80003, 1)
pc.change_gold(-100000000)

elseif v == 2 then
say_title("Confirmare")
say("Chiar doresti sa schimbi")
say("500.000.000 Yang intr-un lingou ?")
local q = select("Da", "Nu")
if q == 2 then
return

elseif pc.get_gold()<500000000 then
say_title("Schimba 500.000.000")
say("Nu ai 500.000.000 Yang.")
return
end
say_title("Felicitari")
say("Felicitari, tranzactia a reusit.")
say("Verifica in inventar.")
say("Daca apar probleme, nu ezitati")
say("sa ne contactati pe forum")
pc.give_item2(80004, 1)
pc.change_gold(-500000000)

elseif v == 3 then
say_title("Confirmare")
say("Chiar doresti sa schimbi")
say("1.000.000.000 Yang intr-un lingou ?")
local q = select("Da", "Nu")
if q == 2 then
return

elseif pc.get_gold()<1000000000 then
say_title("Schimba 1.000.000.000")
say("Nu ai 1.000.000.000 Yang.")
return
end
say_title("Felicitari")
say("Felicitari, tranzactia a reusit.")
say("Verifica in inventar.")
say("Daca apar probleme, nu ezitati")
say("sa ne contactati pe forum")
pc.give_item2(80005, 1)
pc.change_gold(-1000000000)

elseif v == 4 then
say_title("Confirmare")
say("Chiar doresti sa schimbi")
say("1.500.000.000 Yang intr-un lingou ?")
local q = select("Da", "Nu")
if q == 2 then
return

elseif pc.get_gold()<1500000000 then
say_title("Schimba 1.500.000.000")
say("Nu ai 1.500.000.000 Yang.")
return
end
say_title("Felicitari")
say("Felicitari, tranzactia a reusit.")
say("Verifica in inventar.")
say("Daca apar probleme, nu ezitati")
say("sa ne contactati pe forum")
pc.give_item2(80006, 1)
pc.change_gold(-1500000000)
end
elseif s == 2 then
say_title("Schimba in Yang")
say("Cat doresti sa schimbi in yang ?")
local l = select("100.000.000 Yang","500.000.000 Yang","1 Miliard","1.5 Miliarde","Nimic")
if s == 5 then
return

elseif l == 1 then
say_title("Confirmare")
say("Chiar doresti sa schimbi un lingou")
say("in valoare de 100.000.000 de Yang in")
say("100.000.000 Yang ?")
local q = select("Da", "Nu")
if q == 2 then
return

elseif pc.count_item(80003) < 1 then
say_title("Schimba un lingou")
say("Nu ai un lingou in valoare de 100.000.000 yang.")
return
end
say_title("Felicitari")
say("Felicitari, tranzactia a reusit.")
say("Verifica in inventar.")
say("Daca apar probleme, nu ezitati")
say("sa ne contactati pe forum")
pc.remove_item(80003,1)
pc.give_gold(100000000)

elseif l == 2 then
say_title("Confirmare")
say("Chiar doresti sa schimbi un lingou")
say("in valoare de 500.000.000 de Yang in")
say("500.000.000 Yang ?")
local q = select("Da", "Nu")
if q == 2 then
return

elseif pc.count_item(80004) < 1 then
say_title("Schimba un lingou")
say("Nu ai un lingou in valoare de 500.000.000 yang.")
return
end
say_title("Felicitari")
say("Felicitari, tranzactia a reusit.")
say("Verifica in inventar.")
say("Daca apar probleme, nu ezitati")
say("sa ne contactati pe forum")
pc.remove_item(80004,1)
pc.give_gold(1000000000)

elseif l == 3 then
say_title("Confirmare")
say("Chiar doresti sa schimbi un lingou")
say("in valoare de 1.000.000.000 de Yang in")
say("1.000.000.000 Yang ?")
local q = select("Da", "Nu")
if q == 2 then
return

elseif pc.count_item(80005) < 1 then
say_title("Schimba un lingou")
say("Nu ai un lingou in valoare de 1.000.000.000 yang.")
return
end
say_title("Felicitari")
say("Felicitari, tranzactia a reusit.")
say("Verifica in inventar.")
say("Daca apar probleme, nu ezitati")
say("sa ne contactati pe forum")
pc.remove_item(80005,1)
pc.give_gold(1000000000)

elseif l == 4 then
say_title("Confirmare")
say("Chiar doresti sa schimbi un lingou")
say("in valoare de 1.500.000.000 de Yang in")
say("1.500.000.000 Yang ?")
local q = select("Da", "Nu")
if q == 2 then
return

elseif pc.count_item(80006) < 1 then
say_title("Schimba un lingou")
say("Nu ai un lingou in valoare de 1.500.000.000 yang.")
return
end
say_title("Felicitari")
say("Felicitari, tranzactia a reusit.")
say("Verifica in inventar.")
say("Daca apar probleme, nu ezitati")
say("sa ne contactati pe forum")
pc.remove_item(80006,1)
pc.give_gold(1500000000)
end
end
end
end
end