1 RLS
2 CKDIR dirid
2 DELETE listname
2 LPULL varname
2.1! *QUEUE*
2.1?
2.1 queid
2 LPUSH varname
2.1! *QUEUE*
2.1?
2.1 queid
2 LQUEUE varname
2.1! *QUEUE*
2.1?
2.1 queid
2 MKDIR dirid
2 READ listname
2.1.0! DATA.
2.1.0?
2.1.0 stem.
2.1.1? ( UPD
2 VARDROP varname dirid
2 VARGET varname dirid
2 VARPUT varname dirid
2 WRITE listname
2.1! DATA.
2.1?
2.1 stem.