авто заточка

[NLObP]

вместо этого

#$87: begin
        if readd(2)=0 then begin
          msg.Lines.Add('Улучшили ItemID='+IntToStr(ItemID)+' ItemOID='+IntToStr(ItemOID)+' ItemEnchLvl='+IntToStr(ItemEnch));
          inc(good);
        end else begin
          msg.Lines.Add('Сломали ItemID='+IntToStr(ItemID)+' ItemOID='+IntToStr(ItemOID)+' ItemEnchLvl='+IntToStr(ItemEnch));
          inc(broken);
        end;
//        CurEnchLvl:=0; //начнем с начала. Расскоментировать для блессет скроллов
      end;

вставь это

#$87: begin
        case readd(2) of
            0: begin
              msg.Lines.Add('Улучшили ItemID='+IntToStr(ItemID)+' ItemOID='+IntToStr(ItemOID)+' ItemEnchLvl='+IntToStr(ItemEnch));
              inc(good);
            end;
            1: begin
              msg.Lines.Add('Сломали ItemID='+IntToStr(ItemID)+' ItemOID='+IntToStr(ItemOID)+' ItemEnchLvl='+IntToStr(ItemEnch));
              inc(broken);
            end;
            2: begin
              msg.Lines.Add('Сбросило в 0 ItemID='+IntToStr(ItemID)+' ItemOID='+IntToStr(ItemOID)+' ItemEnchLvl='+IntToStr(ItemEnch));
              CurEnchLvl:=0; //начнем с начала. Заменять на то значение, в которое сбрасывает при точке блесседами
            end;
        end;
      end;

Также смотри скрипты в этом топике.

[CapsLock]

NLObP,в вашем скрипте я не нашёл #$87, а нашёл только #$81.
Из за этого я не могу доделать скрипт.
Может быть вы в чём то ошиблись, или я не досмотрел.
Если я не досмотрел то прошу написать

Добавлено через 56 секунд
#$87 я нашёл только в скрипте mksа, но он у меня не работает, а ваш работает

[NLObP]

CapsLock, я уже путаюсь во всех этих скриптах на заточку. =)
Как сказал TAMBIK, замени #$81 (найди похожее место и замени)

[CapsLock]

просто вы мне дали кусок от Грации(по-моему),и получается что я в скрипт для интерлюда вставляю кусок от Грации,и поэтому у меня ничего не выходит
Вот этот кусок по- моему надо заменить:

#$81: 
     if readd(2)=0 then begin
          CurEnchLvl:=0; //начнем с начала
     end;
end;

//nlobp: замени на это

#$81: begin
     if readd(2)=2 then begin
          CurEnchLvl:=3; //начнем с начала
     end;
end;

вот он более менее похож на тот , который следует заменить.
Просто(если можете), напишите мне кусок скрипта, который будет точить пухи, если при точке они стачиваются на +3( для интерлюда).

Добавлено через 2 минуты
Прошу простить меня за непрофессиональность :'(

[TAMBIK]

NLObP, написал вставь это
замени 87 на 81
и в конце вместо 0 поставь 3 здесь:

CurEnchLvl:=0; //начнем с начала. Заменять на то значение, в которое сбрасывает при точке блесседами

а кусок что ты показал удали этот;

#$81: if readd(2)=0 then begin
CurEnchLvl:=0; //начнем с начала

[moOYkoOn]

я всё зделал как скозал нло но когда запускаю скрипт то у меня обводит красным самую последнюю end: и рядом с 87 бегин тоже обводит и скрипт не запускается

[TAMBIK]

Сообщение от moOYkoOn

я всё зделал как скозал нло но когда запускаю скрипт то у меня обводит красным самую последнюю end: и рядом с 87 бегин тоже обводит и скрипт не запускается

обводит красным самую последнюю end:
в конце скрипта то удали

[moOYkoOn]

Сообщение от TAMBIK

обводит красным самую последнюю end:
в конце скрипта то удали

я удалил , потом бегин красным обводило я тоже удалил а потом не чё не обводило но скрипт не запускался