; 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 HL,2000H
LD B,(HL)
LD HL,2001H
LD C,(HL)
CALL GGT
LD (2002H),A
HALT
GGT: LD A,B
CP C
JP Z,ENDE
JP NC,SUBC
LD A,C
SUB B
LD C,A
JP GGT
SUBC:LD A,B
SUB C
LD B,A
JP GGT
ENDE: RET