CP EQU .E SP EQU .F ORG H'0 CLR CP BR H'20 ORG H'20 ID IR,[CP] INC CP JMAP ORG H'40 LD IRB,[CP] INC CP BR H'20 ORG H'44 ADD IRB,IRA & LD_MFL & BR H'20 END