as/multi2.casl

   1 ;GR0の内容とGR1の内容の積をGR3に格納
   2 MULTI   START
   3         PUSH    0,GR4
   4         LAD     GR3,0
   5     LAD GR4,1
   6 LOOP    CPA     GR2,GR4
   7         JMI     FIN
   8     ADDA        GR3,GR1
   9         JOV     FIN
  10     LAD GR4,1,GR4
  11     JUMP        LOOP
  12 FIN     POP     GR4
  13         RET
  14         END