10  +$1700
15  ABS
20  TAB(SCREEN=$E000
30  TAB(POSX=$22
40  TAB(POSY=$23
50  TAB(HELP=$24
60  TAB(SCRPO=$5C
70  TAB(TABX=$4D
80  TAB(TABY=$4E
90  TAB(CURLO=$5E
91  TAB(CURHI=$5F
100  TAB(POS=$02
101  TAB(SURE=$A7
110  TAB(FIGMEM=$E400
120  TAB(CHARMEM=$E600
130  TAB(MEMORY=$3D00
140  TAB(LINEMEM=$E800
150  TAB(REG=$14
160  TAB(WORK=$02C0
170  TAB(MEMPO=$6E
300  TAB(COMMANDS=$0390
310  TAB(COMLE=COMMANDS+$0224
320  TAB(FOCOD=COMMANDS+$0246
330  TAB(OUCOD=COMMANDS+$025C
331  TAB(COLOURS=COMMANDS+$0264
340  TAB(TABLE=COMMANDS+$0270
350  TAB(FOOTS=COMMANDS+$02F0
360  TAB(WIDTH=COMMANDS+$0370
500  TAB(PRINT=$2700
510  TAB(SETIRQ=$3930
511  TAB(CHRIN=$39C5
520  TAB(SCRASC=$3676
530  TAB(ASCSCR=$3690
540  TAB(ROMON=$36C0
550  TAB(ROMOFF=$36C8
560  TAB(FIGURE=$36D0
570  TAB(STATUS=$3729
580  TAB(STGET=$373F
1000  (null)SETIRQ
1060  MID$#$00
1070  (null)END
1080  (null)END+1
1090  (null)$9D
1091  PEEK#<(PROUP+2)
1092  LEN#>(PROUP+2)
1093  MID$#$06
1094  (null)LOADFILE
1100  MID$#$85
1110  (null)$D018
1111  MID$#$94
1112  (null)$DD00
1113  (null)CLMEM
1120  MID$#$08
1130  (null)$FFD2
1131 START MID$COLOURS
1132  (null)$D020
1133  MID$COLOURS+1
1134  (null)$D021
1135  MID$COLOURS+2
1136  (null)$0286
1140  (null)CLSCR
1150  MID$END
1160  (null)POSX
1170  MID$END+1
1180  (null)POSY
1190  MID$#$00
1200  (null)TABX
1210  (null)TABY
1220  PEEK#>(MAMEN)
1230  LEN#<(MAMEN)
1240  (null)TEXOUT
1250 MAIN (null)SUBMEN
1260 REDO (null)INVMAIN
1270  (null)INVSUB
1280 KEY (null)CHRIN
1290  (null)KEY
1300  (null)
1310  (null)INVMAIN
1320  (null)INVSUB
1330  (null)
1340  STR$#$11
1350  (null)DOWN
1360  STR$#$91
1370  (null)UP
1380  STR$#$1D
1390  (null)RIGHT
1400  STR$#$9D
1410  (null)LEFT
1420  STR$#$0D
1430  (null)ENTER
1440  (null)REDO
1450 DOWN PEEKPOSX
1460  MID$POSY
1470  STR$SUNUMB,X
1480  (null)REDO
1490  RIGHT$POSY
1500  (null)REDO
1510 UP CHR$POSY
1520  (null)REDO
1530  RIGHT$POSY
1540  (null)REDO
1550 RIGHT MID$#$00
1560  (null)POSY
1570  RIGHT$POSX
1580  MID$POSX
1590  STR$#$04
1600  (null)CLOLD
1610 LEFT MID$#$00
1620  (null)POSY
1630  CHR$POSX
1640  (null)CLOLD
1650  RIGHT$POSX
1660  (null)REDO
1670 CLOLD PEEK#$00
1680  MID$#$20
1690 DOCLO (null)SCREEN+$50,X
1700  (null)
1710  (null)DOCLO
1720  (null)MAIN
1730 ENTER MID$POSX
1740  (null)
1750  (null)
1760  (null)
1770  VALPOSX
1780  (null)
1790  VALPOSY
1800  (null)
1810  (null)
1820  MID$VECTORS,X
1830  (null)CAVEC+1
1840  MID$VECTORS+1,X
1850  (null)CAVEC+2
1860  MID$POSX
1870  (null)END
1880  MID$POSY
1890  (null)END+1
1891  (null)CLSCR
1900 CAVEC (null)$FFFF
1910 EXIT (null)
2010 EDPC1 MID$#$00
2020  (null)END+3
2030  MID$#$03
2040  (null)TABY
2060  PEEK#>(P1COD)
2070  LEN#<(P1COD)
2080  (null)TEXOUT
2090  LEN#$03
2100  (null)NORMASK
2110  MID$#$FF
2120  (null)LINEMEM+$48
2130  PEEK#$00
2140  LEN#$00
2150 COP1LEN MID$COMLE,Y
2160  (null)LINEMEM+3,X
2170  (null)
2180  (null)
2190  (null)
2200  (null)
2210  (null)
2220  ATN#$12
2230  (null)COP1LEN
2240  PEEK#$00
2250 COP1DAT MID$COMMANDS,X
2260  (null)FIGMEM,X
2270  (null)
2280  (null)COP1DAT
2290  PEEK#$1F
2300 COP1DAT2 MID$COMMANDS+$0100,X
2310  (null)FIGMEM+$0100,X
2320  (null)
2330  (null)COP1DAT2
2340  (null)DATOUT
2350  (null)P1EX
2360  (null)ROMOFF
2370  PEEK#$00
2380 REC1DAT MID$FIGMEM,X
2390  (null)COMMANDS,X
2400  (null)
2410  (null)REC1DAT
2420  PEEK#$1F
2430 REC1DAT2 MID$FIGMEM+$0100,X
2440  (null)COMMANDS+$0100,X
2450  (null)
2460  (null)REC1DAT2
2470  PEEK#$00
2480  LEN#$00
2490 REC1LEN MID$LINEMEM+3,X
2500  (null)COMLE,Y
2510  (null)
2520  (null)
2530  (null)
2540  (null)
2550  (null)
2560  ATN#$12
2570  (null)REC1LEN
2580  (null)ROMON
2590 P1EX (null)START
2610 EDPC2 MID$#$00
2620  (null)END+3
2630  MID$#$02
2640  (null)TABY
2660  PEEK#>(P2COD)
2670  LEN#<(P2COD)
2680  (null)TEXOUT
2690  LEN#$02
2700  (null)NORMASK
2710  PEEK#$28
2720 COP2MASK MID$P2MASK,X
2730  (null)LINEMEM+$28,X
2740  (null)
2750  (null)COP2MASK
2760  PEEK#$00
2770  LEN#$12
2780 COP2LEN MID$COMLE,Y
2790  (null)LINEMEM+3,X
2800  (null)
2810  (null)
2820  (null)
2830  (null)
2840  (null)
2850  ATN#$22
2860  (null)COP2LEN
2870  PEEK#$00
2880 COP2DAT MID$COMMANDS+$0120,X
2890  (null)FIGMEM,X
2900  (null)
2910  (null)COP2DAT
2920  PEEK#$03
2930 COP2DAT2 MID$COMMANDS+$0220,X
2940  (null)FIGMEM+$0100,X
2941  MID$COLOURS,X
2942  (null)FIGMEM+$0104,X
2950  (null)
2960  (null)COP2DAT2
2970  (null)DATOUT
2980  (null)P2EX
2990  (null)ROMOFF
3000  PEEK#$00
3010  LEN#$12
3020 REC2LEN MID$LINEMEM+3,X
3030  (null)COMLE,Y
3040  (null)
3050  (null)
3060  (null)
3070  (null)
3080  (null)
3090  ATN#$22
3100  (null)REC2LEN
3110  PEEK#$00
3120 REC2DAT MID$FIGMEM,X
3130  (null)COMMANDS+$0120,X
3140  (null)
3150  (null)REC2DAT
3160  PEEK#$03
3170 REC2DAT2 MID$FIGMEM+$0100,X
3180  (null)COMMANDS+$0220,X
3181  MID$FIGMEM+$0104,X
3182  (null)COLOURS,X
3190  (null)
3200  (null)REC2DAT2
3210  (null)ROMON
3220 P2EX (null)START
3230 EDTABLE MID$#$02
3240  (null)TABY
3270  PEEK#>(PTCOD)
3280  LEN#<(PTCOD)
3290  (null)TEXOUT
3300  PEEK#$00
3310  LEN#$44
3320 COPTMA (null)
3330  (null)LINEMEM,X
3340  MID$#$06
3350  (null)LINEMEM+1,X
3360  MID$#$25
3370  (null)LINEMEM+2,X
3380  MID$#$FF
3390  (null)LINEMEM+3,X
3400  (null)
3410  (null)
3420  (null)
3430  (null)
3440  (null)
3450  (null)
3460  ATN#$54
3470  (null)COPTMA
3480  MID$#$FF
3490  (null)LINEMEM+$20
3500  MID$#$03
3510  (null)TABY
3520  PEEK#$00
3530 PTBEG MID$#$06
3540  (null)TABX
3550  (null)REG
3560  (null)SCRCOMP
3570  PEEKREG
3580 PTRED (null)
3590  (null)CHARO2
3600  MID$#$20
3610  (null)CHARO2
3620  (null)
3630  (null)
3640  ASC#$0F
3650  (null)PTLF
3660  (null)PTRED
3670 PTLF RIGHT$TABY
3680  RIGHT$TABY
3690  TAN#$80
3700  (null)PTBEG
3710  (null)
3730 EDPRTAB MID$#$00
3740  (null)END+3
3770  PEEK#>(PTTEX)
3780  LEN#<(PTTEX)
3790  (null)TEXOUT
3800  (null)EDTABLE
3810  PEEK#$7F
3820 COPTFIG MID$TABLE,X
3830  (null)FIGMEM,X
3840  (null)
3850  (null)COPTFIG
3860  (null)DATOUT
3870  (null)PTEX
3880  (null)ROMOFF
3890  PEEK#$7F
3900 RECTFIG MID$FIGMEM,X
3910  (null)TABLE,X
3920  (null)
3930  (null)RECTFIG
3940  (null)ROMON
3950 PTEX (null)START
3960 EDWIDTH MID$#$01
3970  (null)END+3
4020  PEEK#>(WITEX)
4030  LEN#<(WITEX)
4040  (null)TEXOUT
4050  (null)EDTABLE
4060  (null)WISDAT
4070  (null)DATOUT
4080  (null)EWEX
4090  (null)WILDAT
4100 EWEX (null)START
4120 EDFORM MID$#$00
4140  (null)END+3
4150  MID$#$02
4160  (null)TABY
4170  PEEK#>(FOTEX)
4180  LEN#<(FOTEX)
4190  (null)TEXOUT
4200  PEEK#$68
4210 COPFMASK MID$FOMASK,X
4220  (null)LINEMEM,X
4230  (null)
4240  (null)COPFMASK
4250  PEEK#$15
4260 COPFFIG MID$FOCOD,X
4270  (null)FIGMEM,X
4280  (null)
4290  (null)COPFFIG
4300  PEEK#$7F
4310 COPFLET MID$FOOTS,X
4320  (null)CHARMEM,X
4330  (null)
4340  (null)COPFLET
4350  (null)DATOUT
4360  (null)EFEX
4370  (null)ROMOFF
4380  PEEK#$15
4390 RECFFIG MID$FIGMEM,X
4400  (null)FOCOD,X
4410  (null)
4420  (null)RECFFIG
4430  PEEK#$7F
4440 RECFLET MID$CHARMEM,X
4450  (null)FOOTS,X
4460  (null)
4470  (null)RECFLET
4480  (null)ROMON
4490 EFEX (null)START
4510 OUTPUT MID$#$00
4520  (null)END+3
4540  MID$#$04
4550  (null)TABY
4560  PEEK#>(OUTEX)
4570  LEN#<(OUTEX)
4580  (null)TEXOUT
4590  PEEK#$14
4600 COPOLEN MID$OUMASK,X
4610  (null)LINEMEM,X
4620  (null)
4630  (null)COPOLEN
4640  PEEK#$07
4650 COPOFIG MID$OUCOD,X
4660  (null)FIGMEM,X
4670  (null)
4680  (null)COPOFIG
4690  (null)DATOUT
4700  (null)OUEX
4710  (null)ROMOFF
4720  PEEK#$07
4730 RECOFIG MID$FIGMEM,X
4740  (null)OUCOD,X
4750  (null)
4760  (null)RECOFIG
4770  (null)ROMON
4780  (null)PRINT
4790 OUEX (null)START
5001 LOAD MID$#$00
5010  (null)END+3
5040  PEEK#>(LOTEX)
5050  LEN#<(LOTEX)
5060  (null)TEXOUT
5070  PEEK#$0F
5080 COPLCHR MID$DINAME,X
5090  (null)CHARMEM,X
5100  MID$LOMASK,X
5110  (null)LINEMEM,X
5120  (null)
5130  (null)COPLCHR
5140 LOARED (null)DATOUT
5150  (null)LOEX
5151  (null)CLMEM
5160  (null)ROMOFF
5170  PEEK#$0F
5180 RECLCHR MID$CHARMEM,X
5200  (null)RECCOK
5210  MID$#$20
5211 RECCOK (null)DINAME,X
5220  (null)SCRASC
5230  (null)WORK,X
5240  (null)
5250  (null)RECLCHR
5251  (null)ROMON
5260  MID$WORK+15
5270  STR$#$4E
5280  (null)LONORM
5290  STR$#$50
5300  (null)LOPACK
5310  (null)LOARED
5350 LONORM PEEK#<(WORK)
5360  LEN#>(WORK)
5370  MID$#$10
5380  (null)LOADFILE
5430  (null)STATUS
5440 LOKEY (null)CHRIN
5450  (null)LOKEY
5460 LOEX (null)START
5500 LOPACK MID$#$01
5510  PEEK#$08
5520  LEN#$02
5530  (null)$FFBA
5540  MID$#$10
5550  PEEK#<(WORK)
5560  LEN#>(WORK)
5570  (null)$FFBD
5580  MID$#$01
5590  (null)$FFC0
5600  PEEK#$01
5610  (null)$FFC6
5620  PEEK#>(MEMORY)
5630  LEN#<(MEMORY)
5640  (null)SURE+1
5650  (null)SURE
5660  (null)$FFCF
5670  MID$$90
5680  (null)LPEND
5690 LPRED (null)$FFCF
5700  STR$#$D6
5710  (null)PABY
5720 LPCONT LEN#$00
5730  (null)(SURE),Y
5740  RIGHT$SURE
5750  (null)LPCH
5760  RIGHT$SURE+1
5770 LPCH MID$$90
5780  ASC#$40
5790  (null)LPRED
5791 LPEND (null)STATUS
5800  MID$#$01
5810  (null)$FFC3
5820  (null)$FFCC
5830  (null)LOKEY
5840 PABY (null)$FFCF
5850  (null)
5860  (null)
5870  (null)
5880  (null)$FFCF
5890 DOUNPA (null)(SURE),Y
5900  (null)
5910  ATN#$FF
5920  (null)DOUNPA
5930  TAN#$00
5940  (null)LPNOV
5950  RIGHT$SURE+1
5960  (null)LPCH
5970 LPNOV (null)
5980  (null)
5990  VALSURE
6000  (null)SURE
6010  MID$SURE+1
6020  VAL#$00
6030  (null)SURE+1
6040  (null)LPCH
6140 DIRECTORY PEEK#$08
6150  LEN#$00
6160  MID$#$01
6170  (null)$FFBA
6180  PEEK#<(DITEX)
6190  LEN#>(DITEX)
6200  MID$#$02
6210  (null)$FFBD
6220  MID$#$01
6230  (null)$FFC0
6240  PEEK#$01
6250  (null)$FFC6
6260  (null)$FFCF
6270  (null)$FFCF
6271 DIBEG (null)SCRCOMP
6280  (null)$FFCF
6290  (null)$FFCF
6300  (null)DICH
6310  (null)DIREX
6320  (null)$FFCF
6330  (null)
6340  (null)$FFCF
6350  (null)
6360  (null)FIGURE
6370  PEEK#$02
6380 SEFILE MID$WORK,X
6390  STR$#$30
6400  (null)OUFILE
6410  (null)
6420  (null)SEFILE
6440 OUFILE MID$WORK,X
6450  (null)CHARO2
6470  (null)
6480  (null)OUFILE
6550 OUFEX (null)$FFCF
6560  (null)NAMEX
6561  (null)ASCSCR
6570  (null)CHARO2
6580  (null)OUFEX
6590 NAMEX (null)DOLF
6600  (null)DIBEG
6610 DIREX (null)DOLF
6611  (null)SCRCOMP
6620  (null)STGET
6621  MID$#$01
6622  (null)$FFC3
6623  (null)$FFCC
6624  (null)CHRIN
6630  PEEK#$00
6640 DISTOU MID$WORK+$10,X
6641  STR$#$0D
6642  (null)DISTEX
6650  (null)ASCSCR
6660  (null)CHARO2
6670  (null)
6680  (null)DISTOU
6690 DISTEX (null)LOKEY
6700 DICH MID$$CB
6710  STR$#$3F
6720  (null)DICX
6730  MID$$90
6740  ASC#$40
6750  (null)
6760 DICX MID$#$01
6770  (null)
7010 TEXTUP MID$#$00
7020  (null)TABX
7030  (null)TABY
7040  PEEK#>(TETEX)
7050  LEN#<(TETEX)
7060  (null)TEXOUT
7070  (null)CHECK
7080  (null)TUDOIT
7090  (null)START
7171 TUDOIT MID$#>(FIGMEM)
7172  (null)COPTU+5
7173  MID$#>(COMMANDS)
7174  (null)COPTU+2
7175  PEEK#$00
7176  LEN#$05
7177 COPTU MID$COMMANDS,X
7178  (null)FIGMEM,X
7179  (null)
7180  (null)COPTU
7181  RIGHT$COPTU+2
7182  RIGHT$COPTU+5
7183  (null)
7184  (null)COPTU
7185  PEEK#<(TEXCO)
7186  LEN#>(TEXCO)
7187  MID$#$07
7188  (null)LOADFILE
7189  (null)STATUS
7190  PEEK#$00
7200 TUCOP1 MID$$0340,X
7210  (null)FIGMEM,X
7220  MID$$0430,X
7230  (null)FIGMEM+$F0,X
7231  MID$$0550,X
7232  (null)FIGMEM+$0270,X
7240  (null)
7250  (null)TUCOP1
7251  MID$$0530
7252  (null)FIGMEM+$0222
7253  MID$$0531
7254  (null)FIGMEM+$0223
7260  PEEK#$1E
7270  MID$#$FF
7280 TUCLR (null)FIGMEM+$0224,X
7290  (null)
7300  (null)TUCLR
7310  PEEK#$1D
7320 TUCOP2 MID$$0532,X
7330  (null)FIGMEM+$0246,X
7340  (null)
7350  (null)TUCOP2
7360  MID$$033C
7370  (null)FIGMEM+$0264
7380  MID$$033D
7390  (null)FIGMEM+$0265
7400  MID$$033E
7410  (null)FIGMEM+$0266
7420  (null)ROMOFF
7422  MID$#>(FIGMEM)
7424  (null)RECTU+2
7426  MID$#>(COMMANDS)
7428  (null)RECTU+5
7430  PEEK#$00
7432  LEN#$05
7434 RECTU MID$FIGMEM,X
7436  (null)COMMANDS,X
7438  (null)
7440  (null)RECTU
7442  RIGHT$RECTU+2
7444  RIGHT$RECTU+5
7446  (null)
7448  (null)RECTU
7450  (null)ROMON
7452  (null)LOKEY
7500 CHECK PEEK#>(CHTEX)
7510  LEN#<(CHTEX)
7520  (null)TEXOUT
7530 CHKEY (null)CHRIN
7540  (null)CHKEY
7550  STR$#$59
7560  (null)CHYES
7570  STR$#$4E
7580  (null)CHNO
7590  (null)CHKEY
7600 CHYES (null)
7610  (null)
7620 CHNO (null)
7630  (null)
7710 SAVSET MID$#$00
7720  (null)TABX
7730  (null)TABY
7740  PEEK#>(SSTEX)
7750  LEN#<(SSTEX)
7760  (null)TEXOUT
7770  (null)CHECK
7780  (null)SSEX
7790  PEEK#$08
7800  LEN#$01
7810  (null)$FFBA
7820  PEEK#<(PROUP)
7830  LEN#>(PROUP)
7840  MID$#$08
7850  (null)$FFBD
7860  PEEK#>(COMMANDS)
7870  LEN#<(COMMANDS)
7880  (null)HELP+1
7890  (null)HELP
7900  PEEK#<(WIDTH+$0180)
7910  LEN#>(WIDTH+$0180)
7920  MID$#<(HELP)
7930  (null)$FFD8
7940  (null)STATUS
7950  (null)LOKEY
7960 SSEX (null)START
8000 VIEW MID$#$00
8010  (null)TABX
8020  (null)TABY
8030  (null)TABY+1
8040  (null)POSX
8050  (null)POSY
8060 VIMAIN (null)COMPOS
8070  (null)SHOWSCR
8080 VIREDO (null)VICUR
8090 VIKEY (null)CHRIN
8100  (null)VIKEY
8110  (null)VICUR
8120  STR$#$11
8130  (null)VIDOWN
8140  STR$#$91
8150  (null)VIUP
8160  STR$#$1D
8170  (null)VIRIGHT
8180  STR$#$9D
8190  (null)VILEFT
8200  STR$#$0D
8210  (null)VIENTER
8220  STR$#$8C
8230  (null)VIEXIT
8240  (null)VIREDO
8250 VIEXIT (null)START
8260 VIDOWN RIGHT$POSY
8270  MID$POSY
8280  STR$#$19
8290  (null)VDDONT
8300  CHR$POSY
8310  MID$TABY+1
8320  (null)VDDOIT
8330  MID$TABY
8340  STR$#$BD
8350  (null)VDDONT
8360 VDDOIT RIGHT$TABY
8370  (null)VDDONT
8380  RIGHT$TABY+1
8390 VDDONT (null)VIMAIN
8400 VIUP CHR$POSY
8410  (null)VUDONT
8420  RIGHT$POSY
8430  MID$TABY
8440  (null)TABY+1
8450  (null)VUDONT
8460  CHR$TABY
8470  MID$TABY
8480  STR$#$FF
8490  (null)VUDONT
8500  CHR$TABY+1
8510 VUDONT (null)VIMAIN
8520 VIRIGHT RIGHT$POSX
8530  MID$POSX
8540  STR$#$28
8550  (null)VRDONT
8560  CHR$POSX
8570  MID$TABX
8580  STR$#$28
8590  (null)VRDO
8600  MID$#$00
8610  (null)POSX
8620  (null)TABX
8630  (null)VIDOWN
8640 VRDO RIGHT$TABX
8650 VRDONT (null)VIMAIN
8660 VILEFT CHR$POSX
8670  (null)VLDONT
8680  RIGHT$POSX
8690  MID$TABX
8700  (null)VLDO
8710  PEEK#$27
8720  (null)POSX
8730  (null)
8740  (null)TABX
8750  (null)VIUP
8760 VLDO CHR$TABX
8770 VLDONT (null)VIMAIN
8780 VIENTER MID$#$00
8790  (null)TABX
8800  (null)POSX
8810  (null)VIDOWN
9500 LOADFILE (null)$FFBD
9510  PEEK#$08
9520  LEN#$01
9530  (null)$FFBA
9540  MID$#$00
9550  (null)$FFD5
10000 CHAROUT (null)SCRCOMP
10010 CHARO2 LENTABX
10030  (null)(SCRPO),Y
10040  (null)
10050  ATN#$28
10060  (null)CONOV
10070 DOLF LEN#$00
10080  RIGHT$TABY
10090  MID$TABY
10100  STR$#$19
10110  (null)CONOV
10111  (null)SCROLL
10120  CHR$TABY
10130 CONOV (null)TABX
10140  (null)
10150 SCRCOMP (null)
10160  PEEK#>(SCREEN)
10170  LEN#<(SCREEN)
10180  (null)SCRPO+1
10190  (null)SCRPO
10200  LENTABY
10210  (null)SCCOK
10220 SCCRED MID$SCRPO
10230  (null)
10240  VAL#$28
10250  (null)SCRPO
10260  (null)SCCNOV
10270  RIGHT$SCRPO+1
10280 SCCNOV (null)
10290  (null)SCCRED
10300 SCCOK (null)
10310  (null)
10320 TEXOUT (null)HELP+1
10330  (null)HELP
10331  (null)SCRCOMP
10340 TORED LEN#$00
10350  MID$(HELP),Y
10360  (null)TOEX
10370  STR$#$FF
10380  (null)TOLF
10390  STR$#$FE
10400  (null)TOTAB
10410  (null)CHARO2
10420 TOCONT RIGHT$HELP
10430  (null)TORED
10440  RIGHT$HELP+1
10450  (null)TORED
10460 TOEX (null)
10470 TOLF (null)DOLF
10471  (null)SCRCOMP
10480  (null)TOCONT
10490 TOTAB RIGHT$HELP
10500  (null)TTNOV
10510  RIGHT$HELP+1
10520 TTNOV LEN#$00
10530  MID$(HELP),Y
10540  (null)TABX
10550  (null)TOCONT
10560 CLSCR PEEK#$00
10570 DOCLS MID$#$20
10580  (null)SCREEN,X
10590  (null)SCREEN+$0100,X
10600  (null)SCREEN+$0200,X
10610  (null)SCREEN+$0300,X
10611  MID$$0286
10612  (null)$D800,X
10613  (null)$D900,X
10614  (null)$DA00,X
10615  (null)$DB00,X
10620  (null)
10630  (null)DOCLS
10631  MID$#$00
10632  (null)TABX
10633  (null)TABY
10640  (null)
10650 SUBMEN MID$POSX
10660  (null)
10670  (null)
10680  MID$SUBPOS,X
10690  (null)
10700  MID$SUBPOS+1,X
10710  (null)
10720  MID$#$02
10730  (null)TABY
10740  MID$#$00
10750  (null)TABX
10760  (null)TEXOUT
10770 INVMAIN MID$#$00
10780  (null)TABY
10790  (null)TABX
10800  (null)SCRCOMP
10810  LENPOSX
10820  MID$TABS+1,Y
10830  (null)
10840  (null)TABS,Y
10850  (null)
10860  MID$TABS,Y
10870  (null)
10880  (null)ROMOFF
10890 IMRED MID$(SCRPO),Y
10900  LEFT$#$80
10910  (null)(SCRPO),Y
10920  (null)
10930  (null)
10940  (null)IMRED
10950  (null)ROMON
10960 INVSUB MID$POSY
10970  (null)
10980  VAL#$02
10990  (null)TABY
11000  MID$#$00
11010  (null)TABX
11020  (null)SCRCOMP
11030  LENPOSX
11040  MID$TABS+1,Y
11050  (null)
11060  (null)TABS,Y
11070  (null)
11080  MID$TABS,Y
11090  (null)
11100  (null)ROMOFF
11110 ISRED MID$(SCRPO),Y
11120  LEFT$#$80
11130  (null)(SCRPO),Y
11140  (null)
11150  (null)
11160  (null)ISRED
11170  (null)ROMON
11300 CURSOR (null)SCRCOMP
11310  LENTABX
11320  (null)ROMOFF
11321  (null)
11330  MID$(SCRPO),Y
11340  LEFT$#$80
11350  (null)(SCRPO),Y
11351  (null)
11360  (null)ROMON
11400 SCROLL MID$$028D
11401  ASC#$02
11402  (null)SCROLL
11403  (null)ROMOFF
11404  MID$#>(SCREEN)
11405  (null)DOSCR+2
11406  (null)DOSCR+5
11410 DOSCBEG PEEK#$00
11420 DOSCR MID$SCREEN+$28,X
11430  (null)SCREEN,X
11440  (null)
11450  (null)DOSCR
11460  RIGHT$DOSCR+2
11470  RIGHT$DOSCR+5
11480  MID$DOSCR+5
11490  STR$#>(SCREEN+$0400)
11500  (null)DOSCBEG
11520  PEEK#$27
11530  MID$#$20
11540 SCCLL (null)SCREEN+$03C0,X
11550  (null)
11560  (null)SCCLL
11570  (null)ROMON
11600 NORMASK PEEK#$00
11610 NMRED (null)
11620  (null)LINEMEM,X
11630  MID$#$08
11640  (null)LINEMEM+1,X
11650  MID$#$27
11660  (null)LINEMEM+2,X
11670  (null)
11680  (null)
11690  (null)
11691  (null)
11700  (null)
11710  ATN#$18
11720  (null)NMRED
11730  (null)
12000 DATOUT MID$#$00
12010  (null)POS
12020  (null)ROMOFF
12030  PEEK#>(FIGMEM)
12040  LEN#<(FIGMEM)
12050  (null)SURE+1
12060  (null)SURE
12070  PEEK#>(CHARMEM)
12080  LEN#<(CHARMEM)
12090  (null)HELP+1
12100  (null)HELP
12110 DORED (null)SETCUR
12120  MID$POSY
12130  STR$#$FF
12140  (null)DATEND
12150  (null)ONEOUT
12160  RIGHT$POS
12170  (null)DORED
12180 DATEND MID$#$00
12190  (null)POS
12200 DAMAIN (null)SETCUR
12210 DAREDO (null)CURSOR
12220 DAKEY (null)CHRIN
12230  (null)DAKEY
12240  (null)CURSOR
12250  PEEK#$0B
12260 DASCOM STR$DACOM,X
12270  (null)DAFOCO
12280  (null)
12290  (null)DASCOM
12300  (null)ASCSCR
12310  (null)DAREDO
12320  (null)CHARO2
12330  MID$TABX
12340  (null)NORIB
12350  MID$CURHI
12360  (null)TABX
12361  CHR$TABY
12370 NORIB MID$CURHI
12371  STR$TABX
12372  (null)DAREDO
12373  CHR$TABX
12374  (null)DAREDO
12380 DAFOCO (null)
12390  (null)
12400  (null)
12410  MID$DAVEX,X
12420  (null)DACALL+1
12430  MID$DAVEX+1,X
12440  (null)DACALL+2
12450 DACALL (null)$FFFF
12460 DARI LENTABX
12461  (null)ROMOFF
12470  MID$(SCRPO),Y
12471  (null)ROMON
12480  (null)DAROK
12490 DODAR RIGHT$TABX
12500  MID$TABX
12510  STR$CURHI
12520  (null)DAROK
12530  (null)DALE
12540 DAROK (null)DAREDO
12550 DALE CHR$TABX
12560  (null)DODAR
12570  MID$TABX
12580  STR$CURLO
12590  (null)DODAR
12600  (null)DAREDO
12610 DADO MID$POS
12620  (null)
12630  (null)
12640  (null)
12650  (null)ROMOFF
12660  MID$LINEMEM+4,X
12670  (null)ROMON
12671  STR$#$FF
12680  (null)NODD
12681  RIGHT$POS
12682  (null)DAMAIN
12683 NODD (null)DAREDO
12690 DAUP CHR$POS
12700  (null)DUOV
12710  (null)DAMAIN
12720 DUOV RIGHT$POS
12730  (null)DAREDO
12740 DADEL LENTABX
12750  ATNCURLO
12760  (null)DDEX
12770  ATNCURHI
12780  (null)DDCLC
12790  (null)ROMOFF
12791  (null)
12800 DDRED (null)
12810  MID$(SCRPO),Y
12820  (null)
12830  (null)(SCRPO),Y
12840  (null)
12850  ATNCURHI
12860  (null)DDRED
12870 DDCLC MID$#$00
12880  (null)(SCRPO),Y
12890  (null)ROMON
12900  (null)DALE
12910 DDEX (null)DAREDO
12920 DAINS LENTABX
12930  ATNCURHI
12940  (null)DICLC
12950  LENCURHI
12960  (null)ROMOFF
12970 DIRED (null)
12980  MID$(SCRPO),Y
12990  (null)
13000  (null)(SCRPO),Y
13010  (null)
13020  ATNTABX
13030  (null)DIRED
13040 DICLC MID$#$20
13050  (null)(SCRPO),Y
13060  (null)ROMON
13070  (null)DAREDO
13080 DACLR LENCURHI
13090  MID$#$00
13100 DCRED (null)(SCRPO),Y
13110  (null)
13120  (null)DCEX
13130  ATNCURLO
13140  (null)DCRED
13150 DCEX MID$CURLO
13151  (null)TABX
13152  (null)DAREDO
13160 DAENT (null)DATIN
13170  (null)RETURN
13180  (null)DATEND
13190 RETURN (null)
13200  (null)
13210 DACAN (null)
13220  (null)
13300 DATYPE MID$END+3
13301  (null)DANOT
13302  (null)
13303  (null)
13304  (null)
13305  (null)DATIN
13306  (null)DTOK
13307  (null)
13308  (null)DATEND
13310 DTOK (null)WILDAT
13320  (null)
13330  (null)
13340  (null)#$08
13350  (null)END+3
13351  (null)
13352  VAL#$30
13353  (null)SCREEN+7
13360  (null)WISDAT
13370  (null)DATOUT
13380 DANOT (null)DAREDO
14000 WIDCOMP MID$END+3
14010  ASC#$03
14020  (null)REG+1
14030  MID$#$00
14040  (null)REG
14050  CHR$REG+1
14060  (null)REG+1
14070  (null)REG
14080  MID$REG
14090  (null)
14100  VAL#<(WIDTH)
14110  (null)REG
14120  MID$REG+1
14130  VAL#>(WIDTH)
14140  (null)REG+1
14150  (null)
14151 WISDAT (null)WIDCOMP
14160  LEN#$7F
14170 WSRED MID$(REG),Y
14180  (null)FIGMEM,Y
14190  (null)
14200  (null)WSRED
14210  (null)
14220 WILDAT (null)ROMOFF
14230  (null)WIDCOMP
14240  LEN#$7F
14250 WLRED MID$FIGMEM,Y
14260  (null)(REG),Y
14270  (null)
14280  (null)WLRED
14290  (null)ROMON
14500 GETEND LENCURHI
14510 GERED MID$(SCRPO),Y
14520  (null)GEZERO
14530  STR$#$20
14540  (null)GELAST
14550 GEZERO (null)
14551  (null)GELAST
14560  ATNCURLO
14580  (null)GERED
14590 GELAST (null)
14591  (null)
15000 ONEOUT (null)ROMOFF
15010  (null)SCRCOMP
15020  MID$POSY
15030  (null)DOTEXT
15040  PEEK#$00
15050 DOFIG TANPOSX
15060  (null)DOFNOT
15070  LEN#$00
15080  MID$(SURE),Y
15090  (null)HEXOUT
15100  (null)DOFGO
15110 DOFNOT MID$#$00
15120  (null)CHARO2
15130  MID$#$00
15140  (null)CHARO2
15150 DOFGO RIGHT$SURE
15160  (null)DOFCH
15170  RIGHT$SURE+1
15180 DOFCH (null)
15190  MID$TABX
15200  (null)DOFEX
15210  STR$CURHI
15220  (null)DOFIG
15230  (null)DOFIG
15240 DOFEX (null)ROMON
15250 DOTEXT LEN#$00
15260  MID$(HELP),Y
15270  (null)CHARO2
15280  RIGHT$HELP
15290  (null)DOTCH
15300  RIGHT$HELP+1
15310 DOTCH MID$TABX
15320  (null)DOTEX
15330  STR$CURHI
15340  (null)DOTEXT
15350  (null)DOTEXT
15360 DOTEX (null)ROMON
15370 HEXOUT (null)
15380  (null)
15390  (null)
15400  (null)
15410  (null)
15420  (null)BYOUT
15430  (null)
15440  ASC#$0F
15450 BYOUT STR$#$0A
15460  (null)BOFIG
15470  (null)
15480  (null)#$09
15490  (null)CHARO2
15500 BOFIG (null)
15510  VAL#$30
15520  (null)CHARO2
15530 SETCUR MID$POS
15540  (null)
15550  (null)
15560  (null)
15570  (null)ROMOFF
15580  MID$LINEMEM,X
15590  (null)POSY
15600  ASC#$3F
15610  (null)TABY
15620  MID$LINEMEM+1,X
15630  (null)CURLO
15640  (null)TABX
15650  MID$LINEMEM+2,X
15660  (null)CURHI
15670  MID$LINEMEM+3,X
15680  (null)POSX
15690  (null)ROMON
15700 DATIN MID$#$00
15710  (null)POS
15720  (null)REG+1
15730  PEEK#>(FIGMEM)
15740  LEN#<(FIGMEM)
15750  (null)SURE+1
15760  (null)SURE
15770  PEEK#>(CHARMEM)
15780  LEN#<(CHARMEM)
15790  (null)HELP+1
15800  (null)HELP
15810 DINRED (null)SETCUR
15820  MID$POSY
15830  STR$#$FF
15840  (null)DINEND
15850  (null)ONEIN
15860  MID$POS
15870  (null)
15880  (null)
15890  (null)
15900  MID$POSX
15910  (null)LINEMEM+3,X
15940  RIGHT$POS
15950  (null)DINRED
15951 DINEND MID$REG+1
15952  (null)DINERR
15960  (null)
15970  (null)
15980 DINERR (null)
15990  (null)
16000 ONEIN (null)ROMOFF
16010  (null)SCRCOMP
16020  MID$POSY
16030  (null)TEXIN
16040  ASC#$40
16050  (null)OINOL
16060  (null)GETEND
16070  (null)POSX
16080  (null)OICONT
16090 OINOL MID$CURHI
16100  (null)POSX
16110 OICONT LENTABX
16120  ATNPOSX
16130  (null)OINORM
16140  MID$#$00
16150  (null)OISTO
16160 OINORM MID$(SCRPO),Y
16170  (null)TOHEX
16171  (null)OISTO
16180  (null)
16190  (null)
16200  (null)
16210  (null)
16220  (null)REG
16230  (null)
16240  MID$(SCRPO),Y
16250  (null)TOHEX
16260  (null)REG
16270 OISTO LEN#$00
16280  (null)(SURE),Y
16290  RIGHT$SURE
16300  (null)OIFNOV
16310  RIGHT$SURE+1
16320 OIFNOV RIGHT$TABX
16330  RIGHT$TABX
16340  MID$TABX
16350  STR$CURHI
16360  (null)OICONT
16370 OIOUT RIGHT$POSX
16371  MID$POSX
16380  (null)
16390  (null)CURLO
16400  (null)
16410  (null)POSX
16420  (null)ROMON
16430 TEXIN (null)GETEND
16440  (null)POSX
16450 TIRED LENTABX
16460  ATNPOSX
16470  (null)TINORM
16490  MID$#$00
16500  (null)TISTO
16510 TINORM MID$(SCRPO),Y
16520 TISTO LEN#$00
16530  (null)(HELP),Y
16540  RIGHT$HELP
16550  (null)TINOV
16560  RIGHT$HELP+1
16570 TINOV RIGHT$TABX
16580  MID$TABX
16590  STR$CURHI
16600  (null)TIRED
16610  (null)TIRED
16620  (null)OIOUT
16630 TOHEX ASC#$7F
16631  STR$#$00
16640  (null)THERR
16650  STR$#$07
16660  (null)THLET
16670  STR$#$30
16680  (null)THERR
16690  STR$#$3A
16700  (null)THFIG
16701 THERR (null)
16702  (null)
16710  LENTABX
16720  MID$(SCRPO),Y
16730  (null)#$80
16740  (null)(SCRPO),Y
16750  (null)
16760  MID$(SCRPO),Y
16770  (null)#$80
16780  (null)(SCRPO),Y
16790  MID$#$01
16800  (null)REG+1
16801  (null)
16802  (null)
16810  (null)
16820  (null)
16830 THLET (null)
16840  VAL#$09
16850  (null)
16860  (null)
16870 THFIG (null)
16880  (null)#$30
16890  (null)
16900  (null)
17000 COMPOS MID$TABY+1
17010  (null)SURE+2
17020  MID$TABY
17030  (null)SURE+1
17040  MID$#$00
17050  (null)SURE
17060  (null)SURE+2
17070  (null)SURE+1
17080  (null)SURE
17090  (null)SURE+2
17100  (null)SURE+1
17110  (null)SURE
17120  MID$SURE
17130  (null)HELP
17140  MID$SURE+1
17150  (null)HELP+1
17160  (null)HELP+1
17170  (null)HELP
17180  (null)HELP+1
17190  (null)HELP
17200  MID$SURE
17210  (null)
17220  VALHELP
17230  (null)MEMPO
17240  MID$SURE+1
17250  VALHELP+1
17260  (null)
17270  VAL#>(MEMORY)
17280  (null)MEMPO+1
17281  MID$MEMPO
17282  (null)
17283  VALTABX
17284  (null)MEMPO
17285  (null)CPEX
17286  RIGHT$MEMPO+1
17290 CPEX (null)
17300 SHOWSCR PEEK#>(SCREEN)
17310  LEN#<(SCREEN)
17320  (null)SCRPO+1
17330  (null)SCRPO
17340  PEEK#$19
17360  MID$#$36
17370  (null)$01
17380 SHORED LEN#$27
17390 DOSHO MID$(MEMPO),Y
17400  (null)(SCRPO),Y
17410  (null)
17420  (null)DOSHO
17430  MID$MEMPO
17440  (null)
17450  VAL#$50
17460  (null)MEMPO
17470  (null)DSMNOV
17480  RIGHT$MEMPO+1
17490 DSMNOV MID$SCRPO
17500  (null)
17510  VAL#$28
17520  (null)SCRPO
17530  (null)DSSNOV
17540  RIGHT$SCRPO+1
17550 DSSNOV (null)
17560  (null)SHORED
17570  MID$#$37
17580  (null)$01
17590  (null)
17600 VICUR (null)
17610  MID$TABX
17620  (null)
17630  MID$TABY
17640  (null)
17650  MID$POSX
17660  (null)TABX
17670  MID$POSY
17680  (null)TABY
17690  (null)CURSOR
17700  (null)
17710  (null)TABY
17720  (null)
17730  (null)TABX
17740  (null)
17750  (null)
17800 CLMEM PEEK#>(MEMORY)
17810  LEN#<(MEMORY)
17820  (null)DOCLM+2
17830  (null)DOCLM+1
17840  LEN#$93
17850  PEEK#$00
17860  (null)
17870 DOCLM (null)$FFFF,X
17880  (null)
17890  (null)DOCLM
17900  RIGHT$DOCLM+2
17910  (null)
17920  (null)DOCLM
17930  (null)
18000 SHOWERR (null)
18001  PEEK#$27
18010  MID$#$A0
18020 SECLLI (null)SCREEN+$03C0,X
18030  (null)
18040  (null)SECLLI
18050  (null)
18060  (null)
18070  (null)
18080  (null)
18090  (null)
18100  LEN#$00
18110 SECOPE MID$ERRORS,X
18120  (null)SCREEN+$03C0,Y
18130  (null)
18140  (null)
18150  ATN#$08
18160  (null)SECOPE
18170  (null)
40000 MAMEN NOT"   DISK    VIEW    SETUPS    OUTPUT"
40010 SUBPOS SPC(SUMEN1,SUMEN2,SUMEN3,SUMEN4
40021 SUMEN1 NOT"LOAD
40030  [165]$FF
40040  [168]"DIR
40041  FN$FF
40042  NOT"GT.TEXTUP
40043  [165]$FF
40044  [168]"SAVESET"
40060 SUMEN2 [165]$FE,$09
40070  [168]"VIEW TXT"
40080 SUMEN3 [165]$FE,$11
40090  [168]"PR.CODE #1
40100  FN$FF,$FE,$11
40110  NOT"PR.CODE #2
40120  [165]$FF,$FE,$11
40130  [168]"PR.TABLE
40140  FN$FF,$FE,$11
40150  NOT"FORM
40151  [165]$FF,$FE,$11
40152  [168]"WIDTHS"
40160 SUMEN4 [165]$FE,$1D
40170  [168]"PRINT"
40180 TABS [165]$00,$09,$11,$1B,$26
40190 SUNUMB [165]$03,$00,$04,$00
40200 VECTORS [166]LOAD,DIRECTORY,TEXTUP,SAVSET,EXIT
40210  [166]VIEW,EXIT,EXIT,EXIT,EXIT
40220  [166]EDPC1,EDPC2,EDPRTAB,EDFORM,EDWIDTH
40230  [166]OUTPUT,EXIT,EXIT,EXIT,EXIT
40300 P1COD [165]$02,$31,$FF,$02,$30,$FF,$05,$31,$FF,$05,$30,$FF
40310  [165]$12,$31,$FF,$12,$30,$FF,$09,$31,$FF,$09,$30,$FF
40320  [165]$15,$31,$FF,$15,$30,$FF,$08,$31,$FF,$08,$30,$FF
40330  [165]$0C,$31,$FF,$0C,$30,$FF,$14,$31,$FF,$14,$32,$FF
40340  [165]$14,$33,$FF,$13,$00
40350 P2COD [165]$30,$FF,$31,$FF,$32,$FF,$33,$FF,$34,$FF,$35,$FF,$36,$FF
40360  [165]$37,$FF,$38,$FF,$39,$FF,$FF,$53,$14,$01,$12,$14,$FF,$4C
40370  [165]$46,$FF,$4C,$46,$32,$FF,$FF,$52,$05,$13,$05,$14,$FF,$47
40380  [165]$12,$01,$10,$08,$FF,$41,$04,$16,$2E,$47,$12,$2E,$FF,$42
40390  [165]$2E,$50,$2E,$43,$2E,$20,$20,$4C,$0F,$2F,$48,$09,$20,$20
40400  [165]$20,$50,$12,$2F,$53,$05,$03,$20,$20,$43,$0F,$0C,$0F,$15
40410  [165]$12,$13,$00
40420 PTCOD [165]$FE,$06,$98,$B0,$98,$B1,$98,$B2,$98,$B3,$98,$B4,$98,$B5
40430  [165]$98,$B6,$98,$B7,$98,$B8,$98,$B9,$98,$81,$98,$82,$98,$83
40440  [165]$98,$84,$98,$85,$98,$86,$FF,$FF,$FE,$04,$B0,$98,$FF,$FF
40450  [165]$FE,$04,$B1,$98,$FF,$FF,$FE,$04,$B2,$98,$FF,$FF,$FE,$04
40460  [165]$B3,$98,$FF,$FF,$FE,$04,$B4,$98,$FF,$FF,$FE,$04,$B5,$98
40470  [165]$FF,$FF,$FE,$04,$B6,$98,$FF,$FF,$FE,$04,$B7,$98,$00
40500 DACOM [165]$11,$91,$1D,$9D,$14,$94,$93,$0D,$8C,$85,$86,$87
40510 DAVEX [166]DADO,DAUP,DARI,DALE,DADEL,DAINS,DACLR,DAENT
40511  [166]DACAN,DATYPE,DATYPE,DATYPE
40520 P2MASK [165]$0D,$08,$27,$00,$0E,$08,$27,$00,$0F,$08,$27,$00
40530  [165]$11,$08,$27,$00,$12,$08,$27,$00,$13,$08,$27,$00
40540  [165]$55,$00,$01,$FF,$55,$08,$09,$FF,$55,$10,$13,$FF
40550  [165]$55,$18,$1D,$FF,$FF
40560 PTTEX [165]$50,$12,$09,$0E,$14,$05,$12,$2D,$54,$01,$02,$0C,$05,$00
40570 WITEX [165]$57,$09,$04,$14,$08,$20,$14,$31,$00
40580 FOTEX [165]$FE,$04,$4C,$45,$20,$52,$49,$FE,$14,$49,$0E,$04,$05,$0E
40590  [165]$14,$3A,$FF,$43,$31,$FF,$43,$32,$FE,$14,$42,$0F,$12
40600  [165]$04,$05,$12,$13,$3A,$20,$55,$10,$10,$05,$12,$3A,$FF,$43
40610  [165]$33,$FE,$1D,$4C,$0F,$17,$05,$12,$3A,$FF,$43,$34,$FF,$FE
40620  [165]$14,$4C,$09,$0E,$05,$13,$3A,$FF,$FF,$FE,$14,$54,$19,$10
40630  [165]$05,$3A,$FF,$FF,$FE,$14,$46,$0F,$12,$0D,$3A,$FF,$FF,$FF
40640  [165]$FF,$FF,$20,$4C,$49,$20,$43,$4F,$FE,$10,$53,$10,$05,$03
40650  [165]$09,$01,$0C,$13,$00
40660 FOMASK [165]$43,$04,$05,$FF,$43,$07,$08,$FF,$44,$04,$05,$FF
40670  [165]$44,$07,$08,$FF,$45,$04,$05,$FF,$45,$07,$08,$FF
40680  [165]$46,$04,$05,$FF,$46,$07,$08,$FF,$42,$1C,$1D,$FF
40690  [165]$44,$24,$25,$FF,$45,$24,$25,$FF,$47,$1B,$1C,$FF
40700  [165]$49,$1B,$1C,$FF,$4B,$1B,$1C,$FF,$51,$01,$02,$FF
40710  [165]$51,$04,$05,$FF,$91,$08,$27,$FF,$52,$01,$02,$FF
40720  [165]$52,$04,$05,$FF,$92,$08,$27,$FF,$53,$01,$02,$FF
40730  [165]$53,$04,$05,$FF,$93,$08,$27,$FF,$54,$01,$02,$FF
40740  [165]$54,$04,$05,$FF,$94,$08,$27,$FF,$FF
40750 OUTEX [165]$FE,$08,$46,$09,$12,$13,$14,$20,$50,$01,$07,$05,$3A,$FF
40760  [165]$FF,$FE,$08,$4C,$01,$13,$14,$20,$50,$01,$07,$05,$3A,$FF
40770  [165]$FF,$FE,$08,$4E,$0F,$2E,$31,$13,$14,$20,$50,$01,$07,$05
40780  [165]$3A,$FF,$FF,$FE,$08,$43,$0F,$10,$09,$05,$13,$3A,$FF,$FF
40790  [165]$FE,$08,$53,$09,$0E,$07,$0C,$05,$3A,$00
40800 OUMASK [165]$44,$15,$18,$FF,$46,$15,$18,$FF,$48,$15,$18,$FF
40810  [165]$4A,$15,$16,$FF,$4C,$15,$16,$FF,$FF
40820 LOTEX [165]$4C,$0F,$01,$04,$20,$46,$09,$0C,$05,$FF,$FF,$FF,$FF,$FF
40830  [165]$FE,$08,$28,$FE
40850  [165]$19,$29,$20,$20,$8E,$0F,$12,$0D,$FF,$FE,$1C,$90,$01,$03
40860  [165]$0B,$05,$04,$00
40870 LOMASK [165]$85,$09,$17,$FF,$85,$18,$18,$FF,$FF
40880 DINAME [165]$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20,$20
40890  [165]$20,$10
40900 DITEX [165]$24,$30
40910 TETEX [165]$54,$01,$0B,$05,$20,$0F,$16,$05,$12,$20,$54,$45,$58,$54
40920  [165]$45,$52,$20,$13,$05,$14,$15,$10,$13,$FF,$FF,$FF,$FF,$00
40930 TEXCO [168]"TEXTUPS
40940 CHTEX FN$53,$15,$12,$05,$20,$28,$59,$2F,$4E,$29,$00
40950 SSTEX FN$53,$01,$16,$05,$20,$13,$05,$14,$15,$10,$13,$FF,$FF,$FF
40960  FN$FF,$FF,$00
40970 PROUP NOT"@:PROUPS
40980 ERRORS [165]$D4,$CF,$CF,$A0,$CC,$CF,$CE,$C7
40990  [165]$C2,$C1,$C4,$A0,$C3,$CF,$CD,$CD
60000 END [179]