Posted: 2005-04-04 13:53:14
Все исправил, должно работать у всех теперь 

Neznaika wrote:2Savage
Твой скрипт на раскладку карт запускается , вроде делаю всё как написано: в первом мешке карты , во втором мешке другие мешки и руны , третий мешок пустой. Запускаю скрипт тыкаю на первый мешок , потом на третий , потом на второй. Скрипт начинает раскладывать карты и руны по мешкам. В каждый мешок кладёт по одной руне и одной карте , когда мешки заканчиваются пишет , что не хватает мешков и рун. Я брал 5 мешков и 5 рун , карт около 100. Скажите пожалуйста так и должно быть?
I'm wrote:Neznaika wrote:2Savage
Твой скрипт на раскладку карт запускается , вроде делаю всё как написано: в первом мешке карты , во втором мешке другие мешки и руны , третий мешок пустой. Запускаю скрипт тыкаю на первый мешок , потом на третий , потом на второй. Скрипт начинает раскладывать карты и руны по мешкам. В каждый мешок кладёт по одной руне и одной карте , когда мешки заканчиваются пишет , что не хватает мешков и рун. Я брал 5 мешков и 5 рун , карт около 100. Скажите пожалуйста так и должно быть?
5 мешков...
5 рун...
100 карт...
и что вся сотня в 5 местах? нет батенька ты загнул в 1 мешок сует карты близкие по местоположению клада такчто думай хватит тебе 5 мест на 100 кладов или нет
MURLO wrote:А как в скрипте Sort Treasure Map убрать ету муть про руны на нашем шарде они очень дорогие и 100 рун ето целое состояние ))
У нас вообще деноминация прошла , теперь все дешего как бы но деньги добываются с трудомI'm wrote:MURLO wrote:А как в скрипте Sort Treasure Map убрать ету муть про руны на нашем шарде они очень дорогие и 100 рун ето целое состояние ))
За все хорошее надо платить
I'm wrote:По заказу ленивых трудящихся нелюбящих поиск.Code: Select all
sub Decode()
var count
UO.DeleteJournal()
UO.AddObject('Bag for 1st level maps')
while uo.Targeting()
wait(1000)
wend
UO.DeleteJournal()
UO.AddObject('Bag for 2nd level maps')
while uo.Targeting()
wait(1000)
wend
UO.DeleteJournal()
UO.AddObject('Bag for 3rd level maps')
while uo.Targeting()
wait(1000)
wend
UO.DeleteJournal()
UO.AddObject('Bag for 4th level maps')
while uo.Targeting()
wait(1000)
wend
UO.DeleteJournal()
UO.AddObject('Bag for 5th level maps')
while uo.Targeting()
wait(1000)
wend
UO.DeleteJournal()
UO.AddObject('Bag for Treasure Map')
while uo.Targeting()
wait(1000)
wend
repeat
uo.deletejournal()
uo.findtype(0x14EB)
uo.useobject('finditem')
count=0
while not uo.injournal("map") and count<20
count=count+1
wait(100)
wend
if uo.injournal("level 1") then
uo.moveitem('finditem',0,'Bag for 1st level maps')
CheckLag()
endif
if uo.injournal("level 2") then
uo.moveitem('finditem',0,'Bag for 2nd level maps')
CheckLag()
endif
if uo.injournal("level 3") then
uo.moveitem('finditem',0,'Bag for 3rd level maps')
CheckLag()
endif
if uo.injournal("level 4") then
uo.moveitem('finditem',0,'Bag for 4th level maps')
CheckLag()
endif
if uo.injournal("level 5") then
uo.moveitem('finditem',0,'Bag for 5th level maps')
CheckLag()
endif
if uo.injournal("no chance") then
uo.moveitem('finditem',0,'Bag for Treasure Map')
CheckLag()
endif
until UO.FindCount()==0
UO.Print("Done")
end sub
sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
Wait(500)
Until uo.InJournal('backpack')
end sub
Savage wrote:На бланк руне прописываются координаты мапы. для этого можно и книжки юзать.