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