Наткнулся на продолжение, решил что это должно лежать в одном месте
Далее цитата автора:
"Вот моя вторая версия накрутки урона через стих патроны(на рфч залито неполная), все действия по анимации "Растягиваюсь""
Код:
PHP код:
uses
'Scripts\libs\MyHelpLib.script';
var
Flag2, Flag1: Integer;
ammo: Word;
begin
if (Fromclient) and (ReadC(1) = $05) and (ReadC(2) = 01) and (Flag1 = 1) then
begin
MsgInfo('записал', 'StihOd');
buf := pck;
ammo := ReadH(7);
Flag1 := 0;
Flag2 := 1;
end;
if (Fromclient) and (ReadC(1) = $05) and (ReadC(2) = 01)and (Flag2 =1 ) then
begin
buf := pck;
writeh(ammo,7);
pck := buf;
end;
if (Fromclient) and (ReadH(1) = $0205) and (Flag2 =1 ) then
begin
buf := pck;
writeh(ammo,9);
pck := buf;
end;
if (Fromclient) and (ReadC(1) =$0d) and (Readh(2) =8214)and (Flag2 = 0) then
begin
MsgInfo('включаю запись', 'StihOd');
pck := '';
flag1 := 1;
end;
if (Fromclient) and (ReadC(1) =$0d) and (Readh(2) =8214)and (Flag2 = 1) then
begin
Flag2 := 0;
MsgInfo('выключаю накрутку', 'StihOd');
pck := '';
end;
end.
Наткнулся на продолжение, решил что это должно лежать в одном месте
Далее цитата автора:
"Вот моя вторая версия накрутки урона через стих патроны(на рфч залито неполная), все действия по анимации "Растягиваюсь""
Код:
PHP код:
uses
'Scripts\libs\MyHelpLib.script';
var
Flag2, Flag1: Integer;
ammo: Word;
begin
if (Fromclient) and (ReadC(1) = $05) and (ReadC(2) = 01) and (Flag1 = 1) then
begin
MsgInfo('записал', 'StihOd');
buf := pck;
ammo := ReadH(7);
Flag1 := 0;
Flag2 := 1;
end;
if (Fromclient) and (ReadC(1) = $05) and (ReadC(2) = 01)and (Flag2 =1 ) then
begin
buf := pck;
writeh(ammo,7);
pck := buf;
end;
if (Fromclient) and (ReadH(1) = $0205) and (Flag2 =1 ) then
begin
buf := pck;
writeh(ammo,9);
pck := buf;
end;
if (Fromclient) and (ReadC(1) =$0d) and (Readh(2) =8214)and (Flag2 = 0) then
begin
MsgInfo('включаю запись', 'StihOd');
pck := '';
flag1 := 1;
end;
if (Fromclient) and (ReadC(1) =$0d) and (Readh(2) =8214)and (Flag2 = 1) then
begin
Flag2 := 0;
MsgInfo('выключаю накрутку', 'StihOd');
pck := '';
end;
end.
пасиб, я а то я забыл здесь обновить, докинул бы в шапку но кнопка редактирования пропала, а и почитайте оригинальную тему по ссылке что написал чел выше (разница в версиях в том что новая версия работает не только на тычки но и на скилы)но дня её работы нужна библиотека которая есть в оригинальной теме
пасиб, я а то я забыл здесь обновить, докинул бы в шапку но кнопка редактирования пропала, а и почитайте оригинальную тему по ссылке что написал чел выше (разница в версиях в том что новая версия работает не только на тычки но и на скилы)но дня её работы нужна библиотека которая есть в оригинальной теме
пасиб, я а то я забыл здесь обновить, докинул бы в шапку но кнопка редактирования пропала, а и почитайте оригинальную тему по ссылке что написал чел выше (разница в версиях в том что новая версия работает не только на тычки но и на скилы)но дня её работы нужна библиотека которая есть в оригинальной теме
Братишка, залей пожалуйста библиотеку. Очень нужно. Нашёл где всё это работает, но к сожалению только на тыки в данный момент с первым скриптом
