root/doc_inner/gnu_global/S/2386.html

/* [<][>][^][v][top][bottom][index][help] */
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
<head>
<title>test/system/casl2_cmd/cmd_start_opd/sum_10.casl</title>
<meta name='robots' content='noindex,nofollow' />
<meta name='generator' content='GLOBAL-6.6.5' />
<meta http-equiv='Content-Style-Type' content='text/css' />
<link rel='stylesheet' type='text/css' href='../style.css' />
</head>
<body>
<a id='TOP' name='TOP'></a><h2 class='header'><a href='../mains.html'>root</a>/<a href='../files/2933.html'>test</a>/<a href='../files/2935.html'>system</a>/<a href='../files/2936.html'>casl2_cmd</a>/<a href='../files/3053.html'>cmd_start_opd</a>/sum_10.casl</h2>
<em class='comment'>/* [&lt;][&gt;][^][v][top]<a href='#BOTTOM'>[bottom]</a><a href='../mains.html'>[index]</a><a href='../help.html'>[help]</a> */</em>
<hr />
<pre>
<a id='L1' name='L1'></a>   1 ;;; sum_10.casl
<a id='L2' name='L2'></a>   2 ;;; 1から10までの整数をすべて加算した値をメモリーに格納する
<a id='L3' name='L3'></a>   3 MAIN    START   #20
<a id='L4' name='L4'></a>   4         PUSH    0,GR1
<a id='L5' name='L5'></a>   5         PUSH    0,GR2
<a id='L6' name='L6'></a>   6         XOR     GR2,GR2         ; GR2を初期化
<a id='L7' name='L7'></a>   7         LD      GR1,FST         ; GR1に初項をメモリーから転送
<a id='L8' name='L8'></a>   8 LOOP    ADDL    GR2,GR1         ; ループ先頭。GR2 &lt;- GR2 + GR1
<a id='L9' name='L9'></a>   9         ADDL    GR1,STEP        ; GR1 &lt;- GR1 + 公差
<a id='L10' name='L10'></a>  10         CPL     GR1,LST         ; GR1が末項より大きい場合は終了
<a id='L11' name='L11'></a>  11         JPL     FIN             ; ↓
<a id='L12' name='L12'></a>  12         JUMP    LOOP            ; ループ終端
<a id='L13' name='L13'></a>  13 FIN     ST      GR2,RST         ; GR2の結果をメモリーに転送
<a id='L14' name='L14'></a>  14         POP     GR2
<a id='L15' name='L15'></a>  15         POP     GR1
<a id='L16' name='L16'></a>  16         RET
<a id='L17' name='L17'></a>  17 FST     DC      1               ; 初項
<a id='L18' name='L18'></a>  18 LST     DC      10              ; 末項
<a id='L19' name='L19'></a>  19 STEP    DC      1               ; 公差
<a id='L20' name='L20'></a>  20 RST     DS      1               ; 結果
<a id='L21' name='L21'></a>  21         END
</pre>
<hr />
<a id='BOTTOM' name='BOTTOM'></a>
<em class='comment'>/* [&lt;][&gt;][^][v]<a href='#TOP'>[top]</a>[bottom]<a href='../mains.html'>[index]</a><a href='../help.html'>[help]</a> */</em>
</body>
</html>

/* [<][>][^][v][top][bottom][index][help] */