; EMU-Z80 TEXT FILE VER 02.00.00 --- NON MODIFICARE QUESTE RIGHE!!!
; .DEFINE_PORTS_IO  


; .END_DEF_PORT_IO
; ***** NON MODIFICARE LE RIGHE SOPRA!!!!!!!! *****
LD A,(2001H)
L3: ADD A,00H
JP Z,L1
LD A,(2001H)
BIT 0,A
JP Z,L2
LD A,(2000H)
LD B,A
LD A,(2002H)
ADD A,B
LD (2002H),A
L2: LD A,(2000H)
SLA A
LD (2000H),A
LD A,(2001H)
SRA A
LD (2001H),A
JP L3
L1: HALT