as/cmd/CPA/cpa0_3.casl

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