1 2 3 4
let bumpupx = routine (INX; INX; INX) in LDA# 40 ; TAX ; (call bumpupx) ; (call bumpupx) ; INX