lda {c1},x
sec
sbc {z1}
sta {c1},x
lda {c1}+1,x
sbc {z1}+1
sta {c1}+1,x