function getskilllist(me)
  var mytemplate := lower(GetObjProperty(me, "MerchantType"));
  case(mytemplate)
    "healer":           return { "spiritspeaking", "healing", "anatomy", "camping", "fishing", "forensic evaluation" };
    "stable":           return { "animal lore", "animal taming", "veterinary" };
    "shipWright":       return { "wrestling", "tactics" };
    "fisherman":        return { "fishing", "fencing" };
    "innkeeper":        return { "fencing", "tactics" };
    "farmer":           return { "swordsmanship", "animal lore", "herding", "veterinary" };
    "weaponsmith":      return { "swordsmanship", "arms lore", "blacksmithy", "mining", "parrying", "tactics" };
    "blacksmith":       return { "swordsmanship", "arms lore", "blacksmithy", "mining", "parrying", "tactics" };
    "Armorer":          return { "mace fighting", "arms lore", "blacksmithy", "mining", "parrying", "tactics" };
    "barkeep":          return { "mace fighting", "tactics" };
    "barmaid":          return { "fencing", "tactics" };
    "baker":            return { "wrestling", "cooking" };
    "tinker":           return { "fencing", "alchemy", "lockpicking", "tinkering" };
    "bard":             return { "fencing", "discordance", "musicianship", "provocation", "peacemaking" };
    "butcher":          return { "mace fighting", "cooking", "taste identification" };
    "cobbler":          return { "swordsmanship", "tailoring" };
    "jeweler":          return { "fencing", "item identification" };
    "mage":             return { "mace fighting", "resisting spells", "inscription", "magery", "meditation", "wrestling" };
    "wizard":           return { "mace fighting", "resisting spells", "inscription", "wizardry", "meditation", "wrestling" };
    "necromance":       return { "mace fighting", "resisting spells", "inscription", "necromancy", "meditation", "wrestling" };
    "Alchemist":        return { "resisting spells", "taste identification", "alchemy", "wrestling" };
    "herbalist":        return { "resisting spells", "alchemy", "cooking", "taste identification", "wrestling" };
    "tailor":           return { "tailoring", "fencing" };
    "weaver":           return { "tailoring", "fencing" };
    "leatherworker":    return { "parrying", "mace fighting" };
    "provisioner":      return { "tactics", "parrying", "fencing" };
    "carpenter":        return { "carpentry", "lumberjacking", "swordsmanship" };
    "bowyer":           return { "archery", "bowcraft", "mace fighting" };
    "architect":        return { "resisting spells", "wrestling" };
    "scribe":           return { "resisting spells", "inscription", "evaluating intelligence", "wrestling" };
    "mapmaker":         return { "cartography", "wrestling" };
    "vetrinarian":      return { "animal lore", "wrestling", "veterinary" };
    "townguard":        return { "anatomy", "tactics", "swordsmanship", "detect hidden", "arms lore" };
    "thief":            return { "snooping", "stealing", "remove trap", "stealth", "fencing", "poisoning", "lockpicking", "hiding" };
    "beggar":           return { "begging", "wrestling", "cooking", "fishing" };
    "fighter1":         return { "anatomy", "tactics", "swordsmanship", "arms lore" };
    "fighter2":         return { "anatomy", "tactics", "swordsmanship", "arms lore" };
    "fighter3":         return { "anatomy", "tactics", "swordsmanship", "arms lore" };
    "fighter4":         return { "anatomy", "tactics", "swordsmanship", "arms lore" };
    "paladin":          return { "anatomy", "tactics", "swordsmanship", "detect hidden", "arms lore" };
    "assassin":          return { "poisoning", "hiding", "stealth" };
    "artist":           return {"tailoring", "fencing", "item identification"};
  endcase
endfunction

function FindSkillId(name)
  case(name)
    "alchemy":                  return  0;
    "anatomy":                  return  1;
    "animal lore":              return  2;
    "item identification":      return  3;
    "arms lore":                return  4;
    "parrying":                 return  5;
    "begging":                  return  6;
    "blacksmithy":              return  7;
    "bowcraft":                 return  8;
    "peacemaking":              return  9;
    "camping":                  return 10;
    "carpentry":                return 11;
    "cartography":              return 12;
    "cooking":                  return 13;
    "detect hidden":            return 14;
    "discordance":               return 15;
    "evaluating intelligence":  return 16;
    "healing":                  return 17;
    "fishing":                  return 18;
    "forensic evaluation":      return 19;
    "herding":                  return 20;
    "hiding":                   return 21;
    "provocation":              return 22;
    "inscription":              return 23;
    "lockpicking":              return 24;
    "magery":                   return 25;
    "resisting spells":         return 26;
    "tactics":                  return 27;
    "snooping":                 return 28;
    "musicianship":             return 29;
    "poisoning":                return 30;
    "archery":                  return 31;
    "spiritspeaking":           return 32;
    "stealing":                 return 33;
    "tailoring":                return 34;
    "animal taming":            return 35;
    "taste identification":     return 36;
    "tinkering":                return 37;
    "tracking":                 return 38;
    "veterinary":               return 39;
    "swordsmanship":            return 40;
    "mace fighting":            return 41;
    "fencing":                  return 42;
    "wrestling":                return 43;
    "lumberjacking":            return 44;
    "mining":                   return 45;
    "meditation":               return 46;
    "stealth":                  return 47;
    "remove trap":              return 48;
    "necromancy":               return 49;
    "focus":                    return 50;
    "chivalry":                 return 51;
    "bushido":                  return 52;
    "ninjitsu":                 return 53;
    "spellweaving":             return 54;
    "mysticism":                return 55;
    "imbuing":                  return 56;
    "throwing":                 return 57;
  endcase
endfunction
 