Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
255 heavyiron 1 
;-----------------------------------------------------------
2 
;-------find simvole in string------------------------------
3 
;-----------------------------------------------------------
4 
find_symvol:
5 
	;eax=string
6 
	;ebx=symvol
7 
	mov esi,eax
8 
	next_symvol:
9 
	xor ecx,ecx
10 
	mov cl,[eax]
11 
	cmp cl,bl
12 
	je symvol_fined
13 
	inc eax
14 
	jmp next_symvol
15 
 
16 
	symvol_fined:
17 
	sub eax,esi
18 
 
19 
	ret