void main()
{
int iEnchLvl = (GetLocalInt(OBJECT_SELF,"lvl")+d4(1));
itemproperty ipAdd;


switch(iEnchLvl)
        {
        case 1: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_WIS,1); break; //impossible result
        case 2: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_WIS,1); break;
        case 3: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_INT,1); break;
        case 4: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CHA,1); break;
        case 5: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CON,1); break;
        case 6: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_DEX,1); break;
        case 7: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_STR,1); break;
        case 8: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_WIS,1); break;
        case 9: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_INT,1); break;
        case 10: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CHA,1); break;
        case 11: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CON,1); break;
        case 12: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_DEX,1); break;
        case 13: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_STR,1); break;
        case 14: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_WIS,2); break;
        case 15: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_INT,2); break;
        case 16: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CHA,2); break;
        case 17: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CON,2); break;
        case 18: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_DEX,2); break;
        case 19: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_STR,2); break;
        case 20: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_WIS,2); break;
        case 21: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_INT,2); break;
        case 22: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CHA,2); break;
        case 23: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CON,2); break;
        case 24: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_DEX,2); break;
        case 25: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_STR,2); break;
        case 26: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_WIS,3); break;
        case 27: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_INT,3); break;
        case 28: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CHA,3); break;
        case 29: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CON,3); break;
        case 30: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_DEX,3); break;
        case 31: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_STR,3); break;
        case 32: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_WIS,3); break;
        case 33: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_INT,3); break;
        case 34: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CHA,3); break;
        case 35: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CON,3); break;
        case 36: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_DEX,3); break;
        case 37: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_STR,3); break;
        case 38: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_WIS,4); break;
        case 39: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_INT,4); break;
        case 40: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CHA,4); break;
        case 41: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CON,4); break;
        case 42: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_DEX,4); break;
        case 43: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_STR,4); break;
        case 44: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_WIS,4); break;
        case 45: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_INT,4); break;
        case 46: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CHA,4); break;
        case 47: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CON,4); break;
        case 48: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_DEX,4); break;
        case 49: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_STR,4); break;
        case 50: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_WIS,5); break;
        case 51: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_INT,5); break;
        case 52: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CHA,5); break;
        case 53: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_CON,5); break;
        case 54: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_DEX,5); break;
        case 55: ipAdd=ItemPropertyAbilityBonus(IP_CONST_ABILITY_STR,5); break;
        case 56: ipAdd=ItemPropertyImmunityMisc(IP_CONST_IMMUNITYMISC_DISEASE); break;
        case 57: ipAdd=ItemPropertyImmunityMisc(IP_CONST_IMMUNITYMISC_FEAR); break;
        case 58: ipAdd=ItemPropertyImmunityMisc(IP_CONST_IMMUNITYMISC_POISON); break;
        case 59: ipAdd=ItemPropertyImmunityMisc(IP_CONST_IMMUNITYMISC_PARALYSIS); break;
        case 60: ipAdd=ItemPropertyImmunityMisc(IP_CONST_IMMUNITYMISC_DEATH_MAGIC); break;
        case 61: ipAdd=ItemPropertyImmunityMisc(IP_CONST_IMMUNITYMISC_KNOCKDOWN); break;
        case 62: ipAdd=ItemPropertyImmunityMisc(IP_CONST_IMMUNITYMISC_LEVEL_ABIL_DRAIN); break;
        case 63: ipAdd=ItemPropertyImmunityMisc(IP_CONST_IMMUNITYMISC_MINDSPELLS); break;
        }
     AddItemProperty(DURATION_TYPE_PERMANENT,ipAdd,OBJECT_SELF);
 }