home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast2.iso / asmutil / stdlib.zip / RMVCHAR.ASM < prev    next >
Assembly Source File  |  1990-07-21  |  490b  |  34 lines
  1. stdlib        segment    para public 'slcode'
  2.         assume    cs:stdlib
  3. ;
  4. ;
  5. ; RmvChar-    Removes a character from a set.
  6. ;
  7. ; inputs:
  8. ;
  9. ;    ES:DI-  Points at the set (at its mask byte).
  10. ;    AL-    Character to remove from the set.
  11. ;
  12. ;
  13. ;
  14.         public    sl_RmvChar
  15. ;
  16. sl_RmvChar    proc    far
  17.         push    ax
  18.         push    bx
  19. ;
  20.         mov    bl, al
  21.                 mov    bh, 0
  22.         mov    al, es:[di]        ;Get mask byte
  23.         not    al
  24.         and    es:8[di][bx], al    ;Add to set
  25. ;
  26.         pop    bx
  27.         pop    ax
  28.         ret
  29. sl_RmvChar    endp
  30. ;
  31. ;
  32. stdlib        ends
  33.         end
  34.