Yoko :: СПАРИНГ

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

СПАРИНГ http://forum.yoko.com.ua/viewtopic.php?f=20&t=12097	Page 1 of 1

Author:

pika [ 2007-06-16 18:05:52 ]

Post subject:

СПАРИНГ

помогите пожалуйсто ! чтото у меня не настраивается тоесть настраивается но чтото нето =( мне не лень разобратся просто у меня чтото не то выходит! я поставил координаты моего партнера по спарингу,который стоит со мной в одном домк на одном этаже.(.where)
Но когда я запускаю скрипт мой чар кудато не туда идет а вообще кудато через лес потом еще кудато в общем нетуда идет! И еще скажите пожалуйсто вот как понять - координат куда он отходит лечится будет в этом случае это - until (uo.GetY() < 805
ну а что это за кусок такой?

Code:

sub fight() 


while 1 
   gotoxy(1732,2733,10) # координаты куда подходить к противнику 
   UO.usetype("0x1B76") # тип щита 
   uo.usetype("0x0EC2") # тип оружия 
   UO.Exec("attack 0x000AECD9") #айди 2-го чара 
   Repeat 
      wait (500) 
   if uo.injournal("destroyed")then 
   UO.usetype("0x0EC2") # тип оружия 
   uo.deletejournal() 
   endif 
   Until ((UO.GetHP("0x0022097B") <75)or (UO.GetHP("0x000AECD9")  <100)) # 
#жизни 1-го и 2-го чара 
   repeat 
   UO.Exec("warmode 0") # выключаем вар мод 
   UO.Press(35) # код клавиши End 
   UO.Press(35) # код клавиши End 
   until (uo.GetY() < 805)# координаты по Y куда отходить чтобы лечить(ся) 
      UO.DeleteJournal() 
   Repeat 
      UO.Usetype("0x0E21") #Bandages 
      UO.Exec("waittargetobject 0x000AECD9") # айди 2-го чара 
      wait(3500) 
   Until (UO.InJournal("need you")) 
      UO.DeleteJournal() 
   Repeat 
      UO.Usetype("0x0E21") #Bandages 
      UO.Exec("waittargetobject 0x0022097B")  # айди 1-го чара 
      wait(3500) 
   Until (UO.InJournal("need healing")) 
wend 
end sub 

sub gotoxy(x,y,prec) 
var ld=0,ldc=0 
var dx,dy 
var mx,my 
var ox,oy,mk,k 
#uo.print(">") 
#uo.track("1",str(x),str(y)) 
start: 
mx=UO.GetX() 
my=UO.GetY() 
dx=mx-x 
if dx<0 then 
dx=0-dx 
endif 
dy=my-y 
if dy<0 then 
dy=0-dy 
endif 
if dy>dx then 
dx=dy 
end if 
if dx<=prec then 
return 
end if 
if not ldc then 
uo.print(STR(dx)) 
end if 
if dx<3 then 
mk=70 
else 
mk=15 
end if 
ox=mx 
oy=my 
for k=1 to mk 
mx=UO.GetX() 
my=UO.GetY() 
if mx<>ox or my<>oy then 
goto sdidapl 
end if 
wait(10) 
next 
sdidapl: 
mx=UO.GetX() 
my=UO.GetY() 
dx=mx-x 
if dx<0 then 
dx=0-dx 
endif 
dy=my-y 
if dy<0 then 
dy=0-dy 
endif 
if dy>dx then 
dx=dy 
end if 
if dx<=prec then 
return 
end if 
if ld==dx then 
ldc=ldc+1 
if ldc>100 then 
uo.print("Can not reach location!") 
return 
end if 
else 
ld=dx 
end if 
if mx==x then 
if my==y then 
return 
endif 
if my>y then 
#UO.Print("UR") 
UO.Press(33) 
goto start 
endif 
#UO.Print("DL") 
UO.Press(35) 
goto start 
end if 
if mx<x then 
if my>y then 
#UO.Print("R") 
UO.Press(39) 
goto start 
endif 
if my==y then 
#UO.Print("DR") 
UO.Press(34) 
goto start 
endif 
#UO.Print("D") 
UO.Press(40) 
goto start 
end if 
if my<y then 
#UO.Print("L") 
UO.Press(37) 
goto start 
endif 
if my==y then 
#UO.Print("LU") 
UO.Press(35) 
goto start 
endif 
#UO.Print("U") 
UO.Press(38) 
goto start 
end sub 

sub Healing() 
   UO.SetArm('CWeapon') 
   UO.Exec("bandageself") 
   wait(500) 
    
   UO.Arm('CWeapon')

Author:

Ururu [ 2007-06-16 21:48:05 ]

Post subject:

Скрипт подразумевает что твой чар подходит к противнику изменяя вои координаты по У (север-юг). Подойди к кукле с южной стороны (вплотную). И запиши сюда свою координату У:

Code:

until (uo.GetY() < 805

Вроде так...

Тоесть если твой противник в координатах 1111 2222, то:

Code:

gotoxy(1111,2221,10) # координаты куда подходить к противнику

Code:

until (uo.GetY() < 2221)# координаты по Y куда отходить чтобы лечить(ся)

Author:	pika [ 2007-06-19 09:59:01 ]
Post subject:
можеж сказать пожалуцйсто - как определить в уо где юг а где север? надо как лицом неверх стоять тоесть там где Ледяной остров если смотреть - от Минока то это - Восток?

Author:	pika [ 2007-06-19 10:45:25 ]
Post subject:
у меня не очень работает =( я ставлю координаты где стоит партнер - а мой чар такитак ижет воообще не туда - тоесть такое ощущение что он идет на те координаты которые изначально в этом скрипте стояли!! и никак это какбудто не поменять =( я меняю а он такит\ак вообще не туда идет.помогите пожалуйсто

Author:	pika [ 2007-06-19 11:10:54 ]
Post subject:
просто я какие координыта не ставлю он всё в низ кудато идет и постоянно вниз!

Author:

arch [ 2007-06-19 11:25:05 ]

Post subject:

pika wrote:

просто я какие координыта не ставлю он всё в низ кудато идет и постоянно вниз!

в строке

Code:

until (uo.GetY() < 805

замени 805, например, на 2730. Good luck!

PS. Это в том случае, если координаты, в которых ты дерешься указаны верно в строке

Code:

gotoxy(1732,2733,10)

Author:

SAMURAI [ 2007-06-23 07:42:28 ]

Post subject:

Поменяй строку:

Code:

until (uo.GetY() < 805)# координаты по Y куда отходить чтобы лечить(ся)

На эту:

Code:

until (gotoxy(828,1201,0))# координаты по Y куда отходить чтобы лечить(ся)

Author:	pika [ 2007-09-26 00:33:08 ]
Post subject:
gfvf памагиате пожлуста у меня не ежёт этот скрипт =( я всё перепробывал! но первый чар идёт всё кудато вниз!! хотя я всё настраиваю правельно! ну вот сами смотрите пожалуйсто второй чар стоит в большом доме по координатам 1934,2730,15 z я ставлю в скрипте чтоб я подходил на 1934 2729 15 и всё правельно настраиваю а он все вниз иджет кудато! =х помогите пожалуйсто - ведь наверняка скрипт хорошенький - помогите пожалуйсто

Author:	-=JoKeR=- [ 2007-09-26 03:09:50 ]
Post subject:
UO.Press(35) # код клавиши End UO.Press(35) # код клавиши End until (uo.GetY() < 805)# координаты по Y куда отходить чтобы лечить(ся) Он полюбому будет идти "вниз кудато" как ты говоришь, тоесть на север. Просто расположи чаров подругому и поставь координаты отхода так чтобы при двух шагах на север он приходил в эти координаты. Или поменяй UO.Press(35) # код клавиши End UO.Press(35) # код клавиши End клавишу на ту которая соответствует нужному тебе направлению. Элементарно, Ватсон

Author:	pika [ 2007-09-26 15:27:15 ]
Post subject:
сэнк джокер вот сиотри щас я ковырнул и чтото получилось но он подошол ко второму чару и начал пачемуто его лечить а не бить потом - he dont need a cure or healing дальше мой первый чар токо поднял руку на второго (видно было но не ударил =((() и опять пошол внииииииз =((( ну зачем он вниз идет??? джокер помоги пожалусто и помогите ктонибуди зачем он вниз идет??

Author:	pika [ 2007-09-26 15:32:36 ]
Post subject:
о ужас мой первый чар он подходит ко второму - поднимет руку на него (но не бйет) тут же резко снимает оружие и щит - лечит - потом снова одевае оружие и щит - поднимет руку (но не бьет) - снимет амуницию - лечит --- потом отходит вниз и идет идет кудато =))) и цикл бесконечный --- подскажите что не так может - лучу чтоб он наверх всегда шёл а не вниз? =)))

Author:	pika [ 2007-09-26 20:19:58 ]
Post subject:
памагитн пожалкйсто

Author:	pika [ 2007-09-26 21:18:27 ]
Post subject:
vjvcf можете пожал сказать как тоесть сами действия этого скриптика вначале - чар должен подходить и бить второго? рааскажите подал

Author:	Ururu [ 2007-09-27 06:36:22 ]
Post subject:
pika wrote: vjvcf можете пожал сказать как тоесть сами действия этого скриптика вначале - чар должен подходить и бить второго? рааскажите подал ходить от куклы к кукле и бить их

Author:	pika [ 2007-09-27 18:04:00 ]
Post subject:
это как понять ок куклы и до куклы?? тоесть это чо не на втором чаре качатся чтоли - да нее уруру ты чтото путаеш немождет быть такого куклу можно кнопкой одной бить - памагите пожалуйсто скажите -- почему у меня в этом скрипте чар идет вни всегда кудато? --- вот скрипт должен работать - ё чар подходит ко 2 и бёт его - потом отходи лечит себя и 2 чара и опять подхоодит?7

Author:	pika [ 2007-09-28 11:17:04 ]
Post subject:
можете пожалуйсто посмотреть этот скрипт - а то у меня не идёт =( он както глючит - он все постоянно не туда идёт - то наискосок - то - вниз - то ищё кудато и даже если поёдет туда - то он не ударит второго чара а при ударе он резко снимает щит и иружие и начинает лечит - а второй чар здоров то он опять оедевает и опять снимает - и потом идет вниз! хотя я все координаты ставлю правельно помогите пожалуйсто сделайте так чтоб он не шол вниз =( а токо наверх к чару ну и отходил лечился

Author:

HellFire [ 2007-09-28 22:44:04 ]

Post subject:

Такая же проблема вчера появилась. Чар подходит,1 раз бьёт и тут же отходит лечить,и так каждый раз. Раньше всё гут работало. Шард ДрВ. :arrow:

Code:

sub fight() 


while 1 
   gotoxy(4622,3836,0) # куда подходить чтоб драться 
   UO.usetype("0x1B76") # щит 
   uo.usetype("0x0F51") # оужие 
   UO.Exec("attack 0x000AECD9") #2-й чар кого бить 
   Repeat 
      wait (500) 
   if uo.injournal("destroyed")then 
   UO.usetype("0x0F51") # оружие 
   uo.deletejournal() 
   endif 
   Until ((UO.GetHP("0x001AD865") <75)or (UO.GetHP("0x000AECD9")  <100)) # 
#проверка хп у первого и вторго чара 
   repeat 
   UO.Exec("warmode 0") # вармод 
   UO.Press(35) # отходим End 
   UO.Press(35) # отходим End 
   until (gotoxy(4622,3837,0)) # куда отходить лечиться  
      UO.DeleteJournal() 
   Repeat 
      UO.Usetype("0x0E21") #Bandages 
      UO.Exec("waittargetobject 0x000AECD9") # 2-й чар 
      wait(3500) 
   Until (UO.InJournal("need you")) 
      UO.DeleteJournal() 
   Repeat 
      UO.Usetype("0x0E21") #Bandages 
      UO.Exec("waittargetobject 0x001AD865")  # 1-й чар 
      wait(3500) 
   Until (UO.InJournal("need healing")) 
wend 
end sub 

sub gotoxy(x,y,prec) 
var ld=0,ldc=0 
var dx,dy 
var mx,my 
var ox,oy,mk,k 
#uo.print(">") 
#uo.track("1",str(x),str(y)) 
start: 
mx=UO.GetX() 
my=UO.GetY() 
dx=mx-x 
if dx<0 then 
dx=0-dx 
endif 
dy=my-y 
if dy<0 then 
dy=0-dy 
endif 
if dy>dx then 
dx=dy 
end if 
if dx<=prec then 
return 
end if 
if not ldc then 
uo.print(STR(dx)) 
end if 
if dx<3 then 
mk=70 
else 
mk=15 
end if 
ox=mx 
oy=my 
for k=1 to mk 
mx=UO.GetX() 
my=UO.GetY() 
if mx<>ox or my<>oy then 
goto sdidapl 
end if 
wait(10) 
next 
sdidapl: 
mx=UO.GetX() 
my=UO.GetY() 
dx=mx-x 
if dx<0 then 
dx=0-dx 
endif 
dy=my-y 
if dy<0 then 
dy=0-dy 
endif 
if dy>dx then 
dx=dy 
end if 
if dx<=prec then 
return 
end if 
if ld==dx then 
ldc=ldc+1 
if ldc>100 then 
uo.print("Can not reach location!") 
return 
end if 
else 
ld=dx 
end if 
if mx==x then 
if my==y then 
return 
endif 
if my>y then 
#UO.Print("UR") 
UO.Press(33) 
goto start 
endif 
#UO.Print("DL") 
UO.Press(35) 
goto start 
end if 
if mx<x then 
if my>y then 
#UO.Print("R") 
UO.Press(39) 
goto start 
endif 
if my==y then 
#UO.Print("DR") 
UO.Press(34) 
goto start 
endif 
#UO.Print("D") 
UO.Press(40) 
goto start 
end if 
if my<y then 
#UO.Print("L") 
UO.Press(37) 
goto start 
endif 
if my==y then 
#UO.Print("LU") 
UO.Press(35) 
goto start 
endif 
#UO.Print("U") 
UO.Press(38) 
goto start 
end sub 

sub Healing() 
   UO.SetArm('CWeapon') 
   UO.Exec("bandageself") 
   wait(500) 
    
   UO.Arm('CWeapon') 
end sub

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