Цитата:
Зделайте пожалуйста образец готового скрипта хотябы с 3-х разных пакетов посылаемых с интервалом 2 секунды .. ето-же так просто.. зато добавит l2phx много новых возможностей
|
не совсем понял что скрипт вообще должен делать но кажется вы пытались сделать что то вроде этого:
Код:
var
mass:array[1..16] of string;
timer1: TTimer;
i: integer;
procedure Init;
begin
timer1:= TTimer.Create(nil);
timer1.OnTimer:=@OnTimerSKY;
timer1.enabled:=true;
timer1.interval:=2000;
i:=1;
mass[1]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[2]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[3]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[4]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[5]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[6]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[7]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[8]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[9]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[10]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[11]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[12]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[13]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[14]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[15]:='72 00 65 00 63 00 61 00 6C 00 6C 00 20 00 53 00 69 00 67 00 6D 00 61 00 00 00';
mass[16]:='';
end;
procedure Free;
begin
timer1.free;
end;
procedure OnTimerSKY;
begin
if (mass[i]<>'') then begin
buf:=hstr(mass[i]);
SendToServer;
i:=i+1;
end;
end;
begin
end.
Цитата:
//Ну вот я сделала;
//Ни пашет;
//Пачиму?.
|
потому что нужно более внимательным быть :)
программирование и орфография не терпит ошибок :)