.ASK GO ASSEMBLE
.IFT GO MAC TYPE;1,TYPE;1/-SP=TYPE
.ASK GO TKB
.IFT GO TKB @TYPE.TKB