-	script	eggrepair_atcommand	-1,{
OnInit:
	bindatcmd "eggrepair",strnpcinfo(3)+"::OnDo";
	end;
OnDo:

set $npcname$,"[Egg Fixer]";
mes $npcname$;
mes "Hey, I can fix your broken Pet/Pokemon Eggs!! But make sure to not have multiple of the same egg in your Inventory! Only the broken Egg!";
mes "Make sure you have the ITEM ID ready!";
next;
mes "Would you like to repair the broken egg?";
menu "Yes",y_ex,"No",n_ex,"ITEM ID of eggs",n_eggs;

y_ex:
	mes "Input the Item id of the egg you want to get fixed. This will delete the current egg and replace it with a new one!";
input @petid;
next;	
	mes "*Checking the Item*";
next;
	if (countitem(@petid) <= 0)
		{ mes "You don't have that Item"; close;}
	delitem @petid,1;
	getitem @petid,1;
mes $npcname$;
mes "Your Egg has been restored.";
soundeffect "healsound.wav", 0;
close;

n_ex:
mes "Please come again.";
close;

n_eggs:
next;
mes "I will now get the ITEM IDs of the eggs in your inventory.";
next;
set @charAccNumber,getcharid(0,strcharinfo(0));
query_sql "SELECT `nameid` FROM `inventory` WHERE `card0`='-256' AND `char_id`="+@charAccNumber, @name;
mes "Pokemon Egg IDs:";
for (set .@i,0; .@i < getarraysize(@name); set .@i,.@i+1) {
	mes (.@i+1) + ". " + getitemname(@name[.@i]) + " ("+ @name[.@i] +")";
}
close;



}