//===== Description: =========================================
//= NPC Quest
//============================================================

prontera.gat,145,170,4 script NPCQuest 736,{
mes "[NPC Quest]";
mes "Quieres un reloj de alquimista???";
mes "jajajaja, solo alquimistas nacionales pueden tenerlo";
next;
mes "Pero bueno, nescesito algunas cosas para practicar transmutaciones";
mes "asi que bueno, traeme esto y te dare un reloj de alquimista nacional, como el mio ^^";
next;
mes "Bueno, esto es lo que quiero:";
mes "Sage Worm Card ";
mes "Argiope Card ";
mes "Dryad Card ";
mes "Wooden Golem Card ";
mes "Bongun Card ";
mes "Pirate Skeleton Card ";
mes "Marduk Card ";
mes "Hode Card ";
mes "Elder Card ";
mes "Nightmare Terror Card";
mes "Darkness Rune ";
mes "Bloody Rune ";
mes "y 30,000 Zeny para mi...xD";
next;
mes "Quieres hacer el Quest?";
menu "si",si,"no",no;
 
si:
mes "[NPC Quest]";
mes "Bien.. vere q tienes";
if(countitem(4219)<1)goto falta;
if(countitem(4114)<1)goto falta;
if(countitem(4177)<1)goto falta;
if(countitem(4259)<1)goto falta;
if(countitem(4212)<1)goto falta;
if(countitem(4073)<1)goto falta;
if(countitem(4112)<1)goto falta;
if(countitem(4081)<1)goto falta;
if(countitem(4215)<1)goto falta;
if(countitem(4166)<1)goto falta;
if(countitem(7511)<500)goto falta;
if(countitem(7586)<500)goto falta;
if(Zeny < @cost) goto NoMake;
next;
mes "bien.. jejeje, te ganaste mi confianza!....y el reloj!";
delitem 4219,1;
delitem 4114,1;
delitem 4177,1;
delitem 4259,1;
delitem 4212,1;
delitem 4073,1;
delitem 4112,1;
delitem 4081,1;
delitem 4215,1;
delitem 4166,1;
delitem 7511,500;
delitem 7586,500;
set Zeny,Zeny –30000:
getitem 2641,1;
mes "disfrutalo!";
Close;
 
no:
mes "que pena..crei q podrias";
Close;
 
falta:
mes "lastima.. pense q querias";
mes "adios ^^";
Close;
}

prontera.gat,154,150,5 script Cambia Tamaño 670,{
// Variables
set @name$,"[^0000FFCambia Tamaño^000000]"; //Nombre Del NPC
set @costo,55000; // Precio Del Enano
set @costo2,25000; // Precio Del Normal
set @costo3,55000; // Precio Del Gigante

// Inicio del Script
mes @name$;
mes "Hola, ^0000A0 " + strcharinfo(0) + " ^000000.";
mes "Quieres Cambiar de tamaño?";
menu "Si",-,"No,gracias",L_No;

L_Si:
mes @name$;
mes "Mis Servicios son de ...";
next;
mes "^FF0000Gigante^000000 son ^00FF00" +@costo3+ "^000000 Zenys";
mes "^FF0000Enano^000000 son ^00FF00" +@costo+ "^000000 Zenys";
mes "^FF0000Normal^000000 son ^00FF00" +@costo2+ "^000000 Zenys";

switch(tamaño) {
case 0:
menu "Gigante",Gigante,"Enano",Enano,"Salir",L_No;
case 1:
menu "Gigante",Gigante,"Normal",Normal,"Salir",L_No;
case 2:
menu "Enano",Enano,"Normal",Normal,"Salir",L_No;
}

Gigante:
mes @name$;
mes "Bueno esta es tu opción asi que adelanante.";
mes "[Iniciando...]";
if(zeny <= @costo3) goto No_Zeny;
set zeny, zeny-@costo3;
next;
mes "[Cambiando...]";
next;
atcommand strcharinfo(O)+ "@size 2";
set @tamaño, 2;
mes "[...]";
next;
mes "[Cambio Completado...]";
close;

Enano:
mes @name$;
mes "Bueno esta es tu opción asi que adelanante.";
mes "[Iniciando...]";
if(zeny <= @costo) goto No_Zeny;
set zeny, zeny-@costo;
next;
mes "[Cambiando...]";
next;
atcommand strcharinfo(O)+ "@size 1";
set @tamaño, 1;
mes "[...]";
next;
mes "[Cambio Completado...]";
close;

Normal:
mes @name$;
mes "Bueno esta es tu opción asi que adelanante.";
mes "[Iniciando...]";
if(zeny <= @costo2) goto No_Zeny;
set zeny, zeny-@costo2;
next;
mes "[Cambiando...]";
next;
atcommand strcharinfo(O)+ "@size 0";
set @tamaño, 0;
mes "[...]";
next;
mes "[Cambio Completado...]";
close;

No_Zeny:
next;
mes @name$;
mes "Ohh lo siento,";
mes "mis servicios no son gratuitos,";
mes "vuelve cuando tengas para pagarme";
next;
mes "Adios!, ^0000A0 " + strcharinfo(0) + " ^000000.";
close;

L_No:
next;
mes @name$;
mes "Regresa cuando quieras cambiar de tamaño,";
mes "Adios!, ^0000A0 " + strcharinfo(0) + " ^000000.";
close;
}