SubID:=ReadH(24);//А ето я непонел)
SkillID:=ReadD(4);//Мы считали ID скила с пакета.
SkillLvl:=ReadD(8)-1//Cчитили Лвл скила.
CurrEnch:=1;//Устанавливаем заточку на 1.
__________________
---------------------------__--------__-----
---____- ___--____--- ___/'- /__ ___-(__)-____
--/-___-/-__-\/-__--\ /-__--'/--|-/--//---//--__--\
-/-/_/ -/-/_/--/-/_/--/-/_/--/|--|/--'//---//--/-/--/
-\___-/\____/\____/\____/-|____//__'//_'/-/__/
/_-__/
|