prontera.gat,145,154,2	script	Homunculus	740,{
//=====A GuniX Npc Creator Script========================================
//===== Nome: =========================================================== 
//= Homunculus
//===== Por: ============================================================ 
//= GtoKnu
//===== Descrição: ====================================================== 
//= Um npc que sumona um homunculo pra você.
//= Mas se você for da classe caçador ou atirador de elite.
//= Você poderá pegar um lobo também!
//===== Emulador: =======================================================
//= Todos os Cronus
//===== Versão Atual: ===================================================
//= 1,0 
//===== Comentários: ====================================================
//= Feito por GtoKnu no GuniX [NPC Creator] feito por Hunter

set $preco_lobo,10000;		//Define o preço do lobo mude se quiser
set $preco_poring,10000;		//Define o preço do poring mude se quiser
set $preco_argiope,10000;		//Define o preço do argiope mude se quiser
set $preco_bathory,10000;		//Define o preço do bathory mude se quiser
set $preco_vocal,10000;		//Define o preço do vocal mude se quiser
set $preco_rsx,10000;		//Define o preço do RSX-0806 mude se quiser
set $preco,10000;			//Define o preço do homunculus normal mude se quiser
show "[Homunculus]";
show "Olá Jovem aventureiro gostaria de um homunculos?";
next;
show "[Homunculus]"
show "Agora os Homunculus não são mais uma vez só não!"
show "Agora os Homunculus são pagos você deseja um?."
menu "Sim",L_HOM,"Não",L_CLOSE;

L_HUNTER:
show "Ah vejo que você é da classe dos caçadores";
show "a sua classe é a única que pode utilizar um lobo.";
show "O preço do Lobo é  "+ $preco_lobo +" .";
next;
show "Você deseja o que?";
menu "Desejo um lobo",L_WOLF,"Sair",L_CLOSE;

L_APREN:
show "Ah vejo que você é um aprendiz";
show "a sua classe é a única que pode utilizar um poring.";
show "O preço do poring é  "+ $preco_poring +" .";
next;
show "Você deseja o que?";
menu "Desejo um poring",L_PORING,"Sair",L_CLOSE;

L_SIN:
show "Ah vejo que você é da classe dos gatunos";
show "a sua classe é a única que pode utilizar um Argiope.";
show "O preço do Argiope é  + $preco_argiope + .";
next;
show "Você deseja o que?";
menu "Desejo um argiope",L_ARGIOPE,"Sair",L_CLOSE;

L_MAGE:
show "Ah vejo que você é da classe dos magos";
show "a sua classe é a única que pode utilizar um Bathory.";
show "O preço do Bathory é  + $preco_bathory + .";
next;
show "Você deseja o que?";
menu "Desejo um bathory",L_BATHORY,"Sair",L_CLOSE;

L_BARD:
show "Ah vejo que você é da classe dos bardos";
show "a sua classe é a única que pode utilizar um vocal.";
show "O preço do vocal é  + $preco_vocal + .";
next;
show "Você deseja o que?";
menu "Desejo um vocal",L_VOCAL,"Sair",L_CLOSE;

L_SMITH:
show "Ah vejo que você é da classe dos Ferreiros";
show "a sua classe é a única que pode utilizar um RSX-0806.";
show "O preço do RSX-0806 é  + $preco_rsx + .";
next;
show "Você deseja o que?";
menu "Desejo um RSX-0806",L_RSX,"Sair",L_CLOSE;

L_WOLF:
next;
show "Aqui esta seu Lobo.";
if (Zeny < $preço_lobo)goto L_NOZENY
next;
atcommand strcharinfo(0)+":@summon 1092 9999";
set Zeny,Zeny- $preco_lobo ;
close;

L_RSX:
next;
show "Aqui esta seu RSX-0806.";
if (Zeny < $preço_rsx)goto L_NOZENY
next;
atcommand strcharinfo(0)+":@summon 1623 9999";
set Zeny,Zeny- $preco_rsx ;
close;

L_VOCAL:
next;
show "Aqui esta seu vocal.";
if (Zeny < $preço_vocal)goto L_NOZENY;
next;
atcommand strcharinfo(0)+":@summon 1088 9999";
set Zeny,Zeny- $preco_vocal;
close;

L_ARGIOPE:
next;
show "Aqui esta seu argiope.";
if (Zeny < $preço_argiope)goto L_NOZENY;
next;
atcommand strcharinfo(0)+":@summon 1099 9999";
set Zeny,Zeny- $preco_argiope;
close;

L_BATHORY:
next;
show "Aqui esta seu bathory.";
if (Zeny < $preço_bathory)goto L_NOZENY;
next;
atcommand strcharinfo(0)+":@summon 1102 9999";
set Zeny,Zeny- $preco_bathory;
close;

L_PORING:
next;
show "Aqui esta seu porinng.";
next;
if (Zeny < $preço_poring)goto L_NOZENY;
atcommand strcharinfo(0)+":@summon 1002 9999";
set Zeny,Zeny- $preco_poring ;
close;

L_HOM:
if(Class == 0)goto L_APREN;
if(Class == 2)goto L_MAGE;
if(Class == 9)goto L_MAGE;
if(Class == 19)goto L_BARD;
if(Class == 4020)goto L_BARD;
if(Class == 16)goto L_MAGE;
if(Class == 4010)goto L_MAGE;
if(Class == 4017)goto L_MAGE;
if(Class == 4011)goto L_SMITH;
if(Class == 10)goto L_SMITH;
if(Class == 6) goto L_SIN
if(Class == 17) goto L_SIN
if(Class == 4018) goto L_SIN
if(Class == 12) goto L_SIN
if(Class == 4013) goto L_SIN
if(Class == Job_Hunter) goto L_HUNTER;
if(Class == Job_Sniper) goto L_HUNTER;
show "Aqui estão suas habilidades de homunculos.";
show "E seu embrião.";
addskill 3,243,244,247;
additem,7142,1;
close;

L_NOZENY:
next;
show "Você não tem dinheiro o suficiente!";
show "Estava tentando me enganar?"
close;

L_CLOSE:
next;
show "Então você quem sabe.";
show "Tchau!";
close;
}