; https://cpcrulez.fr/
;

TEST         DI
             LD B,#F4
             OUT (c),a
             LD B,#F6
             lN A,(C)
             AND #30
             LD C,A
             OR #C0
             OUT (C),A
             OUT (C),C
             INC B
             LD A,#92
             OUT (C),A
             PUSH BC
             SET 6,C
             LD B,#F6
             OUT (C),C
             LD B,#F4
             IN A,(C)
             POP BC
             PUSH AF
             LD A,#82
             OUT (C),A
             DEC B
             OUT (C),C
             POP AF
             EI
             RET