Ребят...у кого есть скрипт на магию....
ВОт что мне нужно от скрипта...Каставать на любой предмет(ну токо комент рядом с идишником куда он кастует) если кончилась мана включал медитацию...каст мне нужен пойзон
Заранее спасибо....еси ты москвич то угощу пыффком ))
Магия...
Moderators: Murderator+, Murderator
-
- Posts: 7
- Joined: 2004-12-19 01:44:11
- Location: Москва
- Contact:
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
Собственно, вотс. Если не понятно что-то спрашивай
-
- Posts: 7
- Joined: 2004-12-19 01:44:11
- Location: Москва
- Contact:
-
- Posts: 7
- Joined: 2004-12-19 01:44:11
- Location: Москва
- Contact: