Чтоб не палиться зделал модификацию скрипта терь токда юзаеш ємоцию она доходит до л2пш и дальше на сервер не идет
Код:
//by Alatair_Alentus
var
IdRes,i,b:integer;
begin
//проверяем пакет
if FromClient then
case pck[1] of
//узнаем иди ресурса
#$b5:
begin
IdRes:=readD(4);
end;
//ловим пакет на эмоцию думать
#$c9:
begin
if pck=HStr('C9 57 66 15 21 00 00 00 00 00') then
begin
b:=IdRes;
//собираем пакет и при каждом повторении к иди ресурса добавляем 1
For i:=1 to 1000 do
begin
buf:=hstr('B5 57 72');
writed(b);
buf:=buf+#$00;
sendtoserver;
buf:=hstr('C1 57 7E 00 00 00 00');
sendtoserver;
b:=b+1;
end;
pck:=' ';
end;
end;
end;
end.
Для тех хто хочет писать скрипты с активацией через эмоцию чтоб не палиться тужно при обработке пакета указать
Код:
pck:=' ';
тоесть мы очищаем текущий пакет и емоцию на серве не видно.
Последний раз редактировалось altairalentus; 19.04.2011 в 17:54.
На многих серверах фиксы. но кое что и кое где иногда получаеться обойти, вот я заметил такую ерунду. К примеру в Фоэте вы можете качнуть ремесло до 49 лвл, но качать нада правильно (хитро делать там где фикс), ставим в скрипте ограничение по сбору с 1 до 15 лвл и в дальнейшем накиываем по 10 лвл, с игры не выкидывает и везде где орут что не пашет у меня пашет!
________________
[Ссылки могут видеть только зарегистрированные пользователи. ]
Скрипт великолепен. Но на одной фришке видимо стоит ограничение по времени сбора и за сбор подряд (как в скрипте) даже 3х ресурсов посылает в трюм.Куда в данном скрипте прописать что-то типа delay,чтоб после каждого реса ждал чуть?
Можно ли Переделать скрипт не на эмоцию а на действие, к примеру на (смену оружия) а то скрипт который не отправляет эмоцию профикшен, старый норм робит. А палиться эмоцией не к чему...
Если кто может выложите плиз
Последний раз редактировалось SeXeS; 19.04.2011 в 16:18.
как только нажимаю емоцию сразу выкидывает с игры
стоит 1-30
Добавлено через 21 минуту
Цитата:
Сообщение от sguaj
как только нажимаю емоцию сразу выкидывает с игры
стоит 1-30
работает както крыво поставил на 1-999 вылетает поставил ниже 30 вылетает поставил на 500 кое как работает но почемуто эфир в таргет не берется нажимаю на кониде(в альтгарде) соберается качается 1 лвл ато и вообще не качается энергокинез и фиг знает сколько эфира ... я чтото не так делаю??
Добавлено через 28 минут
Цитата:
Сообщение от sguaj
как только нажимаю емоцию сразу выкидывает с игры
стоит 1-30
работает както крыво поставил на 1-999 вылетает поставил ниже 30 вылетает поставил на 500 кое как работает но почемуто эфир в таргет не берется нажимаю на кониде(в альтгарде) соберается качается 1 лвл ато и вообще не качается энергокинез и фиг знает сколько эфира ... я чтото не так делаю??
Последний раз редактировалось sguaj; 22.04.2011 в 18:20.
Причина: Добавлено сообщение
Чтоб не палиться зделал модификацию скрипта терь токда юзаеш ємоцию она доходит до л2пш и дальше на сервер не идет
Код:
//by Alatair_Alentus
var
IdRes,i,b:integer;
begin
//проверяем пакет
if FromClient then
case pck[1] of
//узнаем иди ресурса
#$b5:
begin
IdRes:=readD(4);
end;
//ловим пакет на эмоцию думать
#$c9:
begin
if pck=HStr('C9 57 66 15 21 00 00 00 00 00') then
begin
b:=IdRes;
//собираем пакет и при каждом повторении к иди ресурса добавляем 1
For i:=1 to 1000 do
begin
buf:=hstr('B5 57 72');
writed(b);
buf:=buf+#$00;
sendtoserver;
buf:=hstr('C1 57 7E 00 00 00 00');
sendtoserver;
b:=b+1;
end;
pck:=' ';
end;
end;
end;
end.
Для тех хто хочет писать скрипты с активацией через эмоцию чтоб не палиться тужно при обработке пакета указать
Код:
pck:=' ';
тоесть мы очищаем текущий пакет и емоцию на серве не видно.
у кого внезапно стал собирать вдруг по 1 ресу просто измените там типо b+1 на b-1, вот почему так происходит - хз,фикс врят ли - больно корявый тогда. и больше 30 не ставте, где у меня работает там просто больше не выкакается хоть ставь 100500
Можно ли Переделать скрипт не на эмоцию а на действие, к примеру на (смену оружия) а то скрипт который не отправляет эмоцию профикшен, старый норм робит. А палиться эмоцией не к чему...
Если кто может выложите плиз