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

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