Aschbourne_PRC8/_module/nss/_uoa_skill_dotr2.nss

int iNewSkill(object oPC, string sSkill, int iSkillValue);
void AlertPC(object oPC, string sSkill, int iSkillValue, int iTemp);

void main()
{
    object oSelf = OBJECT_SELF;
    object oPC = GetPCSpeaker();
    string sTagSelf = GetTag(oSelf);
    int iSkillValue;
    int iGoldCost = GetLocalInt(oPC,"iWillTrainCost");
    string sSkill = GetStringRight(sTagSelf,GetStringLength(sTagSelf)-11);
    //TakeGoldFromCreature(iGoldCost,oPC,TRUE);
    int iXP = GetXP(oPC);
    iXP = iXP-iGoldCost;
    if (iXP<0)
     {
      FloatingTextStringOnCreature("You do not have enough experience to train right now!",oPC,TRUE);
      return;
     }
    SetXP(oPC,iXP);

    if (sSkill=="Curing") sSkill="Hide Curing";
    if (sSkill=="Skinning") sSkill = "Pelt Skinning";
    if (sSkill=="Tanning") sSkill= "Leather Tanning";
    if (sSkill=="Polishing") sSkill= "Gem Polishing";
    if (sSkill=="Quarrying") sSkill="Gem Quarrying";
    if (sSkill=="Dyeing") sSkill="Cloth Dyeing";

    SetCustomToken(7888,sSkill);

    int iPCSkill;

    if (sSkill=="Bowcraft")
     {
      iSkillValue = GetCampaignInt("UOACraft","iBowSkill",oPC);
      SetCampaignInt("UOACraft","iBowSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Fletching")
     {
      iSkillValue = GetCampaignInt("UOACraft","iFletchingSkill",oPC);
      SetCampaignInt("UOACraft","iFletchingSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Alchemy")
     {
      iSkillValue = GetCampaignInt("UOACraft","iAlchemySkill",oPC);
      SetCampaignInt("UOACraft","iAlchemySkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Farming")
     {
      iSkillValue = GetCampaignInt("UOACraft","iFarmSkill",oPC);
      SetCampaignInt("UOACraft","iFarmSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Inscription")
     {
      iSkillValue = GetCampaignInt("UOACraft","iScribeSkill",oPC);
      SetCampaignInt("UOACraft","iScribeSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Digging")
     {
      iSkillValue = GetCampaignInt("UOACraft","iDigSkill",oPC);
      SetCampaignInt("UOACraft","iDigSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Mining")
     {
      iSkillValue = GetCampaignInt("UOACraft","iMiningSkill",oPC);
      SetCampaignInt("UOACraft","iMiningSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Smelting")
     {
      iSkillValue = GetCampaignInt("UOACraft","iSmeltSkill",oPC);
      SetCampaignInt("UOACraft","iSmeltSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Tailoring")
     {
      iSkillValue = GetCampaignInt("UOACraft","iTailorSkill",oPC);
      SetCampaignInt("UOACraft","iTailorSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Papermaking")
     {
      iSkillValue = GetCampaignInt("UOACraft","iPaperSkill",oPC);
      SetCampaignInt("UOACraft","iPaperSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Hide Curing")
     {
      iSkillValue = GetCampaignInt("UOACraft","iCureSkill",oPC);
      SetCampaignInt("UOACraft","iCureSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Pelt Skinning")
     {
      iSkillValue = GetCampaignInt("UOACraft","iSkinningSkill",oPC);
      SetCampaignInt("UOACraft","iSkinningSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Leather Tanning")
     {
      iSkillValue = GetCampaignInt("UOACraft","iTanSkill",oPC);
      SetCampaignInt("UOACraft","iTanSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Armorcraft")
     {
      iSkillValue = GetCampaignInt("UOACraft","iArmorSkill",oPC);
      SetCampaignInt("UOACraft","iArmorSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Weaponcraft")
     {
      iSkillValue = GetCampaignInt("UOACraft","iSmithSkill",oPC);
      SetCampaignInt("UOACraft","iSmithSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Kiln")
     {
      iSkillValue = GetCampaignInt("UOACraft","iGlassSkill",oPC);
      SetCampaignInt("UOACraft","iGlassSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
    if (sSkill=="Cooking")
     {
      iSkillValue = GetCampaignInt("UOACraft","iCookSkill",oPC);
      SetCampaignInt("UOACraft","iCookSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Tinkering")
     {
      iSkillValue = GetCampaignInt("UOACraft","iTinkerSkill",oPC);
      SetCampaignInt("UOACraft","iTinkerSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Gem Polishing")
     {
      iSkillValue = GetCampaignInt("UOACraft","iPolishSkill",oPC);
      SetCampaignInt("UOACraft","iPolishSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Jewelcrafting")
     {
      iSkillValue = GetCampaignInt("UOACraft","iJewelSkill",oPC);
      SetCampaignInt("UOACraft","iJewelSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Leatherworking")
     {
      iSkillValue = GetCampaignInt("UOACraft","iLeatherSkill",oPC);
      SetCampaignInt("UOACraft","iLeatherSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Lumberjacking")
     {
      iSkillValue = GetCampaignInt("UOACraft","iLumberjackSkill",oPC);
      SetCampaignInt("UOACraft","iLumberjackSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Cloth Dyeing")
     {
      iSkillValue = GetCampaignInt("UOACraft","iDyeSkill",oPC);
      SetCampaignInt("UOACraft","iDyeSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Clothmaking")
     {
      iSkillValue = GetCampaignInt("UOACraft","iClothSkill",oPC);
      SetCampaignInt("UOACraft","iClothSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Spindling")
     {
      iSkillValue = GetCampaignInt("UOACraft","iSpindleSkill",oPC);
      SetCampaignInt("UOACraft","iSpindleSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Gem Quarrying")
     {
      iSkillValue = GetCampaignInt("UOACraft","iGemQuarrySkill",oPC);
      SetCampaignInt("UOACraft","iGemQuarrySkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Gemcutting")
     {
      iSkillValue = GetCampaignInt("UOACraft","iGemSkill",oPC);
      SetCampaignInt("UOACraft","iGemSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }

   if (sSkill=="Beekeeping")
     {
      iSkillValue = GetCampaignInt("UOACraft","iBeeSkill",oPC);
      SetCampaignInt("UOACraft","iBeeSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Mycology")
     {
      iSkillValue = GetCampaignInt("UOACraft","iShroomSkill",oPC);
      SetCampaignInt("UOACraft","iShroomSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Fishing")
     {
      iSkillValue = GetCampaignInt("UOACraft","iFishingSkill",oPC);
      SetCampaignInt("UOACraft","iFishingSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Cartography")
     {
      iSkillValue = GetCampaignInt("UOACraft","iMapSkill",oPC);
      SetCampaignInt("UOACraft","iMapSkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }
   if (sSkill=="Carpentry")
     {
      iSkillValue = GetCampaignInt("UOACraft","iCarpentrySkill",oPC);
      SetCampaignInt("UOACraft","iCarpentrySkill",iNewSkill(oPC, sSkill, iSkillValue),oPC);
      return;
     }


}

int iNewSkill(object oPC, string sSkill, int iSkillValue)
 {
  int iTemp;
  iTemp = iSkillValue/10;
  iTemp++;
  iTemp = iTemp * 10;
  if (iTemp>350) iTemp = 350;
  AlertPC(oPC,sSkill,iSkillValue,iTemp);
  return iTemp;
 }

void AlertPC(object oPC, string sSkill, int iSkillValue, int iTemp)
 {
  string sOldSkill2;
  string sOldSkill;
  string sTemp1;
  string sTemp2;
  string sMessage;

  sOldSkill2 = IntToString(iSkillValue);
  sOldSkill = "."+GetStringRight(sOldSkill2,1);
  if (iSkillValue > 9)
    {
     sOldSkill = GetStringLeft(sOldSkill2,GetStringLength(sOldSkill2)-1)+sOldSkill;
    }
   else
    {
     sOldSkill = "0"+sOldSkill;
    }

  sTemp1 = sOldSkill;

  sOldSkill2 = IntToString(iTemp);
  sOldSkill = "."+GetStringRight(sOldSkill2,1);
  if (iTemp > 9)
    {
     sOldSkill = GetStringLeft(sOldSkill2,GetStringLength(sOldSkill2)-1)+sOldSkill;
    }
   else
    {
     sOldSkill = "0"+sOldSkill;
    }
  sTemp2 = sOldSkill;
  sMessage = sSkill+" has gone up from "+sTemp1+"% to "+sTemp2+"%!";

  SendMessageToPC(oPC,"After rigorous training, your skill in");
  SendMessageToPC(oPC,sMessage);
  return;
 }