/*==========================================
* Changes an Homunculus into Homunculus S. [Masao]
*------------------------------------------*/
BUILDIN_FUNC(homunculus_evolutions)
{
TBL_PC *sd;
sd = script_rid2sd(st);
if( sd == NULL )
return 0;
if(merc_is_hom_active(sd->hd))
{
if ((sd->hd->homunculus.level > 98) && (hd->homunculus.class_ == hd->homunculusDB->evo_class))
if( script_hasdata(st,2) )
id = script_hasdata(st,2)
merc_hom_evolution(sd->hd->id);
else
merc_hom_evolution(sd->hd);
else
clif_emotion(&sd->hd->bl, E_SWT);
}
return 0;
}