[QUEST]Banco y Prestamos

[xxbasuraxx]

Esta mision ya existe, solo la actualice para que se consignara y retirara cualquier valor, tambien agrege un sistema de prestamos, que aumenta en 1kk cada vez que se pague el prestamo anteriror + 10 %

 

PD:Gracias por las guias pude hacer esto

 

quest nuevoBanco begin	state start begin		when 20094.chat."Banco" begin						local maximoYang = 1999999999			say_title("Banco Metin2")			say("Bienvenido "..pc.getname() )			local menu=select("Retirar","Consignar","Saldo","Prestamos","Salir")			if menu == 5 then				say("Hasta Luego")				return			elseif menu == 1 then				if pc.getqf("banco") == 0 then					say("No tiene yang en el banco")				else					say_title("Banco Metin2:")					say("Saldo Disponible : $ ".. pc.getqf("banco") .." Yang")					say("Ingresa El Valor a Retirar : ")					local cantidad = tonumber(input())					if cantidad == "" then						say_title("Banco Metin2:")						say("No se Pudo Completar La Transaccion") 						say("Por Que No Ingresaste Un Valor")					elseif cantidad < 0 then						say_title("Banco Metin2:")						say("No se Pudo Completar La Transaccion")						say("Por Que No Ingresaste Un Valor")					elseif (cantidad) <= pc.getqf("banco")  and (pc.get_money()+cantidad) <= maximoYang then						pc.setqf("banco",pc.getqf("banco")-(cantidad))						pc.change_money(cantidad)						say_title("Banco Metin2:")						say("Transaccion Exitosa")					else						say_title("Banco Metin2:")						say("Saldo Insuficiente.")						say("Solo puedes Retirar ".. pc.getqf("banco"))										end					end			elseif menu == 2 then				if pc.get_money() < 1000000 then					say_title("Banco Metin2:")					say("Debes Tener minimo $1.000.000 Para Usar EL Banco")				else					say_title("Banco Metin2:")					say("Dinero Disponible : $ ".. pc.get_money() .." Yang")					say("Ingrese La Cantidad a Consignar:")					local yang = tonumber(input())					if yang == "" then						say_title("Banco Metin2:")						say("No se Pudo Completar La Transaccion")						say("Por Que No Ingresaste Un Valor")					elseif yang < 0 then						say_title("Banco Metin2:")						say("No se Pudo Completar La Transaccion")						say("Por Que No Ingresaste Un Valor")					elseif yang > pc.get_money() then						say_title("Banco Metin2:")						say("No Tienes Suficiente Dinero")					else						pc.setqf("banco",pc.getqf("banco")+(yang))						pc.change_money(-yang)						say_title("Banco Metin2:")						say("Transaccion Exitosa")										end										end			elseif menu == 3 then				say_title("Banco Metin2:")				say("Saldo Disponible: $ ".. pc.getqf("banco") .." Yang")			elseif menu == 4 then				if pc.getqf("prestamo") == 0  then					if pc.getqf("numPrestamo") >= 0 then						say_title("Banco Metin2")						say("Es tu Prestamo # "..(pc.getqf("numPrestamo")+1))						local valor = 1000000*pc.getqf("numPrestamo")						say("Tu Prestamo Es de : $ "..valor.."de Yang")						local opcion = select("Aceptar","Cancelar")						if opcion == 1 then							say_title("Banco Metin2")							say("Tu Prestamo se Completo con Exito")							pc.change_money(valor)							pc.setqf("numPrestamo",pc.getqf("numPrestamo")+1)							pc.setqf("prestamo",pc.getqf("prestamos")+valor)						else							say_title("Banco Metin2")							say("Hasta Luego")							return						end					end				else					local valopagar = pc.getqf("prestamo")*1.10					local valorpedido = pc.getqf("prestamo")					say_title("Banco Metin2")					say("Tienes Un Prestamo Por Pagar de : $ ")					say(" mas un interes del 10%")					say("Por valor de $ "..valopagar)					local sgte = select("Pagar","NO Pagar")					if sgte == 1 then						if pc.get_money() >= valopagar then														pc.change_money(-valopagar)							pc.setqf("prestamo",pc.getqf("prestamo")-valorpedido)							say_title("Banco Metin2")							say("Prestamo Pagado Exitosamente")						else							say_title("Banco Metin2")							say("No Tienes Suficiente Dinero")						end					end				end			end		end	endend

[Alerhcp]

como se implementan como hacer para que te queda una mision al costado del pj como las demas misiones

[Stiven.]

No entiendo como funcionan los prestamos , alguien es tan amable y me explica ?

 

Pd: Como hacen para que los user no se aprovechen de esto?