?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download | RSS feed

  1.                 ifndef STRING_ASM
  2.                 define STRING_ASM
  3.                
  4.                 MODULE String
  5.                
  6. ;---------------------------------------------------------------------------------
  7.  
  8. ;  input  HL = String 1
  9. ;         DE = String 2
  10. ;          B = Length string
  11. ;  output  nz = not equal  z=equal
  12. StringCompare:
  13.                         LD      A,(DE)
  14.                         CP      A,(HL)
  15.                         RET     NZ
  16.                         INC     DE
  17.                         INC     HL
  18.                         DJNZ    StringCompare
  19.                         RET            
  20.  
  21.                 ENDMODULE
  22.                
  23.                 endif
  24.