Возможно ли элементы массива записывать пользуясь addobject?

Ask for help

Moderators: Murderator+, Murderator

Post Reply
bahoho
Posts: 5
Joined: 2007-02-19 02:37:30

Возможно ли элементы массива записывать пользуясь addobject?

Post by bahoho »

хочу что то типа

Code: Select all

var T
dim object[5]
for i = 1 to 5
   uo.addobject('T')
   While UO.Targeting()
      Wait(100)
   Wend
 object[i] = T
next

но указаный обьект почему то не записываеться в массив
SLAK
Posts: 182
Joined: 2005-08-19 16:12:23
Contact:

Re: Возможно ли элементы массива записывать пользуясь addobj

Post by SLAK »

Хмм..Попробуй так.

Code: Select all

sub main
var i
dim XZobject[5]
for i =0 to 4
   uo.addobject('T')
   While UO.Targeting()
      Wait(100)
   Wend
 XZobject[i] = uo.getserial('T')
next
endsub

зы: впадло проверять :)
bahoho
Posts: 5
Joined: 2007-02-19 02:37:30

Re: Возможно ли элементы массива записывать пользуясь addobj

Post by bahoho »

не так тож не получаеться
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

спросите у дестракта - кажется чтото такое я видел только непомню... думаю он знает где или что...
SLAK
Posts: 182
Joined: 2005-08-19 16:12:23
Contact:

Post by SLAK »

Code: Select all

sub main() 
var i
dim XZobject[5]
for i =0 to 4
   uo.addobject('T')
   While UO.Targeting()
      Wait(100)
   Wend
 XZobject[i] = uo.getserial('T')
 uo.textprint(XZobject[i])
next
uo.textopen()
endsub

Проверил, работает!
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

NMY wrote:спросите у дестракта - кажется чтото такое я видел только непомню... думаю он знает где или что...

Чуть, что - сразу дестракт..

Code: Select all

sub main()
   var i, N = 5 ; количество элементов в массиве
   DIM something[ val( str( N ) ) ]
   For i = 0 To N -1
      If uo.Targeting() Then
         uo.Say( Chr( 27 ) ) ; Убрать прицел из клиента
      End If
      If uo.Waiting() Then
         uo.CancelTarget() ; Убрать ловушку прицела
      End If
      uo.AddObject( "object of array" ) ; Добавить объект
      While uo.Targeting()
          Wait( 100 )
      WEnd
      something[ i ] = uo.GetSerial( "object of array" ) ; Записать серийник в массив
   Next
End Sub
Post Reply