root/as/cmd/LD/ld_r1_r2.casl

/* [<][>][^][v][top][bottom][index][help] */ 
   1 MAIN    START
   2         LAD     GR1,A
   3         LD      GR0,0,GR1
   4         LD      GR2,2,GR1
   5         LD      GR3,3,GR1
   6         LD      GR4,4,GR1
   7         LD      GR5,5,GR1
   8         LD      GR6,6,GR1
   9         LD      GR7,7,GR1
  10         LD      GR1,1,GR1
  11         RET
  12 A       DC      2,3,5,7,11,13,17,19
  13         END
/* [<][>][^][v][top][bottom][index][help] */