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 / KAYPRO / KPNUROM.LBR / KDEBUG.Z80 < prev    next >
Text File  |  2000-06-30  |  640b  |  40 lines
  1. title Debugging Kaypro Rom - Addendum
  2. ;
  3.     entry    initdev, initvid, initdisk, outvid
  4.     extrn    devinit, vidinit, diskinit, vidout
  5.     extrn    bitport, bankbit, move
  6. ;
  7.     cseg
  8. ;
  9. outvid:    call    romon
  10.     call    vidout
  11. ;    "    "
  12. romoff:    in    a,(bitport)
  13.     and    not bankbit
  14.     out    (bitport),a
  15.     ret
  16. ;
  17. romon:    in    a,(bitport)
  18.     or    bankbit
  19.     out    (bitport),a
  20.     ret
  21. ;
  22. initvid:
  23.     call    romon
  24.     call    vidinit
  25.     jp    romoff
  26. ;
  27. initdev:
  28.     call    devinit
  29.     jp    romoff
  30. ;
  31. initdisk:
  32.     call    diskinit;    now must kill rom turnon at xfr
  33.     ld    hl,move+8
  34.     ld    (hl),0c9h;    a return code 
  35.     ret
  36. ;
  37.     end
  38.  
  39.  
  40.