home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Simtel MSDOS - Coast to Coast
/
simteldosarchivecoasttocoast2.iso
/
asmutil
/
stdlib.zip
/
NEXTITEM.ASM
< prev
next >
Wrap
Assembly Source File
|
1990-07-21
|
547b
|
39 lines
stdlib segment para public 'slcode'
assume cs:stdlib
;
;
; NextItem- Locates the first (next) character in the set.
;
; inputs:
;
; ES:DI- Points at the set to search through.
;
; outputs:
;
; AL- Next available character in set (zero if set is empty).
;
;
public sl_NextItem
;
sl_NextItem proc far
push cx
push di
;
mov al, es:[di]
mov cx, 256
add di, 7
NextLp: inc di
test al, es:[di]
loopz NextLp
;
neg cx
mov al, cl
pop si
pop cx
ret
sl_NextItem endp
;
;
stdlib ends
end