<!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>doc/manual_html/Use-CASL2LIB.html</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/2921.html'>doc</a>/<a href='../files/2926.html'>manual_html</a>/Use-CASL2LIB.html</h2> <em class='comment'>/* [<][>][^][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><!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <a id='L2' name='L2'></a><html> <a id='L3' name='L3'></a><!-- Copyright (C) 2010-2021 j8takagi --> <a id='L4' name='L4'></a><!-- Created by GNU Texinfo 6.7, http://www.gnu.org/software/texinfo/ --> <a id='L5' name='L5'></a><head> <a id='L6' name='L6'></a><meta http-equiv="Content-Type" content="text/html; charset=utf-8"> <a id='L7' name='L7'></a><title>Use CASL2LIB (YACASL2 - CASL II 処理システム)</title> <a id='L8' name='L8'></a> <a id='L9' name='L9'></a><meta name="description" content="Use CASL2LIB (YACASL2 - CASL II 処理システム)"> <a id='L10' name='L10'></a><meta name="keywords" content="Use CASL2LIB (YACASL2 - CASL II 処理システム)"> <a id='L11' name='L11'></a><meta name="resource-type" content="document"> <a id='L12' name='L12'></a><meta name="distribution" content="global"> <a id='L13' name='L13'></a><meta name="Generator" content="makeinfo"> <a id='L14' name='L14'></a><link href="index.html" rel="start" title="Top"> <a id='L15' name='L15'></a><link href="index.html#SEC_Contents" rel="contents" title="Table of Contents"> <a id='L16' name='L16'></a><link href="Sample-usage.html" rel="up" title="Sample usage"> <a id='L17' name='L17'></a><link href="casl2-invocation.html" rel="next" title="casl2 invocation"> <a id='L18' name='L18'></a><link href="Analyze-word.html" rel="prev" title="Analyze word"> <a id='L19' name='L19'></a><style type="text/css"> <a id='L20' name='L20'></a><!-- <a id='L21' name='L21'></a>a.summary-letter {text-decoration: none} <a id='L22' name='L22'></a>blockquote.indentedblock {margin-right: 0em} <a id='L23' name='L23'></a>div.display {margin-left: 3.2em} <a id='L24' name='L24'></a>div.example {margin-left: 3.2em} <a id='L25' name='L25'></a>div.lisp {margin-left: 3.2em} <a id='L26' name='L26'></a>kbd {font-style: oblique} <a id='L27' name='L27'></a>pre.display {font-family: inherit} <a id='L28' name='L28'></a>pre.format {font-family: inherit} <a id='L29' name='L29'></a>pre.menu-comment {font-family: serif} <a id='L30' name='L30'></a>pre.menu-preformatted {font-family: serif} <a id='L31' name='L31'></a>span.nolinebreak {white-space: nowrap} <a id='L32' name='L32'></a>span.roman {font-family: initial; font-weight: normal} <a id='L33' name='L33'></a>span.sansserif {font-family: sans-serif; font-weight: normal} <a id='L34' name='L34'></a>ul.no-bullet {list-style: none} <a id='L35' name='L35'></a>--> <a id='L36' name='L36'></a></style> <a id='L37' name='L37'></a><link rel="stylesheet" type="text/css" href="style.css"> <a id='L38' name='L38'></a> <a id='L39' name='L39'></a> <a id='L40' name='L40'></a></head> <a id='L41' name='L41'></a> <a id='L42' name='L42'></a><body lang="ja_JP"> <a id='L43' name='L43'></a><span id="Use-CASL2LIB"></span><div class="header"> <a id='L44' name='L44'></a><p> <a id='L45' name='L45'></a>Previous: <a href="Analyze-word.html" accesskey="p" rel="prev">Analyze word</a>, Up: <a href="Sample-usage.html" accesskey="u" rel="up">Sample usage</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>]</p> <a id='L46' name='L46'></a></div> <a id='L47' name='L47'></a><hr> <a id='L48' name='L48'></a><span id="CASL2raiburarinoShi-Yong-"></span><h3 class="section">2.6 CASL2ライブラリの使用</h3> <a id='L49' name='L49'></a> <a id='L50' name='L50'></a><p>YACASL2の<samp>as/casl2lib</samp>ディレクトリには、CASL IIで記述されたライブラリファイルが格納されています。 <a id='L51' name='L51'></a></p> <a id='L52' name='L52'></a><p>このフォルダには、たとえば次のようなプログラムが含まれています。 <a id='L53' name='L53'></a></p> <a id='L54' name='L54'></a><dl compact="compact"> <a id='L55' name='L55'></a><dt><samp>OUTL</samp></dt> <a id='L56' name='L56'></a><dd><p><samp>outl.casl</samp>。 <a id='L57' name='L57'></a>GR1に格納された値を、0以上65535以下の整数として出力します。 <a id='L58' name='L58'></a></p> <a id='L59' name='L59'></a></dd> <a id='L60' name='L60'></a><dt><samp>OUTA</samp></dt> <a id='L61' name='L61'></a><dd><p><samp>outa.casl</samp>。 <a id='L62' name='L62'></a>GR1に格納された値を、-32767以上32767以下の整数として出力します。 <a id='L63' name='L63'></a></p> <a id='L64' name='L64'></a></dd> <a id='L65' name='L65'></a><dt><samp>MULL</samp></dt> <a id='L66' name='L66'></a><dd><p><samp>mull.casl</samp>。 <a id='L67' name='L67'></a>GR1とGR2に格納された値を0以上65535以下の整数と見なし、積をGR3に格納します。 <a id='L68' name='L68'></a></p> <a id='L69' name='L69'></a></dd> <a id='L70' name='L70'></a><dt><samp>DIVL</samp></dt> <a id='L71' name='L71'></a><dd><p><samp>divl.casl</samp>。 <a id='L72' name='L72'></a>GR1とGR2に格納された値を0以上65535以下の整数と見なし、商をGR3、剰余をGR0に格納します。 <a id='L73' name='L73'></a></p></dd> <a id='L74' name='L74'></a></dl> <a id='L75' name='L75'></a> <a id='L76' name='L76'></a><span id="Shu-Zhi-woChu-Li-suru"></span><h4 class="subsection">2.6.1 数値を出力する</h4> <a id='L77' name='L77'></a> <a id='L78' name='L78'></a><p>3と1の和を求める<samp>addl.casl</samp>で演算結果を出力するには、まず<samp>addl.casl</samp>を編集します。 <a id='L79' name='L79'></a>CASL IIの<code>CALL</code>命令で<code>OUTL</code>を副プログラムとして呼び出します。 <a id='L80' name='L80'></a></p> <a id='L81' name='L81'></a><div class="example"> <a id='L82' name='L82'></a><pre class="example">$ <kbd>cat addl_outl.casl</kbd> <a id='L83' name='L83'></a>MAIN START <a id='L84' name='L84'></a> LD GR1,A <a id='L85' name='L85'></a> ADDL GR1,B <a id='L86' name='L86'></a> <em>CALL OUTL</em> <a id='L87' name='L87'></a> RET <a id='L88' name='L88'></a>A DC 3 <a id='L89' name='L89'></a>B DC 1 <a id='L90' name='L90'></a> END <a id='L91' name='L91'></a></pre></div> <a id='L92' name='L92'></a> <a id='L93' name='L93'></a><p>変更したら<code>casl2</code>を、複数のファイルを指定して実行します。 <a id='L94' name='L94'></a></p> <a id='L95' name='L95'></a><div class="example"> <a id='L96' name='L96'></a><pre class="example">$ <kbd>casl2 addl_outl.casl ~/yacasl2/as/casl2lib/outl.casl</kbd> <a id='L97' name='L97'></a>4 <a id='L98' name='L98'></a></pre></div> <a id='L99' name='L99'></a> <a id='L100' name='L100'></a> <a id='L101' name='L101'></a> <a id='L102' name='L102'></a> <a id='L103' name='L103'></a></body> <a id='L104' name='L104'></a></html> </pre> <hr /> <a id='BOTTOM' name='BOTTOM'></a> <em class='comment'>/* [<][>][^][v]<a href='#TOP'>[top]</a>[bottom]<a href='../mains.html'>[index]</a><a href='../help.html'>[help]</a> */</em> </body> </html>