!*************************************************************************
!* *
!* Mnemonics for Gould code generator Version 5 18/04/87 *
!* *
!*************************************************************************
!*
%if Cpu = Concept %thenstart
!*
!*************************************************************************
!* *
!* Concept *
!* *
!*************************************************************************
!*
%constinteger L = 1 { RX }
%constinteger LM = 2 { RX }
%constinteger LN = 3 { RX }
%constinteger ST = 4 { RX }
%constinteger STM = 5 { RX }
%constinteger ZM = 6 { RX }
%constinteger ADM = 7 { RX }
%constinteger ARM = 8 { RX }
%constinteger SUM = 9 { RX }
%constinteger MPM = 10 { RX }
%constinteger DVM = 11 { RX }
%constinteger ANM = 12 { RX }
%constinteger ORM = 13 { RX }
%constinteger EOM = 14 { RX }
%constinteger CAM = 15 { RX }
%constinteger CMM = 16 { RX }
%constinteger LA = 17 { RX }
%constinteger LABR = 18 { RX }
%constinteger SUABR = 19 { RX }
%constinteger LWBR = 20 { RX }
%constinteger STWBR = 21 { RX }
%constinteger EXM = 22 { RX }
!*
%constinteger ADF = 24 { RX }
%constinteger SUF = 25 { RX }
%constinteger MPF = 26 { RX }
%constinteger DVF = 27 { RX }
!*
%constinteger LI = 32 { RI }
%constinteger ADI = 33 { RI }
%constinteger SUI = 34 { RI }
%constinteger MPI = 35 { RI }
%constinteger DVI = 36 { RI }
%constinteger CI = 37 { RI }
!*
%constinteger ADR = 64 { RR }
%constinteger ADRM = 65 { RR }
%constinteger SUR = 66 { RR }
%constinteger SURM = 67 { RR }
%constinteger MPR = 68 { RR }
%constinteger DVR = 69 { RR }
%constinteger ANR = 70 { RR }
%constinteger ORR = 71 { RR }
%constinteger ORRM = 72 { RR }
%constinteger EOR = 73 { RR }
%constinteger EORM = 74 { RR }
%constinteger CAR = 75 { RR }
%constinteger CMR = 76 { RR }
%constinteger ADRFW = 77 { RR }
%constinteger ADRFD = 78 { RR }
%constinteger SURFW = 79 { RR }
%constinteger SURFD = 80 { RR }
%constinteger MPRFW = 81 { RR }
%constinteger MPRFD = 82 { RR }
%constinteger DVRFW = 83 { RR }
%constinteger DVRFD = 84 { RR }
%constinteger FLTW = 85 { RR }
%constinteger FLTD = 86 { RR }
%constinteger FIXW = 87 { RR }
%constinteger FIXD = 88 { RR }
%constinteger TRR = 89 { RR }
%constinteger TRRM = 90 { RR }
%constinteger TRN = 91 { RR }
%constinteger TRNM = 92 { RR }
%constinteger TRC = 93 { RR }
%constinteger XCR = 94 { RR }
%constinteger XCRM = 95 { RR }
%constinteger TBRR = 96 { RR }
%constinteger TRBR = 97 { RR }
!*
%constinteger ZR = 98 { R }
%constinteger ES = 99 { R }
%constinteger RND = 100 { R }
%constinteger EXR = 101 { R }
%constinteger EXRR = 102 { R }
%constinteger TPCBR = 103 { R }
%constinteger TCCR = 104 { R }
%constinteger TRCC = 105 { R }
%constinteger TRSW = 106 { R }
!*
%constinteger NOP = 109 { }
%constinteger EAE = 110 { }
%constinteger DAE = 111 { }
!*
%constinteger SLA = 112 { RD }
%constinteger SLL = 113 { RD }
%constinteger SLC = 114 { RD }
%constinteger SLAD = 115 { RD }
%constinteger SLLD = 116 { RD }
%constinteger SRA = 117 { RD }
%constinteger SRL = 118 { RD }
%constinteger SRC = 119 { RD }
%constinteger SRAD = 120 { RD }
%constinteger SRLD = 121 { RD }
!*
%constinteger SBM = 128 { RD }
%constinteger ZBM = 129 { RD }
%constinteger ABM = 130 { RD }
%constinteger TBM = 131 { RD }
%constinteger SBR = 132 { RD }
%constinteger ZBR = 133 { RD }
%constinteger ABR = 134 { RD }
%constinteger TBR = 135 { RD }
!*
%constinteger BU = 136 { D }
%constinteger BCF = 137 { D }
%constinteger BCT = 138 { D }
%constinteger BFT = 139 { D }
%constinteger BL = 140 { D }
%constinteger BI = 141 { D }
%constinteger BGT = 142 {pseudo-op}
%constinteger BLT = 143 {pseudo-op}
%constinteger BEQ = 144 {pseudo-op}
%constinteger BNE = 145 {pseudo-op}
%constinteger BGE = 146 {pseudo-op}
%constinteger BLE = 147 {pseudo-op}
%constinteger TST = 148 {pseudo-op}
!*
%constinteger BIB = 150 { RD }
%constinteger BIH = 151 { RD }
%constinteger BIW = 152 { RD }
%constinteger BID = 153 { RD }
!*
!*
%conststring(5)%array Mnem(0:153) = %c
{ 0} "" ,"L" ,"LM" ,"LN" ,"ST" ,"STM" ,"ZM" ,"ADM" ,
{ 8} "ARM" ,"SUM" ,"MPM" ,"DVM" ,"ANM" ,"ORM" ,"EOM" ,"CAM" ,
{ 16} "CMM" ,"LA" ,"LABR" ,"SUABR","LWBR" ,"STWBR","EXM" ,"" ,
{ 24} "ADF" ,"SUF" ,"MPF" ,"DVF" ,"" ,"" ,"" ,"" ,
{ 32} "LI" ,"ADI" ,"SUI" ,"MPI" ,"DVI" ,"CI" ,"" ,"" ,
{ 40} "" ,"" ,"" ,"" ,"" ,"" ,"" ,"" ,
{ 48} "" ,"" ,"" ,"" ,"" ,"" ,"" ,"" ,
{ 56} "" ,"" ,"" ,"" ,"" ,"" ,"" ,"" ,
{ 64} "ADR" ,"ADRM" ,"SUR" ,"SURM" ,"MPR" ,"DVR" ,"ANR" ,"ORR" ,
{ 72} "ORRM" ,"EOR" ,"EORM" ,"CAR" ,"CMR" ,"ADRFW","ADRFD","SURFW",
{ 80} "SURFD","MPRFW","MPRFD","DVRFW","DVRFD","FLTW" ,"FLTD" ,"FIXW" ,
{ 88} "FIXD" ,"TRR" ,"TRRM" ,"TRN" ,"TRNM" ,"TRC" ,"XCR" ,"XCRM" ,
{ 96} "TBRR" ,"TRBR" ,"ZR" ,"ES" ,"RND" ,"EXR" ,"EXRR" ,"TPCBR",
{104} "TCCR" ,"TRCC" ,"TRSW" ,"" ,"" ,"NOP" ,"EAE" ,"DAE" ,
{112} "SLA" ,"SLL" ,"SLC" ,"SLAD" ,"SLLD" ,"SRA" ,"SRL" ,"SRC" ,
{120} "SRAD" ,"SRLD" ,"" ,"" ,"" ,"" ,"" ,"" ,
{128} "SBM" ,"ZBM" ,"ABM" ,"TBM" ,"SBR" ,"ZBR" ,"ABR" ,"TBR" ,
{136} "BU" ,"BCF" ,"BCT" ,"BFT" ,"BL" ,"BI" ,"BGT" ,"BLT" ,
{144} "BEQ" ,"BNE" ,"BGE" ,"BLE" ,"TST" ,"" ,"BIB" ,"BIH" ,
{152} "BIW" ,"BID"
!*
%constintegerarray Mask(0:153) = %c
{ 0} 0 ,x'ac00',x'b000',x'b400',x'd400',x'd800',x'f800',x'b800',
{ 8} x'e800',x'bc00',x'c000',x'c400',x'8400',x'8800',x'8c00',x'9000',
{ 16} x'9400',x'5000',x'5808',x'5800',x'5c00',x'5400',x'a800', 0 ,
{ 24} x'e008',x'e000',x'e408',x'e400', 0 , 0 , 0 , 0 ,
{ 32} x'c800',x'c801',x'c802',x'c803',x'c804',x'c805', 0 , 0 ,
{ 40} 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 ,
{ 48} 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 ,
{ 56} 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 ,
{ 64} x'3800',x'3808',x'3c00',x'3c08',x'3802',x'380a',x'0400',x'0800',
{ 72} x'0808',x'0c00',x'0c08',x'1000',x'1400',x'3801',x'3809',x'3803',
{ 80} x'380b',x'3806',x'380e',x'3804',x'380c',x'3807',x'380f',x'3805',
{ 88} x'380d',x'2c00',x'2c08',x'2c04',x'2c0c',x'2c03',x'2c05',x'2c0d',
{ 96} x'2c02',x'2c01',x'0c00',x'0004',x'0005',x'c807',x'c807',x'280c',
{104} x'2804',x'2805',x'2800', 0 , 0 ,x'0002',x'0008',x'000e',
{112} x'1c40',x'1c60',x'2440',x'2040',x'2060',x'1c00',x'1c20',x'2400',
{120} x'2000',x'2020', 0 , 0 , 0 , 0 , 0 , 0 ,
{128} x'9808',x'9c08',x'a008',x'a408',x'1800',x'1804',x'1808',x'180c',
{136} x'ec00',x'f080',x'ec00',x'f000',x'f880',x'f400',x'ed00',x'ed80',
{144} x'ee00',x'f200',x'ee80',x'ef00', 0, 0 ,x'f400',x'f420',
{152} x'f440',x'f460'
!*
!*************************************************************************
!*************************************************************************
!*
%finishelsestart
!*
!*************************************************************************
!* *
!* NP1 *
!* *
!*************************************************************************
!*
%constinteger L = 1 { RX }
%constinteger LBS = 2 { RX }
%constinteger LN = 3 { RX }
%constinteger ST = 4 { RX }
%constinteger ZM = 6 { RX }
%constinteger ADM = 7 { RX }
%constinteger ARM = 8 { RX }
%constinteger SUM = 9 { RX }
%constinteger MPM = 10 { RX }
%constinteger DVM = 11 { RX }
%constinteger ANM = 12 { RX }
%constinteger ORM = 13 { RX }
%constinteger EOM = 14 { RX }
%constinteger CAM = 15 { RX }
%constinteger CHKBND = 16 { RX }
%constinteger LA = 17 { RX }
%constinteger LABR = 18 { RX }
%constinteger SUABR = 19 { RX }
%constinteger LWBR = 20 { RX }
%constinteger STWBR = 21 { RX }
%constinteger LWSL1 = 22 { RX }
%constinteger LWSL2 = 23 { RX }
%constinteger LWSL3 = 24 { RX }
%constinteger SBMD = 25 { RX }
%constinteger ZBMD = 26 { RX }
%constinteger TBMD = 27 { RX }
!*
%constinteger ADF = 28 { RX }
%constinteger SUF = 29 { RX }
%constinteger MPF = 30 { RX }
%constinteger RF = 31 { RX }
!*
%constinteger LI = 32 { RI }
%constinteger ADI = 33 { RI }
%constinteger SUI = 34 { RI }
%constinteger MPI = 35 { RI }
%constinteger DVI = 36 { RI }
%constinteger CI = 37 { RI }
%constinteger LIL = 38 { RI }
%constinteger ANI = 39 { RI }
%constinteger ORI = 40 { RI }
%constinteger EOI = 41 { RI }
!*
%constinteger INCMB = 48 { X }
%constinteger INCMH = 49 { X }
%constinteger INCMW = 50 { X }
%constinteger INCMD = 51 { X }
!*
%constinteger TRABS = 52 { RR }
%constinteger TRABSD = 53 { RR }
%constinteger CXCR = 54 { RR }
%constinteger CXCRD = 55 { RR }
%constinteger SDA = 56 { RR }
%constinteger SDL = 57 { RR }
%constinteger SDC = 58 { RR }
%constinteger SDAD = 59 { RR }
%constinteger SDLD = 60 { RR }
!*
%constinteger ADR = 64 { RR }
%constinteger SUR = 66 { RR }
%constinteger MPRD = 67 { RR }
%constinteger MPR = 68 { RR }
%constinteger DVR = 69 { RR }
%constinteger ANR = 70 { RR }
%constinteger ORR = 71 { RR }
%constinteger EOR = 73 { RR }
%constinteger CAR = 75 { RR }
%constinteger CARD = 76 { RR }
%constinteger ADRFW = 77 { RR }
%constinteger ADRFD = 78 { RR }
%constinteger SURFW = 79 { RR }
%constinteger SURFD = 80 { RR }
%constinteger MPRFW = 81 { RR }
%constinteger MPRFD = 82 { RR }
%constinteger RRFW = 83 { RR }
%constinteger RRFD = 84 { RR }
%constinteger FLTW = 85 { RR }
%constinteger FLTD = 86 { RR }
%constinteger FIXW = 87 { RR }
%constinteger FIXD = 88 { RR }
%constinteger TRR = 89 { RR }
%constinteger CFPDS = 90 { RR }
%constinteger TRN = 91 { RR }
%constinteger TRND = 92 { RR }
%constinteger TRC = 93 { RR }
%constinteger XCR = 94 { RR }
%constinteger TBRR = 96 { RR }
%constinteger TRBR = 97 { RR }
!*
%constinteger ZR = 98 { R }
%constinteger EXS = 99 { RR }
%constinteger EXR = 101 { R }
!*
%constinteger NOP = 107 { }
%constinteger EIAE = 108 { }
%constinteger DIAE = 109 { }
%constinteger EFAE = 110 { }
%constinteger DFAE = 111 { }
!*
%constinteger SLA = 112 { RD }
%constinteger SLL = 113 { RD }
%constinteger SLC = 114 { RD }
%constinteger SLAD = 115 { RD }
%constinteger SLLD = 116 { RD }
%constinteger SRA = 117 { RD }
%constinteger SRL = 118 { RD }
%constinteger SRC = 119 { RD }
%constinteger SRAD = 120 { RD }
%constinteger SRLD = 121 { RD }
!*
%constinteger SBM = 128 { RD }
%constinteger ZBM = 129 { RD }
%constinteger TBM = 131 { RD }
!*
%constinteger BU = 136 { D }
%constinteger BCF = 137 { D }
%constinteger BCT = 138 { D }
%constinteger BRLNK = 140 { D }
%constinteger BGT = 142 {pseudo-op}
%constinteger BLT = 143 {pseudo-op}
%constinteger BEQ = 144 {pseudo-op}
%constinteger BNE = 145 {pseudo-op}
%constinteger BGE = 146 {pseudo-op}
%constinteger BLE = 147 {pseudo-op}
%constinteger TST = 148 {pseudo-op}
!*
%constinteger BIB = 150 { RD }
%constinteger BIH = 151 { RD }
%constinteger BIW = 152 { RD }
%constinteger BID = 153 { RD }
!*
!* Vector Instructions
!*
%constinteger LV = 180 { VX }
%constinteger LIV = 181 { VR }
%constinteger LIVF = 182 { VR }
%constinteger STV = 183 { VX }
%constinteger TRVV = 184 { VV }
%constinteger TRVVN = 185 { VV }
%constinteger TRVVND = 186 { VpVp }
%constinteger TRVAB = 187 { VV }
%constinteger TRVABD = 188 { VpVp }
%constinteger CMPV = 189 { VV }
%constinteger EXPV = 190 { VV }
%constinteger MRVVLT = 191 { VV }
%constinteger MRVVLE = 192 { VV }
%constinteger MRVVGT = 193 { VV }
%constinteger MRVVGE = 194 { VV }
%constinteger MRVVEQ = 195 { VV }
%constinteger MRVVNE = 196 { VV }
%constinteger MRVRLT = 197 { VR }
%constinteger MRVRLE = 198 { VR }
%constinteger MRVRGT = 199 { VR }
%constinteger MRVRGE = 200 { VR }
%constinteger MRVREQ = 201 { VR }
%constinteger MRVRNE = 202 { VR }
%constinteger TRVR = 203 { VR }
%constinteger TRRV = 204 { RV }
!*
%constinteger BIVB = 205 { RD }
%constinteger BIVH = 206 { RD }
%constinteger BIVW = 207 { RD }
%constinteger BIVD = 208 { RD }
%constinteger BVSB = 209 { RD }
%constinteger BVSH = 210 { RD }
%constinteger BVSW = 211 { RD }
%constinteger BVSD = 212 { RD }
!*
%constinteger CAVV = 213 { VV }
%constinteger CAVR = 214 { VR }
%constinteger CAVVD = 215 { VpVp }
%constinteger CAVRD = 216 { VpRp }
!*
%constinteger ANVV = 217 { VV }
%constinteger ANVR = 218 { VR }
%constinteger ORVV = 219 { VV }
%constinteger ORVR = 220 { VR }
%constinteger EOVV = 221 { VV }
%constinteger EOVR = 222 { VR }
!*
%constinteger SVDA = 223 { VR }
%constinteger SVDL = 224 { VR }
%constinteger SVDC = 225 { VR }
%constinteger SVDAD = 226 { VpR }
%constinteger SVDLD = 227 { VpR }
!*
%constinteger ADVV = 228 { VV }
%constinteger ADVVD = 229 { VpVp }
%constinteger ADRV = 230 { VR }
%constinteger ADRVD = 231 { VpRp }
%constinteger SUVV = 232 { VV }
%constinteger SUVVD = 233 { VpVp }
%constinteger SURV = 234 { VR }
%constinteger SURVD = 235 { VpRp }
%constinteger MPVV = 236 { VV }
%constinteger MPRV = 237 { VR }
!*
%constinteger ADVVFW = 238 { VV }
%constinteger ADVVFD = 239 { VpVp }
%constinteger ADRVFW = 240 { VR }
%constinteger ADRVFD = 241 { VpRp }
%constinteger SUVVFW = 242 { VV }
%constinteger SUVVFD = 243 { VpVp }
%constinteger SURVFW = 244 { VR }
%constinteger SURVFD = 245 { VpRp }
%constinteger MPVVFW = 246 { VV }
%constinteger MPVVFD = 247 { VpVp }
%constinteger MPRVFW = 248 { VR }
%constinteger MPRVFD = 249 { VpRp }
%constinteger RVFW = 250 { V }
%constinteger RVFD = 251 { Vp }
!*
%constinteger FLTVW = 252 { VV }
%constinteger FLTVD = 253 { VVp }
%constinteger FIXVW = 254 { VV }
%constinteger FIXVD = 255 { VpV }
%constinteger CFPVDS = 256 { VpV }
!*
%constinteger ORVRN = 257 { VR }
%constinteger ANDVRN = 258 { VR }
%constinteger FRSTEQ = 259 { VR }
%constinteger SIGMA = 260 { VR }
%constinteger SIGMAD = 261 { VpRp }
%constinteger SIGMF = 262 { VR }
%constinteger SIGMFD = 263 { VpRp }
%constinteger PRODF = 264 { VR }
%constinteger PRODFD = 265 { VpRp }
%constinteger MAXV = 266 { VR }
%constinteger MAXVD = 267 { VpRp }
%constinteger MINV = 268 { VR }
%constinteger MINVD = 269 { VpRp }
!*
%constinteger TRRVE = 270 { RV }
%constinteger TRVER = 271 { VR }
%constinteger TRVLR = 272 { VR }
!*
!*
!*
%conststring(6)%array Mnem(0:272) = %c
{ 0} "" ,"L" ,"LBS" ,"LN" ,"ST" ,"" ,"ZM" ,"ADM" ,
{ 8} "ARM" ,"SUM" ,"MPM" ,"DVM" ,"ANM" ,"ORM" ,"EOM" ,"CAM" ,
{ 16} "CHKBND","LA" ,"LABR" ,"SUABR","LWBR" ,"STWBR","LWSL1","LWSL2",
{ 24} "LWSL3","SBMD" ,"ZBMD" ,"TBMD" ,"ADF" ,"SUF" ,"MPF" ,"RF" ,
{ 32} "LI" ,"ADI" ,"SUI" ,"MPI" ,"DVI" ,"CI" ,"LIL" ,"ANI" ,
{ 40} "ORI" ,"EOI" ,"" ,"" ,"" ,"" ,"" ,"" ,
{ 48} "INCMB","INCMH","INCMW","INCMD","TRABS","TRABSD","CXCR","CXCRD",
{ 56} "SDA" ,"SDL" ,"SDC" ,"SDAD" ,"SDLD" ,"" ,"" ,"" ,
{ 64} "ADR" ,"" ,"SUR" ,"MPRD" ,"MPR" ,"DVR" ,"ANR" ,"ORR" ,
{ 72} "" ,"EOR" ,"" ,"CAR" ,"CARD" ,"ADRFW","ADRFD","SURFW",
{ 80} "SURFD","MPRFW","MPRFD","RFW" ,"RFD" ,"FLTW" ,"FLTD" ,"FIXW" ,
{ 88} "FIXD" ,"TRR" ,"CFPDS","TRN" ,"TRND" ,"TRC" ,"XCR" ,"" ,
{ 96} "TBRR" ,"TRBR" ,"ZR" ,"EXS" ,"" ,"EXR" ,"" ,"" ,
{104} "" ,"" ,"" ,"NOP" ,"EIAE" ,"DIAE" ,"EFAE" ,"DFAE" ,
{112} "SLA" ,"SLL" ,"SLC" ,"SLAD" ,"SLLD" ,"SRA" ,"SRL" ,"SRC" ,
{120} "SRAD" ,"SRLD" ,"" ,"" ,"" ,"" ,"" ,"" ,
{128} "SBM" ,"ZBM" ,"" ,"TBM" ,"" ,"" ,"" ,"" ,
{136} "BU" ,"BCF" ,"BCT" ,"" ,"BL" ,"" ,"BGT" ,"BLT" ,
{144} "BEQ" ,"BNE" ,"BGE" ,"BLE" ,"TST" ,"" ,"BIB" ,"BIH" ,
{152} "BIW" ,"BID" ,"" ,"" ,"" ,"" ,"" ,"" ,
{160} "" ,"" ,"" ,"" ,"" ,"" ,"" ,"" ,
{168} "" ,"" ,"" ,"" ,"" ,"" ,"" ,"" ,
{176} "" ,"" ,"" ,"" ,"LV" ,"LIV" ,"LIVF" ,"STV" ,
{184} "TRVV" ,"TRVVN" ,"TRVVND","TRVAB" ,"TRVABD","CMPV" ,"EXPV" ,"MRVVLT",
{192} "MRVVLE","MRVVGT","MRVVGE","MRVVEQ","MRVVNE","MRVRLT","MRVRLE","MRVRGT",
{200} "MRVRGE","MRVREQ","MRVRNE","TRVR" ,"TRRV" ,"BIVB" ,"BIVH" ,"BIVW",
{208} "BIVD" ,"BVSB" ,"BVSH" ,"BVSW" ,"BVSD" ,"CAVV" ,"CAVR" ,"CAVVD",
{216} "CAVRD" ,"ANVV" ,"ANVR" ,"ORVV" ,"ORVR" ,"EOVV" ,"EOVR" ,"SVDA",
{224} "SVDL" ,"SVDC" ,"SVDAD" ,"SVDLD" ,"ADVV" ,"ADVVD" ,"ADRV" ,"ADRVD",
{232} "SUVV" ,"SUVVD" ,"SURV" ,"SURVD" ,"MPVV" ,"MPRV" ,"ADVVFW","ADVVFD",
{240} "ADRVFW","ADRVFD","SUVVFW","SUVVFD","SURVFW","SURVFD","MPVVFW","MPVVFD",
{248} "MPRVFW","MPRVFD","RVFW" ,"RVFD" ,"FLTVW" ,"FLTVD" ,"FIXVW" ,"FIXVD",
{256} "CFPVDS","ORVRN" ,"ANDVRN","FRSTEQ","SIGMA" ,"SIGMAD","SIGMF" ,"SIGMFD",
{264} "PRODF" ,"PRODFD","MAXV" ,"MAXVD" ,"MINV" ,"MINVD" ,"TRRVE" ,"TRVER",
{272} "TRVLR"
!*
%constintegerarray Mask(0:272) = %c
{ 0} 0 ,x'b400',x'ec08',x'b800',x'd400', 0 ,x'd800',x'c800',
{ 8} x'e800',x'cc00',x'c000',x'c400',x'8400',x'8800',x'8c00',x'8000',
{ 16} x'5c08',x'5000',x'5808',x'5800',x'5c00',x'5400',x'ec00',x'fc00',
{ 24} x'fc08',x'7c08',x'7c00',x'7808',x'e008',x'e000',x'e408',x'e400',
{ 32} x'f800',x'f801',x'f802',x'f803',x'f804',x'f805',x'f80b',x'f808',
{ 40} x'f809',x'f80a', 0 , 0 , 0 , 0 , 0 , 0 ,
{ 48} x'a000',x'a008',x'a400',x'a408',x'2c01',x'2c09',x'2c06',x'2c0e',
{ 56} x'3c03',x'3c02',x'3c01',x'3c0b',x'3c0a', 0 , 0 , 0 ,
{ 64} x'3800', 0 ,x'3c00',x'3c0f',x'3802',x'380a',x'0400',x'0800',
{ 72} 0 ,x'0c00', 0 ,x'1000',x'1400',x'3801',x'3809',x'3803',
{ 80} x'380b',x'3806',x'380e',x'0c0e',x'0c0f',x'3807',x'380f',x'3805',
{ 88} x'380d',x'2c00',x'3c09',x'2c04',x'2c0c',x'2c03',x'2804', 0 ,
{ 96} x'2c02',x'2803',x'0c00',x'3808', 0 ,x'f807', 0 , 0 ,
{104} 0 , 0 , 0 ,x'0002',x'0003',x'000e',x'000d',x'000f',
{112} x'1c40',x'1c60',x'2440',x'2040',x'2060',x'1c00',x'1c20',x'2400',
{120} x'2000',x'2020', 0 , 0 , 0 , 0 , 0 , 0 ,
{128} x'ac08',x'ac00', 0 ,x'a808', 0 , 0 , 0 , 0 ,
{136} x'4000',x'7008',x'7000', 0 ,x'4400', 0 ,x'7308',x'7100',
{144} x'7180',x'7188',x'7108',x'7300', 0, 0 ,x'4800',x'4808',
{152} x'4c00',x'4c08', 0, 0, 0, 0, 0 , 0 ,
{160} 0 , 0, 0 , 0 , 0 , 0 , 0 , 0 ,
{168} 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 ,
{176} 0 , 0 , 0 , 0 ,x'B000',x'3C04',x'3C08',x'D000',
{184} x'2805',x'2c05',x'2C0D',x'2C07',x'2C0F',x'1406',x'1407',x'1003',
{192} x'1004',x'1403',x'1404',x'1005',x'1405',x'100D',x'100E',x'140D',
{200} x'140E',x'100F',x'140F',x'140B',x'140C',x'6000',x'6008',x'6400',
{208} x'6408',x'6800',x'6808',x'6C00',x'6c08',x'1001',x'1002',x'1009',
{216} x'100B',x'0401',x'0402',x'0801',x'0802',x'0C01',x'0C02',x'3C07',
{224} x'3C06',x'3C05',x'3C0E',x'3C0D',x'3000',x'3008',x'3400',x'3408',
{232} x'3001',x'3009',x'3401',x'3409',x'3002',x'3402',x'3004',x'300C',
{240} x'3404',x'340C',x'3005',x'300D',x'3405',x'340D',x'3006',x'300E',
{248} x'3406',x'340E',x'3007',x'300F',x'080D',x'080F',x'080C',x'080E',
{256} x'0C0D',x'000A',x'000A',x'0409',x'0C08',x'0C0A',x'0808',x'080A',
{264} x'0408',x'040A',x'1008',x'100A',x'1408',x'140A',x'2806',x'2807',
{272} x'280F'
!*
!*************************************************************************
!*************************************************************************
!*
%finish
!*