Page 1 of 1
Магия...
Posted: 2005-01-07 12:12:13
by Bob Marley
Ребят...у кого есть скрипт на магию....
ВОт что мне нужно от скрипта...Каставать на любой предмет(ну токо комент рядом с идишником куда он кастует) если кончилась мана включал медитацию...каст мне нужен пойзон
Заранее спасибо....еси ты москвич то угощу пыффком ))
Posted: 2005-01-07 12:46:12
by JIupus
"Юзай поиск"©
Тема обсуждалась не раз, в том числе и про пойзон
Posted: 2005-01-07 14:51:59
by KrafteR
Code: Select all
sub Magery()
VAR NS='0x0F88'
VAR Sunduk='0x4021C658'
VAR Kolvo=10
VAR k = 0, j
VAR LastTimer
while NOT UO.Dead()
While UO.NS<=1
UO.FindType(NS, -1, Sunduk)
If UO.FindCount()==0 Then
UO.Print("NS not found, script terminated")
else
j = UO.GetQuantity( 'finditem' )
If j > Kolvo Then
UO.Print("I can use" + str( j ) + "NS")
else
UO.Print("I can't use" + str( j ) + "NS")
Endif
If Kolvo == 1 Then
UO.FindType( NS )
UO.MoveItem( 'finditem', '2', Sunduk )
wait(500)
Else
UO.Grab( Str( Kolvo ), 'finditem' )
wait(500)
Endif
wend
while UO.Mana>66
UO.Cast('Poison','self')
wait(3000)
wend
while UO.Mana<UO.Int
LastTimer=UO.Timer()
UO.UseSkill('Meditation')
repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose") OR UO.Timer()>LastTimer+200
UO.DeleteJournal()
wait(2000)
wend
Wend
end sub
Собственно, вотс. Если не понятно что-то спрашивай
Posted: 2005-01-07 20:17:29
by Bob Marley
Место Self можно добавить Var Runka="ID рунки" это на верх к варам а в низу дописать (Poison Runka) ?
Posted: 2005-01-07 21:42:31
by JIupus
конечно можно
А ты случаем не с оскома будешь?
Posted: 2005-01-07 22:49:49
by Bob Marley
Угу...С фри приемущественно
И кстати Азы писания скриптов я знаю...
)))))))) Правда ооооооччччеееньь плохо...еси чё стучись в асю....в про файле глянешь...