Возможно ли?
Posted: 24.10.2006 20:02
Написать скрипт на порезку бинтов? 

К кому обратиться чтоб написал такой скрипт, если можно скиньте сюда в топик...Drunk Iguana wrote:да!
Прости, завтыкал...Edred wrote:Телепаты в отпуске.
ЗЫ: Намек понял? Расскажи подробно как режутся бинты у вас на шарде.
Code: Select all
program makebandages;
var tmpser1, tmpser2 : cardinal;
begin
tmpser1 := findtype($0F9E,backpack);
if tmpser1 = 0 then exit;
repeat
tmpser2 := findtype($1766,backpack);
if tmpser2 = 0 then exit;
if targetpresent then targetcancel;
useobject(tmpser1);
waitfortarget(5000);
if targetpresent then targettoobject(tmpser2);
wait(1000);
until tmpser2 = 0;
end.
Edred wrote:Писано на коленке. Тести. Если бы ты написал сообщения - то была бы динамическая пауза, а так - еще раз повторю: телепаты в отпуске.Code: Select all
program makebandages; var tmpser1, tmpser2 : cardinal; begin tmpser1 := findtype($0F9E,backpack); if tmpser1 = 0 then exit; repeat tmpser2 := findtype($1766,backpack); if tmpser2 = 0 then exit; if targetpresent then targetcancel; useobject(tmpser1); waitfortarget(5000); if targetpresent then targettoobject(tmpser2); wait(1000); until tmpser2 = 0; end.
Я же сказал - писал на коленке. Замени targetcancel на canceltarget, и никаких строк удалять не надо.DesperadoS wrote:Методом тыка зделал, что заработала макра, удалил пару строк оттуда, спасибо огромно
Это навороченный?Drunk Iguana wrote:Какой то слишком навароченный макр )
Зачем заводить две переменные. для ножниц темболее есиони один раз юзаються.
Для бинтво я бы тоже нестал заводить лишние строки тока )
Зачем ексит внутри рипита, ваще делать тада вайл еси нуна проверка в начале, а так глупо проверка идет два раза подряд.
Таргеткансел мне кажеься тож совершенно ненужен, еси и был таргет он собьеться новым проста
Скрипт выполняется независимо от состояния твоего чара и реконектора. А "выбивает" скрипт, потому что он так написан или в нем так задумано.DesperadoS wrote:Последний вопрос, почему когда чаров в Стелсе выбивает (конлост) прекращаеться скрипт? тоесть когда конектит заново больше не макросит... если ето так задумано невижу смысла в реконекторе
Быстрее всего в скрипте у тебя написано что-то типаDesperadoS wrote:Последний вопрос, почему когда чаров в Стелсе выбивает (конлост) прекращаеться скрипт? тоесть когда конектит заново больше не макросит... если ето так задумано невижу смысла в реконекторе
Code: Select all
while Connected do
begin
end;