Yoko

All sides of Injection
It is currently 2025-12-28 15:12:50

All times are UTC+02:00




Post new topic  Reply to topic  [ 4 posts ] 
Author Message
 Post subject: таминг
PostPosted: 2004-07-21 10:41:39 
Offline

Joined: 2004-06-25 10:55:37
Posts: 11
sub main()
var i,kolvo,tamed
DIM rats[8]
kolvo=8
for i = 1 to kolvo
uo.FindType(0x00e2,-1,1)
rats[i]=uo.GetSerial('finditem')
uo.Ignore('finditem','on')
next
uo.IgnoreReset()
uo.DeleteJournal()
RepeatLabel:
for i = 1 to kolvo
tamed=0
while (tamed<>1)
uo.DeleteJournal()
uo.UseSkill("Animal Taming",rats[i])
while ((uo.InJournal("You fail to tame")==0) and (uo.InJournal("master")==0))
wait(1000)
wend
if (uo.InJournal("master")<>0) then
tamed=1
end if
wait(500)
wend
uo.say("all release")
if (uo.InJournal("remembers")<>0) then
wait(20000)
end if
next
Goto RepeatLabel
end sub


это скрипт на таминг...в 6 строке прописан тип лошади(серой)...куда надо вставить вот эти 2 типа...0x00e4(бежевая) и 0x00cc(коричневая)
куда надо дописать эти 2 типа? чтоб тамились все лошади


Top
   
 Post subject:
PostPosted: 2004-07-21 15:57:31 
Offline
Expert!
User avatar

Joined: 2004-05-31 09:31:51
Posts: 838
Вопрос то твой я понял .....только зачем тебе это ?...
Глянь сюда
http://yoko.netroof.net/forum/viewtopic.php?t=647
Я вопрос с забиванием типов коней решил так ...

_________________
Все просто.
BETEPAH ™


Top
   
 Post subject:
PostPosted: 2004-07-21 17:12:51 
Offline

Joined: 2004-06-25 10:55:37
Posts: 11
у нас на сервере чюток подругом...увас тамитьб надо стафом...а у нас скилом таминг
ну так гадо...щаз с типом 0x00e2 я могу тамить только серых лошадей....а хочеться коричневых и бежевых аиди я дал...я просто незнаю куда это правельно вписать


Top
   
 Post subject: Re: таминг
PostPosted: 2004-07-22 07:21:57 
Offline

Joined: 2004-06-28 16:28:29
Posts: 38
durik wrote:
sub main()
var i,kolvo,tamed
DIM rats[8]
kolvo=8
for i = 1 to kolvo
uo.FindType(0x00e2,-1,1)
rats[i]=uo.GetSerial('finditem')
uo.Ignore('finditem','on')
next
uo.IgnoreReset()
uo.DeleteJournal()
RepeatLabel:
for i = 1 to kolvo

это скрипт на таминг...в 6 строке прописан тип лошади(серой)...куда надо вставить вот эти 2 типа...0x00e4(бежевая) и 0x00cc(коричневая)
куда надо дописать эти 2 типа? чтоб тамились все лошади


Не понятно зачем первый цикл ... ну ладно, не важно.
Исходя из оригинала:
1) увеличиваешь массив rats в три раза
2) дописываешь ещё два цикла
Code:
    for i = kolvo to kolvo*2
      uo.FindType(0x00e4,-1,1)
      rats[i]=uo.GetSerial('finditem')
      uo.Ignore('finditem','on')
   next
    for i = kolvo*2 to kolvo*3
      uo.FindType(0x00cc,-1,1)
      rats[i]=uo.GetSerial('finditem')
      uo.Ignore('finditem','on')
   next

3) увеличиваешь последний
Code:
RepeatLabel:
   for i = 1 to kolvo*3


вариант не самый лучший .... попробуй - вдруг работать будет :wink:


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 4 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 1 guest


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited