Yoko :: переход на следующий тайл

Yoko http://forum.yoko.com.ua/

переход на следующий тайл http://forum.yoko.com.ua/viewtopic.php?f=20&t=13756	Page 1 of 1

Author:	uisran [ 2008-07-05 14:54:09 ]
Post subject:	переход на следующий тайл
пишу скрипт на фишинг под KR. вобщем суть проста чар рыбалит вокруг себя, ненужное выкидывает... (остальное не важно) а проблема вот в чем. если удочкой тыкается не в воду, то ничего не пишется и просто ничего не происходит. какое событие можно записать для перехода на следующий тайл?

Author:	Scripts Writer [ 2008-07-05 15:02:03 ]
Post subject:
Kynep, а ты любишь рыбалить? По теме: Динамическая задержка, таймер

Author:	uisran [ 2008-07-05 15:14:25 ]
Post subject:
раньше никогда не пользовался( как реализовать? пока у меня было вот так Code: mx = UO.GetX("self") my = UO.GetY("self") mz = UO.GetZ("self") UO.DeleteJournal() for i = mx+4 to mx+4 for j = my+4 to my+4 while not UO.InJournal("location") and not UO.InJournal("far away") UO.Waittargettile("1341", str(i), str(j), str(mz)) UO.Useobject("tackle") то есть мне нужно "если ничего не происходит 10 сек то переходим к след тайлу"

Author:

Scripts Writer [ 2008-07-05 15:21:23 ]

Post subject:

Code:

var i
mx = UO.GetX("self") 
my = UO.GetY("self") 
mz = UO.GetZ("self") 
UO.DeleteJournal() 
for i = mx+4 to mx+4 
for j = my+4 to my+4 
i=0
UO.Waittargettile("1341", str(i), str(j), str(mz)) 
UO.Useobject("tackle")
while i<100 and not UO.InJournal("location") and not UO.InJournal("far away") 
  i=i+1
  wait(100)
wend

Author:

uisran [ 2008-07-05 16:22:03 ]

Post subject:

чето никак не выходит, если так то он просто начинает рыбачить в том же тайле((
убрал все лишнее, скрипт выглядит вот так

Code:

sub fishing()

var mx,my,mz,i, j

uo.print('Show tackle ') 
uo.exec('addobject tackle') 
while uo.targeting() 
wait(100) 
wend 

start:
mx = UO.GetX("self") 
my = UO.GetY("self") 
mz = UO.GetZ("self")
for i = mx-4 to mx+4 
for j = my-4 to my+4
while not UO.Hidden() 
UO.Warmode("0") 
uo.print("Hiding") 
UO.UseSkill("Hiding") 
wait(4000) 
wend 

UO.Print("Fishing in coords: "+str(mx-i)+" "+str(my-j))
while not UO.InJournal("don't seem") and not UO.InJournal("you need to") and not UO.InJournal("target cannot")
UO.DeleteJournal() 
if uo.waiting() then
uo.canceltarget()
endif

UO.Waittargettile("1341", str(i), str(j), str(mz)) 
UO.Useobject("tackle")
while not UO.InJournal("You pull out")
wait(500)
wend
wend
UO.DeleteJournal() 
goto start

Author:	uisran [ 2008-07-05 16:58:52 ]
Post subject:
похоже дело в RunUO а не в скрипте(

Author:	Kynep [ 2008-07-05 17:49:44 ]
Post subject:
Scripts Writer wrote: Kynep, а ты любишь рыбалить? Нет.

Author:	uisran [ 2008-07-05 19:46:13 ]
Post subject:
в kingdom Reborn не получится использовать UO.InJournal?

Author:	Grin [ 2008-07-06 02:14:08 ]
Post subject:
Получится Только там скорей понятие cliloc фигурировать будет. Из товоего скрипта не слудует что он рыбачит в одном месте, из него следует что он скорей всего после первой попытки чтото выловить просто встанет. Если встанет, т опроблема в клилоках. ,showjournal и ты у видишь все в клилочном виде. Тебе остается только подобобрать клилоки под твои сообщения. Если надо могу выложить полный список клилоков.

Author:	uisran [ 2008-07-06 09:56:15 ]
Post subject:
а где можно посмотреть описание cliloc? понятия не имею как пользоваться кажись догнал..

Author:

uisran [ 2008-07-06 10:28:52 ]

Post subject:

чтобы разобраться решил попробовать тоже самое на мнининге, теперь скрипт мне показывает что переходит на разные тайлы, но вот копать не хочет

Code:


sub mining() 

var mx, my, mz, i, j, 
var Text1 = "cliloc# 0x5DE0" #you dig
var Text2 = "cliloc# 0xAD03" #you loosen
var Text3 = "cliloc# 0xA2DE" #far away
var Text4 = "cliloc# 0xA867" #you can't mine that
var Text5 = "cliloc# 0xAD00" #There is no ore

uo.print('!!Choose a Shovel!! ') 
uo.exec('addobject Shovel') 
while uo.targeting() 
wait(100) 
wend 

repeat 
mx = UO.GetX("self") 
my = UO.GetY("self") 
mz = UO.GetZ("self") 
UO.DeleteJournal() 
for i = mx-4 to mx+4 
for j = my -4 to my+4 

UO.Print("Dig in coords: "+str(mx-i)+" "+str(my-j)) 
while not Text5 and not Text4
UO.DeleteJournal() 
if uo.waiting() then 
uo.canceltarget() 
endif 
UO.Waittargettile("1341" , str(i), str(j), str(mz)) 
UO.Useobject("Shovel") 
while not Text1 and not Text2 and not Text3 and not Text4 
wait (500) 
next
wend
wend
UO.Deletejournal()
until UO.Dead()

endsub

Author:	Kynep [ 2008-07-06 10:45:55 ]
Post subject:
uisran wrote: чтобы разобраться решил попробовать тоже самое на мнининге, теперь скрипт мне показывает что переходит на разные тайлы, но вот копать не хочет Code: for i = mx-4 to mx+4 for j = my -4 to my+4 Ни чего не забыл? По моему чего то не хватает в конце скрипта.... Подскажу, for-next.

Author:	uisran [ 2008-07-06 10:52:03 ]
Post subject:
Kynep wrote: uisran wrote: чтобы разобраться решил попробовать тоже самое на мнининге, теперь скрипт мне показывает что переходит на разные тайлы, но вот копать не хочет Code: for i = mx-4 to mx+4 for j = my -4 to my+4 Ни чего не забыл? По моему чего то не хватает в конце скрипта.... Подскажу, for-next. да, конечно (просто я выложил не весь скрипт, вручную выбирал куски), но проблема не в этом, а в том что он не юзает лопату может проблема в типе тайла? "1341" я не знаю как узнать

Author:	Grin [ 2008-07-06 12:58:43 ]
Post subject:
В пещене несколько видов тайлов. На некоторых серверах надо точно указывать тайл, на других еще и координата Z должна быть правильной. ,infotile а двльше, если есть проверка состороны сейрвера на тайл, то или перебором типов или через ASM (Дополнение к инжекту) или через uo.privategettile Можно попробовать uo.privatedig dx dy [picktype] [mintile] [maxtile]

Author:	uisran [ 2008-07-06 13:45:54 ]
Post subject:
нет, проблема не в тайлах(

Author:	Kynep [ 2008-07-06 13:55:12 ]
Post subject:
uisran wrote: нет, проблема не в тайлах( Quote: while not Text1 and not Text2 and not Text3 and not Text4 wait (500) next wend Зачем оно там? И ваапще прежде чем такое спрашивать выложи сначала норм скрипты которым ты пытаешься копать, потому что в том что здесь выложен ошибок куча, он по определению не будет копать.

Author:	Destruction [ 2008-07-06 21:01:50 ]
Post subject:
Я не опаздал отметится про "ничего" не происходит? - Весь топик не читал, но предлагаю: ,set soundecho 1 ,set animecho 1

Page 1 of 1	All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/