DEF M DELIM_PROG
F=DELIM_PROG
I
DEF K GOLD D AS "EXT DELIM_WP."
^Z
C;ISE EN WO '^Z 9ASC 10ASC 11ASC 12ASC 13ASC 27ASC I ()[],-+*/='^Z EX
^Z
DEF M DELIM_WP
F=DELIM_WP
I
DEF K GOLD D AS "EXT DELIM_PROG."
^Z
C; ISE EN WO '^Z 9ASC 10ASC 11ASC 12ASC 13ASC 27ASC I ,'^Z EX
SE WR 78
^Z
DEF M WIDTH_132
F=WIDTH_132
DEF K 94 AS "EXT WIDTH_80."
SE SC 132
^Z
DEF M WIDTH_80
F=WIDTH_80
DEF K 94 AS "EXT WIDTH_132."
SE SC 80
^Z
DEF K GOLD D AS "EXT DELIM_WP."
DEF K 51 AS "PASTE=?'Put buffer: '."
DEF K 68 AS "CUTSR=?'Cut Buffer: '."
DEF K GOLD DEL AS "EXT CL ?'Clear what buffer: '."
DEF K 94 AS "EXT WIDTH_132."
DEF K 117 AS "I~~/\~~^Z -6C."
DEF K 118 AS "S%~~/\~~%%."
DEF K 137 AS "EXT F=?'Buffer: '.."
DEF K 138 AS "(C SEL W CHGCSR)."
DEF K 144 AS "EXT INC ?'Input file: ' =?' Buffer: '."
DEF K 150 AS "EXT WR ?'Output file: ' =?' Buffer: '."
DEF K 147 AS "EXT F L."
DEF K 148 AS "EXT F=MAIN.."
DEF K 132 AS 'BLI123456789_123456789_123456789_123456789_123456789_123456789_123456789_12345678^Z^M.'
DEF K 154 AS 'SEN.'
DEF K 151 AS 'PAR.'
DEF K 159 AS 'EXT EX.'
DEF K 152 AS 'EXT QUIT/SAVE.'
DEF K 101 AS "EXT EX."
SE K
SE M C
DELIM_PROG
F=MAIN