Yoko
http://forum.yoko.com.ua/

Подкорректируйте скрипт на собирание предметов плиз
http://forum.yoko.com.ua/viewtopic.php?f=20&t=4507
Page 1 of 1

Author:  Mihail [ 2005-07-12 23:54:54 ]
Post subject:  Подкорректируйте скрипт на собирание предметов плиз

Code:
sub up()
var x
if uo.getglobal('woodS')=='1' then
uo.print('**Warning! gathering rubbish is allready running!!')
goto exit2
end if
uo.setglobal('woodS','1')
dim a[6]
  a[1]=0x0000
  a[2]=0x0000
 a[3]=0x0000
 a[4]=0x0000
 a[5]=0x0000
 a[6]=0x0000
  for x=1 to 6
      uo.findtype(a[x],"-1","ground")
    if UO.FindCount()>0 and Uo.GetDistance("finditem")<=3 then
      uo.moveitem("finditem")
      uo.print('...up...')
           wait(500)
    end if
    uo.setglobal('woodS','0')
  uo.print('.end script.')
  exit2:
  end sub

вместо того, чтобы поднять заданные предметы он сразу переходит к завершению пишет что мол скрипт закончен и вырубает..(

Author:  flake [ 2005-07-13 00:42:17 ]
Post subject:  Re: Подкорректируйте скрипт на собирание предметов плиз

1. У тебя нету Next-a
2. Пропиши типы в массив.

Code:
sub up()
var x
if uo.getglobal('woodS')=='1' then
uo.print('**Warning! gathering rubbish is allready running!!')
goto exit2
end if
uo.setglobal('woodS','1')
dim a[6]
  a[1]=0x0000
  a[2]=0x0000
 a[3]=0x0000
 a[4]=0x0000
 a[5]=0x0000
 a[6]=0x0000
  for x=1 to 6
      uo.findtype(a[x],"-1","ground")
    if UO.FindCount()>0 and Uo.GetDistance("finditem")<=3 then
      uo.moveitem("finditem")
      uo.print('...up...')
           wait(500)
    end if
  Next
    uo.setglobal('woodS','0')
  uo.print('.end script.')
  exit2:
  end sub

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/