Aminf
05.05.2010, 21:49
по некоторым причинам понадобилось именно эта программа, написал простой скрипт на фикс мув а он не работает где неправильно???
begin
if FromClient and (pck[1]=#$0F) and (Length(pck)=50) then
begin
pck:=pck + #01#00#00#00;
end;
end.
вроде тут неучитываются первые 2 байта.
сразу умным проверка размера полюбому нужна тк без нее при беге с клиента будет с клиента слать 2 раза 01 00 00 00.
Добавлено через 7 минут
все разобрался
begin
if FromClient and (pck[1]=#$0F) and (Length(pck)=25) then
begin
pck:=pck + #01#00#00#00;
end;
end.
програма 2 символа за 1 щитает и 1 2 байта первых вапще как я понял нигде не учитывает.
Добавлено через 23 минуты
и еще такой вопрос как сделать чтобы при входе в программу скрипты автоматически нажимались?
begin
if FromClient and (pck[1]=#$0F) and (Length(pck)=50) then
begin
pck:=pck + #01#00#00#00;
end;
end.
вроде тут неучитываются первые 2 байта.
сразу умным проверка размера полюбому нужна тк без нее при беге с клиента будет с клиента слать 2 раза 01 00 00 00.
Добавлено через 7 минут
все разобрался
begin
if FromClient and (pck[1]=#$0F) and (Length(pck)=25) then
begin
pck:=pck + #01#00#00#00;
end;
end.
програма 2 символа за 1 щитает и 1 2 байта первых вапще как я понял нигде не учитывает.
Добавлено через 23 минуты
и еще такой вопрос как сделать чтобы при входе в программу скрипты автоматически нажимались?