originaly when i made my skillgain function i didnt think about the fact that players can lock skills, well this right here will account for that, it works too =)
[code:1:ccf589b42e]
[FUNCTION f_skillgain]
IF ><100.0
VAR.X >/10.0
IF !RAND()
IF !(STRCMPI("","ALCHEMY"))
IF !
SRC.ALCHEMY +1
ENDIF
ELSEIF !(STRCMPI("","ANATOMY"))
IF !
SRC.ANATOMY +1
ENDIF
ELSEIF !(STRCMPI(","ANIMALLORE"))
IF !
SRC.ANIMALLORE +1
ENDIF
ELSEIF !(STRCMPI("","ARCHERY"))
IF !
SRC.ARCHERY +1
ENDIF
ELSEIF !(STRCMPI("","ARMSLORE"))
IF !
SRC.ARMSLORE +1
ENDIF
ELSEIF !(STRCMPI("","BEGGING"))
IF !
SRC.BEGGING +1
ENDIF
ELSEIF !(STRCMPI("","BLACKSMITHING"))
IF !
SRC.BLACKSMITHING +1
ENDIF
ELSEIF !(STRCMPI("","BOWCRAFT"))
IF !
SRC.BOWCRAFT +1
ENDIF
ELSEIF !(STRCMPI("","CAMPING"))
IF !
SRC.CAMPING +1
ENDIF
ELSEIF !(STRCMPI("","CARPENTRY"))
IF !
SRC.CARPENTRY +1
ENDIF
ELSEIF !(STRCMPI("","CARTOGRAPHY"))
IF !
SRC.CARTOGRAPHY +1
ENDIF
ELSEIF !(STRCMPI("","COOKING"))
IF !
SRC.COOKING +1
ENDIF
ELSEIF !(STRCMPI("","DETECTINGHIDDEN"))
IF !
SRC.DETECTINGHIDDEN +1
ENDIF
ELSEIF !(STRCMPI("","ENTICEMENT"))
IF !
SRC.ENTICEMENT +1
ENDIF
ELSEIF !(STRCMPI("","EVALUATINGINTEL"))
IF !
SRC.EVALUATINGINTEL +1
ENDIF
ELSEIF !(STRCMPI("","FENCING"))
IF !
SRC.FENCING +1
ENDIF
ELSEIF !(STRCMPI("","FISHING"))
IF !
SRC.FISHING +1
ENDIF
ELSEIF !(STRCMPI("","FORENSICS"))
IF !
SRC.FORENSICS +1
ENDIF
ELSEIF !(STRCMPI("","HEALING"))
IF !
SRC.HEALING +1
ENDIF
ELSEIF !(STRCMPI("","HERDING"))
IF !
SRC.HERDING +1
ENDIF
ELSEIF !(STRCMP("","HIDING"))
IF !
SRC.HIDING +1
ENDIF
ELSEIF !(STRCMPI("","INSCRIPTION"))
IF !
SRC.INSCRIPTION +1
ENDIF
ELSEIF !(STRCMPI("","ITEMID"))
IF !
SRC.ITEMID +1
ENDIF
ELSEIF !(STRCMPI("","LOCKPICKING"))
IF !
SRC.LOCKPICKING +1
ENDIF
ELSEIF !(STRCMPI("","LUMBERJACKING"))
IF !
SRC.LUMBERJACKING +1
ENDIF
ELSEIF !(STRCMPI("","MACEFIGHTING"))
IF !
SRC.MACEFIGHTING +1
ENDIF
ELSEIF !(STRCMPI("","MAGERY"))
IF !
SRC.MAGERY +1
ENDIF
ELSEIF !(STRCMPI("","MAGICRESISTANCE"))
IF !
SRC.MAGICRESISTANCE +1
ENDIF
ELSEIF !(STRCMPI("","MEDITATION"))
IF !
SRC.MEDITATION +1
ENDIF
ELSEIF !(STRCMPI("","MINING"))
IF !
SRC.MINING +1
ENDIF
ELSEIF !(STRCMPI("","MUSICIANSHIP"))
IF !
SRC.MUSICIANSHIP +1
ENDIF
ELSEIF !(STRCMPI("","NECROMANCY"))
IF !
SRC.NECROMANCY +1
ENDIF
ELSEIF !(STRCMPI("","PARRYING"))
IF !
SRC.PARRYING +1
ENDIF
ELSEIF !(STRCMPI("","PEACEMAKING"))
IF !
SRC.PEACEMAKING +1
ENDIF
ELSEIF !(STRCMPI("","POISONING"))
IF !
SRC.POISONING +1
ENDIF
ELSEIF !(STRCMPI("","PROVOCATION"))
IF !
SRC.PROVOCATION +1
ENDIF
ELSEIF !(STRCMPI("","REMOVETRAP"))
IF !
SRC.REMOVETRAP +1
ENDIF
ELSEIF !(STRCMPI("","SNOOPING"))
IF !
SRC.SNOOPING +1
ENDIF
ELSEIF !(STRCMPI("","SPIRITSPEAK"))
IF !
SRC.SPIRITSPEAK +1
ENDIF
ELSEIF !(STRCMPI("","STEALING"))
IF !
SRC.STEALING +1
ENDIF
ELSEIF !(STRCMPI("","STEALTH"))
IF !
SRC.STEALTH +1
ENDIF
ELSEIF !(STRCMPI("","SWORDSMANSHIP"))
IF !
SRC.SWORDSMANSHIP +1
ENDIF
ELSEIF !(STRCMPI("","TACTICS"))
IF !
SRC.TACTICS +1
ENDIF
ELSEIF !(STRCMPI("","TAILORING"))
IF !
SRC.TAILORING +1
ENDIF
ELSEIF !(STRCMPI{"","TAMING"))
IF !
SRC.TAMING +1
ENDIF
ELSEIF !(STRCMPI("","TASTEID"))
IF !
SRC.TASTEID +1
ENDIF
ELSEIF !(STRCMPI("","TINKERING"))
IF !
SRC.TINKERING +1
ENDIF
ELSEIF !(STRCMPI("","TRACKING"))
IF !
SRC.TRACKING +1
ENDIF
ELSEIF !(STRCMPI("","VETERINARY"))
IF !
SRC.VETERINARY +1
ENDIF
ELSEIF !(STRCMPI("","WRESTLING"))
IF !
SRC.WRESTLING +1
ENDIF
ENDIF
ENDIF
ENDIF
[/code:1:ccf589b42e]