[Скрипт] нужна помощь в написании скрипта ....

[OBERON_ZGZ]

первым посылает пакет с (i) = 0

Помоему ты забыл вписать

for i:=1 to 255 do begin

[Глюконатор]

Для пакета с i = 0:

var	i: integer;
	   s: string;

function OnTimer(n,cn: integer):boolean;
begin
 if n = 1 then
      if cn <= 256 then begin
          if cn < 17 then s[5] := HStr(format('0%x',[cn-1]))
          else s[5] := HStr(format('%x',[cn-1]));
          gSys.SendS(s);
          result := true;
      end
      else result := false
 else result := true;
end;

begin
if GInt(_gBuff,3,2) = $105 then begin
      gBlockPacket;
      s := _gBuff;
      gSys.SetTimer(1,200);
end;
end.

И в данном случае цикл не нужен.=)

[OBERON_ZGZ]

так он посылает пакет с пятым байтом 0f

при повторной отсылке 0f меня логично выкидывает из игры ......

[Ivan_32]

А на С-подобном синтаксисе в нем писать нельзя ?

Так уж получилось что Профессор Вирт очень серьезно повлиял на всю отрасль программирования(как науки) и наравне с наследниками ALGOL-68 стали идти наследники Pascal. Ярким представителем является Ada (в честь Ады Лавлейс - первой программистки, вобще). Кстати это фактически два типа мышления...

[Глюконатор]

OBERON_ZGZ - подправил косяк;

Ivan_32 - к сожалению нет, тока делфи.. =(

[OBERON_ZGZ]

Вероятно я не так выразился , скрипт начинал отправку пакетов с
изменяемым пятым байтом начиная с 00 ....
А нужно с 01 по ff и остановить скрипт если ты не забыл ....
В исправленном варианте он также начинает отправку с 00 ....
а это не допустимое значение и меня выкидывает из игры ....

[Глюконатор]

ну а в чем дело тогда? о_о первый вариант и был таким каким ты просишь. отправляет с 1 по 255 включительно потом отрубается.

[OBERON_ZGZ]

Скрипт работает

нужно вернуть обратно значения :

if cn < 16 then s[5] := HStr(format('0%x',[cn]))
else s[5] := HStr(format('%x',[cn]));


Наверное что то было с WP , теперь всё работае ...

Но к сожалению , на атаку таким способом сервак присылает

ерор...

наверное контролирует скорость атаки ББ.....

Хотя непонятно почему , ведь для акретовского ланча эта фишка проходит (

Попробую поэксперементировать с с таймером ....

Добавлено через 2 минуты
еще забыл

if cn <= 256 then begin

поменять на

if cn <= 255 then begin

чтобы остановился на значении FF

Добавлено через 9 минут
Кстати , не подскажите как значение таймера устанавливать ???

1,200 - это задержка в 0,2 сек ?

1,500 - это 0,5 сек ?


а 2,000 - это сколько ?

или 0,500 это что ?

[Глюконатор]

по функяим FS есть [Ссылки могут видеть только зарегистрированные пользователи. ]

Тут вкратце скажу - gSys.SetTimer(num, time: integer);

Устанавливает таймер с номером Num на время Time в мс. Всего может быть три таймера для каждого скрипта. Установка Time = 0 вырубает данный таймер.