1 bonus bInt,3;
2 bonus bDex,2;
3 bonus bLuk,1;
4 if (getiteminfo(getequipid(EQI_HAND_R), II_VIEW) == W_BOOK)
5 bonus bVariableCastrate,-3;