home *** CD-ROM | disk | FTP | other *** search
- stdlib segment para public 'slcode'
- assume cs:stdlib
- ;
- ;
- ; AddChar- Unions a character into a set.
- ;
- ; inputs:
- ;
- ; ES:DI- Points at the set (at its mask byte).
- ; AL- Character to union into the set.
- ;
- ;
- ;
- public sl_AddChar
- ;
- sl_AddChar proc far
- push ax
- push bx
- ;
- mov bl, al
- mov bh, 0
- mov al, es:[di] ;Get mask byte
- or es:8[di][bx], al ;Add to set
- ;
- pop bx
- pop ax
- ret
- sl_AddChar endp
- ;
- ;
- stdlib ends
- end
-