home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / mbug / mbug097.arc / SYSTEMPL.MAC < prev    next >
Text File  |  1979-12-31  |  896b  |  58 lines
  1. ;
  2. ;
  3. ;    Operating system support program template.
  4. ;
  5. ;
  6.  
  7. bdos        equ    5
  8. cr        equ    13
  9. lf        equ    10
  10. tab        equ    9
  11. bell        equ    7
  12.  
  13. bios_start    equ    0E700h
  14. id        equ    218h
  15. id_val        equ    0AA55h
  16.  
  17.     aseg
  18.  
  19.     org    100h
  20.  
  21.     ld    de,start_mesg
  22.     ld    c,9
  23.     call    bdos
  24.  
  25.     ld    hl,(bios_start+id)
  26.     ld    de,id_val
  27.     or    a
  28.     sbc    hl,de
  29.     jr    nz,get_lost
  30.  
  31.     ld    de,use_mesg
  32.     ld    c,9
  33.     call    bdos
  34.     ret
  35.  
  36. get_lost:
  37.     ld    de,wb_mesg
  38.     ld    c,9
  39.     call    bdos
  40.     ret
  41.  
  42. start_mesg:
  43.     db    cr,lf,'Microbee 512k Enhanced Operating System v2.2,'
  44.     db    ' (c) 1987 Peter Broughton.',cr,lf
  45.     db    'FILENAME : system support program.',cr,lf,lf,'$'
  46.  
  47. wb_mesg:
  48.     db    bell,'Wrong operating system !!',cr,lf,lf,'$'
  49.  
  50. use_mesg:
  51.     db    'Use : FILENAME other stuff.',cr,lf,lf,'$'
  52.  
  53.     if    ($ and 7Fh) ne 0
  54.      ds    80h-($ and 7Fh)
  55.     endif
  56.  
  57.     end
  58.