Page 1 of 1
FORGE - pereplavka kortikov
Posted: 2005-08-26 01:56:23
by Ashes
Nuzen skript na pereplavku kortikav v backpack !!! Ja uze katorij 4as majusj s takim skriptom no ne4ivo nepolu4ajetsa

! Kak zdelatj 4tobi 4ar juzal FORGE i patom na kortik ??? (v backpack 255 kortikov).
Posted: 2005-08-26 04:18:20
by Ashes
Vo nakonecto namutil etot poganij skript toka polevomu zaciklil jevo

! Pomagite jevo dovesti do uma tobesh pravelno jego zaciklitj ato etot variant nesovsem pravelnij budet
Code: Select all
sub SmeltFull()
var Forge = '0x400158C7'
SmeltItem(0x0F43)
wait(200)
end sub
sub SmeltItem(ItemID)
uo.FindType(ItemID,"-1","backpack")
uo.Print(uo.FindCount())
while uo.FindCount()>0
uo.WaitTargetObject("finditem")
uo.UseObject("Forge")
UO.Exec('exec SmeltFull')
end sub
Posted: 2005-08-26 04:37:34
by Ashes
Pojevilsja jes4o adin vaprosik kak zdelatj 4tobi pereplavljatj kortik katorij nahoditsja v mesho4ke a mesho4ek v backpacke ??? Vot zada4ka nedlja moih mazgov

HELP,HELP,HELP - F1,F1,F1

Posted: 2005-08-26 11:15:59
by Leo
Не тестил, но попробуй.
Code: Select all
var katana='0x0FC1' #тут тип катаны
var forge='0x0FB1' #Тут тип форджи
var cont='0x400BC88C' #ID контейнера где катаны
sub main()
UO.FindType(katana, '-1', cont)
while UO.GetQuantity('finditem') > 0
UO.UseFromGround(forge)
UO.WaitTargetType('finditem')
wait(200)
wend
endsub