Register for your free account! | Forgot your password?

You last visited: Today at 06:23

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement


Advertise with us!

[QUEST] Exchange Bank yang/ingot

Discussion on [QUEST] Exchange Bank yang/ingot within the Metin2 PServer Guides & Strategies forum part of the Metin2 Private Server category.

Reply
 
Old   #1
 
qAleXso's Avatar
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Feb 2012
Posts: 185
Received Thanks: 127
[QUEST] Exchange Bank yang/ingot

Hi, I created a quest to change the yang/ingot.
It is very simple.
Quest in EN
Code:
quest system_banca begin
	state start begin
		when 20095.chat."Informations" begin
			say_title("Informations")
			say("Hello, we are those who change")
			say("yang in bullions. Who wish to")
			say("to change yang in bullions is awaited at us")
			say("We change amounts of 100 kk, 500 kk, ")
			say("1 kkk and 1.5 kkk.")
			say("")
			say("Have a nice day!")
		end
		
		when 20095.chat."Administration" begin
			say_title("Administration")
			say("Welcome in the administration zone.")
			say("What you want to do ?")
			local s = select("Change in bullion","Change in yang","Nothing")
				if s == 3 then
					return
				
				elseif s == 1 then
					say_title("Change in bullion")
					say("How much you wish to change in bullion ?")
					local v = select("100 kk Yang","500 kk Yang","1 kkk","1.5 kkk","Nothing")
						if s == 5 then
							return
						
						elseif v == 1 then
							say_title("Confirmation")
							say("Do you want to change")
							say("100 kk Yang in a bullion ?")
							local q = select("Yes", "Nu")
								if q == 2 then
									return
								
									elseif pc.get_gold()<100000000 then
										say_title("Change 100 kk")
										say("You don't have 100 kk Yang.")
										return
								end
							say_title("Congratulations")
							say("Congratulations, the tranzaction is complete.")
							say("Check in inventory.")
							say("If the problems appear, don't hesitate")
							say("to contact us on forum")
							pc.give_item2(80003, 1)
							pc.change_gold(-100000000)
						
						elseif v == 2 then
						say_title("Confirmation")
							say("Do you want to change")
							say("500 kk Yang in a bullion ?")
							local q = select("Yes", "No")
								if q == 2 then
									return
								
									elseif pc.get_gold()<500000000 then
										say_title("Change 500 kk")
										say("You don't have 500 kk Yang.")
										return
								end
							say_title("Congratulations")
							say("Congratulations, the tranzaction is complete.")
							say("Check in inventory.")
							say("If the problems appear, don't hesitate")
							say("to contact us on forum")
							pc.give_item2(80004, 1)
							pc.change_gold(-500000000)
							
						elseif v == 3 then
						say_title("Confirmation")
							say("Do you want to change")
							say("1 kkk Yang in a bullion ?")
							local q = select("Yes", "No")
								if q == 2 then
									return
								
									elseif pc.get_gold()<1000000000 then
										say_title("Change 1 kkk")
										say("You don't have 1 kkk Yang.")
										return
								end
							say_title("Congratulations")
							say("Congratulations, the tranzaction is complete.")
							say("Check in inventory.")
							say("If the problems appear, don't hesitate")
							say("to contact us on forum")
							pc.give_item2(80005, 1)
							pc.change_gold(-1000000000)
						
						elseif v == 4 then
						say_title("Confirmation")
							say("Do you want to change")
							say("1.5 kkk Yang in a bullion ?")
							local q = select("Yes", "No")
								if q == 2 then
									return
								
									elseif pc.get_gold()<1500000000 then
										say_title("Schimba 1.500.000.000")
										say("You don't have 1.5 kkk Yang.")
										return
								end
							say_title("Congratulations")
							say("Congratulations, the tranzaction is complete.")
							say("Check in inventory.")
							say("If the problems appear, don't hesitate")
							say("to contact us on forum")
							pc.give_item2(80006, 1)
							pc.change_gold(-1500000000)
						end
					elseif s == 2 then
						say_title("Change in Yang")
						say("How much you want to change in Yang ?")
						local l = select("100 kk Yang","500 kk Yang","1 kkk","1.5 kkk","Nothing")
							if s == 5 then
								return
							
							elseif l == 1 then
								say_title("Confirmation")
								say("Do you want to change a bullion")
								say("with 100 kk Yang valor in")
								say("100 kk Yang ?")
								local q = select("Yes", "No")
									if q == 2 then
										return
								
									elseif pc.count_item(80003) < 1 then
										say_title("Change a bullion")
										say("You don't have a bullion with 100 kk yang valor.")
										return
									end
								say_title("Congratulations")
								say("Congratulation, the tranzaction is complete.")
								say("Check in inventory.")
								say("If the problems appear, don't hesitate")
								say("to contact us on forum")
								pc.remove_item(80003,1)
								pc.give_gold(100000000)
							
							elseif l == 2 then
								say_title("Confirmation")
								say("Do you want to change a bullion")
								say("with 500 kk Yang valor in")
								say("500 kk Yang ?")
								local q = select("Yes", "No")
									if q == 2 then
										return
								
									elseif pc.count_item(80004) < 1 then
										say_title("Change a bullion")
										say("You don't have a bullion with 500 kk Yang valor.")
										return
									end
								say_title("Congratulations")
								say("Congratulations, the tranzaction is complete.")
								say("Check in inventory.")
								say("If the problems appear, don't hesitate")
								say("to contact us on forum")
								pc.remove_item(80004,1)
								pc.give_gold(1000000000)
							
							elseif l == 3 then
								say_title("Confirmation")
								say("Do youw want to change a bullion")
								say("with 1kkk Yang valor in")
								say("1 kkk Yang ?")
								local q = select("Yes", "No")
									if q == 2 then
										return
								
									elseif pc.count_item(80005) < 1 then
										say_title("Change a bullion")
										say("You don't have a bullion with 1 kkk Yang valor.")
										return
									end
								say_title("Congratulations")
								say("Congratulations, the tranzaction is complete.")
								say("Check in inventory.")
								say("If the problems appear, don't hesitate")
								say("to contact us on forum")
								pc.remove_item(80005,1)
								pc.give_gold(1000000000)
								
							elseif l == 4 then
								say_title("Confirmation")
								say("Do you want to change a bullion")
								say("with 1.5 kkk Yang valor in")
								say("1.5 kkk Yang ?")
								local q = select("Yes", "No")
									if q == 2 then
										return
								
									elseif pc.count_item(80006) < 1 then
										say_title("Change a bullion")
										say("You don't have a bullion with 1.5 kkk Yang valor.")
										return
									end
								say_title("Congratulations")
								say("Congratulations, the tranzaction is complete.")
								say("Check in inventory.")
								say("If the problems appear, don't hesitate")
								say("to contact us on forum")
								pc.remove_item(80006,1)
								pc.give_gold(1500000000)
							end
					end
				end
			end
		end
Quest in RO
Code:
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
qAleXso is offline  
Thanks
3 Users
Old 05/31/2013, 09:08   #2
 
elite*gold: 260
The Black Market: 1/0/0
Join Date: Jan 2013
Posts: 178
Received Thanks: 104
Thank you.

keep it up!
Metin2 Team is offline  
Old 06/01/2013, 09:26   #3
 
qAleXso's Avatar
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Feb 2012
Posts: 185
Received Thanks: 127
Quote:
Originally Posted by Metin2 Team View Post
Thank you.

keep it up!
I'm glad you like it
qAleXso is offline  
Old 06/01/2013, 12:57   #4


 
Benhero's Avatar
 
elite*gold: 964
The Black Market: 24/0/0
Join Date: Mar 2008
Posts: 2,629
Received Thanks: 1,636
does it checks of it give a Yang bug? (abbout 2.000.000.000 Yang -> 0 Yang)? Or give it only the Money to you ? I see it give you a Bug.

Greatz Benhero
Benhero is offline  
Old 06/01/2013, 13:17   #5

 
kovuus's Avatar
 
elite*gold: 0
The Black Market: 60/0/0
Join Date: Apr 2013
Posts: 6,303
Received Thanks: 1,583
Thank you for share this quest with Epvp. It looks good and if I have time I will test your quest =) Make more quests, and you will make in futhertime perfect quests.

Sincerly,
Strike™
kovuus is offline  
Reply

Tags
bank, ingot, yang

« [Umfrage]Aion Like interface usw Releasen ? bzw ist es Puplic ?! | [Release] Kleines .PSD Bild »

Similar Threads Similar Threads
Exchange-Service WM/Bank/Paypal/Liqpay
04/03/2012 - Trading - 10 Replies
Hallo, ich möchte ab sofort meinen Exchange-Service für Webmoney (WMZ,WMR), Bank (auch SEPA), Paypal und Liqpay anbieten. Auf Wunsch kann natürlich ein eigener Middle-Man genutzt werden. Ich wechsele unter anderem: Paypal <-> WMZ/WMR/WME Bank (SEPA) <-> WMZ/WMR/WME
Exchange Ap , Lr , Wmz , Mb , Psc , Ukash , Bank Wire , Wester Union , Neteller.
01/30/2012 - Trading - 1 Replies
I exchange this e-curreny: > Paypal > Liberity Reserv > Alertpay > Ukash > Webmoney > Bank Wire > Paysafecards > Wester union > Neteller
Exchange Ap , Lr , Wmz , Mb , Psc , Ukash , Bank Wire , Wester Union , Neteller.
11/01/2011 - Trading - 0 Replies
I exchange this e-curreny: > Paypal > Liberity Reserv > Alertpay > Ukash > Webmoney > Bank Wire > Paysafecards > Wester union > Neteller



All times are GMT +2. The time now is 06:23.

elitepvpers - play less, get more - Top

Powered by vBulletin®
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2024 elitepvpers All Rights Reserved.