//#include "_persist_01a"
#include "aps_include"

void main()
{
  object oPC = GetLastOpenedBy();
  //int iWoodSkill = GetTokenPair(oPC,13,13);
  int iWoodSkill = GetPersistentInt(oPC,"iPaperSkill","UOACraft"
  );
  int iWoodChance = iWoodSkill;

  if (GetItemPossessedBy(oPC,"NoDrop_SkillLogBook")==OBJECT_INVALID)
   {
    CreateItemOnObject("skilllogbook",oPC,1);
   }

  if (iWoodChance <350)
    {
     iWoodChance = GetAbilityScore(oPC,ABILITY_DEXTERITY)*5;
     iWoodChance = iWoodChance +(GetAbilityScore(oPC,ABILITY_WISDOM)*3);
     iWoodChance = iWoodChance +(GetAbilityScore(oPC,ABILITY_INTELLIGENCE)*2);
     iWoodChance = iWoodChance * 3;
     if (iWoodChance >350) iWoodChance = 350;
     if (iWoodSkill > iWoodChance) iWoodChance = iWoodSkill;
    }



  // Create tokens for items which are 24.0 skill or below, as all characters can make these.
  CreateItemOnObject("pattern072",OBJECT_SELF,1);   //Bleached Wood Pulp
  if (iWoodChance>500) CreateItemOnObject("pattern073",OBJECT_SELF,1);   //Bleached Silkwood pulp
}