;
; *********************************************************************
; 
;            The section of a Redefinable Telesoftware Decoder
;                  to set up the Command Library's index
; 
;                      (C) C.J. Oswald 1982
;                           --  rtf0  --
; 
; *********************************************************************
; 
; 
; variables in the global vector (re)set on calls of
; softin or inital
;
 ^ GPER
stackf  #  2
queue   #  2
headqu  #  2
pass    #  1
oploc0  #  1
blockn  #  1
blocks  #  1
lastbl  #  1
blockg  #  32
zlockr  #  2
zloc00  #  2
commen  #  2
operan  #  1
memory  #  4
reloca  #  4
igno00  #  1
title   #  2
calc00  #  4
execut  #  4
noexec  #  1
norese  #  1
endofs  #  1
bytepe  #  1
disord  #  1
tandv   #  2
rawloc  #  1
thisbl  #  1
ordern  #  1
crc     #  2
checkc  #  2
norun   #  1
oldblo  #  1
; space complete used now.
bufflo  #  15
; 
; variables in the global vector (re)set on calls of inital
;
sevenb  #  1
blockr  #  2
bloc00  #  2
extral  #  15
; next free position is G%+107
; 
heapfr  #  2
commle  #  1
; next free position is G%+123
;
LPER3   *  hispac+1  
;
; NEXT SET OF VARIABLES HERE....
; zero page variables
;
ztype   *  ZPER2+0
zlo     *  ZPER2+2
zhi     *  ZPER2+4
ztempa  *  ZPER2+6
ztempl  *  ZPER2+8
znextf  *  ZPER2+9
ZPER3   *  znextf
; 
; 
 LNK RTF1