// [==================================================] // [=========== Banquero ===========] // [==================================================] // [ Versión 10 ] // [==================================================] // [ Script original: Ivion ] // [==================================================] // [ Descripción: ] // [ ] // [ - Banco. ] // [ - Almacén. ] // [ - Alquiler de Carros. ] // [ - Kafra de la quest de Merchant. ] // [==================================================] // [ 5 últimas actualizaciones: ] // [ ] // [ v6: [Ivion] ] // [ - Arreglado bug del alquiler de carros. ] // [ ] // [ v7: [Ivion] ] // [ - Movido el npc del mercado. ] // [ ] // [ v8: [Ivion] ] // [ - Arreglado y actualizado con nuevas variables. ] // [ - Quitado el warp al mercado. ] // [ - Este npc a partir de ahora será el "Banquero". ] // [ ] // [ v9: [Ivion] ] // [ - Arreglados los duplicados. ] // [ - Recolocados los npcs. ] // [ - Nuevo estilo de comentarios. ] // [ - Retirados los cutins para los pcs lentos. ] // [ - Arreglados algunos nombres. ] // [ - Nuevo sistema de precios. ] // [ - Añadida configuración de nombre del npc. ] // [ ] // [ v10: [Ivion] ] // [ - Nuevos menus. ] // [ - Nuevas variables #. ] // [ - Reescrita la función del banco. ] // [ - Nueva opción para enviar dinero desde el banco.] // [ - Añadido Guild storage. ] // [ - Bugfix: Nombres de los duplicados. ] // [ - Bugfix: Nombre en las conversaciones. ] // [ - Recolocados los npcs. ] // [==================================================] // [ ¡Importante!: ] // [ ] // [ - Revisar las opciones de configuración. ] // [ - Activar este npc en ./npc/scripts_athena.txt ] // [ - Configurar en ./conf/script_athena.txt: ] // [ event_script_type: 1 ] // [==================================================] // [==================================================] - script ME_Configuracion -1,{ OnInit: // [==================================================] // [ Configuración: ] // [ ] // General: set $@MEconf[0],1; // Intereses que recibes en el banco cada día. (%) // Precios: (zenys) set $@MEzeny[0],200; // Precio del Almacén. set $@MEzeny[1],200; // Precio del Almacén de la Guild. set $@MEzeny[2],5000; // Precio del alquiler de carros. // [ ] // [==================================================] // [==================================================] end; } // npcs: - script ::ME -1,{ set .@a$,"^008888Banquero^000000"; mes .@a$; mes "Hola."; mes "¿En qué puedo ayudarte?"; next; while (.@a <= 2) { if (.@a == 0) set .@b$[0],"Acceder al Almacén."; if ((.@a == 1) && (getcharid(2))) set .@b$[1],"Acceder al Almacén de la Guild."; if ((.@a == 2) && (getskilllv(39)) && (checkcart() == 0)) set .@b$[2],"Alquilar un Carro."; if (($@MEzeny[.@a] > 0) && (.@b$[.@a] != "")) { if (Zeny < $@MEzeny[.@a]) set .@b$[.@a],"^BBBBBB"+.@b$[.@a]+" ^880000("+$@MEzeny[.@a]+" z)^000000"; else set .@b$[.@a],.@b$[.@a]+" ^00AA66("+$@MEzeny[.@a]+" z)^000000"; } set .@a,(.@a + 1); } set .@a,prompt("^aa0000Salir^000000","Acceder al Banco.",.@b$[0],.@b$[1],.@b$[2]); mes .@a$; if ((.@a == 1) || (.@a == 255)) goto OnEnd; if (.@a == 2) { set .@a,(((gettimetick(2) - #MEt) * $@MEconf[0] * MEz) / (60 * 60 * 24 * 100)); if (.@a > 0) { set #MEz,(#MEz + .@a); set #MEt,gettimetick(2); } mes "Los Intereses actuales del banco son del "+$@MEconf[0]+"%."; mes "En estos momentos dispones de "+#MEz+" zenys en el banco."; mes "¿Qué acción deseas realizar?"; next; cleararray .@b$[0],"",3; if (#MEz > 0) { set .@b$[0],"Sacar dinero."; set .@b$[1],"Realizar una Transferencia."; } set .@a,prompt("^aa0000Salir^000000","Ingresar dinero.",.@b$[0],.@b$[1]); mes .@a$; if ((.@a == 1) || (.@a == 255)) goto OnEnd; if (.@a == 2) { mes "Selecciona la cantidad de dinero que quieres ingresar en el banco."; next; input .@a; mes .@a$; if (.@a > Zeny) set .@a,Zeny; if (.@a == 0) goto OnEnd; set #MEz,(#MEz + .@a); set Zeny,(Zeny - .@a); emotion 8; mes "Muy bien."; mes "Tu dinero ha sido ingresado en el banco."; close; } if (.@a == 3) { mes "Selecciona la cantidad de dinero que deseas sacar del banco."; next; input .@a; mes .@a$; if (.@a > #MEz) set .@a,#MEz; if (.@a == 0) goto OnEnd; set #MEz,(#MEz - .@a); set Zeny,(Zeny + .@a); emotion 8; mes "Muy bien."; mes "Aquí tienes tu dinero."; close; } mes "¿Cuanto dinero deseas transferir?"; next; input .@a; mes .@a$; if (.@a > #MEz) set .@a,#MEz; if (.@a == 0) goto OnEnd; mes "¿A qué jugador deseas transferir el dinero?"; mes "Recuerda que sólo podrás enviar dinero a un jugador que se encuentre actualmente conectado."; next; input .@b$; set .@b,getcharid(3,.@b$); mes .@a$; if (.@b == 0) { mes "Lo siento."; mes .@b$+" no se encuentra actualmente conectado."; emotion 17; close; } set .@c,getcharid(3); set #MEz,(#MEz - .@a); attachrid(.@b); set .@d,(((gettimetick(2) - #MEt) * $@MEconf[0] * MEz) / (60 * 60 * 24 * 100)); set #MEt,gettimetick(2); set #MEz,(#MEz + .@a + .@d); announce rid2name(.@c)+" ha transferido "+.@a+" zenys a tu cuenta bancaria.",bc_self,0x00CC33; attachrid(.@c); emotion 8; mes "Muy bien."; mes "Tu dinero ha sido transferido con éxito."; close; } set .@a,(.@a - 3); if ((.@a == 0) || (compare(.@b$[.@a],"Acceder al Almacén de la Guild."))) { if (Zeny < $@MEzeny[.@a]) { mes "Lo siento."; mes "Para acceder al Almacén deberás pagar ^880000"+$@MEzeny[.@a]+"^000000 zenys."; emotion 40; close; } set Zeny,(Zeny - $@MEzeny[.@a]); mes "Muy bien."; mes "Ahora te abro el Almacén..."; close2; if (.@a == 0) openstorage; if (.@a == 1) { set .@a,guildopenstorage(); if (.@a == 1) { mes .@a$; mes "Lo siento."; mes "Otro miembro de tu Guild está utilizando el Almacén en este momento."; mes "Vuelve a intentarlo dentro de un rato."; emotion 17; close; } } end; } if (Zeny < $@MEzeny[2]) { mes "Lo siento."; mes "Para alquilar un Carro deberás pagar ^880000"+$@MEzeny[2]+"^000000 zenys."; emotion 40; close; } set Zeny,(Zeny - $@MEzeny[2]); mes "Muy bien."; mes "Aquí tienes tu carro."; setcart 1; mes "Espero que hagas un buen uso de él."; close; OnEnd: mes "Hasta pronto."; emotion 15; close; // He añadido estas líneas para renombrar las antiguas variables. En futuras versiones será eliminado. OnPCLoginEvent: if (##ME_Dinero) { set #MEz,##ME_Dinero; set ##ME_Dinero,0; } if (##ME_Tiempo) { set #MEt,##ME_Tiempo; set ##ME_Tiempo,0; } end; } alberta.gat,195,140,4 duplicate(ME) Banquero#2 897 alberta.gat,49,250,5 duplicate(ME) Banquero#1 897 aldebaran.gat,133,118,6 duplicate(ME) Banquero#3 897 aldebaran.gat,133,238,6 duplicate(ME) Banquero#5 897 amatsu.gat,243,281,6 duplicate(ME) Banquero#6 897 amatsu.gat,207,102,4 duplicate(ME) Banquero#7 897 amatsu.gat,101,259,4 duplicate(ME) Banquero#8 897 ayothaya.gat,212,206,4 duplicate(ME) Banquero#9 897 ayothaya.gat,157,80,4 duplicate(ME) Banquero#10 897 comodo.gat,181,331,4 duplicate(ME) Banquero#11 897 comodo.gat,205,114,4 duplicate(ME) Banquero#12 897 comodo.gat,318,180,4 duplicate(ME) Banquero#13 897 comodo.gat,34,220,6 duplicate(ME) Banquero#14 897 einbech.gat,66,94,6 duplicate(ME) Banquero#15 897 einbech.gat,131,247,6 duplicate(ME) Banquero#16 897 einbech.gat,40,201,8 duplicate(ME) Banquero#17 897 einbroch.gat,58,204,6 duplicate(ME) Banquero#18 897 einbroch.gat,151,316,6 duplicate(ME) Banquero#19 897 einbroch.gat,152,51,4 duplicate(ME) Banquero#20 897 einbroch.gat,247,239,2 duplicate(ME) Banquero#21 897 geffen.gat,113,63,6 duplicate(ME) Banquero#22 897 geffen.gat,41,109,6 duplicate(ME) Banquero#23 897 geffen.gat,124,179,4 duplicate(ME) Banquero#24 897 geffen.gat,169,123,6 duplicate(ME) Banquero#25 897 gonryun.gat,152,112,6 duplicate(ME) Banquero#26 897 gonryun.gat,170,181,2 duplicate(ME) Banquero#27 897 gonryun.gat,155,17,6 duplicate(ME) Banquero#28 897 hugel.gat,101,132,4 duplicate(ME) Banquero#29 897 hugel.gat,177,172,4 duplicate(ME) Banquero#30 897 izlude.gat,121,96,6 duplicate(ME) Banquero#31 897 lighthalzen.gat,209,97,6 duplicate(ME) Banquero#33 897 lighthalzen.gat,218,324,4 duplicate(ME) Banquero#34 897 lighthalzen.gat,310,305,4 duplicate(ME) Banquero#35 897 louyang.gat,205,104,6 duplicate(ME) Banquero#36 897 louyang.gat,46,264,8 duplicate(ME) Banquero#37 897 xmas.gat,159,109,4 duplicate(ME) Banquero#38 897 xmas.gat,139,308,6 duplicate(ME) Banquero#39 897 morocc.gat,166,78,4 duplicate(ME) Banquero#40 897 morocc.gat,45,174,4 duplicate(ME) Banquero#41 897 morocc.gat,166,291,4 duplicate(ME) Banquero#42 897 morocc.gat,277,197,8 duplicate(ME) Banquero#43 897 moscovia.gat,238,194,4 duplicate(ME) Banquero#44 897 moscovia.gat,159,62,4 duplicate(ME) Banquero#45 897 niflheim.gat,27,157,6 duplicate(ME) Banquero#46 897 niflheim.gat,200,186,4 duplicate(ME) Banquero#47 897 payon.gat,213,74,6 duplicate(ME) Banquero#48 897 payon.gat,162,49,2 duplicate(ME) Banquero#49 897 payon.gat,232,318,4 duplicate(ME) Banquero#50 897 prontera.gat,164,174,4 duplicate(ME) Banquero#51 897 prontera.gat,146,104,6 duplicate(ME) Banquero#52 897 prontera.gat,38,212,6 duplicate(ME) Banquero#53 897 prontera.gat,261,213,4 duplicate(ME) Banquero#54 897 rachel.gat,37,131,6 duplicate(ME) Banquero#55 897 rachel.gat,135,47,4 duplicate(ME) Banquero#56 897 rachel.gat,150,142,4 duplicate(ME) Banquero#57 897 rachel.gat,262,136,4 duplicate(ME) Banquero#58 897 umbala.gat,163,251,4 duplicate(ME) Banquero#59 897 umbala.gat,119,129,8 duplicate(ME) Banquero#60 897 veins.gat,207,235,4 duplicate(ME) Banquero#61 897 veins.gat,156,62,6 duplicate(ME) Banquero#62 897 veins.gat,222,354,4 duplicate(ME) Banquero#63 897 yuno.gat,175,91,4 duplicate(ME) Banquero#64 897 yuno.gat,66,205,4 duplicate(ME) Banquero#65 897 // [==================================================] // [==================================================]