prontera,155,181,5	script	Sample	757,{
setarray .@MonsterID[0],1002,1002,1002,1002;

mes "What you want to summon ?";
for( set .@i,0; .@i < getarraysize( .@MonsterID ); set .@i,.@i + 1;
	set .@Menu$,.@Menu$ + getmonsterinfo( .@MonsterID[.@i],0 )+":";
set .@i,select( .@Menu$ ) - 1;
mes "Summon "+getmonsterinfo( .@MonsterID[.@i],0 )+"?";
if( select("YES:NO") == 1 ){
	monster strcharinfo(3),-1,-1,"--ja--",.@MonsterID[.@i],1,strnpcinfo(0)+"::OnKilled";
}
close;

OnKilled: end;
OnPCLogoutEvent:
OnPCDieEvent:
	if( strcharinfo(3) == "prontera" )
		killmonster "prontera",strnpcinfo(0)+"::OnKilled";
	end;
}