//вызывается при приходе каждого пакета если скрипт включен
begin
if FromServer then case pck[1] of
// user info
#$32: begin
i := 22;
ReadS(i); // name
ReadD(i); // race
ReadD(i); // sex
// class id
UpdateClassID(ReadD(i));
__________________
Никого нельзя ничему научить,
но всему можно научиться
народная мудрость
"Если любишь в жизни риск - форматируй жесткий диск!"
|