1 ;;; CPA r,adr 2 MAIN START BEGIN 3 BEGIN LD GR1,A 4 CPA GR1,B 5 RET 6 A DC #5000 7 B DC #8000 8 END