?login_element?

Subversion Repositories NedoOS

Rev

Rev 1764 | Blame | Compare with Previous | Last modification | View Log | Download

  1. ; BC - line count
  2. findLine
  3.     ld hl, outputBuffer
  4. findLine2    
  5.     ld a,b
  6.     or c
  7.     jp z, .checkEmpty
  8. .loop
  9.     ld a, (hl)
  10.     and a
  11.     jp z, .nope
  12.     inc hl
  13.     cp 13
  14.     jp z, .checkLF  ;13
  15.     cp 10 : jp z, .nextCheck     ;10
  16.     jp .loop
  17. .nextCheck
  18.     and a
  19.     jp z, .nope
  20.     dec bc
  21.     ld d,a
  22.     ld a,b
  23.     or c
  24.     ld a,d
  25.     jp nz, .loop
  26.     ret
  27. .checkLF
  28.     ld a, (hl)
  29.     cp 10
  30.     jp nz, .nextCheck    ;10
  31.     inc hl
  32.     jp  .nextCheck
  33. .checkEmpty
  34.     ld a, (hl) : and a : ret nz
  35. .nope
  36.     ld hl, 0 : ret
  37.