root/doc/manual_html/Use-CASL2LIB.html

/* [<][>][^][v][top][bottom][index][help] */ 
<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<!-- Copyright (C) 2010-2023 j8takagi -->
<!-- Created by GNU Texinfo 6.7, http://www.gnu.org/software/texinfo/ -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<title>Use CASL2LIB (YACASL2 - CASL II 処理システム)</title>

<meta name="description" content="Use CASL2LIB (YACASL2 - CASL II 処理システム)">
<meta name="keywords" content="Use CASL2LIB (YACASL2 - CASL II 処理システム)">
<meta name="resource-type" content="document">
<meta name="distribution" content="global">
<meta name="Generator" content="makeinfo">
<link href="index.html" rel="start" title="Top">
<link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
<link href="Sample-usage.html" rel="up" title="Sample usage">
<link href="casl2-invocation.html" rel="next" title="casl2 invocation">
<link href="Analyze-word.html" rel="prev" title="Analyze word">
<style type="text/css">
<!--
a.summary-letter {text-decoration: none}
blockquote.indentedblock {margin-right: 0em}
div.display {margin-left: 3.2em}
div.example {margin-left: 3.2em}
div.lisp {margin-left: 3.2em}
kbd {font-style: oblique}
pre.display {font-family: inherit}
pre.format {font-family: inherit}
pre.menu-comment {font-family: serif}
pre.menu-preformatted {font-family: serif}
span.nolinebreak {white-space: nowrap}
span.roman {font-family: initial; font-weight: normal}
span.sansserif {font-family: sans-serif; font-weight: normal}
ul.no-bullet {list-style: none}
-->
</style>
<link rel="stylesheet" type="text/css" href="style.css">


</head>

<body lang="ja_JP">
<span id="Use-CASL2LIB"></span><div class="header">
<p>
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>
</div>
<hr>
<span id="CASL-IIraiburarinoShi-Yong-"></span><h3 class="section">2.6 CASL IIライブラリの使用</h3>

<p>YACASL2の<samp>as/casl2lib</samp>ディレクトリには、CASL IIで記述されたライブラリファイルが格納されています。
</p>
<p>このフォルダには、たとえば次のようなプログラムが含まれています。
</p>
<dl compact="compact">
<dt><samp>OUTL</samp></dt>
<dd><p><samp>outl.casl</samp>。
GR1に格納された値を、0以上65535以下の整数として出力します。
</p>
</dd>
<dt><samp>OUTA</samp></dt>
<dd><p><samp>outa.casl</samp>。
GR1に格納された値を、-32767以上32767以下の整数として出力します。
</p>
</dd>
<dt><samp>MULL</samp></dt>
<dd><p><samp>mull.casl</samp>。
GR1とGR2に格納された値を0以上65535以下の整数と見なし、積をGR3に格納します。
</p>
</dd>
<dt><samp>DIVL</samp></dt>
<dd><p><samp>divl.casl</samp>。
GR1とGR2に格納された値を0以上65535以下の整数と見なし、商をGR3、剰余をGR0に格納します。
</p></dd>
</dl>

<span id="Shu-Zhi-woChu-Li-suru"></span><h4 class="subsection">2.6.1 数値を出力する</h4>

<p>3と1の和を求める<samp>addl.casl</samp>で演算結果を出力するには、まず<samp>addl.casl</samp>を編集します。
CASL IIの<code>CALL</code>命令で<code>OUTL</code>を副プログラムとして呼び出します。
</p>
<div class="example">
<pre class="example">$ <kbd>cat addl_outl.casl</kbd>
MAIN    START
        LD      GR1,A
        ADDL    GR1,B
        <em>CALL    OUTL</em>
        RET
A       DC      3
B       DC      1
        END
</pre></div>

<p>変更したら<code>casl2</code>を、複数のファイルを指定して実行します。
</p>
<div class="example">
<pre class="example">$ <kbd>casl2 addl_outl.casl ~/yacasl2/as/casl2lib/outl.casl</kbd>
4
</pre></div>




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