LPAD2 START ;[t11.cas] LAD GR2,0 ;GR2を0にする LAD GR1,1 ;GR1を1にする LOOP ADDA GR2,GR1 ;GR2=GR2+GR1 LAD GR1,1,GR1 ;インクリメント CPA GR1,=6 ;最後? JMI LOOP RET ;終了 END