Page 1 of 1
Помогите исправить скрипт
Posted: 2006-03-01 16:33:29
by flix-f
Вот сам скрипт:
sub Loot()
VAR WaitTime=2500
VAR Exit=0, i
DIM Loot[8]
Loot[0]=0x0EED ; gold coin
Loot[1]=0x0E75 ; sumka
Loot[2]=0x0F10 ; emeralds
Loot[3]=0x0F0F ; star sapphires
Loot[4]=0x0F13 ; rubies
Loot[5]=0x0F78 ; Batwings
Loot[6]=0x0F91 ; Wyrm's Hearts
Loot[7]=0x1726 ; Tinkering Materia
UO.UseObject('lastcorpse')
if UO.GetQuantity('lastcorpse') then
UO.WaitTargetObject('lastcorpse')
endif
UO.SetReceivingContainer('0x400C876F') ;
For i=0 to 8
if UO.GetQuantity('lastcorpse') then
UO.FindType( 'Loot[i]', '-1', 'lastcorpse')
if UO.GetQuantity('finditem') then
if Loot[i]==0x1078 then
UO.WaitTargetObject('finditem')
UO.UseType('0x0F9E')
else
UO.Grab(STR(0),'finditem')
endif
wait(WaitTime)
endif
endif
next
; UO.UnSetReceivingContainer()
end sub
Проблема в том что он неправильно работает. Тоесть лутать он лутает, но все подряд а не то что в списке.
Помогите пожалуйсто.
Posted: 2006-03-01 20:29:56
by Scripts Writer
могу ошибаться но на 4 if, 3 end if =)))
Code: Select all
sub Loot()
VAR WaitTime=2500
VAR Exit=0, i
DIM Loot[8]
Loot[0]=0x0EED ; gold coin
Loot[1]=0x0E75 ; sumka
Loot[2]=0x0F10 ; emeralds
Loot[3]=0x0F0F ; star sapphires
Loot[4]=0x0F13 ; rubies
Loot[5]=0x0F78 ; Batwings
Loot[6]=0x0F91 ; Wyrm's Hearts
Loot[7]=0x1726 ; Tinkering Materia
UO.UseObject('lastcorpse')
if UO.GetQuantity('lastcorpse') then
UO.WaitTargetObject('lastcorpse')
endif
UO.SetReceivingContainer('0x400C876F') ;
For i=0 to 8
if UO.GetQuantity('lastcorpse') then
UO.FindType( 'Loot[i]', '-1', 'lastcorpse')
if UO.GetQuantity('finditem') then
if Loot[i]==0x1078 then
UO.WaitTargetObject('finditem')
UO.UseType('0x0F9E')
else
UO.Grab(STR(0),'finditem')
endif
wait(WaitTime)
endif
endif
endif
next
; UO.UnSetReceivingContainer()
end sub
пробуй так )
утепление потолка в парной
Posted: 2006-03-01 22:16:24
by LordTom
Маришка, вам надо заходить с другого бока. Вы просто не интересны сами себе, неуверены в себе, не понимаете свою уникальность. Уникальность не для вашего партнера, а прежде всего для самой себя. Ваше
Маришка, вам надо заходить с другого бока. Вы просто не интересны сами себе, неуверены в себе, не понимаете свою уникальность. Уникальность не для вашего партнера, а прежде всего для самой себя. Ваше
Posted: 2006-03-02 12:21:42
by flix-f
Описано от 0 до 7 а проверяеш от 0 до 8 вот он на последнем loot[8] и беред любой тип, что собсна и приводит к луту всего подряд.
а ты посчитай сколько тайпов!? (от 0 до 7 получается 8 )
Если сделать до 7 то проверка остановится на 6 тайпе.
А насчет ендиф то их ровно столько сколько ифов посчитай.
Может у меня сам инжект старый или новый и на нем скрипт работает неправильно?
Posted: 2006-03-02 12:56:52
by CFA
а ты пробовал изменить? правильно тебе говорят
в цикле - for n=a1 to a2, n будет принимать значения от a1 до a2 включительно. For i=0 to 8 - конкретно тут от 0 до 8, а 8 элемента массива нет
защита акустики на классике
Posted: 2006-03-02 18:35:38
by LordTom
" А ежели поймешь, что сансара - нирвана, то всяка печаль пройдет" Б.Г. Святые тоже так говорят, остается сначала только понять, что такое нирвана, затем сравнить её с сансарой Жаль, что по сущ
Posted: 2006-03-03 14:10:57
by flix-f
мдя.... попробую... Спасибо бальшое за помощь!
