Page 1 of 1

Magery

Posted: 2007-05-05 22:16:45
by Un1c0rN
Парни выложите скрипт для прокачки магии , например чтобы чар кастовал поисон под drw

Posted: 2007-05-07 02:16:03
by stickman
ну ты даешь :D

Code: Select all

Var Sunduk='0x40226380' 

sub main()
While uo.count('0x0F88','0x0000')>0

if uo.skillval('Magery',1)==1000 Then
return
end if

UO.FindType('0x0F88',-1,'backpack')
While UO.GetQuantity('finditem')<5
UO.FindType('0x0F88','0x0000',Sunduk)
wait(1000)
UO.Grab('100','finditem')
wait(700)
Wend

##while uo.mana>20
cheklag()
uo.cast('Poison','self')
wait(3000)
##wend


Repeat
uo.deletejournal()
uo.useskill('Meditation')
Wait(3000)
Until UO.InJournal("You must wait to perform another action") or uo.mana >= uo.int

While uo.mana < uo.int
Wait(100)
Wend
Wait(100)

Wend
end sub

sub cheklag()
uo.deletejournal()
uo.click('backpack')
Repeat
wait(100)
Until UO.InJournal("backpack")
end sub

Posted: 2007-05-07 02:18:06
by Ururu
вот еще вариант более простого скрипта, прост в настройке

Code: Select all

sub magery() 
repeat
If UO.mana>=5 Then
uo.cast("Agility" , 'self')
wait(4500)
Else
while uo.mana<100
UO.useskill('Meditation')
wait(4500)
wend
EndIf
until false
end sub

Posted: 2007-06-29 00:41:35
by MeLFiS

Code: Select all

sub magery() 
repeat
If UO.mana>=20 Then
uo.cast("Teleport", 'self')
wait(1000)
Else
while uo.mana<62
UO.useskill('Meditation')
wait(4500)
wend
EndIf
until false
end sub





Исправил магию на телепорты но на себя не кастуетса почемуто пишет что не видит цели

Posted: 2007-06-30 01:35:13
by MeLFiS
что не кто не знает как зделать скрипт чтобы под себя кастовал телепорт ??

Posted: 2007-06-30 08:45:29
by Laden
Сними кооринаты с себя и по ним и кастуй.. примеров тут полно (тот же скрипт на стенки) - дерзай. :twisted:

Posted: 2007-06-30 16:51:15
by MeLFiS
из меня никакой скрипт такчто можна чтобы он кастовал под сетя телепорт просто ?