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

Дайте скрипт на Анатамою плс...
http://forum.yoko.com.ua/viewtopic.php?f=20&t=1913
Page 1 of 1

Author:  killmon [ 2004-11-10 17:44:53 ]
Post subject:  Дайте скрипт на Анатамою плс...

Ну в заглавие просьба вроде написана...;)

Author:  joker_psix [ 2004-11-10 17:49:38 ]
Post subject: 

вот что выдал поиск =)


Code:
sub Anatomy() 
var count=0
uo.print('Totem')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
repeat
uo.waittargetobject('TOT')
UO.Useskill('Anatomy')   
wait(2000)
until UO.Dead()
end sub

Author:  Leks [ 2004-11-11 04:55:06 ]
Post subject:  Re: Дайте скрипт на Анатамою плс...

killmon wrote:
Ну в заглавие просьба вроде написана...;)

Code:
sub Anatomy() 
var Exit=0   
while Exit==0
uo.DeleteJournal()
uo.Waittargetself()
uo.Useskill('Anatomy')
while not (uo.InJournal('looks')or uo.InJournal('You'))   
wait(1000)
uo.UseSkill('Spirit Speak')
wait(3000)
wend
wend
end sub

Author:  OldArtes [ 2004-11-11 05:29:53 ]
Post subject:  Re: Дайте скрипт на Анатамою плс...

ВОт тебе на все лоры а то пока Анатомию докачаешь тебе еще и другие лоры прокачать захочится :) :)
Code:
##### 01 #####
sub Anatomy()
var count=0
uo.print('Totem')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
repeat
uo.waittargetobject('TOT')
UO.Useskill('Anatomy')
wait(4000)
until UO.Dead()
end sub
#############

##### 02 #####
sub AnimalLore()
var count=0
uo.print('Totem')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
repeat
uo.waittargetobject('TOT')
UO.Useskill('Animal Lore')
wait(4000)
until UO.Dead()
end sub
#############

##### 03 #####
sub ArmsLore()
var count=0
uo.print('totem')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
repeat
uo.waittargetobject('TOT')
UO.Useskill('Arms Lore')
wait(4000)
until UO.Dead()
end sub
#############

##### 04 #####
sub Evaluating()
var count=0
uo.print('totem')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
repeat
uo.waittargetobject('TOT','TOT')
UO.Useskill('Evaluating')   
while not UO.InJournal("unsure") and not UO.InJournal("looks") and not UO.InJournal("perform") and count<60
wait(100)
count=count+1
wend
wait(600)
count=0
UO.DeleteJournal()
until UO.Dead()
end sub
#############

##### 05 #####
sub ItemIdentification()
var count=0
uo.print('totem')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
repeat
uo.waittargetobject('TOT')
UO.Useskill('Item Identification')
wait(4000)
until UO.Dead()
end sub
#############

##### 06 #####
sub ForensicEvaluation()
var count=0
uo.print('Please Change Dead Creature...')
uo.exec('addobject ForensicAnimal')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
repeat
uo.waittargetobject('ForensicAnimal')
UO.Useskill('Forensic Evaluation')
while not UO.InJournal("unsure") and not UO.InJournal("looks") and not UO.InJournal("perform") and count<60
wait(35)
count=count+1
wend
wait(35)
count=0
UO.DeleteJournal()
until UO.Dead()
end sub
#############

##### 07 #####
sub TasteIdentification()
var count=0
uo.print('totem')
uo.exec('addobject TOT')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
repeat
uo.waittargetobject('TOT')
UO.Useskill('Taste Identification')   
wait(4000)
until UO.Dead()
end sub
#############

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