Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  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
  20.