CONSTINTEGER YES=1,NO=0 ! ! THESE CODE ARE ARBITARY BUT THE TOP DECIMAL DIGIT GIVES THE NO OF BYTES ! IN THE UNIT OF ADDRESSABILITY. BYTE ADDRESSES HOSTS BEING 1N AND ! 16 BIT WORD ADDRESSED HOSTS BEING 2N ETC CONSTINTEGER EMAS=10 CONSTINTEGER IBM=11 CONSTINTEGER IBMXA=12 CONSTINTEGER PERQ=20 CONSTINTEGER PNX=21 CONSTINTEGER DRS=22 CONSTINTEGER ACCENT=23 ! ACCENT DIFFERS FROM PERQ ONLY IN ! ASSEMBLES SEQUENCES&SYNTAX ! AND GENERATOR CONSTINTEGER LINTAVAIL=1<<EMAS CONSTINTEGER LLREALAVAIL=1<<EMAS