Во первых паузу на прицел повесить нельзя в существующих версиях инжекта. Точнее можно но через сиделку.
Во вторых то что ты просишь выглядит примерно вот так:
Code:
sub ExpLast()
if UO.GetSerial('laststatus')==UO.GetSerial('self') then
UO.Print('Я не камикадзе себя взрывать!')
else
if UO.GetSerial('laststatus')<>UO.GetSerial('self') then
if str(UO.GetHP('laststatus'))>'0' then
UO.Print('Эта животное имеет: '+str(UO.GetHP('laststatus'))+' жизней')
Explode()
else
UO.Print('Пациент скорее мертф чем жиф ')
endif
endif
endif
end sub
sub Explode()
VAR target = 'laststatus'
UO.FindType('0x0F0D','0x0000','me')
If UO.GetQuantity('finditem')>0 Then
UO.DeleteJournal()
UO.UseObject('finditem')
while not UO.InJournal('3')
wait(100)
wend
UO.Drop('1',STR( UO.GetX( target )), STR( UO.GetY( target )), STR( UO.GetZ( target )),'finditem')
wait(100)
UO.FindType('0x0F0D','0x0000','me')
If UO.GetQuantity('finditem')>0 Then
UO.UseObject('finditem')
wait(100)
UO.Drop('1',STR( UO.GetX( target )), STR( UO.GetY( target )), STR( UO.GetZ( target )),'finditem')
EndIf
EndIf
end sub
Отрицательная сторона - расстояние на которое можно передвинуть бутылку. Примерно 3-4 тайла от тебя до врага.
Я пользуюсь вот таким скриптом:
Code:
sub ExpLast()
if UO.GetSerial('laststatus')==UO.GetSerial('self') then
UO.Print('Я не камикадзе себя взрывать!')
else
if UO.GetSerial('laststatus')<>UO.GetSerial('self') then
if str(UO.GetHP('laststatus'))>'0' then
UO.Print('Эта животное имеет: '+str(UO.GetHP('laststatus'))+' жизней')
Explode()
else
UO.Print('Пациент скорее мертф чем жиф ')
endif
endif
endif
end sub
Sub Explode()
VAR target = 'laststatus'
VAR i , b=3
For i=1 to b
UO.FindType('0x0F0D','0x0000','me')
If UO.GetQuantity('finditem') Then
UO.WaitTargetTile('400', STR( UO.GetX( target )), STR( UO.GetY( target )), STR( UO.GetZ( target )))
;UO.WaitTargetObject('laststatus')
UO.UseObject('finditem')
Else
UO.Print("Explosives not found!")
EndIf
wait(200)
Next
end sub
Укинуть можно на 20 тайлов (за экран). Моя версия с паузой работать не будет.