Yoko

All sides of Injection
https://yoko.uokit.com/

Прошу написать пару простеньких и полезных скриптов

https://yoko.uokit.com/viewtopic.php?t=7212

Page 2 of 3

Posted: 2006-04-01 10:28:07
by Kynep
[quote="1a2a3a4a5a6a
Не очень я понял, как работает эта ходилка. А в какую координату она пойдет? И у мя выдавалась ошибка. Что-то дополнительно нужно ставить к ней?[/quote]

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

Code: Select all

GotoXY(1111,1111)


Идет в 1111 и 1111

Posted: 2006-04-01 20:22:07
by 1a2a3a4a5a6a
Если запустить данный скрипт без правки, то выдается ошибка: "Line71: Invalid number of arguments - GotoXY".
А если же запустить с правкой

Code: Select all

GotoXY(1111,1111)
то выдается ошибка: "Line1: Parse error".

Чего-то я не понимаю... :?

Posted: 2006-04-01 22:35:25
by Kynep
1a2a3a4a5a6a wrote:Если запустить данный скрипт без правки, то выдается ошибка: "Line71: Invalid number of arguments - GotoXY".
А если же запустить с правкой

Code: Select all

GotoXY(1111,1111)
то выдается ошибка: "Line1: Parse error".

Чего-то я не понимаю... :?


Попробуй кавычки поставь

Posted: 2006-04-01 22:53:18
by 1a2a3a4a5a6a
Cooper wrote:
1a2a3a4a5a6a wrote:Если запустить данный скрипт без правки, то выдается ошибка: "Line71: Invalid number of arguments - GotoXY".
А если же запустить с правкой

Code: Select all

GotoXY(1111,1111)
то выдается ошибка: "Line1: Parse error".

Чего-то я не понимаю... :?


Попробуй кавычки поставь

Как не крути...
А у тебя то работает?

Posted: 2006-04-01 23:14:41
by Edred
1a2a3a4a5a6a wrote:Если запустить данный скрипт без правки, то выдается ошибка: "Line71: Invalid number of arguments - GotoXY".
А если же запустить с правкой

Code: Select all

GotoXY(1111,1111)
то выдается ошибка: "Line1: Parse error".

Чего-то я не понимаю... :?


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

ЗЫ: В самом этом скрипте ты не должен править ничего, а вот из своего скрипта надо вызывать этот передавая параметрами координаты. Если ты это не понял - лучше используй ассист.

Posted: 2006-04-01 23:48:07
by Grin
идея с кавычками еще круче...

Posted: 2006-04-01 23:54:18
by 1a2a3a4a5a6a
Edred wrote:
1a2a3a4a5a6a wrote:Если запустить данный скрипт без правки, то выдается ошибка: "Line71: Invalid number of arguments - GotoXY".
А если же запустить с правкой

Code: Select all

GotoXY(1111,1111)
то выдается ошибка: "Line1: Parse error".

Чего-то я не понимаю... :?


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

ЗЫ: В самом этом скрипте ты не должен править ничего, а вот из своего скрипта надо вызывать этот передавая параметрами координаты. Если ты это не понял - лучше используй ассист.

По поводу первого:
Работаю в дельфи и в html. Не хвастаюсь, как некоторые (не в обиду).
Потом, я незнал, что эта ходилка не работает на "простом" инжекте, потому так и получилось. Вообще с ходилками не работал.
Потом, в скрипте на ламбер есть ходилка. Она ведь работает прекрасно и без всяких доп. АСМ и прочего!?

Может, что-то и не понимаю, но не надо меня обзывать чайником. :)

И как можно реализовать наипростейщую ходилку, хоть и без обхода препятствий? Главное, чтобы до коорд. нужных была.
Или ходилку, как на ламбере!?

Posted: 2006-04-02 08:21:25
by Kynep
1a2a3a4a5a6a wrote:
Edred wrote:
1a2a3a4a5a6a wrote:Если запустить данный скрипт без правки, то выдается ошибка: "Line71: Invalid number of arguments - GotoXY".
А если же запустить с правкой

Code: Select all

GotoXY(1111,1111)
то выдается ошибка: "Line1: Parse error".

Чего-то я не понимаю... :?


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

ЗЫ: В самом этом скрипте ты не должен править ничего, а вот из своего скрипта надо вызывать этот передавая параметрами координаты. Если ты это не понял - лучше используй ассист.

По поводу первого:
Работаю в дельфи и в html. Не хвастаюсь, как некоторые (не в обиду).
Потом, я незнал, что эта ходилка не работает на "простом" инжекте, потому так и получилось. Вообще с ходилками не работал.
Потом, в скрипте на ламбер есть ходилка. Она ведь работает прекрасно и без всяких доп. АСМ и прочего!?

Может, что-то и не понимаю, но не надо меня обзывать чайником. :)

И как можно реализовать наипростейщую ходилку, хоть и без обхода препятствий? Главное, чтобы до коорд. нужных была.
Или ходилку, как на ламбере!?


Эта ходилка из Ламбера ))

Posted: 2006-04-02 11:08:51
by 1a2a3a4a5a6a
Cooper wrote:Эта ходилка из Ламбера ))

Может тогда объясните, как она работает? В ламбере создавался всего-лишь один файл с координатами.

Posted: 2006-04-02 11:22:54
by Kynep
1a2a3a4a5a6a wrote:
Cooper wrote:Эта ходилка из Ламбера ))

Может тогда объясните, как она работает? В ламбере создавался всего-лишь один файл с координатами.


Едред написал же, она читает координаты из переменных, создай две переменных:

Code: Select all

VAR CoordX=' ' #Поставь коорды
VAR CoordY=' '

И вставь в скрипт:

Code: Select all

GotoXY(CoordX, CoordY)

Posted: 2006-04-02 12:51:55
by 1a2a3a4a5a6a
Тогда полный скрипт получается таким:

Code: Select all

VAR CoordX='1234' #Поставь коорды 
VAR CoordY='123' 

sub GotoXY(CoordX, CoordY) 
var myX,myY,lastX=0,lastY=0,i,halt=0,z,r=0 
for i=1 to 60 
myX=uo.getX(); 
myY=uo.getY(); 
if LastX==myX and LastY==myY then 
halt=halt+1 
else 
halt=0 
end if 
if halt>=10 then 
if uo.GetDir()==1 then 
for z=0 to 8 
uo.Press(40) 
next 
end if 
if uo.GetDir()==3 then 
for z=0 to 8 
uo.Press(37) 
next 
end if 
if uo.GetDir()==5 then 
for z=0 to 8 
uo.Press(38) 
next 
end if 
if uo.GetDir()==7 then 
for z=0 to 8 
uo.Press(39) 
next 
end if 
halt=15 
end if 
if Numb(x-myX)<=1 and Numb(y-myY)<=2 then 
return 1 
end if 
if x<=myX then 
if y<=myY then 
for z=0 to 3 
uo.Press(38) 
next 
else 
for z=0 to 3 
uo.Press(37) 
next 
end if 
else 
if y<=myY then 
for z=0 to 3 
uo.Press(39) 
next 
else 
for z=0 to 3 
uo.Press(40) 
next 
end if 
end if 
lastX=myX 
lastY=myY 
wait(200) 
next 
return 0 
end sub 

sub Numb(num) 
if num>=0 then 
return num 
else 
return num*(-1) 
end if 
end sub

Что не так?

Posted: 2006-04-02 13:11:07
by Kynep
1a2a3a4a5a6a wrote:Тогда полный скрипт получается таким:

Code: Select all

VAR CoordX='1234' #Поставь коорды 
VAR CoordY='123' 

sub GotoXY(CoordX, CoordY) 
var myX,myY,lastX=0,lastY=0,i,halt=0,z,r=0 
for i=1 to 60 
myX=uo.getX(); 
myY=uo.getY(); 
if LastX==myX and LastY==myY then 
halt=halt+1 
else 
halt=0 
end if 
if halt>=10 then 
if uo.GetDir()==1 then 
for z=0 to 8 
uo.Press(40) 
next 
end if 
if uo.GetDir()==3 then 
for z=0 to 8 
uo.Press(37) 
next 
end if 
if uo.GetDir()==5 then 
for z=0 to 8 
uo.Press(38) 
next 
end if 
if uo.GetDir()==7 then 
for z=0 to 8 
uo.Press(39) 
next 
end if 
halt=15 
end if 
if Numb(x-myX)<=1 and Numb(y-myY)<=2 then 
return 1 
end if 
if x<=myX then 
if y<=myY then 
for z=0 to 3 
uo.Press(38) 
next 
else 
for z=0 to 3 
uo.Press(37) 
next 
end if 
else 
if y<=myY then 
for z=0 to 3 
uo.Press(39) 
next 
else 
for z=0 to 3 
uo.Press(40) 
next 
end if 
end if 
lastX=myX 
lastY=myY 
wait(200) 
next 
return 0 
end sub 

sub Numb(num) 
if num>=0 then 
return num 
else 
return num*(-1) 
end if 
end sub

Что не так?


Неет это не меняй:

Code: Select all

sub GotoXY(CoordX, CoordY)

Оставь как было:

Code: Select all

sub GotoXY(x, y)


А себе в скрипт, где он по идеи должен начинать идти вставь:

Code: Select all

GotoXY(CoordX, CoordY)

Posted: 2006-04-02 13:22:50
by 1a2a3a4a5a6a
Тогда получается вот это:

Code: Select all

sub go()
VAR CoordX='1234' #Поставь коорды 
VAR CoordY='123' 
   GotoXY(CoordX, CoordY) 
end sub

sub GotoXY(x, y) 
var myX,myY,lastX=0,lastY=0,i,halt=0,z,r=0 
for i=1 to 60 
myX=uo.getX(); 
myY=uo.getY(); 
if LastX==myX and LastY==myY then 
halt=halt+1 
else 
halt=0 
end if 
if halt>=10 then 
if uo.GetDir()==1 then 
for z=0 to 8 
uo.Press(40) 
next 
end if 
if uo.GetDir()==3 then 
for z=0 to 8 
uo.Press(37) 
next 
end if 
if uo.GetDir()==5 then 
for z=0 to 8 
uo.Press(38) 
next 
end if 
if uo.GetDir()==7 then 
for z=0 to 8 
uo.Press(39) 
next 
end if 
halt=15 
end if 
if Numb(x-myX)<=1 and Numb(y-myY)<=2 then 
return 1 
end if 
if x<=myX then 
if y<=myY then 
for z=0 to 3 
uo.Press(38) 
next 
else 
for z=0 to 3 
uo.Press(37) 
next 
end if 
else 
if y<=myY then 
for z=0 to 3 
uo.Press(39) 
next 
else 
for z=0 to 3 
uo.Press(40) 
next 
end if 
end if 
lastX=myX 
lastY=myY 
wait(200) 
next 
return 0 
end sub 

sub Numb(num) 
if num>=0 then 
return num 
else 
return num*(-1) 
end if 
end sub

Posted: 2006-04-02 13:38:20
by Kynep
1a2a3a4a5a6a wrote:Тогда получается вот это:

Code: Select all

sub go()
VAR CoordX='1234' #Поставь коорды 
VAR CoordY='123' 
   GotoXY(CoordX, CoordY) 
end sub



Типа того :D

Posted: 2006-04-02 13:51:47
by 1a2a3a4a5a6a
Cooper wrote:
1a2a3a4a5a6a wrote:Тогда получается вот это:

Code: Select all

sub go()
VAR CoordX='1234' #Поставь коорды 
VAR CoordY='123' 
   GotoXY(CoordX, CoordY) 
end sub



Типа того :D

А что не так? :)
Мне нужно просто заставить чара пойти в нужную координату.
Может тогда исправишь мою кривость? :)

Posted: 2006-04-02 14:06:27
by Kynep
1a2a3a4a5a6a wrote:
Cooper wrote:
1a2a3a4a5a6a wrote:Тогда получается вот это:

Code: Select all

sub go()
VAR CoordX='1234' #Поставь коорды 
VAR CoordY='123' 
   GotoXY(CoordX, CoordY) 
end sub



Типа того :D

А что не так? :)
Мне нужно просто заставить чара пойти в нужную координату.
Может тогда исправишь мою кривость? :)


Смари:

Code: Select all

sub go()
VAR CordX=' '
VAR CordY=' '

While UO.GetX('self') <> CordX
GotoXY(CordX, CordY)
wend
end sub

Posted: 2006-04-02 14:14:49
by 1a2a3a4a5a6a
Cooper wrote:Смари:

Code: Select all

sub go()
VAR CordX=' '
VAR CordY=' '

While UO.GetX('self') <> CordX
GotoXY(CordX, CordY)
wend
end sub


Вставил я этот код и ниже вставил саму ходилку. Поставил координаты. Когда запускаю go, то выдает ошибку: "Line 43: Runtime error - Invalid operation for this type".

Posted: 2006-04-02 14:19:50
by Kynep
1a2a3a4a5a6a wrote:
Cooper wrote:Смари:

Code: Select all

sub go()
VAR CordX=' '
VAR CordY=' '

While UO.GetX('self') <> CordX
GotoXY(CordX, CordY)
wend
end sub


Вставил я этот код и ниже вставил саму ходилку. Поставил координаты. Когда запускаю go, то выдает ошибку: "Line 43: Runtime error - Invalid operation for this type".


Вот, ща протестил, ходит тока координаты поменяй:

Code: Select all

sub go() 
VAR CX=1794 
VAR CY=1563 

If UO.GetX() <> CX and UO.Gety() <> CY then
GotoXY(CX, CY) 
endif
end sub

ТОка ходилка тупит, поточнее надо

Posted: 2006-04-02 14:22:59
by 1a2a3a4a5a6a
Да, у меня тоже работает! Огромное спасибо!
А ходилка действительно запинается.

Posted: 2006-04-02 15:18:05
by SLAK
Запускать ходилку вы уже научились, а ходилки по качественее тут:
http://forum.yoko.com.ua/viewtopic.php?t=6743 :D
All times are UTC+02:00
Page 2 of 3

Powered by phpBB® Forum Software © phpBB Limited