LPSB2 START             ;[t12.cas]
      LAD    GR2,0      ;GR2を0
      LAD    GR1,5      ;GR1を5
LOOP  ADDA   GR2,GR1    ;GR2=GR2+GR1
      SUBA   GR1,=1     ;デクリメント
      JNZ    LOOP       ;最後？
      RET               ;終了
      END