function bool CheckMonsterlist(ScriptPawn ScriptPawn,out int MonsterNumber)
{
Local Int i;

VasDebug (" CheckMonsterlist Started",2);

  for(i=1;i<=50;i++)
  {
   if (MonsterName[i] == "")
       continue;
    if (ScriptPawn.IsA(Name(MonsterName[i])))
       {
       MonsterNumber = i;
       return True;
       }
  }
  Return False;
}