as/add_p.casl

   1 MAIN    START
   2 BEGIN   LD      GR1,A
   3         ADDA    GR1,B
   4     CALL        ITOA
   5     RET
   6 A       DC      999
   7 B       DC      998
   8 C       DS      1
   9         END