Search found 6 matches

by Mr.lone
2005-09-27 15:49:58
Forum: Scripting Ore
Topic: Авто ответы
Replies: 13
Views: 2525

Ждем твоего творения =)
by Mr.lone
2005-09-27 13:47:22
Forum: Scripting Ore
Topic: Авто ответы
Replies: 13
Views: 2525

Спасибо лео , но я уж сам переписал подругому.
Дестракшен написал бы по делу =)
by Mr.lone
2005-09-27 10:38:31
Forum: Scripting Ore
Topic: Авто ответы
Replies: 13
Views: 2525

if UO.InJournal(UO.GetName('lasttarget')+" An Ex Por")
имеешь ввиду ето?
by Mr.lone
2005-09-27 09:26:47
Forum: Scripting Ore
Topic: Авто ответы
Replies: 13
Views: 2525

sub main()
Var ser, ManaNeed=4, CastTime = 500
while not uo.dead()
if uo.injournal("An Ex Por") then
ser=uo.getserial(UO.JournalSerial(uo.InJournal("An Ex Por")-1))
uo.deletejournal()
if UO.Mana>=ManaNeed then
UO.Cast('Magic Arrow',ser)
else
UO.Print("Low mana!!!")
end ...
by Mr.lone
2005-09-27 09:02:40
Forum: Scripting Ore
Topic: Авто ответы
Replies: 13
Views: 2525

Воть по идеи .

sub alig()
while not uo.dead()
if UO.InJournal(UO.GetName('lasttarget')+": An Ex Por") then
UO.DeleteJournal()
UO.Cast("Magic Arrow",'lasttarget')
wait(1000)
endif
wend
end sub

Про тестил не получилось =)
Кто нить сможет поправить =)?
by Mr.lone
2005-09-27 08:58:16
Forum: Scripting Ore
Topic: Авто ответы
Replies: 13
Views: 2525

Авто ответы

ВотЪ например

#******Ответ на Paralyze******#
if UO.InJournal(UO.GetName('lasttarget')+": An Ex Por") then
UO.DeleteJournal()
UO.Cast("Magic Arrow",'lasttarget')
wait(1000)
endif

Хотел бы спросить будет ли работать ? =)