home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / simtel / sigm / vols000 / vol004 / bdos-pat.asm < prev    next >
Assembly Source File  |  1985-02-12  |  1KB  |  54 lines

  1.     title    'BDOS patch for CP/M 2.2 to make USER 0 public'
  2. ;
  3. ;5/15/80
  4. ;
  5. ;patch courtesy of Andy Johnson-Laird
  6. ;
  7. ;******************************CAUTION******************************
  8. ;
  9. ;This patch is for grown-ups who know what they are doing.
  10. ;Note that if files of the same name are present on both USER 0 and
  11. ;the logged-in USER number, the OPEN, SEARCH for FIRST, SEARCH for NEXT
  12. ;and READ SEQUENTIAL functions will match directory entries on a first-come
  13. ;first-served basis.  This will cause exciting results if multiple extent
  14. ;files of the same name are present on both USER 0 and logged-in USER.
  15. ;
  16. ;Recommended use:
  17. ;
  18. ;    1) Keep on USER 0 only commonly used programs (Files.COM)
  19. ;    2) Set these programs to $SYS to reduce directory clutter.
  20. ;    3) Set these programs to $R/O to avoid accidental erasure of
  21. ;       invisible programs.
  22. ;    4) NEVER place on any other USER number programs of the same name.
  23. ;    5) Have turn-key applications cold-boot directly into the assigned
  24. ;       USER number.  The USER number is the high nibble of address 4.
  25. ;
  26. ;
  27. msize    equ    20        ;set your memory size here
  28. ;
  29. bdos    equ    (msize-20)*1024+3C00h
  30. ;
  31. patch$area    equ    ??????    ;this will depend on YOUR system, and
  32.                 ;should probably be in your BIOS area
  33. ;
  34.     org    bdos+075eh
  35.     jmp    patch        ;overlays:    mov    a,b
  36. ;                        cpi    0dh
  37. ;
  38. ;
  39.     org    patch$area
  40. patch:    mov    a,b
  41.     ora    a
  42.     jnz    patch2
  43.     ldax    d
  44.     cpi    0e5h
  45.     jz    patch2
  46.     mov    a,m
  47.     ora    a
  48.     jz    bdos+077ch
  49. patch2:    mov    a,b
  50.     cpi    0dh
  51.     jmp    bdos+0761h
  52. ;
  53.     end
  54.