10 ORG 0100H
20 CALL MAIN
30 RET
40 HALT
50CTXX:
60 EX AF,AF'
70 EXX
80 PUSH AF
90 PUSH BC
100 PUSH DE
110 PUSH HL
120 EXX
130 EX AF,AF'
140 PUSH AF
150 PUSH BC
160 PUSH DE
170 PUSH HL
180 RET
190CTXR:
200 POP HL
210 POP DE
220 POP BC
230 POP AF
240 EX AF,AF'
250 EXX
260 POP HL
270 POP DE
280 POP BC
290 POP AF
300 EX AF,AF'
310 EXX
320 RET
330 HALT
340MAIN:
350 CALL CTXX
360 CALL CTXR
370 RET
380 HALT
390 END