Проблемы с зацикливанием скрипта...

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
-=WOLVERINE=-
Posts: 66
Joined: 2004-05-27 18:19:17
Contact:

Проблемы с зацикливанием скрипта...

Post by -=WOLVERINE=- »

Не могу понять как зациклить скрипт.. выдает ошибки..и кажыди раз разные помоги пожалуиста советом что сделать...

Code: Select all

sub Loot_WaW() 
while true
DIM R[2]
var c
R[1] = 0x0E75 # BackPack
R[2] = 0x0EED # Coin 

UO.UseObject('lastcorpse')
wait(100) 
uo.waittargetobject('lastcorpse')
uo.usetype(0x0EC3)
wait(400)

for c=1 to 2
repeat
uo.findtype(R[c],"-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=4 then
UO.Grab("0","finditem")
wait(2000)
end if

next
UO.Press('Enter')
wait(10)
UO.Say('.sac')
UO.WaitTargetObject('lastcorpse')
 uo.DeleteJOurnal()
    wait(150)
  end if
wend
wend
end sub
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

Code: Select all

sub Loot_WaW() 
while true
  for c=1 to 2
    repeat
      if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=4 then
      end if

  next
  end if
wend
wend
end sub


А ты посмотри что у тебя написано и подумай-что это вообще такое и как оно может работать?
-=WOLVERINE=-
Posts: 66
Joined: 2004-05-27 18:19:17
Contact:

Post by -=WOLVERINE=- »

Дело в том что я не понимаю даже что есть это с... :oops:

Code: Select all

 for c=1 to 2 

но догадываюсть что это переменная их как мне кажеться много я встречал л к и и вот теперь с.... может в неи проблема? обясни прошу тебя
GrandMaster Ranger
Posts: 73
Joined: 2005-01-14 13:41:05
Location: Одесса - мама
Contact:

Post by GrandMaster Ranger »

наваял за 1 минуту, вроде ошибок не выдает

Code: Select all

sub main() 
var c
DIM x[2]
x[1] = 0x0E75 # BackPack
x[2] = 0x0EED # Coin 
while not uo.dead()
UO.UseObject('lastcorpse')
wait(100) 
uo.waittargetobject('lastcorpse')
uo.usetype(0x0EC3)
wait(400)

for c=1 to 2
uo.findtype(x[c],"-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=4 then
UO.Grab("0","finditem")
wait(2000)
end if
next
UO.Press('Enter')
wait(10)
UO.Say('.sac')
UO.WaitTargetObject('lastcorpse')
 uo.DeleteJOurnal()
    wait(150)
wend
end sub

переменная С тут вобще была не причём , она просто использовалась в цикле for со значением 1 и 2
I'm
Expert!
Posts: 1396
Joined: 2004-10-15 22:38:04
Location: Moscow City.
Contact:

Post by I'm »

Ну кто? Кто? Постоянно закрывает темы?
The End.
-=WOLVERINE=-
Posts: 66
Joined: 2004-05-27 18:19:17
Contact:

Post by -=WOLVERINE=- »

спасибо огромное!топик можно закрывать если нужно!во всем разобрался и написал таки скрипт:)
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

I'm wrote:Ну кто? Кто? Постоянно закрывает темы?


Не помню- мб Я,но врятли =\
Post Reply