home *** CD-ROM | disk | FTP | other *** search
- TITLE DISK SUBSYSTEM TEST UTILITY
- ;
- ;****Donated to the Pascal/Z80 Users Group*******
- ; USING THE NAME 'COPYTT.COM'
- ;
- ;
- ; DEFINE SYMBOLS
- ;
- ;
- ;EXTERNAL CALLS
- ;
- FBBASE DEFL 0F000H
- GOBACK DEFL 8000H
- ;
- ;INTERNAL SYMBOLS
- ;
- CR DEFL 0DH
- LF DEFL 0AH
- EOM DEFL '$'
- BDOS DEFL 05H
- BUFOUT DEFL 9
- ;
- START LD DE,MSG
- LD C,BUFOUT
- CALL BDOS
- RET
- ;
- MSG DEFB CR,LF,'IF YOU GOT THIS FAR THEN YOU HAD A'
- DEFB CR,LF,'LOAD AND ARE NOW BACK IN THE MONITOR'
- DEFB CR,LF,'IS THAT SO?',EOM
- END START
-