xxbasuraxx Publicado 17 de Marzo del 2014 Reportar Compartir Publicado 17 de Marzo del 2014 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 Citar Enlace para comentar Compartir en otros sitios Mas opciones de compartir...
Alerhcp Publicado 18 de Marzo del 2014 Reportar Compartir Publicado 18 de Marzo del 2014 como se implementan como hacer para que te queda una mision al costado del pj como las demas misiones Citar Enlace para comentar Compartir en otros sitios Mas opciones de compartir...
Stiven. Publicado 24 de Marzo del 2014 Reportar Compartir Publicado 24 de Marzo del 2014 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? Citar Enlace para comentar Compartir en otros sitios Mas opciones de compartir...
Mensajes recomendados
Unirse a la conversación
Puedes publicar ahora y registrarte más tarde. Si tienes una cuenta, regístrate para publicar con su cuenta.