Переплавка
Moderators: Murderator+, Murderator
Переплавка
Дайте плз скрипт на переплавку и поясните плз, где для чего указывать тип..
Code: Select all
####################################
#############Smelting by evil_Gremlin, v 1.1
sub smelt_ground()
var r
var i,k=0
var max =((UO.Str*4)+30) #Calculating of max weight based on character strenght
DIM ore[4]
ore[1]=0x19B8
ore[2]=0x19B9
ore[3]=0x19BA
ore[4]=0x19B7
while k==0
r=0
If UO.Weight>=max-30 then
clean()
endif
for i=1 to 4
UO.FindType(ore[i],-1,'ground')
If UO.FindCount()>0 then
r=0
UO.Exec('moveitem finditem 1')
repeat
wait(50)
until Uo.ContainerOf('finditem')==UO.Getserial('backpack')
UO.Useobject('finditem')
else
#UO.Print('Not Found')
r=r+1
endif
next
if r==4 then
k=1
Uo.Print('No ore to smelt')
endif
wend
endsub
#############Ingots dropping sub
sub Clean()
var i,t,l,col
DIM type[5]
type[1]=0x1BEF
type[2]=0x1BF5
type[3]=0x1BE3
type[4]=0x1BE9
UO.Print('Overload. Cleaning')
col=0
repeat
col=0
for t=1 to 4
Uo.FindType(type[t],'-1','backpack')
If UO.FindCount()>0 then
UO.Print('Found')
l=0
Uo.Exec('drophere finditem')
repeat
wait(100)
until Uo.ContainerOf('finditem')<>Uo.GetSerial('backpack')
else
col=col+1
endif
next
until col>=4
UO.Print('Cleaned....')
end subFen1xXx wrote:Мне нужно катаны плавить, а не руду..
Сразу бы так и написал.
Code: Select all
var katana='0x0FC1' #тут тип катаны
var forge='0x0FB1' #Тут тип форджи
sub main()
while uo.count(katana)>0
uo.usefromground(forge)
uo.waittargettype(katana)
wait(200)
wend
endsubВооо.. сенке.. =)Leo wrote:Сразу бы так и написал.Code: Select all
var katana='0x0FC1' #тут тип катаны
var forge='0x0FB1' #Тут тип форджи
sub main()
while uo.count(katana)>0
uo.usefromground(forge)
uo.waittargettype(katana)
wait(200)
wend
endsub
-
1a2a3a4a5a6a
- Posts: 173
- Joined: 2006-02-10 13:26:37