Cod: Selectaţi tot

quest lingou3 begin
	state start begin
		when 20355.chat."Am lingou de 1000.000.000 Yang"	begin
			if pc.level<=5 then
				say_title("Cãpitan: ")
				say("Bine ai venit strãine, vrei sã schimbi un lingou")
				say("nu-i aºa ? prietene, ai nevoie de nivelul 5. ")
			elseif pc.countitem("80006")<1 then
				say_title("Cãpitan: ")
				say("Bine ai venit strãine, vrei sã schimbi un lingou")
				say("nu-i aºa ? prietene, ai nevoie de un lingou. ")
			elseif pc.countitem("80006")>=1 and pc.level>=5 then
				say_title("Cãpitan: ")
				say("Bine ai venit strãine, vrei sã schimbi un lingou")
				say("nu-i aºa ? Ei bine vrei sã schimbi da sau nu ?")
				local b=select("Da", "Nu")
				if 1==b then
					if pc.countitem("80006")>=1 then
						pc.removeitem("80006", 1)
						pc.change_gold(1000000000)
					end
				elseif 2==b then
					say_title("Cãpitan:")
					say("Prietene poþi veni oricând la mine sã schimbi")
					say("câte lingouri vrei.")
				else
					say("UNKNOWN BUTTON ["..b.."]")
				end
			else
				say("2")
			end
		end
	end
end

Cod: Selectaţi tot

quest system_banca begin
state start begin
when 9005.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 9005.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(500000000)

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