скрипт на пойзонинг

[nekro]

У кого есть скрипт на пойзонинг самый просто чтоб чар просто травил даггер
и чуть чуть посложнее чтоб чар делал лессер пойзоны и ими пойзонил даггер
заранее спасибо

[MitAl]

У кого есть скрипт на пойзонинг самый просто чтоб чар просто травил даггер
и чуть чуть посложнее чтоб чар делал лессер пойзоны и ими пойзонил даггер
заранее спасибо

Вот самый простой: берет из сумки пойсоны и травит ими даггер

Code: Select all

sub Poisoning() 
var LastTimer=0
var Exit=0
var TryToPoison=1

while Exit<>1 
UO.DeleteJournal() 

UO.FindType('0x0F0E',-1,'backpack') ; poison bottle 
If UO.GetQuantity('finditem')<10 then 
UO.FindType('0x0F0E','0x0998','0x400AB9F7') ; poison bottle container 
wait(1000) 
UO.Grab('300','finditem') 
wait(100) 
Endif 

repeat 
UO.FindType('0x0F0E','0x0998','my') 
If UO.GetQuantity('finditem')>0 then 
	UO.UseSkill('Poisoning') 
	UO.WaitTargetObject('0x400D6970','finditem') ; dagger 
	wait(4000)
	TryToPoison=1 
Else 
	TryToPoison=0 
Endif 

until TryToPoison <> 0
wend

А вот скрипт который сначала делает пойзоны а потом ими травит даггер

Code: Select all

sub Poison() 
var LastTimer=0
var Exit=0
var TryToPoison 
while Exit<>1 
UO.DeleteJournal() 

UO.FindType('0x0F0E',-1,'backpack') ; bottle 
If UO.GetQuantity('finditem')<10 then 
UO.FindType('0x0F0E','0x0000','0x401C7D02') ; bottle, container 
wait(1000) 
UO.Grab('300','finditem') 
wait(100) 
Endif 
UO.FindType('0x0F88','0x0000','backpack') ; NS 
If UO.GetQuantity('finditem')<20 then 
UO.FindType('0x0F88','0x0000','0x400AB9F7'); NS, container 
wait(1000) 
UO.Grab('600','finditem') 
wait(500) 
Endif 
LastTimer=UO.Timer() 
UO.WaitMenu('What','(2)') ; menu 
UO.UseType(0x0F88) ; NightShade 

while NOT UO.InJournal("You put") AND NOT UO.InJournal("You toss the failed") 
wait(500) 
wend 

If UO.InJournal("You toss the failed") then 
repeat 
wait(100) 
until UO.Timer()>=LastTimer+100 ;time to make a dagger 
Else 
TryToPoison=1 
repeat 
UO.FindType('0x0F0E','0x0998','my') 
If UO.GetQuantity('finditem')>0 then 
UO.UseSkill('Poisoning') 
UO.WaitTargetObject('0x400D6970','finditem') ; dagger 
; UO.UseSkill('Poisoning') 
wait(4000) 
Else 
TryToPoison=0 
Endif 
EndIf 
wend