 выкладка из мешков, нужен скрипт |
   Сообщений: 1254 Рег. 13.02.2013 |
 19 ноября 2013 15:08 Сообщение #1
|
Нужен скрипт на выкладку из Bag вещей которые в паке появляются. под чистую чтоб чистил мешок |
|
|
|
|
 Сообщений: 129 Рег. 9.08.2013 |
19 ноября 2013 15:37 Сообщение #2
|
Если я правильно тебя понял. sub Cleaner() UO.Print('From where?') UO.AddObject('FBag') While UO.Targeting() Wait(100) Wend UO.Print('To where?') UO.AddObject('TBag') While UO.Targeting() Wait(100) Wend UO.Set('quiet', '1') Repeat UO.FindType('-1', '-1', 'FBag') If UO.FindCount() > 0 Then UO.SetReceivingContainer('TBag') UO.Grab('-1', 'finditem') Wait(100) UO.UnsetReceivingContainer() Endif Until UO.FindCount() < 1 UO.Set('quiet', '0') UO.Print('Done!') End Sub |
|
|
|
|
 Сообщений: 1029 Рег. 7.09.2009 |
19 ноября 2013 16:20 Сообщение #3
|
А где у нас монстры с мешками? |
|
|
|
|
|
Сообщений: 1254 Рег. 13.02.2013 |
19 ноября 2013 18:55 Сообщение #4
|
Как сделать выкладку из Bag в сундук или мешок по ид чтоб просто указал какой выгрузить и все |
|
|
|
|
|
Сообщений: 129 Рег. 9.08.2013 |
19 ноября 2013 19:16 Сообщение #5
|
sub Cleaner() Var TBag = '0x00000000'; ID контейнера UO.Print('From where?') UO.AddObject('FBag') While UO.Targeting() Wait(100) Wend UO.Set('quiet', '1') Repeat UO.FindType('-1', '-1', 'FBag') If UO.FindCount() > 0 Then UO.SetReceivingContainer( TBag ) UO.Grab('-1', 'finditem') Wait(100) UO.UnsetReceivingContainer() Endif Until UO.FindCount() < 1 UO.Set('quiet', '0') UO.Print('Done!') End Sub |
|
|
|
|
|
Сообщений: 1254 Рег. 13.02.2013 |
19 ноября 2013 19:25 Сообщение #6
|
Спасибо |
|
|
|
|
Последние посетители (0):
| Сейчас: 25 ноября 2024 04:29 |