Page 1 of 1
simple ore smelt
Posted: 2006-12-01 19:09:53
by Bangbuss
Nuzhen prostoj skript 6tob plavil vsu rudu katoraja v backpacke, 6tob plavil prosto a ne po 1. Esli est u kagota vikladite pozhalusta.
Posted: 2006-12-01 19:21:44
by Savage
Меняем id печки и вперед.
Code: Select all
sub smeltm()
VAR Forge='0x40004D06'
VAR WaitTime=1000
VAR Exit=0
While Exit<>1
UO.FindType('0x19B9',-1,'backpack')
If UO.FindCount() Then
UO.Print("Good!")
UO.WaitTargetObject(Forge)
UO.UseObject('finditem')
wait(WaitTime)
Else
UO.Print("Bad!")
Exit=1
Endif
Wend
end sub
Posted: 2006-12-01 19:58:35
by Bangbuss
nafig id pe4ki? nado prosta 2x nazhimat' na vse vidi rudi v backapacke.
Posted: 2006-12-01 20:38:13
by Nmy
Code: Select all
sub SMELTING()
while uo.skillval('Mining') < 1400
UO.Findtype('0x19B9', '-1','backpack')
If UO.Findcount() == 0 Then
UO.Findtype('0x19B8', '-1','backpack')
If UO.Findcount() == 0 Then
UO.Findtype('0x19BA', '-1','backpack')
If UO.Findcount() == 0 Then
UO.Findtype('0x19B7', '-1','backpack')
If UO.Findcount() == 0 Then
return
Endif
Endif
Endif
Endif
UO.moveitem('finditem','1','backpack',44,121,0 )
Wait(100)
CheckLag()
UO.UseType('0x19B7')
Wait(100)
wend
end sub
Code: Select all
while uo.skillval('Mining') < 1400
можно поменять на
Posted: 2006-12-01 21:29:39
by Bangbuss
po 1 plavit, a ne vse srazu.
nafig
mne nenado 6tob on vsu rudu po 1 plavil.
Posted: 2006-12-01 21:31:36
by Nmy
тогда тебе в поиск... я такие неумею писать
Posted: 2006-12-01 22:01:47
by Savage
Bangbuss wrote:nafig id pe4ki? nado prosta 2x nazhimat' na vse vidi rudi v backapacke.
Каков вопрос таков и ответ, ты же не указал каким образом происходит плавка.
Posted: 2006-12-01 22:57:17
by Bangbuss
Krch govara, nado 6tob posle komandi, 4ar nahadil v backpacke rudu, i 2x nazhal na vse vidi rudi.
Posted: 2006-12-02 06:14:23
by Savage
Code: Select all
sub smeltm()
VAR Forge='0x40004D06'
VAR WaitTime=1000
VAR Exit=0
While Exit<>1
UO.FindType('0x19B9',-1,'backpack')
If UO.FindCount() Then
UO.Print("Good!")
UO.UseObject('finditem')
wait(WaitTime)
Else
UO.Print("Bad!")
Exit=1
Endif
Wend
end sub
Posted: 2006-12-02 14:32:13
by Bangbuss
Savage Big Thx