Podkorektiruyte!

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
DIDron
Posts: 54
Joined: 2007-07-09 18:48:42

Podkorektiruyte!

Post by DIDron »

Кароче мне надо что б перед тем как выкинуть пропойсонное мясо он на него кидал скилл тест ид а токо потом выкидывал!

Code: Select all

sub poison()
VAR Sunduk = '0x400F89DD'
VAR poison = '0x1837'
VAR mjaso = ('0x09F1, 0x0000')
VAR gotovoe = ('0x09F1,0x0026')
VAR k
UO.Exec('set finddistance 2')
While TRUE
UO.Findtype(0x1837, 0x0000, sunduk)
UO.Grab( '1', 'finditem' )
If UO.FindCount() == 0 Then
UO.Print("resursi zakon4elisj, script terminated")
return
Endif
UO.Grab( '1', 'finditem' )
wait( 1000 )
UO.Findtype(0x09F1, 0x0000, sunduk)
If UO.FindCount() == 0 Then
UO.Print("resursi zakon4elisj, script terminated")
return
Endif
UO.Grab( '1', 'finditem' )
wait( 1000 )
UO.DeleteJournal()
UO.FindType('poison' ,-1,'backpack')

UO.useType( poison )
UO.WaitTargetType( mjaso )
wait(500)

k = 0
while NOT UO.InJournal('soobshenie pri uda4nom crafte') AND NOT UO.InJournal('soobshenie pri neuda4e ') AND ( k < 30 )
k = k + 1

wend
UO.Print( 'gotovogo mjasa ' + str( UO.Count(gotovoe ) ) )
if UO.Count( gotovoe ) > 0 then
UO.FindType( gotovoe, -1, 'backpack' )
UO.MoveItem( 'finditem', 0, Sunduk )
wait( 1000 )
UO.Print( 'skinuto...' )
end if
Wend
end sub
DIDron
Posts: 54
Joined: 2007-07-09 18:48:42

Post by DIDron »

да кстати задержка 3 секунды т.е он нанего кинул тест ид через 3 секунды выкидывает мясно цветом оно будет другово! 0x09F1 0x0049 тут типо и колор, Помогите кто может
Okypok
Posts: 100
Joined: 2007-10-12 20:48:07

Post by Okypok »

Ты бы еще сообщения сделал что ли. Видимо, скрипт не твой.
k = 0
while NOT UO.InJournal('soobshenie pri uda4nom crafte') AND NOT UO.InJournal('soobshenie pri neuda4e ') AND ( k < 30 )
k = k + 1
Вот тут тебе указали, что сообщения надо вставить свои.

А по просьбе:
добавь там

Code: Select all

sub poison()
VAR Sunduk = '0x400F89DD'
VAR poison = '0x1837'
VAR mjaso = ('0x09F1, 0x0000')
VAR gotovoe = ('0x09F1,0x0026')
VAR k
UO.Exec('set finddistance 2')
While TRUE
UO.Findtype(0x1837, 0x0000, sunduk)
UO.Grab( '1', 'finditem' )
If UO.FindCount() == 0 Then
UO.Print("resursi zakon4elisj, script terminated")
return
Endif
UO.Grab( '1', 'finditem' )
wait( 1000 )
UO.Findtype(0x09F1, 0x0000, sunduk)
If UO.FindCount() == 0 Then
UO.Print("resursi zakon4elisj, script terminated")
return
Endif
UO.Grab( '1', 'finditem' )
wait( 1000 )
UO.DeleteJournal()
UO.FindType('poison' ,-1,'backpack')

UO.useType( poison )
UO.WaitTargetType( mjaso )
wait(500)

k = 0
while NOT UO.InJournal('soobshenie pri uda4nom crafte') AND NOT UO.InJournal('soobshenie pri neuda4e ') AND ( k < 30 )
k = k + 1

wend
wait(300)
uo.findtype('0x09F1','0x0026','backpack')
if uo.findcount() then
UO.Useskill('Item Identification','finditem')
endif
wait(3000)

UO.Print( 'gotovogo mjasa ' + str( UO.Count(gotovoe ) ) )

UO.FindType( '0x09F1','0x0049','backpack' )
if uo.findcount() then
UO.MoveItem( 'finditem', 0, Sunduk )
wait( 1000 )
UO.Print( 'skinuto...' )
end if
Wend
end sub
Image
Image
DIDron
Posts: 54
Joined: 2007-07-09 18:48:42

Post by DIDron »

Огромное спасибо!!!
Post Reply