Помогите разобраться

[SwiX]

Хочу соединить два скрипта,когда их вставляю пашет только первый,второй отказывается работать.Только начал разбираться. Вот пример:

Спойлер: Скрипт

uses sysutils,classes;
begin
while Engine.Status = lsOnline do begin
if (ChatMessage.ChatType = mtParty) and ChatMessage.Unread then //непрочитанное сообщение тип чата mtPrivate=ПМ mtParty mtAll=белый
begin
if pos('пов',ChatMessage.Text)>0 then
begin
engine.SetTarget(ChatMessage.Sender); // Берет в таргет кто написал "pow"
engine.useskill(1356); // ID скилла
end;
end;
delay(2000);
end;
begin
while Engine.Status = lsOnline do begin
if (ChatMessage.ChatType = mtParty) and ChatMessage.Unread then //непрочитанное сообщение тип чата mtPrivate=ПМ mtParty mtAll=белый
begin
if pos('берс',ChatMessage.Text)>0 then
begin
engine.SetTarget(ChatMessage.Sender); // Берет в таргет кто написал "берс"
engine.useskill(1062); // ID скилла
end;
end;
delay(2000);
end;
end;
end.

 

[dell]

Впихнуть два одинаковых скрипта, это соединить по твоему?)
правильно так:

uses sysutils,classes;
begin
   while Engine.Status = lsOnline do begin
      if (ChatMessage.ChatType = mtPrivate) and ChatMessage.Unread then //непрочитанное сообщение тип чата mtPrivate=ПМ mtParty  mtAll=белый 
      begin
        if (ChatMessage.Text = 'пати') then  Engine.InviteParty(ChatMessage.Sender, ldRandom);  //первый
        if (ChatMessage.Text = 'скилл') then  engine.useskill(3521);  //второй
      end;
    delay(2000);
   end;
end.

 

[cravil]

про параллельном запуске скриптов описано в этой теме http://rawr.su/topic/2580-kak-obedinit-stcenarii-how-to-merge-scripts/

 

[Reliable]

Вынеси в процедуры и все, если тебе надо что бы по отдельности они работали, а если совместно то делай как сказал cravil.

 

[SwiX]

спасибо за ответы.
Ещё вопрос,есть вот скрипт на фарм дино.Но когда запускаю ругаеться на первую строчку.

Label(Useskill)
CharStatus(HP,<=,30)
{
Delay(2000)
USESKILL(Zealot)
Delay(1000)
USESKILL(Frenzy)
Delay(1000)
MOVETO(18351,-17937,-3205)
USEITEM(Heavens Divider[Focus])
Delay(55000)
MOVETO(18292,-17913,-3206)
USEITEM(Homunkulus's Sword[Conversion])
Delay(500)
USEITEM(Cursed Dagger[Rsk. Haste])
Delay(1000)
}
Delay(2000)
CALL(Useskill)

 

[Spectre7TS]

Естественно ругается, это скрипт от волкера

 

[SwiX]

@Spectre7TS, Спасибо,понял