Вернуться   Forgotten World Ultima Online Forums > English section > Discussion
Discussion In this section you can ask your questions.

Ответ
 
Опции темы Опции просмотра
Re: Macros!
Старый 03.02.2012, 17:55   #1
LanceR
Mystical Hero
 
Аватар для LanceR
 
Регистрация: 12.01.2010
Адрес: [frozen]
Сообщений: 1,057
Репутация: 13 [+/-]
на правильном пути, пока что (от 5 до 15)
LanceR на правильном пути, пока что (от 5 до 15)
Чар: Burning
Гильдия: [frozen]
По умолчанию Re: Macros!

Here's the script on the taming horses
set $ remember The Horse remembers you
set $ master It seems to accept you as master
set $ player you can not tame the players.
set $ alredy This creature already tame

repeat 6
say all release
wait 600
end_repeat
1
send F11
set timer
while_not lastmsg $ remember or $ master or $ player or $ alredy
if lastmsg The Horse remembers you
goto NeXT
end_if
if lastmsg It seems to accept you as master
goto NeXT
end_if
if lastmsg You can not tame the players.
goto NeXT
end_if
if lastmsg This creature already tame
goto Neploxo
end_if
if lastmsg You fail to tame the creature.
goto 1
end_if
if lastmsg Animal Taming changed now
goto NeXT
end_if
if timer> 40 000
gosub next
end_if
end_while

if timer> 5000
goto next
end_if

: NeXT
say all release
send f1
wait 500
goto 1
: Neploxo
repeat 4
say all release
wait 1s
end_repeat
goto 1

/ / F2 LastObject + wait for target + TargetLast
/ / F3 target next

Here's another nubam 10 sheep.
/ / ---- Macro taming ----
set $ remember The Sheep remembers you
set $ master It seems to accept you as master
set $ player you can not tame the players.
set $ alredy This creature already tame
repeat 6
say all release
wait 600
end_repeat
1
8 send / / F12 LastObject + wait for target + TargetLast
set timer
while_not lastmsg $ remember or $ master or $ player or $ alredy
if lastmsg The Sheep remembers you
goto NeXT
end_if
if lastmsg It seems to accept you as master
goto NeXT
end_if
if lastmsg You can not tame the players.
goto NeXT
end_if
if lastmsg This creature already tame
goto Neploxo
end_if
if lastmsg You fail to tame the creature.
goto 1
end_if
if lastmsg Animal Taming changed now
goto NeXT
end_if
if timer> 40 000
gosub next
end_if

end_while
if timer> 5000
goto next
end_if
: NeXT
say all release
send nine
wait 500
goto 1
: Neploxo
repeat 4
say all release
wait 1s
end_repeat
goto 1
---------------------------------------

Just try this script.

------------------------------------------
set $ remember remembers
set $ success accept
set $ tamed already tame
set $ failed fail
set $ hungry hungry
set $ far far away
set $ skill changed
set $ wait you must wait
set $ cant see the target

set% arr [1] 325 670
set% arr [2] 290 766
set% arr [3] 319 221
set% arr [4] 290 083
set% arr [5] 360 029
set% arr [6] 438 701
set% arr [7] 18 143
set% arr [8] 333 052
set% arr [9] 747 836
set% arr [10] 289 412

set # cycle_cnt 0
: Loop
set # a 1

while # a <11
set lastobjectid 1234567890 / / ID of a meal for themselves
send F5 / / lastobject
set lastobjectid 1234567899 / / ID of a green stick
say all release
set lasttargetid% arr [# a]
: Repeat
send F5 / / lastobject
wait 1000
send F4 / / lasttarget
wait 1000
while_not lastmsg $ success
set $ oldmsg lastmsg

if lastmsg $ failed
goto repeat
end_if
wait 5000

if lastmsg $ wait
goto next
end_if
if lastmsg $ cant
goto next
end_if
if lastmsg $ hungry
goto next
end_if
if lastmsg $ skill
goto next
end_if
if lastmsg $ remember
goto next
end_if
if lastmsg $ tamed
goto next
end_if
if lastmsg $ far
goto next
end_if
if lastmsg $ oldmsg
set # cycle_cnt # cycle_cnt + 1
if # cycle_cnt> 2
set # cycle_cnt 0
goto next
end_if
else
set # cycle_cnt 0
end_if
end_while
: Next
set # a # a +1
end_while

goto loop

To use it, should be removed from their sheep, their array of targetID.
To do this, take the swifts Butcher and they in turn look after each cutting in the pilot in a number of char parameters in the box marked LastTargetID,
and submit it to the array. Before running the script, we feed the sheep (each 7-10 pieces of meat, well, or can be straw)
1 time use taming hands - on and on.
__________________
Welcome
LanceR вне форума   Ответить с цитированием
Ответ



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

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход





Powered by: vBulletin® Version 3.8.7
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
© 2004-2024 Forgotten World