home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / JSAGE / ZSUS / PROGPACK / ZXLATE14.LBR / ZXTST1.AZM / ZXTST1.ASÍ
Text File  |  2000-06-30  |  2KB  |  158 lines
  1. ;
  2. ;    8080 assembler test instruction file
  3. ;
  4.     org    100h    ;test org pseudo op
  5. label1    equ    $    ;test equ pseudo op
  6.     dw    label1    ;test defw pseudo op
  7.     db    03fh    ;test defb pseudo op form 1
  8.     db    'THIS IS A TEST' ;test defb pseudo op form 2
  9.     ds    55    ;test defs pseudo op
  10. ;
  11.     ibm    'ASCII FIRST,0DFF,THEN HEX
  12. ;
  13.     mov    a,b    ;test load
  14.     mvi    a,0ffh
  15. label2    equ    $    ;
  16.     mov    a,m    ;Test Move
  17.     mov    A,M    ;Test U/C Move
  18.     mov    b,c    ;test load
  19.     mvi    b,0ffh
  20.     mov    b,m
  21.     mov    m,b
  22.     mov    m,m
  23.     mvi    m,23
  24.     stax    b
  25.     stax    d
  26.     sta    label1
  27.     ldax    b
  28.     ldax    d
  29.     lda    label1
  30.  
  31.     lxi    b,label1
  32.     lxi    d,label1
  33.     lxi    h,label1
  34.     lxi    sp,label1
  35.  
  36.     lhld    label1
  37.     shld    label1
  38.  
  39.     sphl
  40.  
  41.     push    b
  42.     push    d
  43.     push    h
  44.     push    psw
  45.  
  46.     pop    b
  47.     pop    d
  48.     pop    h
  49.     pop    psw
  50.  
  51.     xchg
  52.     xthl
  53.  
  54.     add    a
  55.     adi    0ffh
  56.     add    m
  57.     adc    a
  58.     aci    0ffh
  59.     adc    m
  60.     sub    a
  61.     sui    0ffh
  62.     sub    m
  63.     sbb    a
  64.     ana    a
  65.     ani    0ffh
  66.     ana    m
  67.     ora    a
  68.     xra    a
  69.     cmp    a
  70.  
  71.     inr    a
  72.     inr    m
  73.     dcr    m
  74.  
  75.     dad    b
  76.  
  77.     inx    b
  78.     inx    d
  79.     inx    h
  80.     inx    sp
  81.  
  82.     dcx    b
  83.     dcx    d
  84.     dcx    h
  85.     dcx    sp
  86.  
  87.     rlc
  88.     ral
  89.     rrc
  90.     rar
  91.  
  92.     daa
  93.     cma
  94.     cmc
  95.     stc
  96.     nop
  97.     hlt
  98.     di
  99.     ei
  100.  
  101.     jmp    label1
  102.     jnz    label1
  103.     jz    label1
  104.     jnc    label1
  105.     jc    label1
  106.     jpo    label1
  107.     jpe    label1
  108.     jp    label1
  109.     jm    label1
  110.  
  111.     pchl
  112.  
  113.     call    label1
  114.     cnz    label1
  115.     cz    label1
  116.     cpo    label1
  117.     cpe    label1
  118.  
  119.     ret
  120.     rnz
  121.     rz
  122.     rpo
  123.  
  124.     rst    7
  125.  
  126.     in    03h
  127.     out    034h
  128.  
  129. label    jnz $+3 ; test !label2 jmp label ; comment ! lb3:rpo
  130. ********************************************************
  131. ;*******************************************************
  132. ;
  133.  
  134. file:    xTHL    ; comment 17
  135.     XCHg        ; comment 25
  136.             ; comment 25
  137.     longname        ; comment 33
  138. longname                ; comment 41
  139. longname::
  140.     xra    a    ; comment 25
  141. longname::stc        ; comment 25
  142. longname::    stc
  143. ;
  144. elab::    lhld    nnnnnnnnnnNnn    ; comment 33
  145. longname:stc
  146. longname:    stc
  147. short1::stc ;comment
  148. short:    ; comment 9
  149. short    ; comment 9
  150.     ; comment 9
  151. label    stc!stc! stc    ; comment 25
  152. label    stc !stc !stc    ; comment 25
  153. label    stc ! stc ! stc    ; comment 25
  154.     daa    ; comment 17
  155.     end    ; comment 17
  156.  
  157.     end    $
  158.