home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / simtel / sigm / vols000 / vol050 / vmac.prn < prev    next >
Encoding:
Text File  |  1984-04-29  |  4.1 KB  |  129 lines
  1.  
  2.  
  3.                 ;
  4.                 ;VMAC --
  5.                 ;  MACRO ASSEMBLER "MAC" CHANGES TO DISABLE 8080 OPCODES FOR CROSS-ASSEMBLY
  6.                 ;    WORK
  7.                 ;  THIS PATCH WAS ORIGINALLY SUPPLIED WITH MY MAC MANUAL -- RLC
  8.                 ;  THIS IS TO BE PATCHED INTO MAC USING DDT.  AFTER THE PATCH IS COMPLETE,
  9.                 ;    PERFORM A "SAVE 46 XMAC.COM" TO CREATE XMAC.COM.
  10.                 ;
  11.                 ; RESERVED WORD PATCHES ADDED BY SHAWN EVERSON  10/3/81
  12.                 ;
  13.                 ;
  14.  0019 =         RT    EQU    25    ; 8080 REGISTER NAME
  15.  001A =         PT    EQU    26    ; PSEUDO OPCODE TYPE
  16.  2561 =         TAREA    EQU    2561H    ; FREE AREA IN TOKEN MODULE
  17.  0040 =         TRAIL    EQU    '@'    ; CHAR. TO REPLACE LAST LETTER OF RESERVED WORDS WITH
  18.                  
  19.                 ;
  20.  2444               ORG    2444H    ; OVERLAY INXH - MOV B,M - RET
  21.  2444 C36125        JMP    TAREA
  22.                  
  23.                 ;
  24.  2561               ORG    TAREA
  25.                  
  26.                 ;  TYPE IS IN THE ACCUMULATOR
  27.  2561 FE19          CPI    RT    ; BELOW RT IF ARITHMETIC OPERATOR
  28.  2563 DA6925        JC    TYPEOK
  29.  2566 FE1A          CPI    PT    ; PSEUDO OP?
  30.  2568 C0            RNZ        ; RETURN WITH NON-ZERO FLAG
  31.                  
  32.                 ;  OTHERWISE, PSEUDO-OP OR ARITHMETIC OP
  33.                 TYPEOK:
  34.  2569 23            INX    H
  35.  256A 46            MOV    B,M
  36.  256B BF            CMP    A    ; SET ZERO FLAG
  37.  256C C9            RET
  38.                 ;
  39.                 ;LOCATION OF RESERVED WORD <IF>
  40.                 ;
  41.  214A               ORG    214AH
  42.  214A 4940          DB    'I',TRAIL
  43.                 ;
  44.                 ;LOCATION OF RESERVED WORD <OR>
  45.                 ;
  46.  2154               ORG    2154H
  47.  2154 4F40          DB    'O',TRAIL
  48.                 ;
  49.                 ;LOCATION OF RESERVED WORD <AND>
  50.                 ;
  51.  2167               ORG    2167H
  52.  2167 414E40        DB    'AN',TRAIL
  53.                 ;
  54.                 ;LOCATION OF RESERVED WORD <END>
  55.                 ;
  56.  2185               ORG    2185H
  57.  2185 454E40        DB    'EN',TRAIL
  58.                 ;
  59.                 ; LOCATION OF RESERVED WORD <LOW>
  60.                 ;
  61.  219D               ORG    219DH
  62.  219D 4C4F40        DB    'LO',TRAIL
  63.                 ;
  64.                 ;LOCATION OF RESERVED WORD <MOD>
  65.                 ;
  66.  21A3               ORG    21A3H
  67.  21A3 4D4F40        DB    'MO',TRAIL
  68.                 ;
  69.                 ;LOCATION OF RESERVED WORD <NOR>
  70.                 ;
  71.  21AF               ORG    21AFH
  72.  21AF 4E4F40        DB    'NO',TRAIL
  73.                 ;
  74.                 ;LOCATION OF RESERVED WORD <SET>
  75.                 ;
  76.  21DF               ORG    21DFH
  77.  21DF 534540        DB    'SE',TRAIL
  78.                 ;
  79.                 ;LOCATION OF RESERVED WORD <ELSE>
  80.                 ;
  81.  220D               ORG    220DH
  82.  220D 454C5340      DB    'ELS',TRAIL
  83.                 ;
  84.                 ;LOCATION OF RESERVED WORD <HIGH>
  85.                 ;
  86.  2215               ORG    2215H
  87.  2215 48494740      DB    'HIG',TRAIL
  88.                 ;
  89.                 ;LOCATION OF RESERVED WORD <NAME>
  90.                 ;
  91.  2225               ORG    2225H
  92.  2225 4E414D40      DB    'NAM',TRAIL
  93.                 ;
  94.                 ;LOCATION OF RESERVED WORD <PAGE>
  95.                 ;
  96.  2229               ORG    2229H
  97.  2229 50414740      DB    'PAG',TRAIL
  98.                 ;
  99.                 ;LOCATION OF RESERVED WORD <LOCAL>
  100.                 ;
  101.  225C               ORG    225CH
  102.  225C 4C4F434140    DB    'LOCA',TRAIL
  103.                 ;
  104.                 ;LOCATION OF RESERVED WORD <MACRO>
  105.                 ;
  106.  2261               ORG    2261H
  107.  2261 4D41435240    DB    'MACR',TRAIL
  108.                 ;
  109.                 ;LOCATION OF RESERVED WORD <TITLE>
  110.                 ;
  111.  226B               ORG    226BH
  112.  226B 5449544C40    DB    'TITL',TRAIL
  113.                 ;
  114.                 ;LOCATION OF RESERVED WORD <PUBLIC>
  115.                 ;
  116.  227C               ORG    227CH
  117.  227C 5055424C49    DB    'PUBLI',TRAIL
  118.                 ;
  119.                 ;LOCATION OF SIGNON MESSAGE <CP/M MACRO ASSEM 2.0>
  120.                 ;
  121.  2CD3               ORG    2CD3H
  122.  2CD3 43502F4D20    DB    'CP/M MACRO ASSEM 2.',TRAIL
  123.                 ;
  124.                 ; TYPE OF SOURCE FILE TO EXPECT
  125.                 ;
  126.  25DC               ORG    25DCH
  127.  25DC 564F43        DB    'VOC'
  128.                 ;
  129.  25DF               END