MOV A 0
MOV B 0

MOV C 0
MOV D 0
MOV E 0
MOV F 0
MOV G 0

MOV H 0
MOV RES 0

IN A
IN B

MOV H 0
CMP B H
JNZ 56
MOV H 1
SUB B H

  IN C
  IN D
  IN E
  CMP C H
  JZ 38
  JNZ 29

  IN F
  CMP D E
  JZ 51
  LOAD D G
  ADD G F
  STORE D G
  CMP C H
  JNZ 46
  
  MOV F 0
  CMP D E
  JZ 51
  LOAD D G
  ADD F G
  CMP C H
  JZ 46

  MOV H 1
  ADD D H
  JNZ 30
  JZ 39

CMP C H
JNZ 16
OUT F
JZ 16

RETURN