examples/15objs.txt

# objs
OBJECTS['деньги'] = 12
OBJECTS['патроны'] = 137
 
'Количество: <<OBJECTS[$getobj(countobj)]>>'

!Первый предмет в списке
GETOBJ(1) 
 
!Последний предмет в списке
GETOBJ(COUNTOBJ)

i = 1
:loop
IF i <= COUNTOBJ:
  OBJECTS[$GETOBJ(i)] = OBJECTS[$GETOBJ(i)] + 1
  i = i + 1
  JUMP 'loop'
END
-