Цитата:
Сообщение от Педро
Там в теме с продажей игровой валюты у парня пишут что он кидок...
Так что лучше не качать)
|
ну да вирусы в текстовом скрипт файле ога.
все то же самое можно было сделать в WPF от саурона но не суть.
@microlaba6331 ты чож так быдлокодишь, учись нормально код писать а не все встолбик без отступов. код же нечитаем. вот как надо делать:
Код:
var
flag2, flag1: integer;
ammo: word;
procedure recording();
begin
end;
begin
if (Fromclient) and (ReadC(1) = $05) and (ReadC(2) = 01) and (flag1 = 1) then // ловим стих патроны
begin
buf := HStr('02 0a 02 E4 03 00 00 44 65 78 74 00 CC CC CC CC CC CC CC CC CC CC CC CC 02 00 07 0E E7 E0 EF E8 F1 E0 EB 00');
sendtoclient;
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 (ReadC(1) = $0D) and (readh(2) = 8214) and (flag2 = 0) then // включение скрипта по кнопке растягиваюсь 8214
begin
buf := HStr('02 0a 02 E4 03 00 00 44 65 78 74 00 CC CC CC CC CC CC CC CC CC CC CC CC 02 00 07 0E E2 EA EB FE F7 E0 FE 20 E7 E0 EF E8 F1 FC 00');
sendtoclient;
pck := '';
flag1 := 1;
recording();
end;
if (Fromclient) and (ReadC(1) = $0D) and (readh(2) = 8214) and (flag2 = 1) then // ловим пакет растягиваюсь 8214
begin // выключаем подмену
flag2 := 0;
buf := HStr('02 0a 02 E4 03 00 00 44 65 78 74 00 CC CC CC CC CC CC CC CC CC CC CC CC 02 00 07 0E E2 FB EA EB FE F7 E8 EB 00');
sendtoclient;
pck := '';
end;
end.
Добавлено через 1 минуту
Цитата:
Сообщение от microlaba6331
очередной набив постов? обвинения от чела который со мной даже не связывался? вирус тотал для кого придуман? надеюсь твой пост затрут за набивание постов
|
не обращай внимания, человек просто не разбирается в читах, скриптах и прочих читерских вещах. лучше напиши на каком серве это ты снимал.
Добавлено через 8 минут
обязательно рекомендую к прочтению вот это
Добавлено через 21 минуту
тут еще немного погуглил вот есть софт для автоматического форматирования исходных текстов на паскале можешь через него все свои скрипты прогнать