examples/8sub.txt

# sub
GS 'переход', 'локация'
GS 'ход'
GS $loc,1
GS 'ход',$var,2,'данные'
яблоки = FUNC('функция')
PL FUNC($name, 1) * 78
MSG "text" + FUNC($name, "строка", 2)
if args[0] = 0: exit
-

#переход
*PL $ARGS[0]  &! На экран выведется 'локация'
ACT 'Перейти':
  GT $ARGS[0] &! Работать не будет, т.к. массив ARGS пуст
END
-