Page 1 of 1

СПАРИНГ

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

Code: Select all

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')

Posted: 2007-06-16 21:48:05
by Ururu
Скрипт подразумевает что твой чар подходит к противнику изменяя вои координаты по У (север-юг). Подойди к кукле с южной стороны (вплотную). И запиши сюда свою координату У:

Code: Select all

until (uo.GetY() < 805


Вроде так...


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

Code: Select all

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

Code: Select all

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

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

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

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

Posted: 2007-06-19 11:25:05
by arch
pika wrote:просто я какие координыта не ставлю он всё в низ кудато идет и постоянно вниз!


в строке

Code: Select all

until (uo.GetY() < 805
замени 805, например, на 2730. Good luck!

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

Code: Select all

gotoxy(1732,2733,10)

Posted: 2007-06-23 07:42:28
by SAMURAI
Поменяй строку:

Code: Select all

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

На эту:

Code: Select all

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

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

Posted: 2007-09-26 03:09:50
by -=JoKeR=-
UO.Press(35) # код клавиши End
UO.Press(35) # код клавиши End
until (uo.GetY() < 805)# координаты по Y куда отходить чтобы лечить(ся)

Он полюбому будет идти "вниз кудато" как ты говоришь, тоесть на север.
Просто расположи чаров подругому и поставь координаты отхода так чтобы при двух шагах на север он приходил в эти координаты.
Или поменяй
UO.Press(35) # код клавиши End
UO.Press(35) # код клавиши End

клавишу на ту которая соответствует нужному тебе направлению.
Элементарно, Ватсон :wink:

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

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

Posted: 2007-09-26 20:19:58
by pika
памагитн пожалкйсто

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

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

ходить от куклы к кукле и бить их

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

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

Posted: 2007-09-28 22:44:04
by HellFire
Такая же проблема вчера появилась. Чар подходит,1 раз бьёт и тут же отходит лечить,и так каждый раз. Раньше всё гут работало. Шард ДрВ. :arrow:

Code: Select all

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