quest banca begin
	state start begin
		when letter begin
			send_letter("Banca Portatile")
		end
		when button or info begin
			say_title("Banca - Menu Principale")
			say("Benvenuto "..pc.get_name()..".[ENTER]")
			say_reward("Il tuo saldo attuale e': "..banca.ReadAccount().." Yang[ENTER]")
			say("Seleziona l'operazione:[ENTER]")
			local scelta = select("Lingotti","Banca","Annulla")
			if scelta == 3 then
				send_letter("Banca Portatile")
			return
			elseif scelta == 1 then
				say_title("Scambia Lingotti")
				say ( "Ciao " )
				say ( "Come dici?" )
				say ( "Vorresti scambiare del denaro con dei Lingotti? " )
				say ( "Certamente! Aspettami qui !" )
			elseif scelta == 2 then
				say_title("Banca - Menu Principale")
				say("Benvenuto "..pc.get_name()..".[ENTER]")
				say_reward("Il tuo saldo attuale e': "..banca.ReadAccount().." Yang[ENTER]")
				say("Seleziona l'operazione:[ENTER]")
			end
				local s = select("Gestisci PIN","Deposita","Ritira","Invia Yang","Annulla")
					if s == 5 then
						send_letter("Banca Portatile")
					return