;<Program title> mvi b,03h ok: lxi h,0000h mvi c,03h ko: mov a,m inx h cmp m jc label mov e,m mov m,a dcx h mov m,e inx h label: dcr c jnz ko dcr b jnz ok hlt