A10   START         ;＜A10.CAS＞
      LD    GR1,A   ; GR1にAの値を入れる
      SLA   GR1,1   ; GR1を2倍
      LD    GR2,GR1 ; GR2にGR1の値を入れる
      SLA   GR1,2   ; GR1を4倍
      ADDA  GR1,GR2 ; GR1=GR1+GR2;
      ST    GR1,B   ; GR1の値をBに入れる
      RET
A     DC    2
B     DS    1
      END