;;; SUBA r,adr MAIN START BEGIN LD GR1,A SUBA GR1,B RET A DC 3 B DC 1 END