Subversion Repositories NedoOS

Rev

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

  1. ; Z80 test - monitor random behavior of bits 5 and 3 after CCF.
  2. ;
  3. ; Copyright (C) 2023 Patrik Rak (patrik@raxoft.cz)
  4. ;
  5. ; This source code is released under the MIT license, see included license.txt.
  6.         DEVICE ZXSPECTRUM128
  7.  
  8.             org     0x8000
  9.  
  10. main:       di
  11.             ld      sp,22528+512
  12.             ld      hl,0x7838
  13.             ld      b,0
  14. .fill       push    hl
  15.             djnz    .fill
  16.             ld      sp,49152
  17.             ld      hl,16384
  18.             ld      d,0xEF
  19. .loop       push    hl
  20.             pop     af
  21.             ccf
  22.             push    af
  23.             pop     bc
  24.             ld      a,l
  25.             xor     c
  26.             ld      (hl),a
  27.             inc     hl
  28.             ld      a,h
  29.             and     d
  30.             ld      h,a
  31.             jp      .loop
  32.  
  33. ; EOF ;
  34.