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 / CPM / TURBOM2 / CODETEST.LBR / CTZ80.Z80 < prev   
Text File  |  2000-06-30  |  384b  |  17 lines
  1. ; test of CODE in M2
  2.  
  3.     dw    end-start    ; indicate the size of the file to TM2
  4.  
  5. start:
  6.     jr    rstart        ; HL has (START)
  7.     DB    'CODETEST: demo of absolute data addressing$'
  8. rstart:
  9.     inc    hl
  10.     inc    hl        ; bypass JR
  11.     ex    de,hl
  12.     ld    hl,(6)        ; get BDOS
  13.     ld    c,9        ; print string service
  14.     jp    (hl)        ; let BDOS supply RET
  15.  
  16. end:    end
  17.