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
из меня никакой скрипт такчто можна чтобы он кастовал под сетя телепорт просто ?