home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Interactive Guide / c-cplusplus-interactive-guide.iso / c_ref / csource4 / 284_01 / copyall.asm < prev    next >
Assembly Source File  |  1989-03-13  |  768b  |  61 lines
  1. ;    copyall - stand alone disk copy program
  2. ;    for standard CP/M format (8"1S) only
  3. ;    note that this program does not use SECTRAN function
  4.  
  5. ESC    equ    0EDH
  6. APE    equ    0EDH
  7.  
  8. SETDMA    equ    12
  9. READ    equ    13
  10. WRITE    equ    14
  11.  
  12.     org    0000H
  13. ENTRY:
  14.     lxi    sp, STACK + 128
  15.     lxi    b, BUFFER
  16.     db    ESC, APE, SETDMA
  17.  
  18.     mvi    a, 2
  19.     sta    TRACK
  20. TRKLOOP:
  21.  
  22.     mvi    a, 0
  23.     sta    SECTER
  24. SECLOOP:
  25.     mvi    a, 0
  26.     sta    DISK
  27.     mvi    c, 0
  28.     lxi    d, DPARAM
  29.     db    ESC, APE, READ
  30.     mvi    a, 1
  31.     sta    DISK
  32.     mvi    c, 0
  33.     lxi    d, DPARAM
  34.     db    ESC, APE, WRITE
  35.  
  36.     lda    SECTER
  37.     inr    a
  38.     sta    SECTER
  39.     cpi    26
  40.     jnz    SECLOOP
  41.  
  42.     lda    TRACK
  43.     inr    a
  44.     sta    TRACK
  45.     cpi    77
  46.     jnz    TRKLOOP
  47.  
  48.     hlt
  49.  
  50. ;
  51.  
  52. DPARAM:
  53. DISK:    ds    1
  54. TRACK:    ds    1
  55. SECTER: ds    1
  56.  
  57. BUFFER: ds    128
  58. STACK:    ds    128
  59.  
  60.     end    ENTRY
  61.