home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / cpm / basic / setup.asm < prev    next >
Encoding:
Assembly Source File  |  1984-04-08  |  1.1 KB  |  43 lines
  1. ;
  2. ;      TITLE SETUP
  3. ;
  4.  
  5. address equ    20h     ;why not?
  6.         org    0100h
  7. begin:  mvi    a,0c5h  ;push b to save char for 1st:
  8.         sta    address
  9.         lhld   1
  10.         lxi    d,10    ;offset to console routine addr.
  11.         dad    d
  12.         push   h
  13.         mvi    a,call
  14.         sta    address + 1
  15.         mov    a,m     ; con: here
  16.         sta    address + 2
  17.         inx    h
  18.         mov    a,m
  19.         sta    address + 3
  20.         mvi    a,0c1h  ;pop b for 1st:
  21.         sta    address + 4
  22.         mvi    a,ret   ; soon to go...
  23.         sta    address + 5
  24.         inx    h
  25.         inx    h
  26.         mov    a,m
  27.         sta    address + 6    ;lst: addr. here
  28.         inx    h
  29.         mov    a,m
  30.         sta    address + 7
  31.         pop    h       ; restore bios' console addr.
  32.         lxi    d,address
  33.         mov    m,e
  34.         inx    h
  35.         mov    m,d
  36.         ret
  37.         end   begin
  38. ;*****************************************************
  39. ;****** DON'T RUN THIS PROGRAM MORE THAN ONCE *********
  40. ;****** UNLESS YOU COLD BOOT BETWEEN RUNS.    *********
  41. ;******************************************************
  42.  
  43.