Aschbourne_PRC8/_module/nss/_use_skillbook.nss

//#include "_persist_01a"

//The following comment added Aug. 19, 2003, by UOAbigail
//
//Original script written by UOAbigail for UOACraft v02x and up
//Script modified to work with conversation menu instead of floaty text
//by Mikel.  This is a 100% improvement over the floaty text version.
//
//Be sure to check out the Somnium module in the Social Servers section
//of GameSpy to see UOAcraft in action, as well as many other systems
//scripted by Mikel. ;)  (Sorry...Had to plug yer mod here ;)
//
//Modified script is included in this release via permission from Mikel.
//
//Script modified sleightly for improved formatting and inclusion of version
//by UOAbigail on Aug. 19, 2003
//
//------End comment------
#include "aps_include"

void DelayText(object oPC, int iSkillNumber);

void main()
{
  object oPC = OBJECT_SELF;
  int iSkillNumber =34;
  for (iSkillNumber; iSkillNumber>0; iSkillNumber--)
   {
    DelayText(oPC,iSkillNumber);
   }
   SendMessageToPC(oPC,"===================================");
   SendMessageToPC(oPC,"Thank you for using UOACraft v0.8a");
   SendMessageToPC(oPC,"Please report any bugs to UOAbigail");
   SendMessageToPC(oPC,"on the UOACraft board at NWVault.");
   SendMessageToPC(oPC,"===================================");
   ActionStartConversation(OBJECT_SELF,"tradebook",TRUE,FALSE);

}


void DelayText(object oPC, int iSkillNumber)
 {
  string sSkillName = "";
  string sSkillTitle = "- Unskilled -";
  int iSkillValue = 0;

  switch (iSkillNumber)
   {
    case 1:
     {
      iSkillValue = GetPersistentInt(oPC,"iMiningSkill","UOACraft");
      sSkillName = "Mining";
      break;
     }
    case 2:
     {
      iSkillValue = GetPersistentInt(oPC,"iSmeltSkill","UOACraft");
      sSkillName = "Smelting";
      break;
     }
    case 3:
     {
      iSkillValue = GetPersistentInt(oPC,"iDigSkill","UOACraft");
      sSkillName = "Digging";
      break;
     }
    case 4:
     {
      iSkillValue = GetPersistentInt(oPC,"iGlassSkill","UOACraft");
      sSkillName = "Pottery and Glassblowing";
      break;
     }
    case 5:
     {
      iSkillValue = GetPersistentInt(oPC,"iTinkerSkill","UOACraft");
      sSkillName = "Tinkering";
      break;
     }
    case 6:
     {
      iSkillValue = GetPersistentInt(oPC,"iFarmSkill","UOACraft");
      sSkillName = "Farming";
      break;
     }
    case 7:
     {
      iSkillValue = GetPersistentInt(oPC,"iLumberjackSkill","UOACraft");
      sSkillName = "Lumberjacking";
      break;
     }
    case 8:
     {
      iSkillValue = GetPersistentInt(oPC,"iSkinningSkill","UOACraft");
      sSkillName = "Skinning Pelts";
      break;
     }
    case 9:
     {
      iSkillValue = GetPersistentInt(oPC,"iCureSkill","UOACraft");
      sSkillName = "Curing Hides";
      break;
     }
    case 10:
     {
      iSkillValue = GetPersistentInt(oPC,"iTanSkill","UOACraft");
      sSkillName = "Tanning Leather";
      break;
     }
    case 11:
     {
      iSkillValue = GetPersistentInt(oPC,"iLeatherSkill","UOACraft");
      sSkillName = "Leatherworking";
      break;
     }
    case 12:
     {
      iSkillValue = GetPersistentInt(oPC,"iAlchemySkill","UOACraft");
      sSkillName = "Alchemy";
      break;
     }
    case 13:
     {
      iSkillValue = GetPersistentInt(oPC,"iFishingSkill","UOACraft");
      sSkillName = "Fishing";
      break;
     }
    case 14:
     {
      iSkillValue = GetPersistentInt(oPC,"iBeeSkill","UOACraft");
      sSkillName = "Beekeeping";
      break;
     }
    case 15:
     {
      iSkillValue = GetPersistentInt(oPC,"iFletchingSkill","UOACraft");
      sSkillName = "Fletching";
      break;
     }
    case 16:
     {
      iSkillValue = GetPersistentInt(oPC,"iBowSkill","UOACraft");
      sSkillName = "Bowcraft";
      break;
     }
    case 17:
     {
      iSkillValue = GetPersistentInt(oPC,"iSmithSkill","UOACraft");
      sSkillName = "Weaponcrafting";
      break;
     }
    case 18:
     {
      iSkillValue = GetPersistentInt(oPC,"iArmorSkill","UOACraft");
      sSkillName = "Armorcrafting";
      break;
     }
    case 19:
     {
      iSkillValue = GetPersistentInt(oPC,"iPolishSkill","UOACraft");
      sSkillName = "Gem Polishing";
      break;
     }
    case 20:
     {
      iSkillValue = GetPersistentInt(oPC,"iGemSkill","UOACraft");
      sSkillName = "Gemcutting";
      break;
     }
    case 21:
     {
      iSkillValue = GetPersistentInt(oPC,"iGemQuarrySkill","UOACraft");
      sSkillName = "Gem Quarrying";
      break;
     }
    case 22:
     {
      iSkillValue = GetPersistentInt(oPC,"iTailorSkill","UOACraft");
      sSkillName = "Tailoring";
      break;
     }
    case 23:
     {
      iSkillValue = GetPersistentInt(oPC,"iSpindleSkill","UOACraft");
      sSkillName = "Spindling";
      break;
     }
    case 24:
     {
      iSkillValue = GetPersistentInt(oPC,"iClothSkill","UOACraft");
      sSkillName = "Clothmaking";
      break;
     }
    case 25:
     {
      iSkillValue = GetPersistentInt(oPC,"iDyeSkill","UOACraft");
      sSkillName = "Cloth Dyeing";
      break;
     }
    case 26:
     {
      iSkillValue = GetPersistentInt(oPC,"iPaperSkill","UOACraft");
      sSkillName = "Papermaking";
      break;
     }
    case 27:
     {
      iSkillValue = GetPersistentInt(oPC,"iShroomSkill","UOACraft");
      sSkillName = "Mycology";
      break;
     }
    case 28:
     {
      iSkillValue = GetPersistentInt(oPC,"iScribeSkill","UOACraft");
      sSkillName = "Inscription";
      break;
     }
    case 29:
     {
      iSkillValue = GetPersistentInt(oPC,"iCookSkill","UOACraft");
      sSkillName = "Cooking";
      break;
     }
    case 30:
     {
      iSkillValue = GetPersistentInt(oPC,"iJewelSkill","UOACraft");
      sSkillName = "Jewelcraft";
      break;
     }
    case 31:
     {
      iSkillValue = GetPersistentInt(oPC,"iMapSkill","UOACraft");
      sSkillName = "Cartography";
      break;
     }
    case 32:
     {
      iSkillValue = GetPersistentInt(oPC,"iCarpentrySkill","UOACraft");
      sSkillName = "Carpentry";
      break;
     }
    case 33:
     {
      iSkillValue = GetPersistentInt(oPC,"iBrewSkill","UOACraft");
      sSkillName = "Brewing";
      break;
     }
    case 34:
     {
      iSkillValue = GetPersistentInt(oPC,"iEnchantSkill","UOACraft");
      sSkillName = "Enchanting";
      break;
     }
    default:{return;}
   }


  if (iSkillValue >=100) sSkillTitle = "- Neophyte -";
  if (iSkillValue >=200) sSkillTitle = "- Neophyte -";
  if (iSkillValue >=300) sSkillTitle = "- Apprentice -";
  if (iSkillValue >=400) sSkillTitle = "- Apprentice -";
  if (iSkillValue >=500) sSkillTitle = "- Apprentice -";
  if (iSkillValue >=600) sSkillTitle = "- Journeyman -";
  if (iSkillValue >=700) sSkillTitle = "- Expert -";
  if (iSkillValue >=800) sSkillTitle = "- Adept -";
  if (iSkillValue >=900) sSkillTitle = "- Master -";
  if (iSkillValue==1000) sSkillTitle = "- Grandmaster -";

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

  string sMessage = sSkillName + " " + sSkillTitle + " (" + sOldSkill + ")";
  SetCustomToken(3000+iSkillNumber,sMessage);
  return;
 }