.ENABLE SUBSTITUTION
.ASK GO ASSEMBLE CPA
.IFT GO MAC CPA;1,CPA;1/-SP=LB:[1,1]EXEMC/ML,[11,10]RSXMC/PA:1,SY:'<UIC>'CPA
.ASK GO TASKBUILD CPA
.IFT GO TKB @CPA.TKB