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

Возможно ли элементы массива записывать пользуясь addobject?
http://forum.yoko.com.ua/viewtopic.php?f=3&t=11464		 Page 1 of 1
Author:  bahoho [ 2007-02-19 02:40:35 ]
Post subject:  Возможно ли элементы массива записывать пользуясь addobject?
хочу что то типа
Code:
var T
dim object[5]
for i = 1 to 5
   uo.addobject('T')
   While UO.Targeting() 
      Wait(100) 
   Wend 
 object[i] = T
next

но указаный обьект почему то не записываеться в массив
Author:  SLAK [ 2007-02-19 03:13:10 ]
Post subject:  Re: Возможно ли элементы массива записывать пользуясь addobj
Хмм..Попробуй так.
Code:
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

зы: впадло проверять :)
Author:  bahoho [ 2007-02-21 09:27:24 ]
Post subject:  Re: Возможно ли элементы массива записывать пользуясь addobj
не так тож не получаеться
Author:  Nmy [ 2007-02-21 11:15:56 ]
Post subject: 
спросите у дестракта - кажется чтото такое я видел только непомню... думаю он знает где или что...
Author:  SLAK [ 2007-02-21 23:30:00 ]
Post subject: 
Code:
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

Проверил, работает!
Author:  Destruction [ 2007-03-16 05:35:56 ]
Post subject: 
NMY wrote:
спросите у дестракта - кажется чтото такое я видел только непомню... думаю он знает где или что...

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

Code:
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
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/