home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Columbia Kermit
/
kermit.zip
/
archives
/
intel8051.tar.gz
/
intel8051.tar
/
i51slen.asm
< prev
next >
Wrap
Assembly Source File
|
1996-06-30
|
132b
|
12 lines
; find length of string, return A
strlen: mov r2,#0
len2: movx a,@dptr
jz len1
inc dptr
inc r2
sjmp len2
len1: mov a,r2
ret
;