WebSVN – MLAB – /Articles/Forth Rev 1918 and /Articles/Forth Rev 4985 – Path Comparison

 /Articles/Forth/HTML/CodeAsm/1minus.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/1minus.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/1minus.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 -- n2 ) Arithmetics
+; R( -- )
+; optimized decrement (CORE)
+VE_1MINUS:
+    .db $02, &quot;1-&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_1MINUS
+XT_1MINUS:
+    .dw PFA_1MINUS
+PFA_1MINUS:
+    movw zl, tosl
+    sbiw zl, 1
+    movw tosl, zl
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/1ms.html
 ,0 → 1,108
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/1ms.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/1ms.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Time
+; R(--)
+; busy waits (almost) exactly 1 millisecond
+VE_1MS:
+    .db $03, &quot;1ms&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_1MS
+XT_1MS:
+    .dw PFA_1MS
+    ; error: the additional instructions need appr.
+    ;        4 cpu cycles, Z should be decreased by 1 or 2
+PFA_1MS:
+    .set delay_cycles = cpu_frequency / 1000
+    ldi zl, LOW( delay_cycles / 4 )
+    ldi zh, HIGH(delay_cycles / 4 )
+    sbiw zl, 42 ; internal plus forth kernel overhead
+PFA_1MS1:
+    sbiw zl, 1
+    brne PFA_1MS1
+    rjmp DO_NEXT
+; : ms 0 do 1ms loop ;
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/1plus.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/1plus.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/1plus.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 -- n2 ) Arithmetics
+; R( -- )
+; optimized increment
+VE_1PLUS:
+    .db $02, &quot;1+&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_1PLUS
+XT_1PLUS:
+    .dw PFA_1PLUS
+PFA_1PLUS:
+    movw zl, tosl
+    adiw zl,1
+    movw tosl, zl
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/2slash.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/2slash.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/2slash.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 -- n2 ) Arithmetics
+; R( -- )
+; arithmetic shift right
+VE_2SLASH:
+    .db $02, &quot;2/&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_2SLASH
+XT_2SLASH:
+    .dw PFA_2SLASH
+PFA_2SLASH:
+    asr tosh
+    ror tosl
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/2star.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/2star.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/2star.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 -- n2 ) Arithmetics
+; R( -- )
+; arithmetic shift left
+VE_2STAR:
+    .db $02, &quot;2*&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_2STAR
+XT_2STAR:
+    .dw PFA_2STAR
+PFA_2STAR:
+    lsl tosl
+    rol tosh
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/abort.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/abort.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/abort.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n*x -- ) Exceptions
+; R( n*y -- )
+; send an exception -1
+VE_ABORT:
+    .db $05, &quot;abort&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ABORT
+XT_ABORT:
+    .dw DO_COLON
+PFA_ABORT:
+    .dw XT_DOLITERAL
+    .dw -1
+    .dw XT_THROW
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/abortstring.html
 ,0 → 1,117
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/abortstring.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/abortstring.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n*x -- ) Exceptions
+; R( n*y -- )
+; check flag. If true emit some text and throw  exception -2
+VE_ABORTSTRING:
+    .db $86, &quot;abort&quot;, $22,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ABORTSTRING
+XT_ABORTSTRING:
+    .dw DO_COLON
+PFA_ABORTSTRING:
+    ; postpone if
+    .dw XT_COMPILE
+    .dw XT_DOCONDBRANCH
+    .dw XT_HERE
+    .dw XT_COMPILE
+    .dw -1
+    .dw XT_DOTSTRING
+    .dw XT_COMPILE
+    .dw XT_DOLITERAL
+    .dw XT_COMPILE
+    .dw -2
+    .dw XT_COMPILE
+    .dw XT_THROW
+    ; then
+    .dw XT_HERE
+    .dw XT_SWAP
+    .dw XT_ISTORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/abs.html
 ,0 → 1,103
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/abs.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/abs.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 -- u1 ) Arithmetics
+; R( -- )
+; get the absolute value
+VE_ABS:
+    .db $03, &quot;abs&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ABS
+XT_ABS:
+    .dw DO_COLON
+PFA_ABS:
+    .dw XT_DUP
+    .dw XT_LESSZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ABS1
+    .dw XT_NEGATE
+PFA_ABS1:
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/accept.html
 ,0 → 1,179
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/accept.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/accept.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr n1 -- n2 ) System
+; R( -- )
+; reads a line with with KEY into addr until n2 characters are reveived or cr/lf detected.
+VE_ACCEPT:
+    .db $06, &quot;accept&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ACCEPT
+XT_ACCEPT:
+    .dw DO_COLON
+PFA_ACCEPT:
+    .dw XT_DUP        ; ( -- addr n1 n1)
+    .dw XT_TO_R
+    .dw XT_TO_R
+PFA_ACCEPT1:          ; ( -- addr )
+    .dw XT_KEY        ; ( -- addr k )
+    .dw XT_DUP        ; ( -- addr k k )
+    .dw XT_DOLITERAL
+    .dw 10
+    .dw XT_NOTEQUAL
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ACCEPT2
+    .dw XT_DUP
+    .dw XT_DOLITERAL
+    .dw 13
+    .dw XT_NOTEQUAL
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ACCEPT2
+    ; check backspace
+    .dw XT_DUP
+    .dw XT_DOLITERAL
+    .dw 8
+    .dw XT_EQUAL
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ACCEPT3
+    ; delete previous character
+    ; check beginning of line
+    .dw XT_R_FROM             ; ( -- addr k n1 )
+    .dw XT_R_FETCH            ; ( -- addr k n1 n2)
+    .dw XT_OVER               ; ( -- addr k n1 n2 n1)
+    .dw XT_TO_R
+    .dw XT_EQUAL              ; ( -- addr k f )
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ACCEPT5
+    ; we are at the beginning of the line, ignore this character
+    .dw XT_DROP               ; ( -- addr )
+    .dw XT_DOBRANCH
+    .dw PFA_ACCEPT1
+PFA_ACCEPT5:
+    .dw XT_DUP                ; ( -- addr k k )
+    .dw XT_EMIT               ; ( -- addr k )
+    .dw XT_SPACE              ; ( -- addr k )
+    .dw XT_EMIT               ; ( -- addr )
+    .dw XT_1MINUS             ; ( -- addr--)
+    .dw XT_R_FROM
+    .dw XT_1PLUS
+    .dw XT_DOBRANCH
+    .dw PFA_ACCEPT4
+PFA_ACCEPT3:
+    ; check for remaining control characters, replace them with blank
+    .dw XT_DUP            ; ( -- addr k k )
+    .dw XT_BL
+    .dw XT_LESS
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ACCEPT6
+    .dw XT_DROP
+    .dw XT_BL
+PFA_ACCEPT6:
+    ; emit the key
+    .dw XT_DUP            ; ( -- addr k k)
+    .dw XT_EMIT           ; ( -- addr k)
+    ; now store the key
+    .dw XT_OVER           ; ( -- addr k addr
+    .dw XT_CSTORE         ; ( -- addr)
+    .dw XT_1PLUS          ; ( -- addr++)
+    .dw XT_R_FROM         ; ( -- addr n1)
+    .dw XT_1MINUS         ; ( -- addr n1--)
+PFA_ACCEPT4:
+    .dw XT_DUP
+    .dw XT_TO_R
+    .dw XT_EQUALZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ACCEPT1
+    .dw XT_DUP
+PFA_ACCEPT2:
+    .dw XT_SLASHKEY
+    .dw XT_DROP
+    .dw XT_DROP
+    .dw XT_R_FROM
+    .dw XT_R_FROM
+    .dw XT_SWAP
+    .dw XT_MINUS
+    .dw XT_CR
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/again.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/again.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/again.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr -- ) Control Structure
+; R( -- )
+; go back to begin
+VE_AGAIN:
+    .db $85, &quot;again&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_AGAIN
+XT_AGAIN:
+    .dw DO_COLON
+PFA_AGAIN:
+    .dw XT_COMPILE
+    .dw XT_DOBRANCH
+    .dw XT_LRESOLVE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/allot.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/allot.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/allot.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n -- ) System
+; R( -- )
+; allocate memory in RAM
+VE_ALLOT:
+    .db $05, &quot;allot&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ALLOT
+XT_ALLOT:
+    .dw DO_COLON
+PFA_ALLOT:
+    .dw XT_HEAP
+    .dw XT_EFETCH
+    .dw XT_PLUS
+    .dw XT_HEAP
+    .dw XT_ESTORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/amforth.html
 ,0 → 1,211
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> amforth.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> amforth.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+;;;; avr forth
+;;;;
+;;;; GPL V2 (only)
+.set pc_ = pc
+.org $0000
+  rjmp reset
+.org pc_
+; main entry point
+reset:
+    clr zerol
+    clr zeroh
+    ; init first user data area
+    ldi zl, low(heap)
+    ldi zh, high(heap)
+    movw upl, zl
+    ; init return stack pointer
+    ldi temp0,low(ramend)
+    out SPL,temp0
+    std Z+2, temp0
+    ldi temp1,high(ramend)
+    out SPH,temp1
+    std Z+3, temp1
+    ; init parameter stack pointer
+    ldi yl,low(stackstart)
+    std Z+6, yl
+    ldi yh,high(stackstart)
+    std Z+7, yh
+    ; allocate space for User Area
+    .set heap = heap + USERSIZE
+    ; load Forth IP with starting word
+    ldi xl, low(PFA_COLD)
+    ldi xh, high(PFA_COLD)
+    ; the following should be turnkey-action, but adds a few more words to the the dictionary
+    call_ device_init
+    ; its a far jump...
+    jmp_ DO_NEXT
+; ISR routines
+.include &quot;words/intx.asm&quot;
+.include &quot;words/usart.asm&quot;
+; lower part of the dictionary
+.include &quot;dict_minimum.asm&quot;
+.if dict_optional==1
+ .include &quot;dict_optional.asm&quot;
+.endif
+.set lowflashlast = pc
+; high part of the dictionary (primitives and words for self programming)
+.org nrww
+; the inner interpreter.
+DO_DODOES:
+    adiw wl, 1
+    savetos
+    movw tosl, wl
+    pop wh
+    pop wl
+    push xh
+    push xl
+    movw xl, wl
+    rjmp DO_NEXT
+DO_COLON: ; 31 CPU cycles to ijmp
+    push xh
+    push xl          ; PUSH IP
+    adiw wl, 1       ; set W to PFA
+    movw xl, wl
+DO_NEXT: ; 24 CPU cycles to ijmp
+    brts DO_INTERRUPT
+    movw zl,xl        ; READ IP
+    lsl zl
+    rol zh
+    lpm wl, Z+
+    lpm wh, Z      ; done read IP
+    adiw xl, 1        ; INC IP
+DO_EXECUTE: ; 12 cpu cycles to ijmp
+    movw zl, wl
+    lsl zl
+    rol zh
+    lpm temp0, Z+
+    lpm temp1, Z
+    movw zl, temp0
+    ijmp
+DO_INTERRUPT: ; 12 cpu cycles to rjmp (+12=24 to ijmp)
+    ; here we deal with interrupts the forth way
+    lds temp0, intcur
+    ldi zl, LOW(intvec)
+    ldi zh, HIGH(intvec)
+    add zl, temp0
+    adc zh, zeroh
+    ldd wl, Z+0
+    ldd wh, Z+1
+    clt ; clear the t flag to indicate that the interrupt is handled
+    rjmp DO_EXECUTE
+.include &quot;dict_high.asm&quot;
+.if dict_optional==2
+ .include &quot;dict_optional.asm&quot;
+.endif
+.set flashlast = pc
+.eseg
+    .dw lowflashlast ; DP
+    .dw VE_HEAD      ; HEAD
+    .dw heap         ; HEAP
+    .dw edp          ; EDP
+    .dw XT_VER       ; TURNKEY
+    .dw baud_rate    ; BAUDRATE
+; 1st free address in EEPROM, see above
+edp:
+.cseg
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/and.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/and.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/and.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- n3 ) Logic
+; R( -- )
+; bitwise and
+VE_AND:
+    .db $03, &quot;and&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_AND
+XT_AND:
+    .dw PFA_AND
+PFA_AND:
+    ld temp0, Y+
+    ld temp1, Y+
+    and tosl, temp0
+    and tosh, temp1
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/backslash.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/backslash.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/backslash.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Compiler
+; R( -- )
+; everything up to the end of the current line is a comment
+VE_BACKSLASH:
+    .db $81, &quot;\&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_BACKSLASH
+XT_BACKSLASH:
+    .dw DO_COLON
+PFA_BACKSLASH:
+    .dw XT_NUMBERTIB
+    .dw XT_FETCH
+    .dw XT_G_IN
+    .dw XT_STORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/base.html
 ,0 → 1,97
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/base.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/base.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) Numeric IO
+; R( -- )
+; base fo numeric IO
+VE_BASE:
+    .db $04, &quot;base&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_BASE
+XT_BASE:
+    .dw PFA_DOUSER
+PFA_BASE:
+    .dw 0
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/begin.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/begin.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/begin.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) Control Structure
+; R( -- )
+; start a control structture
+VE_BEGIN:
+    .db $85, &quot;begin&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_BEGIN
+XT_BEGIN:
+    .dw DO_COLON
+PFA_BEGIN:
+    .dw XT_LMARK
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/bl.html
 ,0 → 1,97
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/bl.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/bl.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- 32 ) Character IO
+; R( -- )
+; put ascii code of the blank to the stack
+VE_BL:
+    .db $02, &quot;bl&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_BL
+XT_BL:
+    .dw PFA_DOVARIABLE
+PFA_BL:
+    .dw 32
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/brackettick.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/brackettick.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/brackettick.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- XT ) Compiler
+; R( -- )
+; what does ' in the interpreter mode do in colon definitions
+VE_BRACKETTICK:
+    .db $83, &quot;[']&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_BRACKETTICK
+XT_BRACKETTICK:
+    .dw DO_COLON
+PFA_BRACKETTICK:
+    .dw XT_COMPILE
+    .dw XT_DOLITERAL
+    .dw XT_TICK
+    .dw XT_COMMA
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/byteswap.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/byteswap.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/byteswap.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 -- n2 ) Arithmetics
+; R( -- )
+; swap the bytes of the TOS
+VE_BYTESWAP:
+    .db $02, &quot;&gt;&lt;&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_BYTESWAP
+XT_BYTESWAP:
+    .dw PFA_BYTESWAP
+PFA_BYTESWAP:
+    mov temp0, tosh
+    mov tosh, tosl
+    mov tosl, temp0
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/case.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/case.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/case.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- 0 ) Control Structure
+; R( -- )
+;
+VE_CASE:
+    .db $84, &quot;case&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_CASE
+XT_CASE:
+    .dw DO_COLON
+PFA_CASE:
+    .dw XT_ZERO
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/catch.html
 ,0 → 1,116
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/catch.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/catch.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( xt -- ) Exceptions
+; R( -- ) or R( ny -- )
+; execute the XT and restore stack frame if an exception is thrown
+VE_CATCH:
+    .db $05, &quot;catch&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_CATCH
+XT_CATCH:
+    .dw DO_COLON
+PFA_CATCH:
+    ; sp@ &gt;r
+    .dw XT_SP_FETCH
+    .dw XT_TO_R
+    ; handler @ &gt;r
+    .dw XT_HANDLER
+    .dw XT_FETCH
+    .dw XT_TO_R
+    ; rp@ handler !
+    .dw XT_RP_FETCH
+    .dw XT_HANDLER
+    .dw XT_STORE
+    .dw XT_EXECUTE
+    ; r&gt; handler !
+    .dw XT_R_FROM
+    .dw XT_HANDLER
+    .dw XT_STORE
+    .dw XT_R_FROM
+    .dw XT_DROP
+    .dw XT_ZERO
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/cfetch.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/cfetch.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/cfetch.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr - c1 ) Memory
+; R( -- )
+; fetch a single byte from RAM (or IO or CPU register)
+VE_CFETCH:
+    .db $02, &quot;c@&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD  = VE_CFETCH
+XT_CFETCH:
+    .dw PFA_CFETCH
+PFA_CFETCH:
+    movw zl, tosl
+    clr tosh
+    ld tosl, Z
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/char-scan.html
 ,0 → 1,124
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/char-scan.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/char-scan.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr1 n1 c -- addr1 n2 ) String
+; R( -- )
+; Scan string at addr1/n1 until first c, leaving addr1/n2, char at n2 is last non-c character
+VE_CSCAN:
+    .db $05, &quot;cscan&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_CSCAN
+XT_CSCAN:
+    .dw DO_COLON
+PFA_CSCAN:
+    .dw XT_SWAP         ; ( -- addr1 c n1 )
+    .dw XT_DUP          ; ( -- addr1 c n1 n1)
+    .dw XT_TO_R         ; ( -- addr1 c n1)
+    .dw XT_ZERO         ; ( -- addr1 c n1 0)
+    .dw XT_DODO         ; ( -- addr1 c)
+    .dw PFA_CSCAN3
+PFA_CSCAN1:
+    .dw XT_OVER         ; ( -- addr1 c addr1 )
+    .dw XT_I            ; ( -- addr1 c addr1 i)
+    .dw XT_PLUS         ; ( -- addr1 c addr')
+    .dw XT_CFETCH       ; ( -- addr1 c c')
+    .dw XT_OVER         ; ( -- addr1 c c' c)
+    .dw XT_EQUAL        ; ( -- addr1 c f)
+    .dw XT_DOCONDBRANCH ; ( -- addr1 c)
+    .dw PFA_CSCAN2
+    .dw XT_DROP         ; ( -- addr1 )
+    .dw XT_I            ; ( -- addr1 n2)
+    .dw XT_UNLOOP       ; ( -- addr1 n2)
+    .dw XT_R_FROM       ; ( -- addr1 n2 n1)
+    .dw XT_DROP         ; ( -- addr1 n2)
+    .dw XT_EXIT
+PFA_CSCAN2:
+    .dw XT_DOLOOP
+    .dw PFA_CSCAN1      ; ( -- addr1 c)
+PFA_CSCAN3:
+    .dw XT_DROP         ; ( -- addr1)
+    .dw XT_R_FROM       ; ( -- addr1 n1)
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/char-skip.html
 ,0 → 1,117
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/char-skip.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/char-skip.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr1 n1 c -- addr2 n2 ) String
+; R( -- )
+; skips leading occurancies in string at addr1/n1 leaving addr2/n2 pointing to the 1st non-c character
+VE_CSKIP:
+    .db $05, &quot;cskip&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_CSKIP
+XT_CSKIP:
+    .dw DO_COLON
+PFA_CSKIP:
+    .dw XT_TO_R           ; ( -- addr1 n1 )
+PFA_CSKIP1:
+    .dw XT_DUP            ; ( -- addr' n' n' )
+    .dw XT_NOTEQUALZERO
+    .dw XT_DOCONDBRANCH   ; ( -- addr' n')
+    .dw PFA_CSKIP2
+    .dw XT_OVER           ; ( -- addr' n' addr' )
+    .dw XT_CFETCH         ; ( -- addr' n' c' )
+    .dw XT_R_FETCH        ; ( -- addr' n' c' c )
+    .dw XT_EQUAL          ; ( -- addr' n' f )
+    .dw XT_DOCONDBRANCH   ; ( -- addr' n')
+    .dw PFA_CSKIP2
+    .dw XT_DOLITERAL
+    .dw 1
+    .dw XT_SLASHSTRING
+    .dw XT_DOBRANCH
+    .dw PFA_CSKIP1
+PFA_CSKIP2:
+    .dw XT_R_FROM
+    .dw XT_DROP           ; ( -- addr2 n2)
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/char.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/char.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/char.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- c ) Tools
+; R( -- )
+; first character of the next word
+VE_CHAR:
+    .db $4, &quot;char&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_CHAR
+XT_CHAR:
+    .dw DO_COLON
+PFA_CHAR:
+    .dw XT_BL
+    .dw XT_WORD
+    .dw XT_COUNT
+    .dw XT_DROP
+    .dw XT_CFETCH
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/cmove_g.html
 ,0 → 1,120
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/cmove_g.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/cmove_g.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; (addr-from addr-to n -- ) Memory
+; R( -- )
+; copy data in RAM
+VE_CMOVE_G:
+    .db $06, &quot;cmove&gt;&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD  = VE_CMOVE_G
+XT_CMOVE_G:
+    .dw PFA_CMOVE_G
+PFA_CMOVE_G:
+    push xh
+    push xl
+    movw wl, tosl
+    ld zl, Y+
+    ld zh, Y+ ; addr-to
+    ld xl, Y+
+    ld xh, Y+ ; addr-from
+    mov temp0, wh
+    or temp0, wl
+    brbs 1, PFA_CMOVE_G1
+    add zl, wl
+    adc zh, wh
+    add xl, wl
+    adc xh, wh
+PFA_CMOVE_G2:
+    ld temp1, -X
+    st -Z, temp1
+    sbiw wl, 1
+    brbc 1, PFA_CMOVE_G2
+PFA_CMOVE_G1:
+    pop xl
+    pop xh
+    loadtos
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/cold.html
 ,0 → 1,150
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/cold.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/cold.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) System
+; R( -- )
+; main entry word. executes turnkey operation and executes quit
+VE_COLD:
+    .db $04, &quot;cold&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_COLD
+XT_COLD:
+    .dw DO_COLON
+PFA_COLD:
+    .dw XT_SP0
+    .dw XT_SP_STORE
+    .dw XT_RP0
+    .dw XT_RP_STORE
+    ; set IO
+    .dw XT_DOLITERAL
+    .dw XT_TX0
+    .dw XT_DOLITERAL
+    .dw XT_EMIT
+    .dw XT_DEFERSTORE
+    .dw XT_DOLITERAL
+    .dw XT_TX0Q
+    .dw XT_DOLITERAL
+    .dw XT_EMITQ
+    .dw XT_DEFERSTORE
+    .dw XT_DOLITERAL
+    .dw XT_RX0
+    .dw XT_DOLITERAL
+    .dw XT_KEY
+    .dw XT_DEFERSTORE
+    .dw XT_DOLITERAL
+    .dw XT_RX0Q
+    .dw XT_DOLITERAL
+    .dw XT_KEYQ
+    .dw XT_DEFERSTORE
+    .dw XT_DOLITERAL
+    .dw XT_NOOP
+    .dw XT_DOLITERAL
+    .dw XT_SLASHKEY
+    .dw XT_DEFERSTORE
+    .dw XT_DOLITERAL
+    .dw XT_NOOP
+    .dw XT_DOLITERAL
+    .dw XT_PAUSE
+    .dw XT_DEFERSTORE
+    .dw XT_ZERO
+    .dw XT_STATE
+    .dw XT_STORE
+    .dw XT_BAUD0
+    .dw XT_USART0
+    .dw XT_INTON
+    .dw XT_TURNKEY
+    .dw XT_QUIT
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/colon-noname.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/colon-noname.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/colon-noname.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- xt ) Compiler
+; R( -- )
+; create unnamed entry in the dictionary
+VE_COLONNONAME:
+    .db $7, &quot;:noname&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_COLONNONAME
+XT_COLONNONAME:
+    .dw DO_COLON
+PFA_COLONNONAME:
+    .dw XT_HERE
+    .dw XT_COMPILE
+    .dw DO_COLON
+    .dw XT_RBRACKET
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/colon.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/colon.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/colon.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Compiler
+; R( -- )
+; create named entry in the dictionary
+VE_COLON:
+    .db $1, &quot;:&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_COLON
+XT_COLON:
+    .dw DO_COLON
+PFA_COLON:
+    .dw XT_DOCREATE
+    .dw XT_COMPILE
+    .dw DO_COLON
+    .dw XT_RBRACKET
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/comma.html
 ,0 → 1,104
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/comma.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/comma.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n -- ) Dictionary
+; R( -- )
+; compile 16 bit into flash at here.
+VE_COMMA:
+    .db $01, $2c ; ,
+    .dw VE_HEAD
+    .set VE_HEAD = VE_COMMA
+XT_COMMA:
+    .dw DO_COLON
+PFA_COMMA:
+    .dw XT_HERE
+    .dw XT_ISTORE
+    .dw XT_DP
+    .dw XT_EFETCH
+    .dw XT_1PLUS
+    .dw XT_DP
+    .dw XT_ESTORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/compile.html
 ,0 → 1,104
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/compile.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/compile.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Dictionary
+; R( -- )
+; copy the next flash cell to HERE
+VE_COMPILE:
+    .db $07, &quot;compile&quot;
+    .dw  VE_HEAD
+    .set VE_HEAD = VE_COMPILE
+XT_COMPILE:
+    .dw DO_COLON
+PFA_COMPILE:
+    .dw XT_R_FROM
+    .dw XT_DUP
+    .dw XT_1PLUS
+    .dw XT_TO_R
+    .dw XT_IFETCH
+    .dw XT_COMMA
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/constant.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/constant.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/constant.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n -- ) Compiler
+; R( -- )
+; create a named constant
+VE_CONSTANT:
+    .db $08, &quot;constant&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_CONSTANT
+XT_CONSTANT:
+    .dw DO_COLON
+PFA_CONSTANT:
+    .dw XT_DOCREATE
+    .dw XT_COMPILE
+    .dw PFA_DOVARIABLE
+    .dw XT_COMMA
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/count.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/count.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/count.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr -- addr+1 n) String
+; R( -- )
+; addr is the address of a counted string in RAM
+VE_COUNT:
+    .db $05, &quot;count&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_COUNT
+XT_COUNT:
+    .dw DO_COLON
+PFA_COUNT:
+    .dw XT_DUP
+    .dw XT_1PLUS
+    .dw XT_SWAP
+    .dw XT_CFETCH
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/cr.html
 ,0 → 1,103
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/cr.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/cr.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Character IO
+; R( -- )
+; emits CR/LF
+VE_CR:
+    .db $02, &quot;cr&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_CR
+XT_CR:
+    .dw DO_COLON
+PFA_CR:
+    .dw XT_DOLITERAL
+    .dw 13
+    .dw XT_EMIT
+    .dw XT_DOLITERAL
+    .dw 10
+    .dw XT_EMIT
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/create.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/create.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/create.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Dictionary
+; R( -- )
+; create a complete dictionary header.
+VE_CREATE:
+    .db $6, &quot;create&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_CREATE
+XT_CREATE:
+    .dw DO_COLON
+PFA_CREATE:
+    .dw XT_DOCREATE
+    .dw XT_COMPILE
+    .dw XT_DOCONSTANT
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/cstore.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/cstore.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/cstore.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( c addr -- ) Memory
+; R( -- )
+; store a byte to RAM address
+VE_CSTORE:
+    .db $02, &quot;c!&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_CSTORE
+XT_CSTORE:
+    .dw PFA_CSTORE
+PFA_CSTORE:
+    movw zl, tosl
+    loadtos
+    st Z, tosl
+    loadtos
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/d-2slash.html
 ,0 → 1,105
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/d-2slash.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/d-2slash.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( d1 -- d2 ) Arithmetics
+; R( -- )
+; shift a double cell value right
+VE_D2SLASH:
+    .db $03, &quot;d2/&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_D2SLASH
+XT_D2SLASH:
+    .dw PFA_D2SLASH
+PFA_D2SLASH:
+    ld temp0, Y+
+    ld temp1, Y+
+    asr temp1
+    ror temp0
+    ror tosh
+    ror tosl
+    st -Y, temp1
+    st -Y, temp0
+    jmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/d-2star.html
 ,0 → 1,105
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/d-2star.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/d-2star.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( d1 -- d2 ) Arithmetics
+; R( -- )
+; shift a double cell left
+VE_D2STAR:
+    .db $03, &quot;d2*&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_D2STAR
+XT_D2STAR:
+    .dw PFA_D2STAR
+PFA_D2STAR:
+    ld temp0, Y+
+    ld temp1, Y+
+    lsl tosl
+    rol tosh
+    rol temp0
+    rol temp1
+    st -Y, temp1
+    st -Y, temp0
+    jmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/d-greater.html
 ,0 → 1,109
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/d-greater.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/d-greater.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( d1 d2 -- flag ) Compare
+; R( -- )
+; compares two values (signed)
+VE_DGREATER:
+    .db $02, &quot;d&gt;&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DGREATER
+XT_DGREATER:
+    .dw PFA_DGREATER
+PFA_DGREATER:
+    ld temp0, Y+
+    ld temp1, Y+
+    ld temp2, Y+
+    ld temp3, Y+
+    ld temp4, Y+
+    ld temp5, Y+
+    cp temp2, tosl
+    cpc temp3, tosh
+    cpc temp4, temp0
+    cpc temp5, temp1
+    rjmp PFA_GREATERDONE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/d-invert.html
 ,0 → 1,105
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/d-invert.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/d-invert.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( d1 -- d2) Arithmetics
+; R( -- )
+; flip all bits in the double cell value
+VE_DINVERT:
+    .db $07, &quot;dinvert&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DINVERT
+XT_DINVERT:
+    .dw PFA_DINVERT
+PFA_DINVERT:
+    ld temp0, Y+
+    ld temp1, Y+
+    com tosl
+    com tosh
+    com temp0
+    com temp1
+    st -Y, temp1
+    st -Y, temp0
+    jmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/d-less.html
 ,0 → 1,109
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/d-less.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/d-less.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( d1 d2 -- flasg) Compare
+; R( -- )
+; compare two values
+VE_DLESS:
+    .db $02, &quot;d&lt;&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DLESS
+XT_DLESS:
+    .dw PFA_DLESS
+PFA_DLESS:
+    ld temp0, Y+
+    ld temp1, Y+
+    ld temp2, Y+
+    ld temp3, Y+
+    ld temp4, Y+
+    ld temp5, Y+
+    cp temp2, tosl
+    cpc temp3, tosh
+    cpc temp4, temp0
+    cpc temp5, temp1
+    rjmp PFA_LESSDONE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/d-minus.html
 ,0 → 1,112
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/d-minus.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/d-minus.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( d1 d2 -- d3 ) Arithmetics
+; R( -- )
+; subtract double cell values
+VE_DMINUS:
+    .db $02, &quot;d-&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DMINUS
+XT_DMINUS:
+    .dw PFA_DMINUS
+PFA_DMINUS:
+    ld temp4, Y+
+    ld temp5, Y+
+    ld temp6, Y+
+    ld temp7, Y+
+    ld temp2, Y+
+    ld temp3, Y+
+    sub tosl, temp4
+    sbc tosh, temp5
+    sbc temp2, temp6
+    sbc temp3, temp7
+    st -Y, temp3
+    st -Y, temp2
+    jmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/d-plus.html
 ,0 → 1,112
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/d-plus.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/d-plus.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( d1 d2 -- d3) Arithmetics
+; R( -- )
+; add double cell values
+VE_DPLUS:
+    .db $02, &quot;d+&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DPLUS
+XT_DPLUS:
+    .dw PFA_DPLUS
+PFA_DPLUS:
+    ld temp2, Y+
+    ld temp3, Y+
+    ld temp4, Y+
+    ld temp5, Y+
+    ld temp6, Y+
+    ld temp7, Y+
+    add tosl, temp4
+    adc tosh, temp5
+    adc temp2, temp6
+    adc temp3, temp7
+    st -Y, temp3
+    st -Y, temp2
+    jmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/d_to_s.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/d_to_s.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/d_to_s.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( d1 -- n1 ) Conversion
+; R( -- )
+; shrink double cell value to single cell.
+VE_D2S:
+    .db $03, &quot;d&gt;s&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_D2S
+XT_D2S:
+    .dw DO_COLON
+PFA_D2S:
+    .dw XT_SWAP
+    .dw XT_DROP
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/decimal.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/decimal.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/decimal.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Numeric IO
+; R( -- )
+; set base to 10 (decimal)
+VE_DECIMAL:
+    .db $07, &quot;decimal&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DECIMAL
+XT_DECIMAL:
+    .dw DO_COLON
+PFA_DECIMAL:
+    .dw XT_DOLITERAL
+    .dw 10
+    .dw XT_BASE
+    .dw XT_STORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/defer-fetch.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/defer-fetch.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/defer-fetch.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( xt1 -- xt2 ) System
+; R( -- )
+; returns the XT assoziates with the given XT
+VE_DEFERFETCH:
+    .db $06, &quot;defer@&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DEFERFETCH
+XT_DEFERFETCH:
+    .dw DO_COLON
+PFA_DEFERFETCH:
+    .dw XT_DUP
+    .dw XT_1PLUS ; &gt;body
+    .dw XT_1PLUS
+    .dw XT_IFETCH
+    .dw XT_EXECUTE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/defer-store.html
 ,0 → 1,104
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/defer-store.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/defer-store.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( xt1 xt2 -- ) System
+; R( -- )
+; stores xt1 as the xt to be executed when xt2 is called
+VE_DEFERSTORE:
+    .db $06, &quot;defer!&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DEFERSTORE
+XT_DEFERSTORE:
+    .dw DO_COLON
+PFA_DEFERSTORE:
+    .dw XT_DUP
+    .dw XT_DOLITERAL
+    .dw 3
+    .dw XT_PLUS   ; &gt;body 2 +
+    .dw XT_IFETCH
+    .dw XT_EXECUTE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/depth.html
 ,0 → 1,103
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/depth.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/depth.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- n ) Stack
+; R( -- )
+; currently used data stack size in cells
+VE_DEPTH:
+    .db $05, &quot;depth&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DEPTH
+XT_DEPTH:
+    .dw DO_COLON
+PFA_DEPTH:
+    .dw XT_SP0
+    .dw XT_SP_FETCH
+    .dw XT_MINUS
+    .dw XT_1MINUS
+    .dw XT_1MINUS
+    .dw XT_2SLASH
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/dict_high.html
 ,0 → 1,183
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> dict_high.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> dict_high.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; this part of the dictionay has to fit into the nrww flash
+; section together with the forth inner interpreter
+.include &quot;words/exit.asm&quot;
+.include &quot;words/execute.asm&quot;
+.include &quot;words/dobranch.asm&quot;
+.include &quot;words/docondbranch.asm&quot;
+.include &quot;words/estore.asm&quot;
+.include &quot;words/efetch.asm&quot;
+.include &quot;words/sleep.asm&quot;
+.include &quot;words/wdr.asm&quot;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/doliteral.asm&quot;
+.include &quot;words/dovariable.asm&quot;
+.include &quot;words/doconstant.asm&quot;
+.include &quot;words/douser.asm&quot;
+.include &quot;words/fetch.asm&quot;
+.include &quot;words/store.asm&quot;
+.include &quot;words/cstore.asm&quot;
+.include &quot;words/cfetch.asm&quot;
+;;;;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/dup.asm&quot;
+.include &quot;words/qdup.asm&quot;
+.include &quot;words/swap.asm&quot;
+.include &quot;words/over.asm&quot;
+.include &quot;words/drop.asm&quot;
+.include &quot;words/rot.asm&quot;
+;;;;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/r_from.asm&quot;
+.include &quot;words/to_r.asm&quot;
+.include &quot;words/r_fetch.asm&quot;
+;;;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/notequal.asm&quot;
+.include &quot;words/notequalzero.asm&quot;
+.include &quot;words/equal.asm&quot;
+.include &quot;words/equalzero.asm&quot;
+.include &quot;words/less.asm&quot;
+.include &quot;words/greater.asm&quot;
+.include &quot;words/lesszero.asm&quot;
+.include &quot;words/greaterzero.asm&quot;
+.include &quot;words/uless.asm&quot;
+.include &quot;words/ugreater.asm&quot;
+.include &quot;words/d-greater.asm&quot;
+.include &quot;words/d-less.asm&quot;
+.include &quot;words/log2.asm&quot;
+.include &quot;words/minus.asm&quot;
+.include &quot;words/plus.asm&quot;
+.include &quot;words/star.asm&quot;
+.include &quot;words/mstar.asm&quot;
+.include &quot;words/umslashmod.asm&quot;
+.include &quot;words/invert.asm&quot;
+.include &quot;words/2slash.asm&quot;
+.include &quot;words/2star.asm&quot;
+.include &quot;words/and.asm&quot;
+.include &quot;words/or.asm&quot;
+.include &quot;words/xor.asm&quot;
+.include &quot;words/not.asm&quot;
+.include &quot;words/1plus.asm&quot;
+.include &quot;words/1minus.asm&quot;
+.include &quot;words/lshift.asm&quot;
+.include &quot;words/rshift.asm&quot;
+.include &quot;words/plusstore.asm&quot;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/rpfetch.asm&quot;
+.include &quot;words/rpstore.asm&quot;
+.include &quot;words/spfetch.asm&quot;
+.include &quot;words/spstore.asm&quot;
+.include &quot;words/dodo.asm&quot;
+.include &quot;words/doqdo.asm&quot;
+.include &quot;words/i.asm&quot;
+.include &quot;words/j.asm&quot;
+.include &quot;words/doloop.asm&quot;
+.include &quot;words/doplusloop.asm&quot;
+.include &quot;words/unloop.asm&quot;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/ifetch.asm&quot;
+.include &quot;words/istore.asm&quot;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/cmove_g.asm&quot;
+.include &quot;words/byteswap.asm&quot;
+.include &quot;words/1ms.asm&quot;
+.include &quot;words/zero.asm&quot;
+.include &quot;words/up.asm&quot;
+.include &quot;words/s_to_d.asm&quot;
+.include &quot;words/d_to_s.asm&quot;
+.include &quot;words/d-2slash.asm&quot;
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/dict_minimum.html
 ,0 → 1,249
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> dict_minimum.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> dict_minimum.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+; header
+;  +--1+x--++--2--+--2----0+x...--
+;  | VOC   |  L  | XT  | PF
+;  +-------#-----+-----+----....--
+; VOC (flags may be inverted to be flash friendly)
+;       Bit
+;         7 6 5 4-0
+;         I U U Length
+;    I = Immediate
+;    U = Unused
+;    Length = length of word name (1..31)
+;      Length number of bytes, filled to next cell
+;  L
+;    Link to previos Dictionary entry or zero for first entry
+;  XT
+;    Address of Executable Code
+;  PF
+;    Parameter Field (List of XT, Constant Value etc)
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/f_cpu.asm&quot;
+.include &quot;words/state.asm&quot;
+.include &quot;words/base.asm&quot;
+.include &quot;words/g_in.asm&quot;
+.include &quot;words/sharptib.asm&quot;
+.include &quot;words/tib.asm&quot;
+.include &quot;words/pad.asm&quot;
+.include &quot;words/emit.asm&quot;
+.include &quot;words/emitq.asm&quot;
+.include &quot;words/key.asm&quot;
+.include &quot;words/keyq.asm&quot;
+.include &quot;words/slashkey.asm&quot;
+.include &quot;words/dp.asm&quot;
+.include &quot;words/head.asm&quot;
+.include &quot;words/here.asm&quot;
+.include &quot;words/allot.asm&quot;
+.include &quot;words/abort.asm&quot;
+.include &quot;words/literal.asm&quot;
+.include &quot;words/comma.asm&quot;
+.include &quot;words/g_mark.asm&quot;
+.include &quot;words/g_resolve.asm&quot;
+.include &quot;words/l_mark.asm&quot;
+.include &quot;words/l_resolve.asm&quot;
+.include &quot;words/if.asm&quot;
+.include &quot;words/else.asm&quot;
+.include &quot;words/then.asm&quot;
+.include &quot;words/begin.asm&quot;
+.include &quot;words/while.asm&quot;
+.include &quot;words/repeat.asm&quot;
+.include &quot;words/until.asm&quot;
+.include &quot;words/again.asm&quot;
+.include &quot;words/do.asm&quot;
+.include &quot;words/loop.asm&quot;
+.include &quot;words/plusloop.asm&quot;
+.include &quot;words/docreate.asm&quot;
+.include &quot;words/create.asm&quot;
+.include &quot;words/does.asm&quot;
+.include &quot;words/colon.asm&quot;
+.include &quot;words/colon-noname.asm&quot;
+.include &quot;words/semicolon.asm&quot;
+.include &quot;words/rightbracket.asm&quot;
+.include &quot;words/leftbracket.asm&quot;
+.include &quot;words/variable.asm&quot;
+.include &quot;words/constant.asm&quot;
+.include &quot;words/user.asm&quot;
+.include &quot;words/backslash.asm&quot;
+.include &quot;words/lparenthesis.asm&quot;
+.include &quot;words/recurse.asm&quot;
+.include &quot;words/immediate.asm&quot;
+.include &quot;words/compile.asm&quot;
+.include &quot;words/brackettick.asm&quot;
+.include &quot;words/decimal.asm&quot;
+.include &quot;words/hex.asm&quot;
+.include &quot;words/bl.asm&quot;
+.include &quot;words/edp.asm&quot;
+.include &quot;words/heap.asm&quot;
+.include &quot;words/turnkey.asm&quot;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/starslashmod.asm&quot;
+.include &quot;words/slashmod.asm&quot;
+.include &quot;words/starslash.asm&quot;
+.include &quot;words/uslashmod.asm&quot;
+.include &quot;words/ustarslashmod.asm&quot;
+.include &quot;words/negate.asm&quot;
+.include &quot;words/slash.asm&quot;
+.include &quot;words/mod.asm&quot;
+.include &quot;words/abs.asm&quot;
+.include &quot;words/min.asm&quot;
+.include &quot;words/max.asm&quot;
+;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/hld.asm&quot;
+.include &quot;words/hold.asm&quot;
+.include &quot;words/l_sharp.asm&quot; ; &lt;#
+.include &quot;words/sharp.asm&quot;
+.include &quot;words/sharp_s.asm&quot;
+.include &quot;words/sharp_g.asm&quot; ; #&gt;
+.include &quot;words/sign.asm&quot;
+.include &quot;words/dot.asm&quot;
+.include &quot;words/digit.asm&quot;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/sliteral.asm&quot;
+.include &quot;words/scomma.asm&quot;
+.include &quot;words/itype.asm&quot;
+.include &quot;words/icount.asm&quot;
+.include &quot;words/cr.asm&quot;
+.include &quot;words/space.asm&quot;
+.include &quot;words/count.asm&quot;
+.include &quot;words/type.asm&quot;
+.include &quot;words/tick.asm&quot;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/handler.asm&quot;
+.include &quot;words/catch.asm&quot;
+.include &quot;words/throw.asm&quot;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/char-skip.asm&quot;
+.include &quot;words/accept.asm&quot;
+.include &quot;words/refill.asm&quot;
+.include &quot;words/char.asm&quot;
+.include &quot;words/number.asm&quot;
+.include &quot;words/parse.asm&quot;
+.include &quot;words/char-scan.asm&quot;
+.include &quot;words/source.asm&quot;
+.include &quot;words/slashstring.asm&quot;
+.include &quot;words/word.asm&quot;
+.include &quot;words/quit.asm&quot;
+.include &quot;words/pause.asm&quot;
+.include &quot;words/cold.asm&quot;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/sp0.asm&quot;
+.include &quot;words/rp0.asm&quot;
+.include &quot;words/depth.asm&quot;
+.include &quot;words/interpret.asm&quot;
+.include &quot;words/ver.asm&quot;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+.include &quot;words/noop.asm&quot;
+.include &quot;words/unused.asm&quot;
+.include &quot;words/value.asm&quot;
+.include &quot;words/to.asm&quot;
+.include &quot;words/edefer-fetch.asm&quot;
+.include &quot;words/edefer-store.asm&quot;
+.include &quot;words/rdefer-fetch.asm&quot;
+.include &quot;words/rdefer-store.asm&quot;
+.include &quot;words/udefer-fetch.asm&quot;
+.include &quot;words/udefer-store.asm&quot;
+.include &quot;words/do-defer.asm&quot;
+.include &quot;words/find.asm&quot;
+.include &quot;words/defer-store.asm&quot;
+.include &quot;words/defer-fetch.asm&quot;
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/dict_optional.html
 ,0 → 1,113
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> dict_optional.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> dict_optional.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; this dictionary contains optional words
+; they may be moved to the core dictionary if needed
+.include &quot;words/case.asm&quot;
+.include &quot;words/of.asm&quot;
+.include &quot;words/endof.asm&quot;
+.include &quot;words/endcase.asm&quot;
+.include &quot;words/d-2star.asm&quot;
+.include &quot;words/d-plus.asm&quot;
+.include &quot;words/d-minus.asm&quot;
+.include &quot;words/d-invert.asm&quot;
+.include &quot;words/udot.asm&quot;
+.include &quot;words/dot-s.asm&quot;
+.include &quot;words/idump.asm&quot;
+.include &quot;words/abortstring.asm&quot;
+.include &quot;words/dotstring.asm&quot;
+.include &quot;words/squote.asm&quot;
+.include &quot;words/words.asm&quot;
+.include &quot;words/edefer.asm&quot;
+.include &quot;words/rdefer.asm&quot;
+.include &quot;words/is.asm&quot;
+.include &quot;words/leave.asm&quot;
+.include &quot;words/qdo.asm&quot;
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/digit.html
 ,0 → 1,141
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/digit.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/digit.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( c base -- number flag ) Numeric IO
+; R( -- )
+; convert character to number, set flag if successful
+VE_DIGIT:
+    .db $05, &quot;digit&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DIGIT
+XT_DIGIT:
+    .dw DO_COLON
+PFA_DIGIT:
+    .dw XT_SWAP
+    ; [char] 0 -
+    .dw XT_DOLITERAL
+    .dw $30 ; '0'
+    .dw XT_MINUS
+    ; dup 9 &gt;
+    .dw XT_DUP
+    .dw XT_DOLITERAL
+    .dw 9
+    .dw XT_GREATER
+    .dw XT_DOCONDBRANCH
+    .dw PFA_DIGIT1
+    ; if
+        ; we had a non-numeric character
+        .dw XT_DOLITERAL
+        .dw $df
+        .dw XT_AND ; make uppercase
+        .dw XT_DOLITERAL
+        .dw 7
+        .dw XT_MINUS ; finally 'a' -&gt; 10
+        .dw XT_DUP
+        .dw XT_DOLITERAL
+        .dw 10
+        .dw XT_LESS
+        .dw XT_DOCONDBRANCH
+        .dw PFA_DIGIT1
+            ; invalid character
+            .dw XT_DROP
+            .dw XT_ZERO
+            .dw XT_EXIT
+PFA_DIGIT1:
+    ; ( b n -- n f)
+    ; compare with the limits:  less than base and and not negative
+    .dw XT_SWAP
+    .dw XT_OVER
+    .dw XT_GREATER
+    .dw XT_OVER
+    .dw XT_LESSZERO
+    .dw XT_EQUALZERO
+    .dw XT_AND
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/do-defer.html
 ,0 → 1,105
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/do-defer.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/do-defer.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( i*x -- j*x )
+; R( -- )
+; runtime of defer
+;VE_DOEDEFER:
+;    .db $0a, &quot;(defer)&quot;, 0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_DOEDEFER
+XT_DODEFER:
+    .dw PFA_DODEFER
+PFA_DODEFER:
+    call_ DO_DODOES
+    .dw XT_DUP
+    .dw XT_1MINUS
+    .dw XT_SWAP
+    .dw XT_1PLUS
+    .dw XT_IFETCH
+    .dw XT_EXECUTE
+    .dw XT_EXECUTE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/do.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/do.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/do.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) Control Structure
+; R( -- )
+; start do .. [+]loop
+VE_DO:
+    .db $82, &quot;do&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DO
+XT_DO:
+    .dw DO_COLON
+PFA_DO:
+    .dw XT_COMPILE
+    .dw XT_DODO
+    .dw XT_GMARK
+    .dw XT_LMARK
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/dobranch.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/dobranch.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/dobranch.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- )
+; R( -- )
+; runtime portion of branch
+;VE_DOBRANCH:
+;    .db $08, &quot;(branch)&quot;,0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_DOBRANCH
+XT_DOBRANCH:
+    .dw PFA_DOBRANCH
+PFA_DOBRANCH:
+    movw zl, xl
+    lsl zl
+    rol zh
+    lpm xl, Z+
+    lpm xh, Z
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/docondbranch.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/docondbranch.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/docondbranch.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( f -- )
+; R( -- )
+; runtime portion of ?branch
+;VE_DOCONDBRANCH:
+;    .db $09, &quot;(?branch)&quot;
+;    .dw  VE_HEAD
+;    .set VE_HEAD = VE_DOCONDBRANCH
+XT_DOCONDBRANCH:
+    .dw PFA_DOCONDBRANCH
+PFA_DOCONDBRANCH:
+    or tosh, tosl
+    loadtos
+    brbs 1, PFA_DOBRANCH ; 1 is z flag; if tos is zero (false), do the branch
+    adiw xl, 1
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/doconstant.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/doconstant.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/doconstant.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr )
+; R( -- )
+; place PFA on TOS
+;VE_DOCONSTAN:
+;    .db $0a, &quot;(constant)&quot;, 0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_DOCONSTANT
+XT_DOCONSTANT:
+    .dw PFA_DOCONSTANT
+PFA_DOCONSTANT:
+    adiw wl, 1
+    savetos
+    movw tosl, wl
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/docreate.html
 ,0 → 1,118
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/docreate.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/docreate.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( --  )
+; R( -- )
+; creates the vocabulary header without XT and data field (PF)
+;VE_DOCREATE:
+;    .db $08, &quot;(create)&quot;,0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_DOCREATE
+XT_DOCREATE:
+    .dw DO_COLON
+PFA_DOCREATE:
+    .dw XT_HERE   ; ( -- here)
+    .dw XT_BL
+    .dw XT_WORD   ; ( -- here addr)
+    .dw XT_COUNT  ; ( -- here addr' n)
+    .dw XT_DUP    ; ( -- here addr' n n )
+    .dw XT_GREATERZERO ;( -- here addr' n f )
+    .dw XT_DOCONDBRANCH
+    .dw PFA_DOCREATE4 ; ( -- here addr' n )
+    .dw XT_SCOMMA
+    ; make voc link
+    .dw XT_HEAD       ; ( -- here head )
+    .dw XT_EFETCH
+    .dw XT_COMMA      ; ( -- here)
+    .dw XT_HEAD       ; ( -- here head )
+    .dw XT_ESTORE     ; ( -- )
+    .dw XT_EXIT
+PFA_DOCREATE4:
+    .dw XT_DROP
+    .dw XT_DROP
+    .dw XT_DROP
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/dodo.html
 ,0 → 1,116
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/dodo.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/dodo.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( limit counter -- )
+; R( -- limit counter )
+; runtime of do
+;VE_DODO:
+;    .db 4, &quot;(do)&quot;, 0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_DODO
+XT_DODO:
+    .dw PFA_DODO
+PFA_DODO:
+    ; put the content of the next flash cell on return stack
+    ; it is the address of the instruction _after_ the (+)loop
+    movw zl, xl
+    lsl  zl
+    rol  zh
+    lpm  temp0, Z+
+    lpm  temp1, Z+
+    adiw xl, 1    ; adjust to NEXT+1 = jump over &lt;mark (for leave)
+    ld temp2, Y+
+    ld temp3, Y+
+PFA_DODO1:
+    push temp1
+    push temp0
+    push temp3
+    push temp2
+    push tosh
+    push tosl
+    loadtos
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/does.html
 ,0 → 1,129
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/does.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/does.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Compiler
+; R( -- )
+;
+VE_DOES:
+    .db $85, &quot;does&gt;&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DOES
+XT_DOES:
+    .dw DO_COLON
+PFA_DOES:
+    .dw XT_DOLITERAL
+    .dw XT_DODOES
+    .dw XT_COMMA
+    .dw XT_COMPILE
+    .dw $940e       ; code for call
+    .dw XT_COMPILE; the address of this cell is used by (does&gt;)
+    .dw DO_DODOES
+    .dw XT_EXIT
+; ( -- )
+;R( -- )
+; runtime of does&gt;
+;VE_DODOES:
+;   .db $07, &quot;(does&gt;)&quot;
+;   .set VE_HEAD = VE_DODOES
+XT_DODOES:
+    .dw DO_COLON
+PFA_DODOES:
+    .dw XT_R_FROM
+    .dw XT_HEAD
+    .dw XT_EFETCH
+    .dw XT_DUP
+    .dw XT_IFETCH
+    .dw XT_DOLITERAL
+    .dw $001f
+    .dw XT_AND
+    .dw XT_2SLASH
+    .dw XT_1PLUS
+    .dw XT_PLUS
+    .dw XT_1PLUS
+    .dw XT_ISTORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/doliteral.html
 ,0 → 1,113
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/doliteral.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/doliteral.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- n1 )
+; R( -- )
+; runtime of literal
+;VE_DOLITERAL:
+;    .db $09, &quot;(literal)&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_DOLITERAL
+XT_DOLITERAL:
+    .dw DO_COLON
+PFA_DOLITERAL:
+    .dw XT_R_FROM
+    .dw XT_DUP
+    .dw XT_1PLUS
+    .dw XT_TO_R
+    .dw XT_IFETCH
+    .dw XT_EXIT
+;    .dw PFA_DOLITERAL
+;PFA_DOLITERAL:
+;    savetos
+;    movw zl, xl
+;    lsl zl
+;    rol zh
+;    lpm tosl, Z+
+;    lpm tosh, Z
+;    adiw xl, 1
+;    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/doloop.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/doloop.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/doloop.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- )
+; R(limit counter -- limit counter+1|)
+; runtime of loop
+;VE_DOLOOP:
+;    .db 6, &quot;(loop)&quot;, 0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_DOLOOP
+XT_DOLOOP:
+    .dw PFA_DOLOOP
+PFA_DOLOOP:
+    pop zl
+    pop zh
+    adiw zl,1
+    rjmp PFA_DOPLUSLOOP4
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/doplusloop.html
 ,0 → 1,124
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/doplusloop.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/doplusloop.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 -- )
+; R(llimit counter -- limit counter+n1|)
+; runtime of +loop
+;VE_DOPLUSLOOP:
+;    .db 7, &quot;(+loop)&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_DOPLUSLOOP
+XT_DOPLUSLOOP:
+    .dw PFA_DOPLUSLOOP
+PFA_DOPLUSLOOP:
+    pop zl
+    pop zh
+    add zl, tosl
+    adc zh, tosh
+    loadtos
+PFA_DOPLUSLOOP4:   ; entry point for (loop)
+    pop temp2
+    pop temp3
+    cp zl, temp2
+    cpc zh, temp3
+    sbrs tosh, 7 ; if msb is set, increment is negative. in that case skip the next instruction
+    rjmp PFA_DOPLUSLOOP2 ; jump to test for positive overflow
+    brlt PFA_DOPLUSLOOP1 ; exit if underflow
+    rjmp PFA_DOPLUSLOOP3
+PFA_DOPLUSLOOP2:
+    brge PFA_DOPLUSLOOP1 ; exit if overflow
+PFA_DOPLUSLOOP3:
+    ; next iteration
+    push temp3
+    push temp2
+    push zh
+    push zl
+    rjmp PFA_DOBRANCH ; read next cell from dictionary and jump to its destination
+PFA_DOPLUSLOOP1:
+    pop  temp0
+    pop  temp1  ; remove leave destination
+    adiw xl, 1  ; skip branch-back address
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/doqdo.html
 ,0 → 1,114
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/doqdo.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/doqdo.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( limit counter -- )
+; R( -- limit counter )
+; runtime of do
+;VE_DODO:
+;    .db 4, &quot;(do)&quot;, 0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_DODO
+XT_DOQDO:
+    .dw PFA_DOQDO
+PFA_DOQDO:
+    ; put the content of the next flash cell on return stack
+    ; it is the address of the instruction _after_ the (+)loop
+    movw zl, xl
+    lsl  zl
+    rol  zh
+    lpm  temp0, Z+
+    lpm  temp1, Z+
+    adiw xl, 1    ; adjust to NEXT+1 = jump over &lt;mark (for leave)
+    ld temp2, Y+
+    ld temp3, Y+
+    ; now check for equality
+    cp tosl, temp2
+    cpc tosh, temp3
+    brne PFA_DODO1
+    ; both values are the same -&gt; skip to loop
+    movw xl, temp0
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/dot-s.html
 ,0 → 1,122
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/dot-s.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/dot-s.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Tools
+; R( -- )
+; stack dump
+VE_DOTS:
+    .db $02, &quot;.s&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DOTS
+XT_DOTS:
+    .dw DO_COLON
+PFA_DOTS:
+    .dw XT_SP_FETCH
+    .dw XT_DEPTH
+    .dw XT_1MINUS
+    .dw XT_QDUP
+    .dw XT_DOCONDBRANCH
+    .dw PFA_DOTS2
+    .dw XT_ZERO
+    .dw XT_DODO
+    .dw PFA_DOTS2
+PFA_DOTS1:
+    .dw XT_DUP
+    .dw XT_I
+    .dw XT_DUP
+    .dw XT_UDOT
+    .dw XT_2STAR
+    .dw XT_PLUS
+    .dw XT_DUP
+    .dw XT_UDOT
+    .dw XT_FETCH
+    .dw XT_UDOT
+    .dw XT_CR
+    .dw XT_DOLOOP
+    .dw PFA_DOTS1
+PFA_DOTS2:
+    .dw XT_DROP
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/dot.html
 ,0 → 1,108
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/dot.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/dot.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n -- ) Numeric IO
+; R( -- )
+; prints TOS in free number format
+VE_DOT:
+    .db $01, &quot;.&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DOT
+XT_DOT:
+    .dw DO_COLON
+PFA_DOT:
+    .dw XT_DUP
+    .dw XT_ABS
+    .dw XT_S2D
+    .dw XT_L_SHARP
+    .dw XT_SHARP_S
+    .dw XT_ROT
+    .dw XT_SIGN
+    .dw XT_BL
+    .dw XT_HOLD
+    .dw XT_SHARP_G
+    .dw XT_TYPE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/dotstring.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/dotstring.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/dotstring.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Compiler
+; R( -- )
+; compiles string into dictionary to be typed at runtime
+VE_DOTSTRING:
+    .db $82, &quot;.&quot;,$22,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DOTSTRING
+XT_DOTSTRING:
+    .dw DO_COLON
+PFA_DOTSTRING:
+    .dw XT_SQUOTE
+    .dw XT_COMPILE
+    .dw XT_ITYPE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/douser.html
 ,0 → 1,106
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/douser.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/douser.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr )
+; R( -- )
+; runtime part of user
+;VE_DOUSER:
+;    .db $06, &quot;(user)&quot;, 0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_DOUSER
+XT_DOUSER:
+    .dw PFA_DOUSER
+PFA_DOUSER:
+    savetos
+    movw zl, wl
+    adiw zl, 1
+    lsl zl
+    rol zh
+    lpm tosl, Z+
+    lpm tosh, Z
+    add tosl, upl
+    adc tosh, uph
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/dovariable.html
 ,0 → 1,104
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/dovariable.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/dovariable.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr )
+; R( -- )
+; puts content of parameter field (1 cell) to TOS
+;VE_DOVARIABLE:
+;    .db $0a, &quot;(variable)&quot;, 0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_DOVARIABLE
+XT_DOVARIABLE:
+    .dw PFA_DOVARIABLE
+PFA_DOVARIABLE:
+    savetos
+    movw zl, wl
+    adiw zl,1
+    lsl zl
+    rol zh
+    lpm tosl, Z+
+    lpm tosh, Z
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/dp.html
 ,0 → 1,97
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/dp.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/dp.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- eaddr)  System Pointer
+; R( -- )
+; first unused address in flash (NRWW is always used)
+VE_DP:
+    .db $02, &quot;dp&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DP
+XT_DP:
+    .dw PFA_DOVARIABLE
+PFA_DP:
+    .dw $00
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/drop.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/drop.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/drop.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n -- ) Stack
+; R( -- )
+; drop TOS
+VE_DROP:
+    .db $04, &quot;drop&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DROP
+XT_DROP:
+    .dw PFA_DROP
+PFA_DROP:
+    loadtos
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/dup.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/dup.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/dup.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n -- n n ) Stack
+; R( -- )
+; duplicate TOS
+VE_DUP:
+    .db $03, &quot;dup&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_DUP
+XT_DUP:
+    .dw PFA_DUP
+PFA_DUP:
+    savetos
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/edefer-fetch.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/edefer-fetch.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/edefer-fetch.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( xt1 -- xt2 ) System
+; R( -- )
+; does the real defer@ for eeprom defers
+;VE_EDEFERFETCH:
+;    .db $07, &quot;Edefer@&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_EDEFERFETCH
+XT_EDEFERFETCH:
+    .dw DO_COLON
+PFA_EDEFERFETCH:
+    .dw XT_1PLUS ; &gt;body
+    .dw XT_IFETCH
+    .dw XT_EFETCH
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/edefer-store.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/edefer-store.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/edefer-store.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( xt1 xt2 -- ) System
+; R( -- )
+; does the real defer! for eeprom defers
+;VE_EDEFERSTORE:
+;    .db $07, &quot;Edefer!&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_EDEFERSTORE
+XT_EDEFERSTORE:
+    .dw DO_COLON
+PFA_EDEFERSTORE:
+    .dw XT_1PLUS
+    .dw XT_IFETCH
+    .dw XT_ESTORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/edefer.html
 ,0 → 1,113
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/edefer.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/edefer.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n &lt;name&gt; -- ) Compiler
+; R( -- )
+; creates a defer vector which is kept in eeprom.
+VE_EDEFER:
+    .db $06, &quot;Edefer&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_EDEFER
+XT_EDEFER:
+    .dw DO_COLON
+PFA_EDEFER:
+    .dw XT_DOCREATE
+    .dw XT_COMPILE
+    .dw PFA_DODEFER
+    .dw XT_EDP
+    .dw XT_EFETCH
+    .dw XT_DUP
+    .dw XT_COMMA
+    .dw XT_COMPILE
+    .dw XT_EDEFERFETCH
+    .dw XT_COMPILE
+    .dw XT_EDEFERSTORE
+    .dw XT_1PLUS
+    .dw XT_1PLUS
+    .dw XT_EDP
+    .dw XT_ESTORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/edp.html
 ,0 → 1,97
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/edp.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/edp.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- eaddr) System Pointer
+; R( -- )
+; first unused address in eeprom
+VE_EDP:
+    .db $03, &quot;edp&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_EDP
+XT_EDP:
+    .dw PFA_DOVARIABLE
+PFA_EDP:
+    .dw $06
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/efetch.html
 ,0 → 1,123
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/efetch.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/efetch.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr - n) Memory
+; R( -- )
+; read 2 bytes from eeprom
+VE_EFETCH:
+    .db $02, &quot;e@&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_EFETCH
+XT_EFETCH:
+    .dw PFA_EFETCH
+PFA_EFETCH:
+    movw zl, tosl
+PFA_EFETCH1:
+    in temp0, EECR
+    sbrc temp0,EEWE
+    rjmp PFA_EFETCH1
+    out EEARH, zh
+    out EEARL, zl
+    sbi EECR,EERE
+    in tosl,EEDR
+    adiw zl,1
+PFA_EFETCH2:
+    in temp1, EECR
+    sbrc temp1,EEWE
+    rjmp PFA_EFETCH2
+    out EEARH,zh
+    out EEARL,zl
+    sbi EECR,EERE
+    in  tosh,EEDR
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/else.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/else.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/else.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr1 -- addr2) Compiler
+; R( -- )
+;
+VE_ELSE:
+    .db $84, &quot;else&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ELSE
+XT_ELSE:
+    .dw DO_COLON
+PFA_ELSE:
+    .dw XT_COMPILE
+    .dw XT_DOBRANCH
+    .dw XT_GMARK
+    .dw XT_SWAP
+    .dw XT_GRESOLVE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/emit.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/emit.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/emit.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- eaddr) Character IO
+; R( -- )
+; fetch the emit vector and execute it
+VE_EMIT:
+    .db $04, &quot;emit&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_EMIT
+XT_EMIT:
+    .dw PFA_DODEFER
+PFA_EMIT:
+    .dw 12
+    .dw XT_UDEFERFETCH
+    .dw XT_UDEFERSTORE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/emitq.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/emitq.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/emitq.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- c) Character IO
+; R( -- )
+; fetch emit? vector and execute it
+VE_EMITQ:
+    .db $05, &quot;emit?&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_EMITQ
+XT_EMITQ:
+    .dw PFA_DODEFER
+PFA_EMITQ:
+    .dw 14
+    .dw XT_UDEFERFETCH
+    .dw XT_UDEFERSTORE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/endcase.html
 ,0 → 1,106
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/endcase.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/endcase.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( f -- ) Compiler
+; R( -- )
+;
+VE_ENDCASE:
+    .db $87, &quot;endcase&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ENDCASE
+XT_ENDCASE:
+    .dw DO_COLON
+PFA_ENDCASE:
+PFA_ENDCASE1:
+    .dw XT_QDUP
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ENDCASE2
+    .dw XT_THEN
+    .dw XT_DOBRANCH
+    .dw PFA_ENDCASE1
+PFA_ENDCASE2:
+    .dw XT_DROP
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/endof.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/endof.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/endof.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr1 -- addr2 ) Compiler
+; R( -- )
+;
+VE_ENDOF:
+    .db $85, &quot;endof&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ENDOF
+XT_ENDOF:
+    .dw DO_COLON
+PFA_ENDOF:
+    .dw XT_ELSE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/equal.html
 ,0 → 1,107
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/equal.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/equal.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- flag ) Compare
+; R( -- )
+; compares two values
+VE_EQUAL:
+    .db $01, &quot;=&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_EQUAL
+XT_EQUAL:
+    .dw PFA_EQUAL
+PFA_EQUAL:
+    ld temp2, Y+
+    ld temp3, Y+
+    cp tosl, temp2
+    cpc tosh, temp3
+PFA_EQUALDONE:
+    movw zl, zerol
+    brne PFA_EQUAL1
+    sbiw zl, 1
+PFA_EQUAL1:
+    movw tosl, zl
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/equalzero.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/equalzero.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/equalzero.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n -- flag ) Compare
+; R( -- )
+; compare with 0 (zero)
+VE_EQUALZERO:
+    .db $02, &quot;0=&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_EQUALZERO
+XT_EQUALZERO:
+    .dw PFA_EQUALZERO
+PFA_EQUALZERO:
+    or tosh, tosl
+    rjmp PFA_EQUALDONE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/estore.html
 ,0 → 1,139
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/estore.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/estore.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n addr -- ) Memory
+; R( -- )
+; write to eeprom address
+VE_ESTORE:
+    .db $02, &quot;e!&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ESTORE
+XT_ESTORE:
+    .dw PFA_ESTORE
+PFA_ESTORE:
+    movw zl, tosl
+    loadtos
+PFA_ESTORE1:
+    in temp0, EECR
+    sbrc temp0,EEWE
+    rjmp PFA_ESTORE1
+PFA_ESTORE2: ; estore_wait_low_spm:
+    in temp0, SPMCR
+    sbrc temp0,SPMEN
+    rjmp PFA_ESTORE2
+    out EEARH,zh
+    out EEARL,zl
+    out EEDR, tosl
+    in temp2, SREG
+    cli
+    sbi EECR,EEMWE
+    sbi EECR,EEWE
+    out SREG, temp2
+    adiw zl,1
+PFA_ESTORE3:
+    in temp0, EECR
+    sbrc temp0,EEWE
+    rjmp PFA_ESTORE3
+PFA_ESTORE4: ; estore_wait_hi_spm:
+    in temp0, SPMCR
+    sbrc temp0,SPMEN
+    rjmp PFA_ESTORE4
+    out EEARH,zh
+    out EEARL,zl
+    out EEDR, tosh
+    in temp2, SREG
+    cli
+    sbi EECR,EEMWE
+    sbi EECR,EEWE
+    out SREG, temp2
+    loadtos
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/execute.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/execute.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/execute.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( xt -- ) System
+; R( -- )
+; execute XT
+VE_EXECUTE:
+    .db $07, &quot;execute&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_EXECUTE
+XT_EXECUTE:
+    .dw PFA_EXECUTE
+PFA_EXECUTE:
+    movw wl, tosl
+    loadtos
+    rjmp DO_EXECUTE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/exit.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/exit.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/exit.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Compiler
+; R( xt -- )
+; end of current colon word
+VE_EXIT:
+    .db $04, &quot;exit&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_EXIT
+XT_EXIT:
+    .dw PFA_EXIT
+PFA_EXIT:
+    pop xl
+    pop xh
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/f_cpu.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/f_cpu.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/f_cpu.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- f_cou ) System
+; R( -- )
+; put the cpu frequency on stack
+VE_F_CPU:
+    .db $05, &quot;f_cpu&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_F_CPU
+XT_F_CPU:
+    .dw DO_COLON
+PFA_F_CPU:
+    .dw XT_DOLITERAL
+    .dw (cpu_frequency / 65536)
+    .dw XT_DOLITERAL
+    .dw (cpu_frequency % 65536)
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/fetch.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/fetch.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/fetch.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr -- n ) Memory
+; R( -- )
+; read 1 cell from RAM (or IO or CPU register)
+VE_FETCH:
+    .db $01, &quot;@&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_FETCH
+XT_FETCH:
+    .dw PFA_FETCH
+PFA_FETCH:
+    movw zl, tosl
+    ld tosl, z+
+    ld tosh, z+
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/find.html
 ,0 → 1,219
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/find.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/find.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr --  -- [ addr 0 ] | [ xt [-1|1]] ) Tools
+; R( -- )
+; search dictionary
+VE_FIND:
+    .db $04, &quot;find&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_FIND
+XT_FIND:
+    .dw DO_COLON
+PFA_FIND:
+    .dw XT_DUP
+    .dw XT_TO_R
+    .dw XT_HEAD
+    .dw XT_EFETCH
+PFA_FIND1:
+    ; ( addr )
+    .dw XT_DUP
+    .dw XT_NOTEQUALZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_FIND2
+    .dw XT_ICOMPARE
+    ; (addr-ram addr-flash -- addr-flash' 0|1
+    .dw XT_QDUP
+    .dw XT_NOTEQUALZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_FIND3
+    ; we found the word
+    .dw XT_SWAP
+    .dw XT_1PLUS ; make XT
+    .dw XT_SWAP
+    .dw XT_R_FROM
+    .dw XT_DROP
+    .dw XT_EXIT
+PFA_FIND3:
+    .dw XT_R_FROM
+    .dw XT_DUP
+    .dw XT_TO_R
+    .dw XT_SWAP
+    .dw XT_IFETCH
+    .dw XT_DOBRANCH
+    .dw PFA_FIND1
+PFA_FIND2:
+    .dw XT_DROP
+    .dw XT_DROP
+    .dw XT_R_FROM
+    .dw XT_ZERO
+    .dw XT_EXIT
+; private headerless routine
+; compares counted string in RAM with counted string in flash
+;
+; ( addr --  -- [ addr 0 ] | [ xt [-1|1]] )
+; R( -- )
+; search dictionary
+;VE_ICOMPARE:
+;    .db $04, &quot;icompare&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_ICOMPARE
+XT_ICOMPARE:
+    .dw DO_COLON
+PFA_ICOMPARE:
+    ; ( addr-ram addr-flash -- 0| +/-1
+    .dw XT_DUP
+    .dw XT_IFETCH
+    .dw XT_DUP
+    .dw XT_DOLITERAL
+    .dw $0080
+    .dw XT_AND
+    .dw XT_TO_R           ; send immediate flag to r-stack
+    .dw XT_ZERO
+    .dw XT_TO_R
+    .dw XT_DOLITERAL
+    .dw $001f
+    .dw XT_AND
+    .dw XT_2SLASH
+    .dw XT_1PLUS
+    .dw XT_TO_R
+PFA_ICOMPARE1:
+    .dw XT_OVER
+    .dw XT_OVER
+    .dw XT_IFETCH
+    .dw XT_DOLITERAL
+    .dw $ff7f
+    .dw XT_AND
+    .dw XT_SWAP
+    .dw XT_FETCH
+    .dw XT_EQUAL
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ICOMPARE3
+    ; increment pointers, 1 CELL for FLASH, 2 bytes for RAM
+    .dw XT_1PLUS
+    .dw XT_SWAP
+    .dw XT_1PLUS
+    .dw XT_1PLUS
+    .dw XT_SWAP
+    ; decrement cell counter, leave loop for zero
+    .dw XT_R_FROM
+    .dw XT_1MINUS
+    .dw XT_DUP
+    .dw XT_TO_R
+    .dw XT_EQUALZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ICOMPARE2
+    ; we found matching strings
+    .dw XT_R_FROM
+    .dw XT_R_FROM
+    .dw XT_DROP
+    .dw XT_DOLITERAL
+    .dw 1
+    .dw XT_TO_R
+    .dw XT_TO_R
+    .dw XT_DOBRANCH
+    .dw PFA_ICOMPARE3
+PFA_ICOMPARE2:
+    .dw XT_DOBRANCH
+    .dw PFA_ICOMPARE1
+PFA_ICOMPARE3:
+    .dw XT_SWAP
+    .dw XT_DROP
+    .dw XT_R_FROM
+    .dw XT_PLUS
+    .dw XT_R_FROM
+    .dw XT_R_FROM
+    .dw XT_EQUALZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ICOMPARE4
+    .dw XT_NEGATE
+PFA_ICOMPARE4:
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/g_in.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/g_in.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/g_in.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) System
+; R( -- )
+; pointer to current read position in TIB
+VE_G_IN:
+    .db $03, &quot;&gt;in&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_G_IN
+XT_G_IN:
+    .dw PFA_DOVARIABLE
+PFA_G_IN:
+    .dw heap
+    .set heap = heap + CELLSIZE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/g_mark.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/g_mark.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/g_mark.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) Control Structure
+; R( -- )
+; places current dictionary position for backward resolves
+;VE_GMARK:
+;    .db 5, &quot;&gt;mark&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_GMARK
+XT_GMARK:
+    .dw DO_COLON
+PFA_GMARK:
+    .dw XT_HERE
+    .dw XT_COMPILE
+    .dw -1           ; ffff does not erase flash
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/g_resolve.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/g_resolve.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/g_resolve.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr -- ) Control Structure
+; R( -- )
+; resolved backward jumps
+;VE_GRESOLVE:
+;    .db 8, &quot;&gt;resolve&quot;,0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_GRESOLVE
+XT_GRESOLVE:
+    .dw DO_COLON
+PFA_GRESOLVE:
+    .dw XT_HERE
+    .dw XT_SWAP
+    .dw XT_ISTORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/greater.html
 ,0 → 1,109
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/greater.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/greater.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- flag ) Compare
+; R( -- )
+; compares two values (signed)
+VE_GREATER:
+    .db $01, &quot;&gt;&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_GREATER
+XT_GREATER:
+    .dw PFA_GREATER
+PFA_GREATER:
+    ld temp2, Y+
+    ld temp3, Y+
+    cp temp2, tosl
+    cpc temp3, tosh
+PFA_GREATERDONE:
+    movw zl, zerol
+    brlt PFA_GREATER1
+    brbs 1, PFA_GREATER1
+    sbiw zl, 1
+PFA_GREATER1:
+    movw tosl, zl
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/greaterzero.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/greaterzero.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/greaterzero.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 -- flag ) Compare
+; R( -- )
+; compare with zero
+VE_GREATERZERO:
+    .db $02, &quot;0&gt;&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_GREATERZERO
+XT_GREATERZERO:
+    .dw PFA_GREATERZERO
+PFA_GREATERZERO:
+    cp tosl, zerol
+    cpc tosh, zeroh
+    rjmp PFA_GREATERDONE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/handler.html
 ,0 → 1,97
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/handler.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/handler.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) Exceptions
+; R( -- )
+; used by catch/throw
+VE_HANDLER:
+    .db $07, &quot;handler&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_HANDLER
+XT_HANDLER:
+    .dw PFA_DOUSER
+PFA_HANDLER:
+    .dw 10
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/head.html
 ,0 → 1,97
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/head.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/head.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- eaddr) System Pointer
+; R( -- )
+; address of first unallocated flash (below NRWW)
+_VE_HEAD:
+    .db $04, &quot;head&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = _VE_HEAD
+XT_HEAD:
+    .dw PFA_DOVARIABLE
+PFA_HEAD:
+    .dw $02
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/heap.html
 ,0 → 1,97
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/heap.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/heap.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- eaddr) System Pointer
+; R( -- )
+;  address of first unallocated RAM
+VE_HEAP:
+    .db $04, &quot;heap&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_HEAP
+XT_HEAP:
+    .dw PFA_DOVARIABLE
+PFA_HEAP:
+    .dw $04
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/here.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/here.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/here.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) System Pointer
+; R( -- )
+;
+VE_HERE:
+    .db $04, &quot;here&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_HERE
+XT_HERE:
+    .dw DO_COLON
+PFA_HERE:
+    .dw XT_DP
+    .dw XT_EFETCH
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/hex.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/hex.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/hex.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Numeric IO
+; R( -- )
+; set base to 16 (decimal)
+VE_HEX:
+    .db $03, &quot;hex&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_HEX
+XT_HEX:
+    .dw DO_COLON
+PFA_HEX:
+    .dw XT_DOLITERAL
+    .dw 16
+    .dw XT_BASE
+    .dw XT_STORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/hld.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/hld.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/hld.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) Numeric IO
+; R( -- )
+; address of buffer for pictured numeric output
+VE_HLD:
+    .db $03, &quot;hld&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_HLD
+XT_HLD:
+    .dw DO_COLON
+PFA_HLD:
+    .dw XT_PAD
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/hold.html
 ,0 → 1,115
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/hold.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/hold.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( c -- ) Numeric IO
+; R( -- )
+; prepend character to pictured numeric output buffer
+VE_HOLD:
+    .db $04, &quot;hold&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_HOLD
+XT_HOLD:
+    .dw DO_COLON
+PFA_HOLD:
+    ; move characters to the right
+    .dw XT_HLD ; from
+    .dw XT_1PLUS
+    .dw XT_DUP
+    .dw XT_1PLUS ; to
+    .dw XT_HLD
+    .dw XT_CFETCH ; number bytes
+    .dw XT_CMOVE_G
+    ; increase string length
+    .dw XT_HLD
+    .dw XT_CFETCH
+    .dw XT_1PLUS
+    .dw XT_HLD
+    .dw XT_CSTORE
+    ; store character as the first position
+    .dw XT_HLD
+    .dw XT_1PLUS
+    .dw XT_CSTORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/i.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/i.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/i.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- n ) Control Structure
+; R( loop-sys -- loop-sys)
+; current loop counter
+VE_I:
+    .db 1, &quot;i&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_I
+XT_I:
+    .dw PFA_I
+PFA_I:
+    savetos
+    pop tosl
+    pop tosh
+    push tosh
+    push tosl
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/icount.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/icount.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/icount.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( adr -- adr n )  Tools
+; R( -- )
+; get count byte out of packed counted string in flash
+VE_ICOUNT:
+    .db $06, &quot;icount&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ICOUNT
+XT_ICOUNT:
+    .dw DO_COLON
+PFA_ICOUNT:
+    .dw XT_DUP
+    .dw XT_IFETCH
+    .dw XT_DOLITERAL
+    .dw $00ff  ; only the count byte
+    .dw XT_AND
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/idump.html
 ,0 → 1,113
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/idump.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/idump.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr len -- ) Tools
+; R( -- )
+; dumps flash memory beginning with address addr and len cells long
+VE_IDUMP:
+    .db $5, &quot;idump&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_IDUMP
+XT_IDUMP:
+    .dw DO_COLON
+PFA_IDUMP:
+    .dw XT_ZERO
+    .dw XT_DODO
+    .dw PFA_IDUMP2
+PFA_IDUMP1:
+    .dw XT_I
+    .dw XT_OVER
+    .dw XT_PLUS
+        .dw XT_DUP
+        .dw XT_UDOT
+    .dw XT_IFETCH
+    .dw XT_UDOT
+    .dw XT_CR
+    .dw XT_DOLOOP
+    .dw PFA_IDUMP1
+PFA_IDUMP2:
+    .dw XT_DROP
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/if.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/if.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/if.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) Control Structure
+; R( -- )
+; start conditional branch
+VE_IF:
+    .db $82, &quot;if&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_IF
+XT_IF:
+    .dw DO_COLON
+PFA_IF:
+    .dw XT_COMPILE
+    .dw XT_DOCONDBRANCH
+    .dw XT_GMARK
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/ifetch.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/ifetch.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/ifetch.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr -- n1 ) Memory
+; R( -- )
+; reads a cell from flash, addr is cell address, not byte addres first byte gets into the lower word on tos
+VE_IFETCH:
+    .db $02, &quot;i@&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_IFETCH
+XT_IFETCH:
+    .dw PFA_IFETCH
+PFA_IFETCH:
+    movw zl, tosl
+    lsl zl
+    rol zh
+    lpm tosl, z+
+    lpm tosh, z+
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/immediate.html
 ,0 → 1,106
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/immediate.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/immediate.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Compiler
+; R( -- )
+; set immediate flag
+VE_IMMEDIATE:
+    .db $09, &quot;immediate&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_IMMEDIATE
+XT_IMMEDIATE:
+    .dw DO_COLON
+PFA_IMMEDIATE:
+    .dw XT_HEAD
+    .dw XT_EFETCH
+    .dw XT_DUP
+    .dw XT_IFETCH
+    .dw XT_DOLITERAL
+    .dw $0080
+    .dw XT_OR
+    .dw XT_SWAP
+    .dw XT_ISTORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/interpret.html
 ,0 → 1,155
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/interpret.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/interpret.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) System
+; R(i*x - j*x )
+; interpret input word by word. may throw exceptions
+VE_INTERPRET:
+    .db $09, &quot;interpret&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_INTERPRET
+XT_INTERPRET:
+    .dw DO_COLON
+PFA_INTERPRET:
+PFA_INTERPRET1:
+    .dw XT_BL
+    .dw XT_WORD
+    .dw XT_DUP
+    .dw XT_CFETCH
+    .dw XT_GREATERZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_INTERPRET4
+    .dw XT_FIND
+    .dw XT_QDUP
+    .dw XT_EQUALZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_INTERPRET2
+    .dw XT_NUMBER
+    ; check state
+    .dw XT_STATE
+    .dw XT_FETCH
+    .dw XT_NOTEQUALZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_INTERPRET9
+    ;
+    .dw XT_COMPILE
+    .dw XT_DOLITERAL
+    .dw XT_COMMA
+PFA_INTERPRET9:
+    .dw XT_DOBRANCH
+    .dw PFA_INTERPRET3
+PFA_INTERPRET2:
+    ; either compile or execute
+    .dw XT_GREATERZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_INTERPRET5
+    ; flag was 1: always execute
+    .dw XT_EXECUTE
+    .dw XT_DOBRANCH
+    .dw PFA_INTERPRET6
+PFA_INTERPRET5:
+    ; check state
+    .dw XT_STATE
+    .dw XT_FETCH
+    .dw XT_EQUALZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_INTERPRET7
+    ; state is zero, execute xt
+    .dw XT_EXECUTE
+    .dw XT_DOBRANCH
+    .dw PFA_INTERPRET8
+PFA_INTERPRET7:
+    .dw XT_COMMA
+PFA_INTERPRET8:
+PFA_INTERPRET6:
+PFA_INTERPRET3:
+    .dw XT_DOBRANCH
+    .dw PFA_INTERPRET1
+PFA_INTERPRET4:
+    .dw XT_DROP
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/intx.html
 ,0 → 1,200
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/intx.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/intx.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+.set intcur   = heap ; current interrupt
+.set heap     = heap + 1
+.set intvec   = heap ; forth interrupt vector (contain the XT)
+.set heap     = heap + INTVECTORS * CELLSIZE
+; interrupt routine gets called (again) by rcall! This gives the
+; address of the int-vector on the stack.
+isr:
+    st -Y, r0
+    in r0, SREG
+    st -Y, r0
+    pop r0
+    pop r0          ; = intnum * intvectorsize + 1 (address following the rcall)
+    dec r0
+.if intvecsize == 1 ;
+    lsl r0
+.endif
+    sts intcur, r0
+    ld r0, Y+
+    out SREG, r0
+    ld r0, Y+
+    set ; set the interrupt flag for the inner interpreter
+    reti ; returns the interrupt, the rcall stack frame is removed!
+; ( xt i -- )  Interrupt
+; R( -- )
+; stores XT as interrupt vector i
+VE_INTSTORE:
+    .db $04, &quot;int!&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_INTSTORE
+XT_INTSTORE:
+    .dw DO_COLON
+PFA_INTSTORE:
+    .dw XT_2STAR
+    .dw XT_DOLITERAL
+    .dw intvec
+    .dw XT_PLUS
+    .dw XT_STORE
+    .dw XT_EXIT
+; ( i -- xt ) Interrupt
+; R( -- )
+; fetches XT from interrupt vector i
+VE_INTFETCH:
+    .db $04, &quot;int@&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_INTFETCH
+XT_INTFETCH:
+    .dw DO_COLON
+PFA_INTFETCH:
+    .dw XT_2STAR
+    .dw XT_DOLITERAL
+    .dw intvec
+    .dw XT_PLUS
+    .dw XT_FETCH
+    .dw XT_EXIT
+; ( -- n )  Interrupt
+; R( -- )
+; number of interrupt vectors (0 based)
+VE_NUMINT:
+    .db $04, &quot;#int&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_NUMINT
+XT_NUMINT:
+    .dw PFA_DOVARIABLE
+PFA_NUMINT:
+    .dw INTVECTORS
+; ( -- sreg ) Interrupt
+; R( -- )
+; turns off all interrupts and leaves SREG in TOS
+VE_INTOFF:
+    .db $04, &quot;/int&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_INTOFF
+XT_INTOFF:
+    .dw PFA_INTOFF
+PFA_INTOFF:
+    savetos
+    clr tosh
+    in tosl, SREG
+    cli
+    jmp_ DO_NEXT
+; ( --  )  Interrupt
+; R( -- )
+; turns on all interrupts
+VE_INTON:
+    .db $03, &quot;int&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_INTON
+XT_INTON:
+    .dw PFA_INTON
+PFA_INTON:
+    sei
+    jmp_ DO_NEXT
+; ( sreg -- ) Interrupt
+; R( -- )
+; restores SREG from TOS (
+;VE_INTRESTORE:
+;    .db $0B, &quot;int_restore&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_INTRESTORE
+XT_INTRESTORE:
+    .dw PFA_INTRESTORE
+PFA_INTRESTORE:
+    out SREG, tosl
+    loadtos
+    jmp_ DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/invert.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/invert.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/invert.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 -- n2) Arithmetics
+; R( -- )
+; 1-complement of TOS
+VE_INVERT:
+    .db $06, &quot;invert&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_INVERT
+XT_INVERT:
+    .dw PFA_INVERT
+PFA_INVERT:
+    com tosl
+    com tosh
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/is.html
 ,0 → 1,109
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/is.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/is.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( xt1 c&lt;char&gt; -- ) System
+; R( --)
+; stores xt into defer or compiles code to do so at runtime
+VE_IS:
+    .db $82, &quot;is&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_IS
+XT_IS:
+    .dw DO_COLON
+PFA_IS:
+    .dw XT_STATE
+    .dw XT_FETCH
+    .dw XT_DOCONDBRANCH
+    .dw PFA_IS1
+    .dw XT_BRACKETTICK
+    .dw XT_COMPILE
+    .dw XT_DEFERSTORE
+    .dw XT_EXIT
+PFA_IS1:
+    .dw XT_TICK
+    .dw XT_DEFERSTORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/istore.html
 ,0 → 1,289
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/istore.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/istore.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n addr -- ) Memory
+; R( -- )
+; writes a cell in flash
+VE_ISTORE:
+    .db $02, &quot;i!&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ISTORE
+XT_ISTORE:
+    .dw DO_COLON
+PFA_ISTORE:
+    .dw XT_INTOFF
+    .dw XT_TO_R
+    .dw XT_OVER
+    .dw XT_OVER
+    .dw XT_SPMBUF
+    .dw XT_DUP
+    .dw XT_SPMPAGELOAD
+    ; an erase cycle is only necessary
+    ; when changing a bit from 0 to 1
+    .dw XT_OVER
+    .dw XT_OVER
+    .dw XT_IFETCH
+    .dw XT_INVERT
+    .dw XT_AND
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ISTORE_WRITE
+        .dw XT_DUP
+        .dw XT_SPMERASE
+PFA_ISTORE_WRITE:
+    .dw XT_DUP
+    .dw XT_SPMWRITE
+    .dw XT_SPMRWW
+    .dw XT_DROP
+    .dw XT_DROP
+    .dw XT_R_FROM
+    .dw XT_INTRESTORE
+    .dw XT_EXIT
+; ( addr -- )
+; R( -- )
+; load the flash page of cell addr into write buffer, omitting addr itself
+;VE_SPMPAGELOAD:
+;    .db 11, &quot;spmpageload&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_INTSPMPAGELOAD
+XT_SPMPAGELOAD:
+    .dw DO_COLON
+PFA_SPMPAGELOAD:
+    .dw XT_DUP
+    .dw XT_TO_R
+    .dw XT_DOLITERAL
+    .dw PAGEMASK
+    .dw XT_AND
+    .dw XT_DOLITERAL
+    .dw PAGESIZE
+    .dw XT_SWAP
+PFA_SPMPAGELOAD1:
+    .dw XT_OVER
+    .dw XT_GREATERZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_SPMPAGELOADDONE
+    .dw XT_R_FROM
+    .dw XT_DUP
+    .dw XT_TO_R
+    .dw XT_OVER
+    .dw XT_NOTEQUAL
+    .dw XT_DOCONDBRANCH
+    .dw PFA_SPMPAGELOAD3
+        .dw XT_DUP
+        .dw XT_IFETCH
+        .dw XT_OVER
+        .dw XT_SPMBUF
+PFA_SPMPAGELOAD3: ;( size addr -- )
+    .dw XT_1PLUS
+    .dw XT_SWAP
+    .dw XT_1MINUS
+    .dw XT_SWAP
+    .dw XT_DOBRANCH
+    .dw PFA_SPMPAGELOAD1
+PFA_SPMPAGELOADDONE:
+    .dw XT_DROP
+    .dw XT_DROP
+    .dw XT_R_FROM
+    .dw XT_DROP
+    .dw XT_EXIT
+; ( spmcsr x addr -- )
+; R( -- )
+; execute spm instruction
+;VE_DOSPM:
+;    .db $03, &quot;(spm)&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_DOSPM
+XT_DOSPM:
+    .dw PFA_DOSPM
+PFA_DOSPM:
+  ; wait for pending spm instruction
+PFA_DOSPM1:
+    in temp1, SPMCR
+    andi temp1, (1&lt;&lt;SPMEN)
+    brne PFA_DOSPM1
+PFA_DOSPM2:
+    sbic EECR, EEWE
+    rjmp PFA_DOSPM2
+    ; address
+    movw zl, tosl
+    lsl zl
+    rol zh
+    ; value
+    ld r0, Y+
+    ld r1, Y+
+    ; command
+    ld temp0, Y+
+    ld temp1, Y+
+    ; spm timed sequence
+    out SPMCR, temp0
+    spm
+    loadtos
+    rjmp DO_NEXT
+; ( x addr -- )
+; R( -- )
+; execute spm buf instruction
+;VE_SPMBUF:
+;    .db $06, &quot;spmbuf&quot;,0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_SPMBUF
+XT_SPMBUF:
+    .dw DO_COLON
+PFA_SPMBUF:
+    .dw XT_TO_R
+    .dw XT_TO_R
+    .dw XT_DOLITERAL
+    .dw (1&lt;&lt;SPMEN)
+    .dw XT_R_FROM
+    .dw XT_R_FROM
+    .dw XT_DOSPM
+    .dw XT_EXIT
+; ( addr -- )
+; R( -- )
+; execute spm erase instruction
+;VE_SPMERASE:
+;    .db $08, &quot;spmerase&quot;,0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_SPMERASE
+XT_SPMERASE:
+    .dw DO_COLON
+PFA_SPMERASE:
+    .dw XT_DOLITERAL
+    .dw PAGEMASK
+    .dw XT_AND
+    .dw XT_TO_R
+    .dw XT_DOLITERAL
+    .dw (1&lt;&lt;PGERS|1&lt;&lt;SPMEN)
+    .dw XT_ZERO
+    .dw XT_R_FROM
+    .dw XT_DOSPM
+    .dw XT_EXIT
+; ( spmcsr x addr -- )
+; R( -- )
+; execute spm write instruction
+;VE_SPMWRITE:
+;    .db $08, &quot;spmwrite&quot;,0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_WPMWRITE
+XT_SPMWRITE:
+    .dw DO_COLON
+PFA_SPMWRITE:
+    .dw XT_DOLITERAL
+    .dw PAGEMASK
+    .dw XT_AND
+    .dw XT_TO_R
+    .dw XT_DOLITERAL
+    .dw (1&lt;&lt;PGWRT|1&lt;&lt;SPMEN)
+    .dw XT_ZERO
+    .dw XT_R_FROM
+    .dw XT_DOSPM
+    .dw XT_EXIT
+; ( -- )
+; R( -- )
+; re-enables rww section execute spm rww instruction
+;VE_SPMRWW:
+;    .db $05, &quot;spmrww&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_SPMRWW
+XT_SPMRWW:
+    .dw DO_COLON
+PFA_SPMRWW:
+    .dw XT_DOLITERAL
+    .dw (1&lt;&lt;RWWSRE|1&lt;&lt;SPMEN)
+    .dw XT_ZERO
+    .dw XT_ZERO
+    .dw XT_DOSPM
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/itype.html
 ,0 → 1,214
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/itype.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/itype.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr n --  ) Tools
+; R( -- )
+; reads packed string from flash and emit it
+VE_ITYPE:
+    .db $05, &quot;itype&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ITYPE
+XT_ITYPE:
+    .dw DO_COLON
+PFA_ITYPE:
+    .dw XT_DUP
+    .dw XT_EQUALZERO
+; IF
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ITYPE1
+    .dw XT_DROP
+    .dw XT_DROP
+    .dw XT_EXIT
+; THEN
+PFA_ITYPE1:
+    .dw XT_DUP
+    .dw XT_DOLITERAL
+    .dw $0001
+    .dw XT_EQUAL
+; IF
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ITYPE2
+    .dw XT_DROP
+        .dw XT_IFETCH
+    .dw XT_HIEMIT
+    .dw XT_EXIT
+; THEN
+PFA_ITYPE2:
+    .dw XT_OVER
+    .dw XT_IFETCH
+    .dw XT_HIEMIT
+    .dw XT_DUP
+    .dw XT_2SLASH
+    .dw XT_1MINUS
+    .dw XT_TO_R       ; &gt;r  save k=m-1
+    .dw XT_R_FETCH    ; r@
+    .dw XT_GREATERZERO
+; IF
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ITYPE4
+    .dw XT_SWAP
+    .dw XT_R_FETCH  ; r@  get k
+    .dw XT_ZERO
+ ; DO
+    .dw XT_DODO
+    .dw PFA_ITYPE7
+PFA_ITYPE3:
+    .dw XT_1PLUS
+    .dw XT_DUP
+    .dw XT_IFETCH
+    .dw XT_DUP
+    .dw XT_LOEMIT
+    .dw XT_HIEMIT
+    .dw XT_DOLOOP
+    .dw PFA_ITYPE3
+ ; LOOP
+PFA_ITYPE7:
+    .dw XT_SWAP
+; THEN
+PFA_ITYPE4:
+    .dw XT_SWAP
+    .dw XT_1PLUS
+    .dw XT_SWAP
+    .dw XT_DOLITERAL
+    .dw $0001
+    .dw XT_AND
+    .dw XT_EQUALZERO
+; IF
+    .dw XT_DOCONDBRANCH
+    .dw PFA_ITYPE5
+    .dw XT_IFETCH
+    .dw XT_LOEMIT
+    .dw XT_DOBRANCH
+    .dw PFA_ITYPE6
+; ELSE
+PFA_ITYPE5:
+    .dw XT_IFETCH
+    .dw XT_DUP
+    .dw XT_LOEMIT
+    .dw XT_HIEMIT
+; THEN
+PFA_ITYPE6:
+    .dw XT_R_FROM  ; remove k
+    .dw XT_DROP
+    .dw XT_EXIT
+; ( w -- )
+; R( -- )
+; content of cell fetched on stack.
+;VE_LOEMIT:
+;    .db $06, &quot;loemit&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_LOEMIT
+XT_LOEMIT:
+    .dw DO_COLON
+PFA_LOEMIT:
+    .dw XT_DOLITERAL
+    .dw $00ff
+    .dw XT_AND
+    .dw XT_EMIT
+    .dw XT_EXIT
+; ( w -- )
+; R( -- )
+; content of cell fetched on stack.
+;VE_HIEMIT:
+;    .db $06, &quot;hiemit&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_HIEMIT
+XT_HIEMIT:
+    .dw DO_COLON
+PFA_HIEMIT:
+        .dw XT_DOLITERAL
+        .dw 8
+        .dw XT_RSHIFT
+        .dw XT_EMIT
+        .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/j.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/j.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/j.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- n ) Control Structure
+; R( loop-sys1 loop-sys2 -- loop-sys1 loop-sys2)
+; loop counter of outer loop
+VE_J:
+    .db 1, &quot;j&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_J
+XT_J:
+    .dw DO_COLON
+PFA_J:
+    .dw XT_RP_FETCH
+    .dw XT_DOLITERAL
+    .dw 9
+    .dw XT_PLUS
+    .dw XT_FETCH
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/key.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/key.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/key.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- c ) Character IO
+; R( -- )
+; fetch key vector and execute it
+VE_KEY:
+    .db $03, &quot;key&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_KEY
+XT_KEY:
+    .dw PFA_DODEFER
+PFA_KEY:
+    .dw 16
+    .dw XT_UDEFERFETCH
+    .dw XT_UDEFERSTORE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/keyq.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/keyq.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/keyq.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- f) Character IO
+; R( -- )
+; fetch 'key? vector and execute it. Leave true if a character can be read, false otherwise
+VE_KEYQ:
+    .db $04, &quot;key?&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_KEYQ
+XT_KEYQ:
+    .dw PFA_DODEFER
+PFA_KEYQ:
+    .dw 18
+    .dw XT_UDEFERFETCH
+    .dw XT_UDEFERSTORE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/l_mark.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/l_mark.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/l_mark.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) Control Structure
+; R( -- )
+; place destination for backward branch
+;VE_LMARK:
+;    .db 5, &quot;&lt;mark&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_LMARK
+XT_LMARK:
+    .dw DO_COLON
+PFA_LMARK:
+    .dw XT_HERE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/l_resolve.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/l_resolve.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/l_resolve.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr -- ) Control Structure
+; R( -- )
+; resolve backward branch
+;VE_LRESOLVE:
+;    .db 8, &quot;&lt;resolve&quot;,0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_LRESOLVE
+XT_LRESOLVE:
+    .dw DO_COLON
+PFA_LRESOLVE:
+    .dw XT_COMMA
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/l_sharp.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/l_sharp.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/l_sharp.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Numeric IO
+; R( -- )
+; emties counted string at address from hld
+VE_L_SHARP:
+    .db $02, &quot;&lt;#&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_L_SHARP
+XT_L_SHARP:
+    .dw DO_COLON
+PFA_L_SHARP:
+    .dw XT_ZERO
+    .dw XT_HLD
+    .dw XT_STORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/leave.html
 ,0 → 1,103
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/leave.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/leave.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- )
+; R(next limit counter -- next )
+; runtime of leave
+VE_LEAVE:
+   .db 5, &quot;leave&quot;
+   .dw VE_HEAD
+   .set VE_HEAD = VE_LEAVE
+XT_LEAVE:
+    .dw PFA_LEAVE
+PFA_LEAVE:
+    pop temp0  ; drop limit and counter from returnstack
+    pop temp1
+    pop temp0
+    pop temp1
+    pop xl
+    pop xh
+    jmp_ DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/leftbracket.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/leftbracket.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/leftbracket.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( --  ) Compiler
+; R( -- )
+; put system to interpreter state
+VE_LBRACKET:
+    .db $81, &quot;[&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_LBRACKET
+XT_LBRACKET:
+    .dw DO_COLON
+PFA_LBRACKET:
+    .dw XT_ZERO
+    .dw XT_STATE
+    .dw XT_STORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/less.html
 ,0 → 1,107
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/less.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/less.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- flasg) Compare
+; R( -- )
+; compare two values
+VE_LESS:
+    .db $01, &quot;&lt;&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_LESS
+XT_LESS:
+    .dw PFA_LESS
+PFA_LESS:
+    ld temp2, Y+
+    ld temp3, Y+
+    cp temp2, tosl
+    cpc temp3, tosh
+PFA_LESSDONE:
+    movw zl, zerol
+    brge PFA_LESS1
+    sbiw zl, 1
+PFA_LESS1:
+    movw tosl, zl
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/lesszero.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/lesszero.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/lesszero.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 -- flag) Compare
+; R( -- )
+; compare with zero
+VE_LESSZERO:
+    .db $02, &quot;0&lt;&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_LESSZERO
+XT_LESSZERO:
+    .dw PFA_LESSZERO
+PFA_LESSZERO:
+    cp tosl, zerol
+    cpc tosh, zeroh
+    rjmp PFA_LESSDONE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/literal.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/literal.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/literal.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n -- ) Compiler
+; R( -- )
+; compile a literal in colon defintions
+VE_LITERAL:
+    .db $87, &quot;literal&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_LITERAL
+XT_LITERAL:
+    .dw DO_COLON
+PFA_LITERAL:
+    .dw XT_COMPILE
+    .dw XT_DOLITERAL
+    .dw XT_COMMA
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/log2.html
 ,0 → 1,111
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/log2.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/log2.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 -- n2 ) Arithmetics
+; R( -- )
+; logarithm base 2 or highest set bitnumber
+VE_LOG2:
+    .db $04, &quot;log2&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_LOG2
+XT_LOG2:
+    .dw PFA_LOG2
+PFA_LOG2:
+    movw zl, tosl
+    clr tosh
+    ldi temp0, 16
+    mov tosl, temp0
+PFA_LOG2_1:
+    dec tosl
+    brmi PFA_LOG2_2 ; wrong data
+    lsl  zl
+    rol  zh
+    brcc PFA_LOG2_1
+    rjmp DO_NEXT
+PFA_LOG2_2:
+    dec tosh
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/loop.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/loop.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/loop.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr -- ) Control Structure
+; R( -- )
+; cpmpile (loop) and resolve branch
+VE_LOOP:
+    .db $84, &quot;loop&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_LOOP
+XT_LOOP:
+    .dw DO_COLON
+PFA_LOOP:
+    .dw XT_COMPILE
+    .dw XT_DOLOOP
+    .dw XT_LRESOLVE
+    .dw XT_GRESOLVE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/lparenthesis.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/lparenthesis.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/lparenthesis.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Compiler
+; R( -- )
+; skip everything up to the closing bracket on the same line
+VE_LPARENTHESIS:
+    .db $81, &quot;(&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_LPARENTHESIS
+XT_LPARENTHESIS:
+    .dw DO_COLON
+PFA_LPARENTHESIS:
+    .dw XT_DOLITERAL
+    .dw $29
+    .dw XT_PARSE
+    .dw XT_DROP
+    .dw XT_DROP
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/lshift.html
 ,0 → 1,107
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/lshift.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/lshift.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- n3) Arithmetics
+; R( -- )
+; logical shift left
+VE_LSHIFT:
+    .db $06, &quot;lshift&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_LSHIFT
+XT_LSHIFT:
+    .dw PFA_LSHIFT
+PFA_LSHIFT:
+    movw zl, tosl
+    loadtos
+PFA_LSHIFT1:
+    sbiw zl, 1
+    brmi PFA_LSHIFT2
+    lsl tosl
+    rol tosh
+    rjmp PFA_LSHIFT1
+PFA_LSHIFT2:
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/macros.html
 ,0 → 1,152
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> macros.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> macros.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+  .def zerol = r2
+  .def zeroh = r3
+  .def upl = r4
+  .def uph = r5
+  .def tosl = r6
+  .def tosh = r7
+  .def temp0 = r16
+  .def temp1 = r17
+  .def temp2 = r18
+  .def temp3 = r19
+  .def temp4 = r20
+  .def temp5 = r21
+  .def temp6 = r22
+  .def temp7 = r23
+  .def wl = r24
+  .def wh = r25
+.macro loadtos
+    ld tosl, Y+
+    ld tosh, Y+
+.endmacro
+.macro savetos
+    st -Y, tosh
+    st -Y, tosl
+.endmacro
+.macro in_
+.if (@1 &lt; $40)
+  in @0,@1
+.else
+  lds @0,@1
+.endif
+.endmacro
+.macro out_
+.if (@0 &lt; $40)
+  out @0,@1
+.else
+  sts @0,@1
+.endif
+.endmacro
+.macro sbi_
+.if (@0 &lt; $40)
+  sbi @0,@1
+.else
+  in_ @2,@0
+  ori @2,exp2(@1)
+  out_ @0,@2
+.endif
+.endmacro
+.macro cbi_
+.if (@0 &lt; $40)
+  cbi @0,@1
+.else
+  in_ @2,@0
+  andi @2,~(exp2(@1))
+  out_ @0,@2
+.endif
+.endmacro
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/max.html
 ,0 → 1,105
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/max.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/max.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- n1|n2 ) Compare
+; R( -- )
+; compare two values, leave the bigger one
+VE_MAX:
+    .db $03, &quot;max&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_MAX
+XT_MAX:
+    .dw DO_COLON
+PFA_MAX:
+    .dw XT_OVER
+    .dw XT_OVER
+    .dw XT_LESS
+    .dw XT_DOCONDBRANCH
+    .dw PFA_MAX1
+    .dw XT_SWAP
+PFA_MAX1:
+    .dw XT_DROP
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/min.html
 ,0 → 1,105
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/min.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/min.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- n1|n2 ) Compare
+; R( -- )
+; compare two values leave the smaller one
+VE_MIN:
+    .db $03, &quot;min&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_MIN
+XT_MIN:
+    .dw DO_COLON
+PFA_MIN:
+    .dw XT_OVER
+    .dw XT_OVER
+    .dw XT_GREATER
+    .dw XT_DOCONDBRANCH
+    .dw PFA_MIN1
+    .dw XT_SWAP
+PFA_MIN1:
+    .dw XT_DROP
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/minus.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/minus.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/minus.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- n3 ) Arithmetics
+; R( -- )
+; subtract
+VE_MINUS:
+    .db $01, &quot;-&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_MINUS
+XT_MINUS:
+    .dw PFA_MINUS
+PFA_MINUS:
+    ld temp0, Y+
+    ld temp1, Y+
+    sub temp0, tosl
+    sbc temp1, tosh
+    movw tosl, temp0
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/mod.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/mod.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/mod.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- n3) Arithmetics
+; R( -- )
+; remainder of division
+VE_MOD:
+    .db $03, &quot;mod&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_MOD
+XT_MOD:
+    .dw DO_COLON
+PFA_MOD:
+    .dw XT_SLASHMOD
+    .dw XT_DROP
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/mstar.html
 ,0 → 1,122
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/mstar.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/mstar.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- d) Arithmetics
+; R( -- )
+; multiply 2 cells to a double cell
+VE_MSTAR:
+    .db $02, &quot;m*&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_MSTAR
+XT_MSTAR:
+    .dw PFA_MSTAR
+PFA_MSTAR:
+    movw temp0, tosl
+    loadtos
+    ; result: (temp3*temp1)* 65536 + (temp3*temp0 + temp1*temp2) * 256 + (temp0 * temp2)
+    ; low bytes
+    mul tosl,temp0
+    movw zl, r0
+    clr temp2
+    clr temp3
+    ; middle bytes
+    mul tosh, temp0
+    add zh, r0
+    adc temp2, r1
+    adc temp3, zeroh
+    mul tosl, temp1
+    add zh, r0
+    adc temp2, r1
+    adc temp3, zeroh
+    mul tosh, temp1
+    add temp2, r0
+    adc temp3, r1
+    movw tosl, temp2
+    savetos
+    movw tosl, zl
+    jmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/negate.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/negate.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/negate.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 -- n2 ) Logic
+; R( -- )
+; 2-complement
+VE_NEGATE:
+    .db $06, &quot;negate&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_NEGATE
+XT_NEGATE:
+    .dw DO_COLON
+PFA_NEGATE:
+    .dw XT_INVERT
+    .dw XT_1PLUS
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/noop.html
 ,0 → 1,97
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/noop.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/noop.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Tools
+; R( -- )
+; do nothing
+VE_NOOP:
+    .db $04, &quot;noop&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_NOOP
+XT_NOOP:
+    .dw DO_COLON
+PFA_NOOP:
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/not.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/not.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/not.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( flag -- flag' ) Logic
+; R( -- )
+; identical to 0=
+VE_NOT:
+    .db $03, &quot;not&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_NOT
+XT_NOT:
+    .dw DO_COLON
+PFA_NOT:
+    .dw XT_EQUALZERO
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/notequal.html
 ,0 → 1,106
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/notequal.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/notequal.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- flag) Compare
+; R( -- )
+; compare two values
+VE_NOTEQUAL:
+    .db $02, &quot;&lt;&gt;&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_NOTEQUAL
+XT_NOTEQUAL:
+    .dw PFA_NOTEQUAL
+PFA_NOTEQUAL:
+    ld temp2, Y+
+    ld temp3, Y+
+    cp tosl, temp2
+    cpc tosh, temp3
+    movw zl, zerol
+    breq PFA_NOTEQUAL_EQUAL
+    sbiw zl, 1
+PFA_NOTEQUAL_EQUAL:
+    movw tosl, zl
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/notequalzero.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/notequalzero.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/notequalzero.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n -- flag ) Compare
+; R( -- )
+; compare with zero
+VE_NOTEQUALZERO:
+    .db $03, &quot;0&lt;&gt;&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_NOTEQUALZERO
+XT_NOTEQUALZERO:
+    .dw DO_COLON
+PFA_NOTEQUALZERO:
+    .dw XT_EQUALZERO
+    .dw XT_EQUALZERO
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/number.html
 ,0 → 1,158
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/number.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/number.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; (addr -- n ) Numeric IO
+; R( -- )
+; convert a word to a number, throw exception -1 on error
+VE_NUMBER:
+    .db $06, &quot;number&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_NUMBER
+XT_NUMBER:
+    .dw DO_COLON
+PFA_NUMBER:
+    ; sign flag
+    .dw XT_DOLITERAL
+    .dw 1             ; ( -- addr 1)
+    .dw XT_ZERO       ; ( -- addr 1 0)
+    .dw XT_ROT        ; ( -- 1 0 addr)
+    .dw XT_COUNT      ; ( -- 1 0 addr' len)
+    .dw XT_ZERO
+    .dw XT_DODO
+    .dw PFA_NUMBER6
+PFA_NUMBER1: ; ( n addr -- )
+    .dw XT_DUP
+    .dw XT_I
+    .dw XT_PLUS
+    .dw XT_CFETCH
+    ; now check for +/- signs
+    .dw XT_DUP
+    .dw XT_DOLITERAL
+    .dw $2d ; '-'
+    .dw XT_EQUAL
+    .dw XT_DOCONDBRANCH
+    .dw PFA_NUMBER2
+    .dw XT_DROP
+    ; replace the sign flag
+    .dw XT_ROT
+    .dw XT_DROP
+    .dw XT_DOLITERAL
+    .dw -1
+    .dw XT_ROT
+    .dw XT_ROT
+    .dw XT_DOBRANCH
+    .dw PFA_NUMBER4
+PFA_NUMBER2:
+    .dw XT_BASE
+    .dw XT_FETCH
+    .dw XT_DIGIT
+    .dw XT_EQUALZERO
+    ; check for non number characters and stop converting if found
+    .dw XT_DOCONDBRANCH
+    .dw PFA_NUMBER3
+    .dw XT_DOLITERAL
+    .dw -13
+    .dw XT_THROW
+PFA_NUMBER3:
+    .dw XT_ROT
+    .dw XT_BASE
+    .dw XT_FETCH
+    .dw XT_MUL
+    .dw XT_PLUS
+    .dw XT_SWAP
+PFA_NUMBER4:
+    .dw XT_DOLOOP
+    .dw PFA_NUMBER1
+PFA_NUMBER6:
+    .dw XT_DROP
+    ; incorporate sign into number
+    .dw XT_SWAP
+    .dw XT_LESSZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_NUMBER5
+    .dw XT_NEGATE
+PFA_NUMBER5:
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/of.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/of.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/of.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Compiler
+; R( -- )
+; see case
+VE_OF:
+    .db $82, &quot;of&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_OF
+XT_OF:
+    .dw DO_COLON
+PFA_OF:
+    .dw XT_COMPILE
+    .dw XT_OVER
+    .dw XT_COMPILE
+    .dw XT_EQUAL
+    .dw XT_IF
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/or.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/or.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/or.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- n3 ) Logic
+; R( -- )
+; logical or
+VE_OR:
+    .db $02, &quot;or&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_OR
+XT_OR:
+    .dw PFA_OR
+PFA_OR:
+    ld temp0, Y+
+    ld temp1, Y+
+    or tosl, temp0
+    or tosh, temp1
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/over.html
 ,0 → 1,103
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/over.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/over.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- n1 n2 n1 ) Stack
+; R( -- )
+; stack manipulation
+VE_OVER:
+    .db $04, &quot;over&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_OVER
+XT_OVER:
+    .dw PFA_OVER
+PFA_OVER:
+    movw temp0, tosl
+    ldd tosl, Y+0
+    ldd tosh, Y+1
+    st -Y, temp1
+    st -Y, temp0
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/pad.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/pad.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/pad.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) System Pointer
+; R( -- )
+; scratch buffer.
+VE_PAD:
+    .db $03, &quot;pad&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_PAD
+XT_PAD:
+    .dw DO_COLON
+PFA_PAD:
+    .dw XT_HEAP
+    .dw XT_EFETCH
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/parse.html
 ,0 → 1,109
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/parse.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/parse.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( char &quot;ccc&quot; -- c-addr u ) String
+; R( -- )
+; in input buffer parse ccc delimited string by the delimiter char.
+VE_PARSE:
+    .db $5, &quot;parse&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_PARSE
+XT_PARSE:
+    .dw DO_COLON
+PFA_PARSE:
+    .dw XT_TO_R     ; ( -- )
+    .dw XT_SOURCE   ; ( -- addr len)
+    .dw XT_G_IN     ; ( -- addr len &gt;in)
+    .dw XT_FETCH
+    .dw XT_SLASHSTRING ; ( -- addr' len' )
+    .dw XT_R_FROM      ; ( -- addr' len' c)
+    .dw XT_CSCAN       ; ( -- addr' len'')
+    .dw XT_DUP         ; ( -- addr' len'' len'')
+    .dw XT_1PLUS
+    .dw XT_G_IN        ; ( -- addr' len'' len'' &gt;in)
+    .dw XT_PLUSSTORE   ; ( -- addr' len')
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/pause.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/pause.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/pause.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Multitasking
+; R( -- )
+; fetch pause vector and execute it. may make a context/task switch
+VE_PAUSE:
+    .db $05, &quot;pause&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_PAUSE
+XT_PAUSE:
+    .dw PFA_DODEFER
+PFA_PAUSE:
+    .dw heap
+    .set heap = heap + CELLSIZE
+    .dw XT_RDEFERFETCH
+    .dw XT_RDEFERSTORE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/plus.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/plus.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/plus.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- n3) Arithmetics
+; R( -- )
+; addition
+VE_PLUS:
+    .db $01, &quot;+&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_PLUS
+XT_PLUS:
+    .dw PFA_PLUS
+PFA_PLUS:
+    ld temp0, Y+
+    ld temp1, Y+
+    add tosl, temp0
+    adc tosh, temp1
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/plusloop.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/plusloop.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/plusloop.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr -- ) Control Structure
+; R( -- )
+; compile +loop and resolve branch
+VE_PLOOP:
+    .db $85, &quot;+loop&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_PLOOP
+XT_PLOOP:
+    .dw DO_COLON
+PFA_PLOOP:
+    .dw XT_COMPILE
+    .dw XT_DOPLUSLOOP
+    .dw XT_LRESOLVE
+    .dw XT_GRESOLVE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/plusstore.html
 ,0 → 1,106
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/plusstore.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/plusstore.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n addr -- ) Arithmetics
+; R( -- )
+; add value to content of RAM address
+VE_PLUSSTORE:
+    .db $02, &quot;+!&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_PLUSSTORE
+XT_PLUSSTORE:
+    .dw PFA_PLUSSTORE
+PFA_PLUSSTORE:
+    movw zl, tosl
+    loadtos
+    ldd temp2, Z+0
+    ldd temp3, Z+1
+    add tosl, temp2
+    adc tosh, temp3
+    std Z+0, tosl
+    std Z+1, tosh
+    loadtos
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/qdo.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/qdo.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/qdo.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) Control Structure
+; R( -- )
+; start do .. [+]loop
+VE_QDO:
+    .db $83, &quot;?do&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_QDO
+XT_QDO:
+    .dw DO_COLON
+PFA_QDO:
+    .dw XT_COMPILE
+    .dw XT_DOQDO
+    .dw XT_GMARK
+    .dw XT_LMARK
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/qdup.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/qdup.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/qdup.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 -- [ n1 n1 ] | 0) Stack
+; R( -- )
+; duplicate TOS if non-zero
+VE_QDUP:
+    .db $04, &quot;?dup&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_QDUP
+XT_QDUP:
+    .dw PFA_QDUP
+PFA_QDUP:
+    mov temp0, tosl
+    or temp0, tosh
+    breq PFA_QDUP1
+    savetos
+PFA_QDUP1:
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/qexecute.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/qexecute.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/qexecute.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( xt|0 -- ) System
+; R( -- )
+; execute XT if non-zero
+VE_QEXECUTE:
+    .db $08, &quot;?execute&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_QEXECUTE
+XT_QEXECUTE:
+    .dw DO_COLON
+PFA_QEXECUTE:
+    .dw XT_QDUP
+    .dw XT_DOCONDBRANCH
+    .dw PFA_EXECUTE1
+    .dw XT_EXECUTE
+PFA_EXECUTE1:
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/quit.html
 ,0 → 1,150
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/quit.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/quit.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) System
+; R( -- )
+; main loop of amforth. accept - interpret in an endless loop
+VE_QUIT:
+    .db $04, &quot;quit&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_QUIT
+XT_QUIT:
+    .dw DO_COLON
+PFA_QUIT:
+    .dw XT_SP0
+    .dw XT_SP_STORE
+    .dw XT_RP0
+    .dw XT_RP_STORE
+    .dw XT_HEX
+    .dw XT_ZERO
+    .dw XT_STATE
+    .dw XT_STORE
+PFA_QUIT2:
+    .dw XT_STATE
+    .dw XT_FETCH
+    .dw XT_EQUALZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_QUIT4
+    .dw XT_CR
+    .dw XT_SLITERAL
+    .db 2, &quot;&gt; &quot;,0
+    .dw XT_ITYPE
+PFA_QUIT4:
+    .dw XT_REFILL
+    .dw XT_DOCONDBRANCH
+    .dw PFA_QUIT2
+    .dw XT_DOLITERAL
+    .dw XT_INTERPRET
+    .dw XT_CATCH
+    .dw XT_QDUP
+    .dw XT_DOCONDBRANCH
+    .dw PFA_QUIT3
+        .dw XT_DUP
+        .dw XT_DOLITERAL
+        .dw -2
+        .dw XT_LESS
+        .dw XT_DOCONDBRANCH
+        .dw PFA_QUIT5
+            .dw XT_SLITERAL
+            .db 3, &quot; ??&quot;
+            .dw XT_ITYPE
+            .dw XT_DECIMAL
+            .dw XT_DOT
+            .dw XT_G_IN
+            .dw XT_FETCH
+            .dw XT_DOT
+PFA_QUIT5:
+        .dw XT_DOBRANCH
+        .dw PFA_QUIT
+PFA_QUIT3:
+    .dw XT_SLITERAL
+    .db 3, &quot; ok&quot;
+    .dw XT_ITYPE
+    .dw XT_DOBRANCH
+    .dw PFA_QUIT2
+    .dw XT_EXIT ; never reached
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/r_fetch.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/r_fetch.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/r_fetch.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- n) Stack
+; R( n -- n )
+; fetch content of TOR
+VE_R_FETCH:
+    .db $02, &quot;r@&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_R_FETCH
+XT_R_FETCH:
+    .dw PFA_R_FETCH
+PFA_R_FETCH:
+    savetos
+    pop tosl
+    pop tosh
+    push tosh
+    push tosl
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/r_from.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/r_from.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/r_from.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- n ) Stack
+; R( n --)
+; move TOR to TOS
+VE_R_FROM:
+    .db $02, &quot;r&gt;&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_R_FROM
+XT_R_FROM:
+    .dw PFA_R_FROM
+PFA_R_FROM:
+    savetos
+    pop tosl
+    pop tosh
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/rdefer-fetch.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/rdefer-fetch.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/rdefer-fetch.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( xt1 -- xt2 ) System
+; R( -- )
+; does the real defer@ for ram defers
+;VE_RDEFERFETCH:
+;    .db $07, &quot;Rdefer@&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_RDEFERFETCH
+XT_RDEFERFETCH:
+    .dw DO_COLON
+PFA_RDEFERFETCH:
+    .dw XT_1PLUS ; &gt;body
+    .dw XT_IFETCH
+    .dw XT_FETCH
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/rdefer-store.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/rdefer-store.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/rdefer-store.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( xt1 xt2 -- ) System
+; R( -- )
+; does the real defer! for ram defers
+;VE_RDEFERSTORE:
+;    .db $07, &quot;Rdefer!&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_RDEFERSTORE
+XT_RDEFERSTORE:
+    .dw DO_COLON
+PFA_RDEFERSTORE:
+    .dw XT_1PLUS
+    .dw XT_IFETCH
+    .dw XT_STORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/rdefer.html
 ,0 → 1,112
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/rdefer.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/rdefer.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n &lt;name&gt; -- ) Compiler
+; R( -- )
+; creates a RAM based defer vector
+VE_RDEFER:
+    .db $06, &quot;Rdefer&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_RDEFER
+XT_RDEFER:
+    .dw DO_COLON
+PFA_RDEFER:
+    .dw XT_DOCREATE
+    .dw XT_COMPILE
+    .dw PFA_DODEFER
+    .dw XT_HEAP
+    .dw XT_EFETCH
+    .dw XT_COMMA
+    .dw XT_DOLITERAL
+    .dw 2
+    .dw XT_ALLOT
+    .dw XT_COMPILE
+    .dw XT_RDEFERFETCH
+    .dw XT_COMPILE
+    .dw XT_RDEFERSTORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/recurse.html
 ,0 → 1,109
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/recurse.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/recurse.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Compiler
+; R( -- )
+; compile  XT of the word beeing currently defined into dictionary (! not conforming to ANS!)
+VE_RECURSE:
+    .db $87, &quot;recurse&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_RECURSE
+XT_RECURSE:
+    .dw DO_COLON
+PFA_RECURSE:
+    .dw XT_HEAD
+    .dw XT_EFETCH
+    .dw XT_DUP
+    .dw XT_IFETCH
+    .dw XT_DOLITERAL
+    .dw $001f
+    .dw XT_AND
+    .dw XT_2SLASH
+    .dw XT_1PLUS
+    .dw XT_PLUS
+    .dw XT_1PLUS
+    .dw XT_COMMA
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/refill.html
 ,0 → 1,108
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/refill.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/refill.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- f ) IO
+; R( -- )
+; refills the input buffer
+VE_REFILL:
+    .db $06, &quot;refill&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_REFILL
+XT_REFILL:
+    .dw DO_COLON
+PFA_REFILL:
+    .dw XT_TIB
+    .dw XT_DOLITERAL
+    .dw 80
+    .dw XT_ACCEPT
+    .dw XT_NUMBERTIB
+    .dw XT_STORE
+    .dw XT_ZERO
+    .dw XT_G_IN
+    .dw XT_STORE
+    .dw XT_DOLITERAL
+    .dw -1
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/repeat.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/repeat.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/repeat.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; (addr1 -- addr2 ) Control Structure
+; R( -- )
+; go back to begin
+VE_REPEAT:
+    .db $86, &quot;repeat&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_REPEAT
+XT_REPEAT:
+    .dw DO_COLON
+PFA_REPEAT:
+    .dw XT_AGAIN
+    .dw XT_GRESOLVE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/rightbracket.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/rightbracket.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/rightbracket.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( --  ) Compiler
+; R( -- )
+; turn on compiler
+VE_RBRACKET:
+    .db $01, &quot;]&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_RBRACKET
+XT_RBRACKET:
+    .dw DO_COLON
+PFA_RBRACKET:
+    .dw XT_DOLITERAL
+    .dw 1
+    .dw XT_STATE
+    .dw XT_STORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/rot.html
 ,0 → 1,107
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/rot.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/rot.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 n3 -- n2 n3 n1) Stack
+; R( -- )
+; stack manupulation
+VE_ROT:
+    .db $03, &quot;rot&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ROT
+XT_ROT:
+    .dw PFA_ROT
+PFA_ROT:
+    movw temp0, tosl
+    ld temp2, Y+
+    ld temp3, Y+
+    loadtos
+    st -Y, temp3
+    st -Y, temp2
+    st -Y, temp1
+    st -Y, temp0
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/rp0.html
 ,0 → 1,116
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/rp0.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/rp0.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr) Stackpointer
+; R( -- )
+; start value of return stack
+VE_RP0:
+    .db $03, &quot;rp0&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_RP0
+XT_RP0:
+    .dw DO_COLON
+PFA_RP0:
+    .dw XT_DORP0
+    .dw XT_FETCH
+    .dw XT_EXIT
+XT_DORP0:
+    .dw PFA_DOUSER
+PFA_DORP0:
+    .dw 2
+; ( -- addr) Stackpointer
+; R( -- )
+; address of variable to store the return stack pointer for inactive tasks
+VE_RP:
+    .db $02, &quot;rp&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_RP
+XT_RP:
+    .dw PFA_DOUSER
+PFA_RP:
+    .dw 4
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/rpfetch.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/rpfetch.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/rpfetch.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; (  -- n) Stackpointer
+; R( -- )
+; current return stack pointer address
+VE_RP_FETCH:
+    .db $03, &quot;rp@&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_RP_FETCH
+XT_RP_FETCH:
+    .dw PFA_RP_FETCH
+PFA_RP_FETCH:
+    savetos
+    in tosl, SPL
+    in tosh, SPH
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/rpstore.html
 ,0 → 1,103
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/rpstore.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/rpstore.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n  -- ) Stackpointer
+; R( -- xy)
+; set return stack pointer
+VE_RP_STORE:
+    .db $03, &quot;rp!&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_RP_STORE
+XT_RP_STORE:
+    .dw PFA_RP_STORE
+PFA_RP_STORE:
+    in temp2, SREG
+    cli
+    out SPL, tosl
+    out SPH, tosh
+    out SREG, temp2
+    loadtos
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/rshift.html
 ,0 → 1,107
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/rshift.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/rshift.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- n3 ) Arithmetics
+; R( -- )
+; logical shift right
+VE_RSHIFT:
+    .db $06, &quot;rshift&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_RSHIFT
+XT_RSHIFT:
+    .dw PFA_RSHIFT
+PFA_RSHIFT:
+    movw zl, tosl
+    loadtos
+PFA_RSHIFT1:
+    sbiw zl, 1
+    brmi PFA_RSHIFT2
+    lsr tosh
+    ror tosl
+    rjmp PFA_RSHIFT1
+PFA_RSHIFT2:
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/s_to_d.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/s_to_d.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/s_to_d.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 -- d1 ) Conversion
+; R( -- )
+; extend (signed) single cell value to double cell
+VE_S2D:
+    .db $03, &quot;s&gt;d&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_S2D
+XT_S2D:
+    .dw PFA_S2D
+PFA_S2D:
+    clr zl
+    sbrc tosh,7
+    ser zl
+    st -Y, zl
+    st -Y, zl
+    jmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/scomma.html
 ,0 → 1,127
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/scomma.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/scomma.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr len -- ) Compiler
+; R( -- )
+; compiles a string from RAM to Flash
+VE_SCOMMA:
+  .db $02,&quot;s&quot;,$2c,0
+  .dw VE_HEAD
+  .set VE_HEAD = VE_SCOMMA
+XT_SCOMMA:
+    .dw DO_COLON
+PFA_SCOMMA:
+    .dw XT_DUP
+    .dw XT_2SLASH      ; ( -- addr n k )
+    .dw XT_1PLUS       ; ( -- addr n k+1)
+    .dw XT_TO_R
+    .dw XT_OVER        ; ( -- addr n addr)
+    .dw XT_CFETCH      ; ( -- addr n c )
+    .dw XT_DOLITERAL
+    .dw 8
+    .dw XT_LSHIFT
+    .dw XT_OR
+    .dw XT_COMMA       ; ( -- addr )
+    .dw XT_1PLUS       ; ( -- addr+1)
+    .dw XT_R_FROM      ; ( -- addr+1 k+1)
+    .dw XT_1MINUS      ; ( -- addr+1 k)
+    .dw XT_QDUP        ; ( -- addr+1 [k k | 0])
+    .dw XT_DOCONDBRANCH
+    .dw PFA_SCOMMA2
+    .dw XT_ZERO        ; ( -- addr+1 k 0)
+    .dw XT_DODO        ; ( -- addr)
+    .dw PFA_SCOMMA2
+PFA_SCOMMA1:
+    .dw XT_DUP         ; ( -- addr addr )
+    .dw XT_FETCH       ; ( -- addr c1c2 )
+    .dw XT_COMMA       ; ( -- addr )
+    .dw XT_1PLUS       ; ( -- addr+1 )
+    .dw XT_1PLUS       ; ( -- addr+2 )
+    .dw XT_DOLOOP
+    .dw PFA_SCOMMA1
+PFA_SCOMMA2:
+    .dw XT_DROP        ; ( -- )
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/semicolon.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/semicolon.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/semicolon.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Compiler
+; R( -- )
+; finish colon defintion, compiles (exit) and returns to interpreter state
+VE_SEMICOLON:
+    .db $81, $3b
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SEMICOLON
+XT_SEMICOLON:
+    .dw DO_COLON
+PFA_SEMICOLON:
+    .dw XT_COMPILE
+    .dw XT_EXIT
+    .dw XT_LBRACKET
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/sharp.html
 ,0 → 1,116
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/sharp.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/sharp.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( d1 -- d2) Numeric IO
+; R( -- )
+; compiles next digit to HLD
+VE_SHARP:
+    .db $01, &quot;#&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SHARP
+XT_SHARP:
+    .dw DO_COLON
+PFA_SHARP:
+    .dw XT_BASE
+    .dw XT_FETCH        ; ( -- d1 b)
+    .dw XT_UMSLASHMOD   ; ( -- rem quot)
+    .dw XT_S2D       ; ( -- rem d2)
+    .dw XT_ROT
+    .dw XT_DOLITERAL
+    .dw $30
+    .dw XT_PLUS
+    .dw XT_DUP
+    .dw XT_DOLITERAL
+    .dw $39
+    .dw XT_GREATER
+    .dw XT_DOCONDBRANCH
+    .dw PFA_SHARP1
+    .dw XT_DOLITERAL
+    .dw $7
+    .dw XT_PLUS
+PFA_SHARP1:
+    .dw XT_HOLD
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/sharp_g.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/sharp_g.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/sharp_g.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( d1 -- addr count ) Numeric IO
+; R( -- )
+; convert HLD buffer to a usable string
+VE_SHARP_G:
+    .db $02, &quot;#&gt;&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SHARP_G
+XT_SHARP_G:
+    .dw DO_COLON
+PFA_SHARP_G:
+    .dw XT_DROP
+    .dw XT_DROP
+    .dw XT_HLD
+    .dw XT_COUNT
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/sharp_s.html
 ,0 → 1,104
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/sharp_s.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/sharp_s.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( d1 -- 0) Numeric IO
+; R( -- )
+; call # until a value of zero is reached
+VE_SHARP_S:
+    .db $02, &quot;#s&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SHARP_S
+XT_SHARP_S:
+    .dw DO_COLON
+PFA_SHARP_S:
+    .dw XT_SHARP
+    .dw XT_OVER
+    .dw XT_OVER
+    .dw XT_OR
+    .dw XT_EQUALZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_SHARP_S
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/sharptib.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/sharptib.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/sharptib.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) System
+; R( -- )
+; address of variable holding the number of characters in TIB
+VE_NUMBERTIB:
+    .db $04, &quot;#tib&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD  = VE_NUMBERTIB
+XT_NUMBERTIB:
+    .dw PFA_DOVARIABLE
+PFA_NUMBERTIB:
+    .dw heap
+    .set heap  = heap + CELLSIZE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/sign.html
 ,0 → 1,104
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/sign.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/sign.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n -- ) Numeric IO
+; R( -- )
+; place a - in HLD if value is negative
+VE_SIGN:
+    .db $04, &quot;sign&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SIGN
+XT_SIGN:
+    .dw DO_COLON
+PFA_SIGN:
+    .dw XT_LESSZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_SIGN1
+    .dw XT_DOLITERAL
+    .dw $2d
+    .dw XT_HOLD
+PFA_SIGN1:
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/slash.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/slash.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/slash.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- n3) Arithmetics
+; R( -- )
+; diviion
+VE_SLASH:
+    .db $01, &quot;/&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SLASH
+XT_SLASH:
+    .dw DO_COLON
+PFA_SLASH:
+    .dw XT_SLASHMOD
+    .dw XT_SWAP
+    .dw XT_DROP
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/slashkey.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/slashkey.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/slashkey.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- f) Character IO
+; R( -- )
+; fetch 'key? vector and execute it if not zero. Leave true if a character can be read, false otherwise
+VE_SLASHKEY:
+    .db $04, &quot;/key&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SLASHKEY
+XT_SLASHKEY:
+    .dw PFA_DODEFER
+PFA_SLASHKEY:
+    .dw 20
+    .dw XT_UDEFERFETCH
+    .dw XT_UDEFERSTORE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/slashmod.html
 ,0 → 1,151
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/slashmod.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/slashmod.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- rem quot) Arithmetics
+; R( -- )
+; signed division n1/n2 with remainder
+VE_SLASHMOD:
+    .db $04, &quot;/mod&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SLASHMOD
+XT_SLASHMOD:
+    .dw PFA_SLASHMOD
+PFA_SLASHMOD:
+    movw temp2, tosl
+    ld temp0, Y+
+    ld temp1, Y+
+    mov temp6,temp1     ;move dividend High to sign register
+    eor temp6,temp3     ;xor divisor High with sign register
+    sbrs        temp1,7 ;if MSB in dividend set
+    rjmp        PFA_SLASHMOD_1
+    com temp1           ;    change sign of dividend
+    com temp0
+    subi        temp0,low(-1)
+    sbci        temp1,high(-1)
+PFA_SLASHMOD_1:
+    sbrs        temp3,7 ;if MSB in divisor set
+    rjmp        PFA_SLASHMOD_2
+    com temp3           ;    change sign of divisor
+    com temp2
+    subi        temp2,low(-1)
+    sbci        temp3,high(-1)
+PFA_SLASHMOD_2: clr     temp4   ;clear remainder Low byte
+    sub temp5,temp5;clear remainder High byte and carry
+    ldi temp7,17        ;init loop counter
+PFA_SLASHMOD_3: rol     temp0           ;shift left dividend
+    rol temp1
+    dec temp7           ;decrement counter
+    brne        PFA_SLASHMOD_5          ;if done
+    sbrs        temp6,7         ;    if MSB in sign register set
+    rjmp        PFA_SLASHMOD_4
+    com temp1   ;        change sign of result
+    com temp0
+    subi        temp0,low(-1)
+    sbci        temp1,high(-1)
+PFA_SLASHMOD_4: rjmp PFA_SLASHMODmod_done                       ;    return
+PFA_SLASHMOD_5: rol     temp4   ;shift dividend into remainder
+    rol temp5
+    sub temp4,temp2     ;remainder = remainder - divisor
+    sbc temp5,temp3     ;
+    brcc        PFA_SLASHMOD_6          ;if result negative
+    add temp4,temp2     ;    restore remainder
+    adc temp5,temp3
+    clc                 ;    clear carry to be shifted into result
+    rjmp        PFA_SLASHMOD_3          ;else
+PFA_SLASHMOD_6: sec                     ;    set carry to be shifted into result
+    rjmp        PFA_SLASHMOD_3
+PFA_SLASHMODmod_done:
+    ; put remainder on stack
+    st -Y,temp5
+    st -Y,temp4
+    ; put quotient on stack
+    movw tosl, temp0
+    jmp_ DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/slashstring.html
 ,0 → 1,107
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/slashstring.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/slashstring.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr1 u1 n-- addr2 u2 ) String
+; R( -- )
+; adjust string from addr1 to addr1+n, reduce length from u1 to u2
+VE_SLASHSTRING:
+    .db $7, &quot;/string&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SLASHSTRING
+XT_SLASHSTRING:
+    .dw DO_COLON
+PFA_SLASHSTRING:
+    .dw XT_OVER    ; ( -- addr1 u1 n u1)
+    .dw XT_MIN     ; ( -- addr1 u1 n|u1)
+    .dw XT_ROT     ; ( -- u1 n addr1 )
+    .dw XT_OVER    ; ( -- u1 n addr1 n)
+    .dw XT_PLUS    ; ( -- u1 n addr2 )
+    .dw XT_ROT     ; ( -- n addr2 u1)
+    .dw XT_ROT     ; ( -- addr2 u1 n)
+    .dw XT_MINUS   ; ( -- addr2 u2)
+    .dw XT_EXIT
+; : /STRING SWAP OVER - &gt;R + R&gt; ;
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/sleep.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/sleep.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/sleep.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Interrupt
+; R( -- )
+; calls the MCU sleep instruction. Not useful itself!
+VE_SLEEP:
+    .db $05, &quot;sleep&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SLEEP
+XT_SLEEP:
+    .dw PFA_SLEEP
+PFA_SLEEP:
+    sleep
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/sliteral.html
 ,0 → 1,106
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/sliteral.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/sliteral.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr n) Compiler
+; R( -- )
+; runtime portion of s&quot;
+;VE_SLITERAL:
+;  .db 10,&quot;(sliteral)&quot;,0
+;  .dw VE_HEAD
+;  .set VE_HEAD = VE_SLITERAL
+XT_SLITERAL:
+  .dw DO_COLON
+PFA_SLITERAL:
+  .dw XT_R_FROM   ; ( -- addr )
+  .dw XT_DUP      ; ( -- addr addr )
+  .dw XT_ICOUNT   ; ( -- addr addr' n )
+  .dw XT_ROT      ; ( -- addr' n addr )
+  .dw XT_OVER     ; ( -- addr' n addr n)
+  .dw XT_2SLASH   ; ( -- addr' n addr k )
+  .dw XT_1PLUS    ; ( -- addr' n addr k+1 )
+  .dw XT_PLUS     ; ( -- addr' n addr'' )
+  .dw XT_TO_R     ; ( -- )
+  .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/source.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/source.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/source.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr1 u1 n-- addr2 u2 ) System
+; R( -- )
+; adjust string from addr1 to addr1+n, reduce length from u1 to u2
+VE_SOURCE:
+    .db 6, &quot;source&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SOURCE
+XT_SOURCE:
+    .dw DO_COLON
+PFA_SOURCE:
+    .dw XT_TIB
+    .dw XT_NUMBERTIB
+    .dw XT_FETCH
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/sp0.html
 ,0 → 1,116
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/sp0.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/sp0.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr) Stackpointer
+; R( -- )
+; start of data stack
+VE_SP0:
+    .db $03, &quot;sp0&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SP0
+XT_SP0:
+    .dw DO_COLON
+PFA_SP0:
+    .dw XT_DOSP0
+    .dw XT_FETCH
+    .dw XT_EXIT
+XT_DOSP0:
+    .dw PFA_DOUSER
+PFA_DOSP0:
+    .dw 6
+; ( -- addr) Stackpointer
+; R( -- )
+; address of variable to store data stack pointer for inactive tasks
+VE_SP:
+    .db $02, &quot;sp&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SP
+XT_DOSP:
+    .dw PFA_DOUSER
+PFA_DOSP:
+    .dw 8
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/space.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/space.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/space.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Character IO
+; R( -- )
+; emits a space (bl)
+VE_SPACE:
+    .db $05, &quot;space&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SPACE
+XT_SPACE:
+    .dw DO_COLON
+PFA_SPACE:
+    .dw XT_BL
+    .dw XT_EMIT
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/spfetch.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/spfetch.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/spfetch.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; (  -- n) Stackpointer
+; R( -- )
+; current data stack pointer
+VE_SP_FETCH:
+    .db $03, &quot;sp@&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SP_FETCH
+XT_SP_FETCH:
+    .dw PFA_SP_FETCH
+PFA_SP_FETCH:
+    savetos
+    movw tosl, yl
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/spstore.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/spstore.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/spstore.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr -- i*x) Stackpointer
+; R( -- )
+; data stack pointer changed to addr
+VE_SP_STORE:
+    .db $03, &quot;sp!&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SP_STORE
+XT_SP_STORE:
+    .dw PFA_SP_STORE
+PFA_SP_STORE:
+    movw yl, tosl
+    loadtos
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/squote.html
 ,0 → 1,103
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/squote.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/squote.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( &lt;cchar&gt; -- ) Compiler
+; R( -- )
+; compiles a string to flash, at runtime leaves ( -- addr count) on stack
+VE_SQUOTE:
+  .db $82,&quot;s&quot;,$22,0
+  .dw VE_HEAD
+  .set VE_HEAD = VE_SQUOTE
+XT_SQUOTE:
+    .dw DO_COLON
+PFA_SQUOTE:
+    .dw XT_DOLITERAL
+    .dw $22
+    .dw XT_PARSE       ; ( -- addr n)
+    .dw XT_COMPILE
+    .dw XT_SLITERAL    ; ( -- addr n)
+    .dw XT_SCOMMA
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/star.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/star.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/star.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- n3 ) Arithmetics
+; R( -- )
+; multiply routine
+VE_MUL:
+    .db $01, &quot;*&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_MUL
+XT_MUL:
+    .dw DO_COLON
+PFA_MUL:
+    .dw XT_MSTAR
+    .dw XT_D2S
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/starslash.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/starslash.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/starslash.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; (n1 n2 n3 -- n4) Arithmetics
+; R( -- )
+; signed multiply and division with double precision intermediate
+VE_STARSLASH:
+    .db $02, &quot;*/&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_STARSLASH
+XT_STARSLASH:
+    .dw DO_COLON
+PFA_STARSLASH:
+    .dw XT_STARSLASHMOD
+    .dw XT_SWAP
+    .dw XT_DROP
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/starslashmod.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/starslashmod.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/starslashmod.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 n3 -- rem quot) Arithmetics
+; R( -- )
+; signed multiply and division  with double precision intermediate and remainder
+VE_STARSLASHMOD:
+    .db $05, &quot;*/mod&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_STARSLASHMOD
+XT_STARSLASHMOD:
+    .dw DO_COLON
+PFA_STARSLASHMOD:
+    .dw XT_TO_R
+    .dw XT_MSTAR
+    .dw XT_R_FROM
+    .dw XT_UMSLASHMOD
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/state.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/state.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/state.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) Compiler
+; R( -- )
+; system state
+VE_STATE:
+    .db $05, &quot;state&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_STATE
+XT_STATE:
+    .dw PFA_DOVARIABLE
+PFA_STATE:
+    .dw heap
+    .set heap = heap + CELLSIZE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/store.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/store.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/store.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n addr -- ) Memory
+; R( -- )
+; write 16bit to RAM memory (or IO or CPU registers)
+VE_STORE:
+    .db $01, &quot;!&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_STORE
+XT_STORE:
+    .dw PFA_STORE
+PFA_STORE:
+    movw zl, tosl
+    loadtos
+    std Z+0, tosl
+    std Z+1, tosh
+    loadtos
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/swap.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/swap.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/swap.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- n2 n1) Stack
+; R( -- )
+; stack manipulation
+VE_SWAP:
+    .db $04, &quot;swap&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_SWAP
+XT_SWAP:
+    .dw PFA_SWAP
+PFA_SWAP:
+    movw temp0, tosl
+    loadtos
+    st -Y, temp1
+    st -Y, temp0
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/then.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/then.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/then.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr -- ) Compiler
+; R( -- )
+; finish if
+VE_THEN:
+    .db $84, &quot;then&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_THEN
+XT_THEN:
+    .dw DO_COLON
+PFA_THEN:
+    .dw XT_GRESOLVE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/throw.html
 ,0 → 1,117
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/throw.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/throw.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n -- ) Exceptions
+; R( -- )
+; throw an exception
+VE_THROW:
+    .db $05, &quot;throw&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_THROW
+XT_THROW:
+    .dw DO_COLON
+PFA_THROW:
+    .dw XT_DUP
+    .dw XT_EQUALZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_THROW1
+        .dw XT_DROP
+        .dw XT_EXIT
+PFA_THROW1:
+    .dw XT_HANDLER
+    .dw XT_FETCH
+    .dw XT_RP_STORE
+    .dw XT_R_FROM
+    .dw XT_HANDLER
+    .dw XT_STORE
+    .dw XT_R_FROM
+    .dw XT_SWAP
+    .dw XT_TO_R
+    .dw XT_SP_STORE
+    .dw XT_DROP
+    .dw XT_R_FROM
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/tib.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/tib.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/tib.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) System Pointer
+; R( -- )
+; terminal input buffer address
+VE_TIB:
+    .db $03, &quot;tib&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_TIB
+XT_TIB:
+    .dw PFA_DOVARIABLE
+PFA_TIB:
+    .dw heap
+    .set heap = heap + TIBSIZE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/tick.html
 ,0 → 1,107
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/tick.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/tick.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- XT ) Dictionary
+; R( -- )
+; search dictionary, returns XT or throw an exception -13
+VE_TICK:
+    .db $01, &quot;'&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_TICK
+XT_TICK:
+    .dw DO_COLON
+PFA_TICK:
+    .dw XT_BL
+    .dw XT_WORD
+    .dw XT_FIND
+    .dw XT_EQUALZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_TICK1
+    .dw XT_DOLITERAL
+    .dw -13
+    .dw XT_THROW
+PFA_TICK1:
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/to.html
 ,0 → 1,136
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/to.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/to.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n &lt;name&gt; -- ) Tools
+; R( --)
+; store the TOS to value (an EEPROM 16bit cell)
+VE_TO:
+    .db $82, &quot;to&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_TO
+XT_TO:
+    .dw DO_COLON
+PFA_TO:
+    .dw XT_TICK
+    .dw XT_1PLUS                ; to body
+    .dw XT_STATE
+    .dw XT_FETCH
+    .dw XT_DOCONDBRANCH
+    .dw PFA_TO1
+    .dw XT_COMPILE
+    .dw XT_DOTO
+    .dw XT_COMMA
+    .dw XT_EXIT
+PFA_TO1:
+    .dw XT_IFETCH
+    .dw XT_ESTORE
+    .dw XT_EXIT
+; ( n -- ) Tools
+; R( IP -- IP+1)
+; runtime portion of to
+;VE_DOTO:
+;    .db $04, &quot;(to)&quot;, 0
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_VALUE
+XT_DOTO:
+    .dw DO_COLON
+PFA_DOTO:
+    .dw XT_R_FROM
+    .dw XT_DUP
+    .dw XT_1PLUS
+    .dw XT_TO_R
+    .dw XT_IFETCH
+    .dw XT_IFETCH
+    .dw XT_ESTORE
+    .DW XT_EXIT
+; : (to) r&gt; dup 1+ &gt;r i@ e! ;
+; : to ( x &lt;name&gt; -- )
+;     ' 1+  state @
+;     if compile (to)  , exit then
+;     i@ e!  ; immediate
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/to_r.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/to_r.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/to_r.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n -- ) Stack
+; R( -- n)
+; move TOS to TOR
+VE_TO_R:
+    .db $02, &quot;&gt;r&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_TO_R
+XT_TO_R:
+    .dw PFA_TO_R
+PFA_TO_R:
+    push tosh
+    push tosl
+    loadtos
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/turnkey.html
 ,0 → 1,99
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/turnkey.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/turnkey.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- eaddr) System Pointer
+; R( -- )
+; address of the variable that holds an XT to be started by cold before quit takes over
+VE_TURNKEY:
+    .db $07, &quot;turnkey&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_TURNKEY
+XT_TURNKEY:
+    .dw PFA_DODEFER
+PFA_TURNKEY:
+    .dw $08
+    .dw XT_EDEFERFETCH
+    .dw XT_EDEFERSTORE
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/type.html
 ,0 → 1,114
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/type.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/type.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr n -- ) Character IO
+; R( -- )
+; emits a string
+VE_TYPE:
+    .db $04, &quot;type&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_TYPE
+XT_TYPE:
+    .dw DO_COLON
+PFA_TYPE:
+    .dw XT_QDUP
+    .dw XT_NOTEQUALZERO
+    .dw XT_DOCONDBRANCH
+    .dw PFA_TYPE2
+    .dw XT_ZERO
+    .dw XT_DODO
+    .dw PFA_TYPE2
+PFA_TYPE1:
+    .dw XT_DUP
+    .dw XT_I
+    .dw XT_PLUS
+    .dw XT_CFETCH
+    .dw XT_EMIT
+    .dw XT_DOLOOP
+    .dw PFA_TYPE1
+PFA_TYPE2:
+    .dw XT_DROP
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/udefer-fetch.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/udefer-fetch.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/udefer-fetch.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( xt1 -- xt2 ) System
+; R( -- )
+; does the real defer@ for user based defers
+;VE_UDEFERFETCH:
+;    .db $07, &quot;Udefer@&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_UDEFERFETCH
+XT_UDEFERFETCH:
+    .dw DO_COLON
+PFA_UDEFERFETCH:
+    .dw XT_1PLUS ; &gt;body
+    .dw XT_IFETCH
+    .dw XT_UP_FETCH
+    .dw XT_PLUS
+    .dw XT_FETCH
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/udefer-store.html
 ,0 → 1,103
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/udefer-store.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/udefer-store.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( xt1 xt2 -- ) Memory
+; R( -- )
+; does the real defer! for user based defers
+;VE_UDEFERSTORE:
+;    .db $07, &quot;Udefer!&quot;
+;    .dw VE_HEAD
+;    .set VE_HEAD = VE_UDEFERSTORE
+XT_UDEFERSTORE:
+    .dw DO_COLON
+PFA_UDEFERSTORE:
+    .dw XT_1PLUS
+    .dw XT_IFETCH
+    .dw XT_UP_FETCH
+    .dw XT_PLUS
+    .dw XT_STORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/udot.html
 ,0 → 1,105
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/udot.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/udot.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n -- ) Numeric IO
+; R( -- )
+; unsigned numeric output
+VE_UDOT:
+    .db $02, &quot;u.&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_UDOT
+XT_UDOT:
+    .dw DO_COLON
+PFA_UDOT:
+    .dw XT_ZERO
+    .dw XT_SWAP
+    .dw XT_L_SHARP
+    .dw XT_SHARP_S
+    .dw XT_BL
+    .dw XT_HOLD
+    .dw XT_SHARP_G
+    .dw XT_TYPE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/ugreater.html
 ,0 → 1,107
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/ugreater.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/ugreater.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( u1 u2 -- flag ) Compare
+; R( -- )
+; compares u1 &gt; u2 (unsigned)
+VE_UGREATER:
+    .db $02, &quot;u&gt;&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_UGREATER
+XT_UGREATER:
+    .dw PFA_UGREATER
+PFA_UGREATER:
+    ld temp2, Y+
+    ld temp3, Y+
+    cp temp2, tosl
+    cpc temp3, tosh
+    movw zl, zerol
+    brlo PFA_UGREATER1
+    brbs 1, PFA_UGREATER1
+    sbiw zl, 1
+PFA_UGREATER1:
+    movw tosl, zl
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/uless.html
 ,0 → 1,107
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/uless.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/uless.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( u1 u2 -- flasg) Compare
+; R( -- )
+; compare values u1 &lt; u2 (unsigned)
+VE_ULESS:
+    .db $02, &quot;u&lt;&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ULESS
+XT_ULESS:
+    .dw PFA_ULESS
+PFA_ULESS:
+    ld temp2, Y+
+    ld temp3, Y+
+    cp tosl, temp2
+    cpc tosh, temp3
+    movw zl, zerol
+    brlo PFA_ULESS1
+    brbs 1, PFA_ULESS1
+    sbiw zl, 1
+PFA_ULESS1:
+    movw tosl, zl
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/umslashmod.html
 ,0 → 1,146
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/umslashmod.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/umslashmod.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( ud u2 -- rem quot) Arithmetics
+; R( -- )
+; unsigned division ud / u2 with remainder
+VE_UMSLASHMOD:
+    .db $06, &quot;um/mod&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_UMSLASHMOD
+XT_UMSLASHMOD:
+    .dw PFA_UMSLASHMOD
+PFA_UMSLASHMOD:
+    movw temp4, tosl
+    ld temp0, Y+
+    ld temp1, Y+
+    ld temp2, Y+
+    ld temp3, Y+
+;; unsigned 32/16 -&gt; 16r16 divide
+PFA_UMSLASHMODmod:
+  ; set loop counter
+    ldi temp6,$10
+PFA_UMSLASHMODmod_loop:
+    ; shift left, saving high bit
+    clr temp7
+    lsl temp0
+    rol temp1
+    rol temp2
+    rol temp3
+    rol temp7
+  ; try subtracting divisor
+    cp temp2, temp4
+    cpc temp3, temp5
+    cpc temp7,zerol
+    brcs PFA_UMSLASHMODmod_loop_control
+PFA_UMSLASHMODmod_subtract:
+    ; dividend is large enough
+    ; do the subtraction for real
+    ; and set lowest bit
+    inc temp0
+    sub temp2, temp4
+    sbc temp3, temp5
+PFA_UMSLASHMODmod_loop_control:
+    dec  temp6
+    brne PFA_UMSLASHMODmod_loop
+PFA_UMSLASHMODmod_done:
+    ; put remainder on stack
+    st -Y,temp3
+    st -Y,temp2
+    ; put quotient on stack
+    movw tosl, temp0
+    jmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/unloop.html
 ,0 → 1,103
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/unloop.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/unloop.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Control Structure
+; R(loop-sys -- )
+; remove loop-sys
+VE_UNLOOP:
+    .db 6, &quot;unloop&quot;, 0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_UNLOOP
+XT_UNLOOP:
+    .dw PFA_UNLOOP
+PFA_UNLOOP:
+    pop temp1
+    pop temp0
+    pop temp1
+    pop temp0
+    pop temp1
+    pop temp0
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/until.html
 ,0 → 1,100
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/until.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/until.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( addr -- ) Compiler
+; R( -- )
+; finish begin with conditional branch
+VE_UNTIL:
+    .db $85, &quot;until&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_UNTIL
+XT_UNTIL:
+    .dw DO_COLON
+PFA_UNTIL:
+    .dw XT_COMPILE
+    .dw XT_DOCONDBRANCH
+    .dw XT_LRESOLVE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/unused.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/unused.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/unused.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- n ) Tools
+; R( -- )
+; number of unused flash cells
+VE_UNUSED:
+    .db $6, &quot;unused&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_UNUSED
+XT_UNUSED:
+    .dw DO_COLON
+PFA_UNUSED:
+    .dw XT_DOLITERAL
+    .dw nrww
+    .dw XT_HERE
+    .dw XT_MINUS
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/up.html
 ,0 → 1,113
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/up.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/up.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- addr ) System
+; R( -- )
+; get user pointer
+VE_UP_FETCH:
+    .db $03, &quot;up@&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_UP_FETCH
+XT_UP_FETCH:
+    .dw PFA_UP_FETCH
+PFA_UP_FETCH:
+    savetos
+    movw tosl, upl
+    rjmp DO_NEXT
+; ( addr -- ) System
+; R( -- )
+; set user pointer
+VE_UP_STORE:
+    .db $03, &quot;up!&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_UP_STORE
+XT_UP_STORE:
+    .dw PFA_UP_STORE
+PFA_UP_STORE:
+    movw upl, tosl
+    loadtos
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/usart.html
 ,0 → 1,379
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/usart.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/usart.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+;;; usart driver
+;; bit definitions
+.set pc_ = pc
+.org URXCaddr
+  rjmp usart0_rx_isr
+.org UDREaddr
+  rjmp usart0_udre_isr
+.org pc_
+; sizes have to be powers of 2!
+.equ usart0_tx_size = $10
+.equ usart0_rx_size = $10
+.equ usart0_tx_mask = usart0_tx_size - 1
+.equ usart0_rx_mask = usart0_rx_size - 1
+.set usart0_tx_in = heap
+.set heap = heap + 1
+.set usart0_tx_out = heap
+.set heap = heap + 1
+.set usart0_tx_data = heap
+.set heap = heap + usart0_tx_size
+.set usart0_rx_in = heap
+.set heap = heap + 1
+.set usart0_rx_out = heap
+.set heap = heap + 1
+.set usart0_rx_data = heap
+.set heap = heap + usart0_rx_size
+; ( -- v) System Value
+; R( -- )
+; returns usart0 baudrate
+VE_BAUD0:
+  .db 05,&quot;baud0&quot;
+  .dw VE_HEAD
+  .set VE_HEAD = VE_BAUD0
+XT_BAUD0:
+  .dw PFA_DOVALUE
+PFA_BAUD00:          ; ( -- )
+  .dw 10
+; ( -- ) Hardware Access
+; R( --)
+; initialize usart0
+VE_USART0:
+  .db $06, &quot;usart0&quot;,0
+  .dw VE_HEAD
+  .set VE_HEAD = VE_USART0
+XT_USART0:
+  .dw DO_COLON
+PFA_USART0:          ; ( -- )
+  .dw XT_ZERO
+  .dw XT_DOLITERAL
+  .dw usart0_tx_in
+  .dw XT_CSTORE
+  .dw XT_ZERO
+  .dw XT_DOLITERAL
+  .dw usart0_tx_out
+  .dw XT_CSTORE
+  .dw XT_ZERO
+  .dw XT_DOLITERAL
+  .dw usart0_rx_in
+  .dw XT_CSTORE
+  .dw XT_ZERO
+  .dw XT_DOLITERAL
+  .dw usart0_rx_out
+  .dw XT_CSTORE
+  .dw XT_F_CPU
+  .dw XT_D2SLASH
+  .dw XT_D2SLASH
+  .dw XT_D2SLASH
+  .dw XT_D2SLASH
+  .dw XT_ROT
+  .dw XT_UMSLASHMOD
+  .dw XT_SWAP
+  .dw XT_DROP
+  .dw XT_1MINUS
+  .dw XT_DUP
+  .dw XT_DOLITERAL
+  .dw BAUDRATE0_LOW
+  .dw XT_CSTORE
+  .dw XT_BYTESWAP
+  .dw XT_DOLITERAL
+  .dw BAUDRATE0_HIGH
+  .dw XT_CSTORE
+  .dw XT_DOLITERAL
+  .dw (1&lt;&lt;UMSEL01)|(3&lt;&lt;UCSZ00)
+  .dw XT_DOLITERAL
+  .dw USART0_C
+  .dw XT_CSTORE
+  .dw XT_DOLITERAL
+  .dw (1&lt;&lt;TXEN0) | (1&lt;&lt;RXEN0) | (1&lt;&lt;RXCIE0)
+  .dw XT_DOLITERAL
+  .dw USART0_B
+  .dw XT_CSTORE
+  .dw XT_EXIT
+usart0_udre_isr:
+  push xl
+  in xl,SREG
+  push xl
+  push xh
+  push zl
+  push zh
+  lds xl,usart0_tx_in
+  lds xh,usart0_tx_out
+  cp xh,xl
+  brne usart0_udre_next
+usart0_udre_last:
+  lds xl, USART0_B
+  cbr xl,(1&lt;&lt;UDRIE0)
+  sts USART0_B,xl
+  rjmp usart0_udre_done
+usart0_udre_next:
+  inc xh
+  andi xh,usart0_tx_mask
+  sts usart0_tx_out,xh
+  ldi zl,low(usart0_tx_data)
+  ldi zh,high(usart0_tx_data)
+  add zl,xh
+  adc zh,zeroh
+  ld xl,z
+  out_ UDR0,xl
+usart0_udre_done:
+  pop zh
+  pop zl
+  pop xh
+  pop xl
+  out SREG,xl
+  pop xl
+  reti
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+usart0_rx_isr:
+  push xl
+  in xl, SREG
+  push xl
+  push xh
+  push zl
+  push zh
+  lds xl,usart0_rx_in
+  inc xl
+  andi xl,usart0_rx_mask
+  ldi zl, low(usart0_rx_data)
+  ldi zh, high(usart0_rx_data)
+  add zl, xl
+  adc zh, zeroh
+  in_ xh, UDR0
+  st Z, xh
+  sts usart0_rx_in, xl
+  pop zh
+  pop zl
+  pop xh
+  pop xl
+  out SREG, xl
+  pop xl
+  reti
+; (c -- ) Hardware Access
+; R( --)
+; put 1 character into output queue, wait if needed, enable UDRIE0 interrupt
+VE_TX0:
+    .db $03, &quot;tx0&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_TX0
+XT_TX0:
+    .dw DO_COLON
+PFA_TX0:
+  ; wait for queue
+  .dw XT_TX0Q
+  .dw XT_DOCONDBRANCH
+  .dw PFA_TX0
+  ; append to queue
+  .dw XT_DOLITERAL
+  .dw usart0_tx_in
+  .dw XT_CFETCH        ; ( -- c tx_in)
+  .dw XT_1PLUS
+  .dw XT_DOLITERAL
+  .dw usart0_tx_mask
+  .dw XT_AND           ; ( -- c tx_in_new)
+  .dw XT_DUP
+  .dw XT_DOLITERAL
+  .dw usart0_tx_in
+  .dw XT_CSTORE
+  .dw XT_DOLITERAL
+  .dw usart0_tx_data   ; ( -- c tx_in_new data)
+  .dw XT_PLUS
+  .dw XT_CSTORE
+  ; enable interrupt
+  .dw XT_DOLITERAL
+  .dw USART0_B
+  .dw XT_DUP            ;
+  .dw XT_CFETCH
+  .dw XT_DOLITERAL
+  .dw 1&lt;&lt;UDRIE0
+  .dw XT_OR
+  .dw XT_SWAP
+  .dw XT_CSTORE
+  .dw XT_EXIT
+; ( -- f)  Hardware Access
+; R( --)
+; check if a character can be appended to output queue.
+VE_TX0Q:
+    .db $04, &quot;tx0?&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_TX0Q
+XT_TX0Q:
+    .dw DO_COLON
+PFA_TX0Q:
+  .dw XT_PAUSE
+  .dw XT_DOLITERAL
+  .dw usart0_tx_out
+  .dw XT_CFETCH
+  .dw XT_DOLITERAL
+  .dw usart0_tx_in
+  .dw XT_CFETCH
+  .dw XT_EQUAL
+  .dw XT_EXIT
+; ( -- c)  Hardware Access
+; R( --)
+; get 1 character from input queue, wait if needed
+VE_RX0:
+    .db $03, &quot;rx0&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_RX0
+XT_RX0:
+    .dw DO_COLON
+PFA_RX0:
+  .dw XT_RX0Q
+  .dw XT_DOCONDBRANCH
+  .dw PFA_RX0
+  .dw XT_DOLITERAL
+  .dw usart0_rx_out
+  .dw XT_CFETCH
+  .dw XT_1PLUS
+  .dw XT_DOLITERAL
+  .dw usart0_rx_mask
+  .dw XT_AND
+  .dw XT_DUP
+  .dw XT_DOLITERAL
+  .dw usart0_rx_out
+  .dw XT_CSTORE
+  .dw XT_DOLITERAL
+  .dw usart0_rx_data
+  .dw XT_PLUS
+  .dw XT_CFETCH
+  .dw XT_EXIT
+; ( -- f)  Hardware Access
+; R( --)
+; check if unread characters are in the input queue.
+VE_RX0Q:
+    .db $04, &quot;rx0?&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_RX0Q
+XT_RX0Q:
+    .dw DO_COLON
+PFA_RX0Q:
+  .dw XT_PAUSE
+  .dw XT_DOLITERAL
+  .dw usart0_rx_out
+  .dw XT_CFETCH
+  .dw XT_DOLITERAL
+  .dw usart0_rx_in
+  .dw XT_CFETCH
+  .dw XT_NOTEQUAL
+  .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/user.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/user.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/user.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n -- ) Compiler
+; R( -- )
+; define  a new user variable
+VE_USER:
+    .db $04, &quot;user&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_USER
+XT_USER:
+    .dw DO_COLON
+PFA_USER:
+    .dw XT_DOCREATE
+    .dw XT_COMPILE
+    .dw PFA_DOUSER
+    .dw XT_COMMA
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/uslashmod.html
 ,0 → 1,102
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/uslashmod.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/uslashmod.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; (u1 u2 -- rem quot) Arithmetics
+; R( -- )
+; unsigned division with remainder
+VE_USLASHMOD:
+    .db $05, &quot;u/mod&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_USLASHMOD
+XT_USLASHMOD:
+    .dw DO_COLON
+PFA_USLASHMOD:
+    .dw XT_TO_R
+    .dw XT_ZERO
+    .dw XT_SWAP
+    .dw XT_R_FROM
+    .dw XT_UMSLASHMOD
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/ustarslashmod.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/ustarslashmod.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/ustarslashmod.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( u1 u2 u3 -- rem quot) Arithmetics
+; R( -- )
+; unsigned division with remainder u3 * u2 / u1
+VE_USTARSLASHMOD:
+    .db $06, &quot;u*/mod&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_USTARSLASHMOD
+XT_USTARSLASHMOD:
+    .dw DO_COLON
+PFA_USTARSLASHMOD:
+    .dw XT_TO_R
+    .dw XT_MSTAR
+    .dw XT_R_FROM
+    .dw XT_UMSLASHMOD
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/value.html
 ,0 → 1,120
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/value.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/value.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n &lt;name&gt; -- ) Compiler
+; R( -- )
+; allocate space for 1 cell in EEPROM. used in conjunction with TO
+VE_VALUE:
+    .db $05, &quot;value&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_VALUE
+XT_VALUE:
+    .dw DO_COLON
+PFA_VALUE:
+    .dw XT_DOCREATE
+    .dw XT_COMPILE
+    .dw PFA_DOVALUE
+    .dw XT_EDP
+    .dw XT_EFETCH
+    .dw XT_DUP
+    .dw XT_COMMA
+    .dw XT_DUP
+    .dw XT_1PLUS
+    .dw XT_1PLUS
+    .dw XT_EDP
+    .dw XT_ESTORE
+    .dw XT_ESTORE
+    .dw XT_EXIT
+PFA_DOVALUE:
+    call_ DO_DODOES
+    .dw XT_IFETCH
+    .dw XT_EFETCH
+    .dw XT_EXIT
+; : value ( n -- )
+;       create edp e@ dup , dup 1+ 1+ edp e! e! does&gt; i@ e@ ;
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/variable.html
 ,0 → 1,106
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/variable.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/variable.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Compiler
+; R( -- )
+; create a variable entry and allocate RAM space for it
+VE_VARIABLE:
+    .db $08, &quot;variable&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_VARIABLE
+XT_VARIABLE:
+    .dw DO_COLON
+PFA_VARIABLE:
+    .dw XT_DOCREATE
+    .dw XT_COMPILE
+    .dw PFA_DOVARIABLE
+    .dw XT_HEAP
+    .dw XT_EFETCH
+    .dw XT_COMMA
+    .dw XT_DOLITERAL
+    .dw 2
+    .dw XT_ALLOT
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/ver.html
 ,0 → 1,105
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/ver.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/ver.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Tools
+; R( -- )
+; emits the version string
+VE_VER:
+    .db $03, &quot;ver&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_VER
+XT_VER:
+    .dw DO_COLON
+PFA_VER:
+    .dw XT_SLITERAL
+    .db 11,&quot;amforth 2.2&quot;
+    .dw XT_ITYPE
+    .dw XT_SPACE
+    .dw XT_DOLITERAL
+    .dw mcustring
+    .dw XT_ICOUNT
+    .dw XT_ITYPE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/wdr.html
 ,0 → 1,98
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/wdr.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/wdr.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Interrupt
+; R( -- )
+; calls the MCU wdr instruction
+VE_WDR:
+    .db $03, &quot;wdr&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_WDR
+XT_WDR:
+    .dw PFA_WDR
+PFA_WDR:
+    wdr
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/while.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/while.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/while.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( dest -- orig dest ) Control Structure
+; R( -- )
+; control structure
+VE_WHILE:
+    .db $85, &quot;while&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_WHILE
+XT_WHILE:
+    .dw DO_COLON
+PFA_WHILE:
+    .dw XT_COMPILE
+    .dw XT_DOCONDBRANCH
+    .dw XT_GMARK
+    .dw XT_SWAP
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/word.html
 ,0 → 1,135
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/word.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/word.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( c -- addr ) Tools
+; R( -- )
+; skip leading delimiter characters and parses TIB to the next delimiter. copy the word into PAD
+VE_WORD:
+    .db $04, &quot;word&quot;,0
+    .dw VE_HEAD
+    .set VE_HEAD = VE_WORD
+XT_WORD:
+    .dw DO_COLON
+PFA_WORD:
+    .dw XT_TO_R     ; ( -- )
+    .dw XT_SOURCE   ; ( -- addr len)
+    .dw XT_G_IN     ; ( -- addr len &gt;in)
+    .dw XT_FETCH
+    .dw XT_SLASHSTRING ; ( -- addr' len' )
+    .dw XT_SWAP        ; ( -- len' addr' )
+    .dw XT_OVER        ; ( -- len' addr' len')
+    .dw XT_R_FETCH     ; ( -- len' addr' len' c)
+    .dw XT_CSKIP       ; ( -- len' addr'' len'')
+    .dw XT_ROT         ; ( -- addr'' len'' len')
+    .dw XT_OVER        ; ( -- addr'' len'' len' len'')
+    .dw XT_MINUS       ; ( -- addr'' len'' dlen)
+    .dw XT_G_IN        ; ( -- addr'' len'' dlen &gt;in)
+    .dw XT_PLUSSTORE   ; ( -- addr'' len'')
+    .dw XT_R_FROM      ; ( -- addr'' len'' c)
+    .dw XT_CSCAN       ; ( -- addr''' len''')
+    .dw XT_DUP         ; ( -- addr''' len''' len''')
+    .dw XT_1PLUS       ;
+    .dw XT_G_IN
+    .dw XT_PLUSSTORE   ; ( -- addr''' len''')
+    .dw XT_PAD         ; ( -- addr''' len''' pad)
+    .dw XT_OVER        ; ( -- addr''' len''' pad len''')
+    .dw XT_OVER        ; ( -- addr''' len''' pad len''' pad)
+    .dw XT_CSTORE      ; ( -- addr''' len''' pad)
+    .dw XT_1PLUS       ; ( -- addr''' len''' pad+1)
+    .dw XT_SWAP        ; ( -- addr''' pad+1 len''')
+    .dw XT_CMOVE_G     ; ( --- )
+    .dw XT_PAD
+    .dw XT_ZERO        ; append a zero byte. find/icompare _does_ need it
+    .dw XT_PAD
+    .dw XT_DUP
+    .dw XT_CFETCH
+    .dw XT_PLUS        ; ( -- pad pad+len )
+    .dw XT_1PLUS
+    .dw XT_CSTORE
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/words.html
 ,0 → 1,125
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/words.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/words.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- ) Tools
+; R( -- )
+; emits a list of all (visible) words in the dictionary
+VE_WORDS:
+    .db $05, &quot;words&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_WORDS
+XT_WORDS:
+    .dw DO_COLON
+PFA_WORDS:
+    .dw XT_HEAD
+    .dw XT_EFETCH
+PFA_WORDS1:
+    .dw XT_DUP           ; ( -- addr addr )
+    .dw XT_NOTEQUALZERO  ; ( -- addr f )
+    .dw XT_DOCONDBRANCH  ; ( -- addr ) is nfa = counted string
+    .dw PFA_WORDS2       ;
+    .dw XT_ICOUNT   ; ( -- adr n )
+    .dw XT_DOLITERAL
+    .dw $1F
+    .dw XT_AND      ; mask immediate bit
+    .dw XT_OVER
+    .dw XT_OVER
+    .dw XT_ITYPE    ; ( -- adr n  )
+    .dw XT_2SLASH   ; ( -- adr k )
+    .dw XT_1PLUS    ; ( -- adr k+1 )
+    .dw XT_PLUS     ; ( -- adrk+1 )
+    .dw XT_SPACE         ; emit space
+    .dw XT_IFETCH        ; ( -- addr )
+    .dw XT_DOBRANCH      ; ( -- addr )
+    .dw PFA_WORDS1       ; ( -- addr )
+PFA_WORDS2:
+    .dw XT_DROP          ; ( addr --  )
+    .dw XT_EXIT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/xor.html
 ,0 → 1,101
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/xor.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/xor.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( n1 n2 -- n3) Logic
+; R( -- )
+; exclusive or
+VE_XOR:
+    .db $03, &quot;xor&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_XOR
+XT_XOR:
+    .dw PFA_XOR
+PFA_XOR:
+    ld temp0, Y+
+    ld temp1, Y+
+    eor tosl, temp0
+    eor tosh, temp1
+    rjmp DO_NEXT
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/CodeAsm/zero.html
 ,0 → 1,97
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> words/zero.asm </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <h1> words/zero.asm </h1>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+      <pre>
+; ( -- 0 ) Arithmetics
+; R( -- )
+; leaves the value 0 on TOS
+VE_ZERO:
+    .db $01, &quot;0&quot;
+    .dw VE_HEAD
+    .set VE_HEAD = VE_ZERO
+XT_ZERO:
+    .dw PFA_DOVARIABLE
+PFA_ZERO:
+    .dw 0
+</pre>
+      <p>
+        <input type=button onClick="history.back()" value="Back">
+        <input type=button onClick="history.forward()" value="Forward">
+        <a href="../WordList.en.html">Jump to Vocabulary</a>
+      </p>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/WordList.cs.html
 ,0 → 1,1251
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> Forth amforth </title>
+    <meta name="keywords" content="amforth programovací jazyk Forth ATmega ATMEL">
+    <meta name="description" content="amforth - jazyk Forth pro ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.cs.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../Web/CSS/MLAB.css" type="text/css" title="MLAB základní styl">
+    <link rel="StyleSheet" href="../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="cs">
+    <!-- AUTOINCLUDE START "Page/Header.cs.ihtml" DO NOT REMOVE -->
+    <!-- ============== HLAVICKA ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> Pro zobrazení (vložení) hlavičky je potřeba JavaScript </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.cs.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> Pro zobrazení (vložení) menu je potřeba JavaScript </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <p class="Title">
+        amforth - Forth pro ATmega
+      </p>
+      <p class="Subtitle">
+        Tato stránka zpřístupňuje křížovou referenci jazyka amforth. Odkazy se
+        generují automaticky na základě zdrojových souborů jazyka amforth.
+      </p>
+      <h1> Verze </h1>
+      <table class="Compact">
+        <tr>
+          <th colspan="2" class="center"> Základní informace </th>
+        </tr>
+        <tr>
+          <td> Stránka jazyka amforth </td>
+          <td> <a href="http://amforth.sourceforge.net/">http://amforth.sourceforge.net/</a></td>
+        </tr>
+        <tr>
+          <td> Stránka pro download </td>
+          <td> <a href="http://sourceforge.net/projects/amforth">http://sourceforge.net/projects/amforth</a></td>
+        </tr>
+        <tr>
+          <td> Subversion server </td>
+          <td> <a href="https://amforth.svn.sourceforge.net/svnroot/amforth">https://amforth.svn.sourceforge.net/svnroot/amforth</a></td>
+        </tr>
+        <tr><th colspan="2">Subversion Info</th></tr><tr><td>URL</td><td> https://amforth.svn.sourceforge.net/svnroot/amforth/trunk</td></tr>
+<tr><td>Repository Root</td><td> https://amforth.svn.sourceforge.net/svnroot/amforth</td></tr>
+<tr><td>Repository UUID</td><td> 1be2a6a9-e81f-0410-9be0-e59bd151596a</td></tr>
+<tr><td>Last Changed Author</td><td> mtrute</td></tr>
+<tr><td>Last Changed Rev</td><td> 328</td></tr>
+<tr><td>Last Changed Date</td><td> 2007-06-11 08:42:09 +0200 (Mon, 11 Jun 2007)</td></tr>
+      </table>
+    <!--
+      <<ReadMe>>
+    -->
+      <h1> Seznam slov </h1>
+      <table>
+        <tr>
+          <th>Word</th>
+          <th>Label</th>
+          <th>Definition</th>
+        </tr>
+        <tr>
+          <td>!</td>
+          <td><a href="CodeAsm/store.html#STORE" title="VE_STORE">STORE</a></td>
+          <td>( n addr -- ) Memory<br>R( -- )<br>write 16bit to RAM memory (or IO or CPU registers)</td>
+        </tr>
+        <tr>
+          <td>#</td>
+          <td><a href="CodeAsm/sharp.html#SHARP" title="VE_SHARP">SHARP</a></td>
+          <td>( d1 -- d2) Numeric IO<br>R( -- )<br>compiles next digit to HLD</td>
+        </tr>
+        <tr>
+          <td>#&gt;</td>
+          <td><a href="CodeAsm/sharp_g.html#SHARP_G" title="VE_SHARP_G">SHARP_G</a></td>
+          <td>( d1 -- addr count ) Numeric IO<br>R( -- )<br>convert HLD buffer to a usable string</td>
+        </tr>
+        <tr>
+          <td>#int</td>
+          <td><a href="CodeAsm/intx.html#NUMINT" title="VE_NUMINT">NUMINT</a></td>
+          <td>( -- n )  Interrupt<br>R( -- )<br>number of interrupt vectors (0 based)</td>
+        </tr>
+        <tr>
+          <td>#s</td>
+          <td><a href="CodeAsm/sharp_s.html#SHARP_S" title="VE_SHARP_S">SHARP_S</a></td>
+          <td>( d1 -- 0) Numeric IO<br>R( -- )<br>call # until a value of zero is reached</td>
+        </tr>
+        <tr>
+          <td>#tib</td>
+          <td><a href="CodeAsm/sharptib.html#NUMBERTIB" title="VE_NUMBERTIB">NUMBERTIB</a></td>
+          <td>( -- addr ) System<br>R( -- )<br>address of variable holding the number of characters in TIB</td>
+        </tr>
+        <tr>
+          <td>'</td>
+          <td><a href="CodeAsm/tick.html#TICK" title="VE_TICK">TICK</a></td>
+          <td>( -- XT ) Dictionary<br>R( -- )<br>search dictionary, returns XT or throw an exception -13</td>
+        </tr>
+        <tr>
+          <td>(</td>
+          <td><a href="CodeAsm/lparenthesis.html#LPARENTHESIS" title="VE_LPARENTHESIS">LPARENTHESIS</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>skip everything up to the closing bracket on the same line</td>
+        </tr>
+        <tr>
+          <td>*</td>
+          <td><a href="CodeAsm/star.html#MUL" title="VE_MUL">MUL</a></td>
+          <td>( n1 n2 -- n3 ) Arithmetics<br>R( -- )<br>multiply routine</td>
+        </tr>
+        <tr>
+          <td>*/</td>
+          <td><a href="CodeAsm/starslash.html#STARSLASH" title="VE_STARSLASH">STARSLASH</a></td>
+          <td>(n1 n2 n3 -- n4) Arithmetics<br>R( -- )<br>signed multiply and division with double precision intermediate</td>
+        </tr>
+        <tr>
+          <td>*/mod</td>
+          <td><a href="CodeAsm/starslashmod.html#STARSLASHMOD" title="VE_STARSLASHMOD">STARSLASHMOD</a></td>
+          <td>( n1 n2 n3 -- rem quot) Arithmetics<br>R( -- )<br>signed multiply and division  with double precision intermediate and remainder</td>
+        </tr>
+        <tr>
+          <td>+</td>
+          <td><a href="CodeAsm/plus.html#PLUS" title="VE_PLUS">PLUS</a></td>
+          <td>( n1 n2 -- n3) Arithmetics<br>R( -- )<br>addition</td>
+        </tr>
+        <tr>
+          <td>+!</td>
+          <td><a href="CodeAsm/plusstore.html#PLUSSTORE" title="VE_PLUSSTORE">PLUSSTORE</a></td>
+          <td>( n addr -- ) Arithmetics<br>R( -- )<br>add value to content of RAM address</td>
+        </tr>
+        <tr>
+          <td>+loop</td>
+          <td><a href="CodeAsm/plusloop.html#PLOOP" title="VE_PLOOP">PLOOP</a></td>
+          <td>( addr -- ) Control Structure<br>R( -- )<br>compile +loop and resolve branch</td>
+        </tr>
+        <tr>
+          <td>,</td>
+          <td><a href="CodeAsm/comma.html#COMMA" title="VE_COMMA">COMMA</a></td>
+          <td>( n -- ) Dictionary<br>R( -- )<br>compile 16 bit into flash at here.</td>
+        </tr>
+        <tr>
+          <td>-</td>
+          <td><a href="CodeAsm/minus.html#MINUS" title="VE_MINUS">MINUS</a></td>
+          <td>( n1 n2 -- n3 ) Arithmetics<br>R( -- )<br>subtract</td>
+        </tr>
+        <tr>
+          <td>.</td>
+          <td><a href="CodeAsm/dot.html#DOT" title="VE_DOT">DOT</a></td>
+          <td>( n -- ) Numeric IO<br>R( -- )<br>prints TOS in free number format</td>
+        </tr>
+        <tr>
+          <td>.&quot;</td>
+          <td><a href="CodeAsm/dotstring.html#DOTSTRING" title="VE_DOTSTRING">DOTSTRING</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>compiles string into dictionary to be typed at runtime</td>
+        </tr>
+        <tr>
+          <td>.&quot;</td>
+          <td><a href="CodeAsm/dotstring.html#DOTSTRING" title="VE_DOTSTRING">DOTSTRING</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>compiles string into dictionary to be typed at runtime</td>
+        </tr>
+        <tr>
+          <td>.s</td>
+          <td><a href="CodeAsm/dot-s.html#DOTS" title="VE_DOTS">DOTS</a></td>
+          <td>( -- ) Tools<br>R( -- )<br>stack dump</td>
+        </tr>
+        <tr>
+          <td>.s</td>
+          <td><a href="CodeAsm/dot-s.html#DOTS" title="VE_DOTS">DOTS</a></td>
+          <td>( -- ) Tools<br>R( -- )<br>stack dump</td>
+        </tr>
+        <tr>
+          <td>/</td>
+          <td><a href="CodeAsm/slash.html#SLASH" title="VE_SLASH">SLASH</a></td>
+          <td>( n1 n2 -- n3) Arithmetics<br>R( -- )<br>diviion</td>
+        </tr>
+        <tr>
+          <td>/int</td>
+          <td><a href="CodeAsm/intx.html#INTOFF" title="VE_INTOFF">INTOFF</a></td>
+          <td>( -- sreg ) Interrupt<br>R( -- )<br>turns off all interrupts and leaves SREG in TOS</td>
+        </tr>
+        <tr>
+          <td>/key</td>
+          <td><a href="CodeAsm/slashkey.html#SLASHKEY" title="VE_SLASHKEY">SLASHKEY</a></td>
+          <td>( -- f) Character IO<br>R( -- )<br>fetch 'key? vector and execute it if not zero. Leave true if a character can be read, false otherwise</td>
+        </tr>
+        <tr>
+          <td>/mod</td>
+          <td><a href="CodeAsm/slashmod.html#SLASHMOD" title="VE_SLASHMOD">SLASHMOD</a></td>
+          <td>( n1 n2 -- rem quot) Arithmetics<br>R( -- )<br>signed division n1/n2 with remainder</td>
+        </tr>
+        <tr>
+          <td>/string</td>
+          <td><a href="CodeAsm/slashstring.html#SLASHSTRING" title="VE_SLASHSTRING">SLASHSTRING</a></td>
+          <td>( addr1 u1 n-- addr2 u2 ) String<br>R( -- )<br>adjust string from addr1 to addr1+n, reduce length from u1 to u2</td>
+        </tr>
+        <tr>
+          <td>0</td>
+          <td><a href="CodeAsm/zero.html#ZERO" title="VE_ZERO">ZERO</a></td>
+          <td>( -- 0 ) Arithmetics<br>R( -- )<br>leaves the value 0 on TOS</td>
+        </tr>
+        <tr>
+          <td>0&lt;</td>
+          <td><a href="CodeAsm/lesszero.html#LESSZERO" title="VE_LESSZERO">LESSZERO</a></td>
+          <td>( n1 -- flag) Compare<br>R( -- )<br>compare with zero</td>
+        </tr>
+        <tr>
+          <td>0&lt;&gt;</td>
+          <td><a href="CodeAsm/notequalzero.html#NOTEQUALZERO" title="VE_NOTEQUALZERO">NOTEQUALZERO</a></td>
+          <td>( n -- flag ) Compare<br>R( -- )<br>compare with zero</td>
+        </tr>
+        <tr>
+          <td>0=</td>
+          <td><a href="CodeAsm/equalzero.html#EQUALZERO" title="VE_EQUALZERO">EQUALZERO</a></td>
+          <td>( n -- flag ) Compare<br>R( -- )<br>compare with 0 (zero)</td>
+        </tr>
+        <tr>
+          <td>0&gt;</td>
+          <td><a href="CodeAsm/greaterzero.html#GREATERZERO" title="VE_GREATERZERO">GREATERZERO</a></td>
+          <td>( n1 -- flag ) Compare<br>R( -- )<br>compare with zero</td>
+        </tr>
+        <tr>
+          <td>1+</td>
+          <td><a href="CodeAsm/1plus.html#1PLUS" title="VE_1PLUS">1PLUS</a></td>
+          <td>( n1 -- n2 ) Arithmetics<br>R( -- )<br>optimized increment</td>
+        </tr>
+        <tr>
+          <td>1-</td>
+          <td><a href="CodeAsm/1minus.html#1MINUS" title="VE_1MINUS">1MINUS</a></td>
+          <td>( n1 -- n2 ) Arithmetics<br>R( -- )<br>optimized decrement (CORE)</td>
+        </tr>
+        <tr>
+          <td>1ms</td>
+          <td><a href="CodeAsm/1ms.html#1MS" title="VE_1MS">1MS</a></td>
+          <td>( -- ) Time<br>R(--)<br>busy waits (almost) exactly 1 millisecond</td>
+        </tr>
+        <tr>
+          <td>2*</td>
+          <td><a href="CodeAsm/2star.html#2STAR" title="VE_2STAR">2STAR</a></td>
+          <td>( n1 -- n2 ) Arithmetics<br>R( -- )<br>arithmetic shift left</td>
+        </tr>
+        <tr>
+          <td>2/</td>
+          <td><a href="CodeAsm/2slash.html#2SLASH" title="VE_2SLASH">2SLASH</a></td>
+          <td>( n1 -- n2 ) Arithmetics<br>R( -- )<br>arithmetic shift right</td>
+        </tr>
+        <tr>
+          <td>:</td>
+          <td><a href="CodeAsm/colon.html#COLON" title="VE_COLON">COLON</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>create named entry in the dictionary</td>
+        </tr>
+        <tr>
+          <td>:noname</td>
+          <td><a href="CodeAsm/colon-noname.html#COLONNONAME" title="VE_COLONNONAME">COLONNONAME</a></td>
+          <td>( -- xt ) Compiler<br>R( -- )<br>create unnamed entry in the dictionary</td>
+        </tr>
+        <tr>
+          <td>;</td>
+          <td><a href="CodeAsm/semicolon.html#SEMICOLON" title="VE_SEMICOLON">SEMICOLON</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>finish colon defintion, compiles (exit) and returns to interpreter state</td>
+        </tr>
+        <tr>
+          <td>&lt;</td>
+          <td><a href="CodeAsm/less.html#LESS" title="VE_LESS">LESS</a></td>
+          <td>( n1 n2 -- flasg) Compare<br>R( -- )<br>compare two values</td>
+        </tr>
+        <tr>
+          <td>&lt;#</td>
+          <td><a href="CodeAsm/l_sharp.html#L_SHARP" title="VE_L_SHARP">L_SHARP</a></td>
+          <td>( -- ) Numeric IO<br>R( -- )<br>emties counted string at address from hld</td>
+        </tr>
+        <tr>
+          <td>&lt;&gt;</td>
+          <td><a href="CodeAsm/notequal.html#NOTEQUAL" title="VE_NOTEQUAL">NOTEQUAL</a></td>
+          <td>( n1 n2 -- flag) Compare<br>R( -- )<br>compare two values</td>
+        </tr>
+        <tr>
+          <td>=</td>
+          <td><a href="CodeAsm/equal.html#EQUAL" title="VE_EQUAL">EQUAL</a></td>
+          <td>( n1 n2 -- flag ) Compare<br>R( -- )<br>compares two values</td>
+        </tr>
+        <tr>
+          <td>&gt;</td>
+          <td><a href="CodeAsm/greater.html#GREATER" title="VE_GREATER">GREATER</a></td>
+          <td>( n1 n2 -- flag ) Compare<br>R( -- )<br>compares two values (signed)</td>
+        </tr>
+        <tr>
+          <td>&gt;&lt;</td>
+          <td><a href="CodeAsm/byteswap.html#BYTESWAP" title="VE_BYTESWAP">BYTESWAP</a></td>
+          <td>( n1 -- n2 ) Arithmetics<br>R( -- )<br>swap the bytes of the TOS</td>
+        </tr>
+        <tr>
+          <td>&gt;in</td>
+          <td><a href="CodeAsm/g_in.html#G_IN" title="VE_G_IN">G_IN</a></td>
+          <td>( -- addr ) System<br>R( -- )<br>pointer to current read position in TIB</td>
+        </tr>
+        <tr>
+          <td>&gt;r</td>
+          <td><a href="CodeAsm/to_r.html#TO_R" title="VE_TO_R">TO_R</a></td>
+          <td>( n -- ) Stack<br>R( -- n)<br>move TOS to TOR</td>
+        </tr>
+        <tr>
+          <td>?do</td>
+          <td><a href="CodeAsm/qdo.html#QDO" title="VE_QDO">QDO</a></td>
+          <td>( -- addr ) Control Structure<br>R( -- )<br>start do .. [+]loop</td>
+        </tr>
+        <tr>
+          <td>?do</td>
+          <td><a href="CodeAsm/qdo.html#QDO" title="VE_QDO">QDO</a></td>
+          <td>( -- addr ) Control Structure<br>R( -- )<br>start do .. [+]loop</td>
+        </tr>
+        <tr>
+          <td>?dup</td>
+          <td><a href="CodeAsm/qdup.html#QDUP" title="VE_QDUP">QDUP</a></td>
+          <td>( n1 -- [ n1 n1 ] | 0) Stack<br>R( -- )<br>duplicate TOS if non-zero</td>
+        </tr>
+        <tr>
+          <td>@</td>
+          <td><a href="CodeAsm/fetch.html#FETCH" title="VE_FETCH">FETCH</a></td>
+          <td>( addr -- n ) Memory<br>R( -- )<br>read 1 cell from RAM (or IO or CPU register)</td>
+        </tr>
+        <tr>
+          <td>Edefer</td>
+          <td><a href="CodeAsm/edefer.html#EDEFER" title="VE_EDEFER">EDEFER</a></td>
+          <td>( n &lt;name&gt; -- ) Compiler<br>R( -- )<br>creates a defer vector which is kept in eeprom.</td>
+        </tr>
+        <tr>
+          <td>Edefer</td>
+          <td><a href="CodeAsm/edefer.html#EDEFER" title="VE_EDEFER">EDEFER</a></td>
+          <td>( n &lt;name&gt; -- ) Compiler<br>R( -- )<br>creates a defer vector which is kept in eeprom.</td>
+        </tr>
+        <tr>
+          <td>Rdefer</td>
+          <td><a href="CodeAsm/rdefer.html#RDEFER" title="VE_RDEFER">RDEFER</a></td>
+          <td>( n &lt;name&gt; -- ) Compiler<br>R( -- )<br>creates a RAM based defer vector</td>
+        </tr>
+        <tr>
+          <td>Rdefer</td>
+          <td><a href="CodeAsm/rdefer.html#RDEFER" title="VE_RDEFER">RDEFER</a></td>
+          <td>( n &lt;name&gt; -- ) Compiler<br>R( -- )<br>creates a RAM based defer vector</td>
+        </tr>
+        <tr>
+          <td>[</td>
+          <td><a href="CodeAsm/leftbracket.html#LBRACKET" title="VE_LBRACKET">LBRACKET</a></td>
+          <td>( --  ) Compiler<br>R( -- )<br>put system to interpreter state</td>
+        </tr>
+        <tr>
+          <td>[']</td>
+          <td><a href="CodeAsm/brackettick.html#BRACKETTICK" title="VE_BRACKETTICK">BRACKETTICK</a></td>
+          <td>( -- XT ) Compiler<br>R( -- )<br>what does ' in the interpreter mode do in colon definitions</td>
+        </tr>
+        <tr>
+          <td>\</td>
+          <td><a href="CodeAsm/backslash.html#BACKSLASH" title="VE_BACKSLASH">BACKSLASH</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>everything up to the end of the current line is a comment</td>
+        </tr>
+        <tr>
+          <td>]</td>
+          <td><a href="CodeAsm/rightbracket.html#RBRACKET" title="VE_RBRACKET">RBRACKET</a></td>
+          <td>( --  ) Compiler<br>R( -- )<br>turn on compiler</td>
+        </tr>
+        <tr>
+          <td>abort</td>
+          <td><a href="CodeAsm/abort.html#ABORT" title="VE_ABORT">ABORT</a></td>
+          <td>( n*x -- ) Exceptions<br>R( n*y -- )<br>send an exception -1</td>
+        </tr>
+        <tr>
+          <td>abort&quot;</td>
+          <td><a href="CodeAsm/abortstring.html#ABORTSTRING" title="VE_ABORTSTRING">ABORTSTRING</a></td>
+          <td>( n*x -- ) Exceptions<br>R( n*y -- )<br>check flag. If true emit some text and throw  exception -2</td>
+        </tr>
+        <tr>
+          <td>abort&quot;</td>
+          <td><a href="CodeAsm/abortstring.html#ABORTSTRING" title="VE_ABORTSTRING">ABORTSTRING</a></td>
+          <td>( n*x -- ) Exceptions<br>R( n*y -- )<br>check flag. If true emit some text and throw  exception -2</td>
+        </tr>
+        <tr>
+          <td>abs</td>
+          <td><a href="CodeAsm/abs.html#ABS" title="VE_ABS">ABS</a></td>
+          <td>( n1 -- u1 ) Arithmetics<br>R( -- )<br>get the absolute value</td>
+        </tr>
+        <tr>
+          <td>accept</td>
+          <td><a href="CodeAsm/accept.html#ACCEPT" title="VE_ACCEPT">ACCEPT</a></td>
+          <td>( addr n1 -- n2 ) System<br>R( -- )<br>reads a line with with KEY into addr until n2 characters are reveived or cr/lf detected.</td>
+        </tr>
+        <tr>
+          <td>again</td>
+          <td><a href="CodeAsm/again.html#AGAIN" title="VE_AGAIN">AGAIN</a></td>
+          <td>( addr -- ) Control Structure<br>R( -- )<br>go back to begin</td>
+        </tr>
+        <tr>
+          <td>allot</td>
+          <td><a href="CodeAsm/allot.html#ALLOT" title="VE_ALLOT">ALLOT</a></td>
+          <td>( n -- ) System<br>R( -- )<br>allocate memory in RAM</td>
+        </tr>
+        <tr>
+          <td>and</td>
+          <td><a href="CodeAsm/and.html#AND" title="VE_AND">AND</a></td>
+          <td>( n1 n2 -- n3 ) Logic<br>R( -- )<br>bitwise and</td>
+        </tr>
+        <tr>
+          <td>base</td>
+          <td><a href="CodeAsm/base.html#BASE" title="VE_BASE">BASE</a></td>
+          <td>( -- addr ) Numeric IO<br>R( -- )<br>base fo numeric IO</td>
+        </tr>
+        <tr>
+          <td>baud0</td>
+          <td><a href="CodeAsm/usart.html#BAUD0" title="VE_BAUD0">BAUD0</a></td>
+          <td>( -- v) System Value<br>R( -- )<br>returns usart0 baudrate</td>
+        </tr>
+        <tr>
+          <td>begin</td>
+          <td><a href="CodeAsm/begin.html#BEGIN" title="VE_BEGIN">BEGIN</a></td>
+          <td>( -- addr ) Control Structure<br>R( -- )<br>start a control structture</td>
+        </tr>
+        <tr>
+          <td>bl</td>
+          <td><a href="CodeAsm/bl.html#BL" title="VE_BL">BL</a></td>
+          <td>( -- 32 ) Character IO<br>R( -- )<br>put ascii code of the blank to the stack</td>
+        </tr>
+        <tr>
+          <td>c!</td>
+          <td><a href="CodeAsm/cstore.html#CSTORE" title="VE_CSTORE">CSTORE</a></td>
+          <td>( c addr -- ) Memory<br>R( -- )<br>store a byte to RAM address</td>
+        </tr>
+        <tr>
+          <td>c@</td>
+          <td><a href="CodeAsm/cfetch.html#CFETCH" title="VE_CFETCH">CFETCH</a></td>
+          <td>( addr - c1 ) Memory<br>R( -- )<br>fetch a single byte from RAM (or IO or CPU register)</td>
+        </tr>
+        <tr>
+          <td>case</td>
+          <td><a href="CodeAsm/case.html#CASE" title="VE_CASE">CASE</a></td>
+          <td>( -- 0 ) Control Structure<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>case</td>
+          <td><a href="CodeAsm/case.html#CASE" title="VE_CASE">CASE</a></td>
+          <td>( -- 0 ) Control Structure<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>catch</td>
+          <td><a href="CodeAsm/catch.html#CATCH" title="VE_CATCH">CATCH</a></td>
+          <td>( xt -- ) Exceptions<br>R( -- ) or R( ny -- )<br>execute the XT and restore stack frame if an exception is thrown</td>
+        </tr>
+        <tr>
+          <td>char</td>
+          <td><a href="CodeAsm/char.html#CHAR" title="VE_CHAR">CHAR</a></td>
+          <td>( -- c ) Tools<br>R( -- )<br>first character of the next word</td>
+        </tr>
+        <tr>
+          <td>cmove&gt;</td>
+          <td><a href="CodeAsm/cmove_g.html#CMOVE_G" title="VE_CMOVE_G">CMOVE_G</a></td>
+          <td>(addr-from addr-to n -- ) Memory<br>R( -- )<br>copy data in RAM</td>
+        </tr>
+        <tr>
+          <td>cold</td>
+          <td><a href="CodeAsm/cold.html#COLD" title="VE_COLD">COLD</a></td>
+          <td>( -- ) System<br>R( -- )<br>main entry word. executes turnkey operation and executes quit</td>
+        </tr>
+        <tr>
+          <td>compile</td>
+          <td><a href="CodeAsm/compile.html#COMPILE" title="VE_COMPILE">COMPILE</a></td>
+          <td>( -- ) Dictionary<br>R( -- )<br>copy the next flash cell to HERE</td>
+        </tr>
+        <tr>
+          <td>constant</td>
+          <td><a href="CodeAsm/constant.html#CONSTANT" title="VE_CONSTANT">CONSTANT</a></td>
+          <td>( n -- ) Compiler<br>R( -- )<br>create a named constant</td>
+        </tr>
+        <tr>
+          <td>count</td>
+          <td><a href="CodeAsm/count.html#COUNT" title="VE_COUNT">COUNT</a></td>
+          <td>( addr -- addr+1 n) String<br>R( -- )<br>addr is the address of a counted string in RAM</td>
+        </tr>
+        <tr>
+          <td>cr</td>
+          <td><a href="CodeAsm/cr.html#CR" title="VE_CR">CR</a></td>
+          <td>( -- ) Character IO<br>R( -- )<br>emits CR/LF</td>
+        </tr>
+        <tr>
+          <td>create</td>
+          <td><a href="CodeAsm/create.html#CREATE" title="VE_CREATE">CREATE</a></td>
+          <td>( -- ) Dictionary<br>R( -- )<br>create a complete dictionary header.</td>
+        </tr>
+        <tr>
+          <td>cscan</td>
+          <td><a href="CodeAsm/char-scan.html#CSCAN" title="VE_CSCAN">CSCAN</a></td>
+          <td>( addr1 n1 c -- addr1 n2 ) String<br>R( -- )<br>Scan string at addr1/n1 until first c, leaving addr1/n2, char at n2 is last non-c character</td>
+        </tr>
+        <tr>
+          <td>cskip</td>
+          <td><a href="CodeAsm/char-skip.html#CSKIP" title="VE_CSKIP">CSKIP</a></td>
+          <td>( addr1 n1 c -- addr2 n2 ) String<br>R( -- )<br>skips leading occurancies in string at addr1/n1 leaving addr2/n2 pointing to the 1st non-c character</td>
+        </tr>
+        <tr>
+          <td>d+</td>
+          <td><a href="CodeAsm/d-plus.html#DPLUS" title="VE_DPLUS">DPLUS</a></td>
+          <td>( d1 d2 -- d3) Arithmetics<br>R( -- )<br>add double cell values</td>
+        </tr>
+        <tr>
+          <td>d+</td>
+          <td><a href="CodeAsm/d-plus.html#DPLUS" title="VE_DPLUS">DPLUS</a></td>
+          <td>( d1 d2 -- d3) Arithmetics<br>R( -- )<br>add double cell values</td>
+        </tr>
+        <tr>
+          <td>d-</td>
+          <td><a href="CodeAsm/d-minus.html#DMINUS" title="VE_DMINUS">DMINUS</a></td>
+          <td>( d1 d2 -- d3 ) Arithmetics<br>R( -- )<br>subtract double cell values</td>
+        </tr>
+        <tr>
+          <td>d-</td>
+          <td><a href="CodeAsm/d-minus.html#DMINUS" title="VE_DMINUS">DMINUS</a></td>
+          <td>( d1 d2 -- d3 ) Arithmetics<br>R( -- )<br>subtract double cell values</td>
+        </tr>
+        <tr>
+          <td>d2*</td>
+          <td><a href="CodeAsm/d-2star.html#D2STAR" title="VE_D2STAR">D2STAR</a></td>
+          <td>( d1 -- d2 ) Arithmetics<br>R( -- )<br>shift a double cell left</td>
+        </tr>
+        <tr>
+          <td>d2*</td>
+          <td><a href="CodeAsm/d-2star.html#D2STAR" title="VE_D2STAR">D2STAR</a></td>
+          <td>( d1 -- d2 ) Arithmetics<br>R( -- )<br>shift a double cell left</td>
+        </tr>
+        <tr>
+          <td>d2/</td>
+          <td><a href="CodeAsm/d-2slash.html#D2SLASH" title="VE_D2SLASH">D2SLASH</a></td>
+          <td>( d1 -- d2 ) Arithmetics<br>R( -- )<br>shift a double cell value right</td>
+        </tr>
+        <tr>
+          <td>d&lt;</td>
+          <td><a href="CodeAsm/d-less.html#DLESS" title="VE_DLESS">DLESS</a></td>
+          <td>( d1 d2 -- flasg) Compare<br>R( -- )<br>compare two values</td>
+        </tr>
+        <tr>
+          <td>d&gt;</td>
+          <td><a href="CodeAsm/d-greater.html#DGREATER" title="VE_DGREATER">DGREATER</a></td>
+          <td>( d1 d2 -- flag ) Compare<br>R( -- )<br>compares two values (signed)</td>
+        </tr>
+        <tr>
+          <td>d&gt;s</td>
+          <td><a href="CodeAsm/d_to_s.html#D2S" title="VE_D2S">D2S</a></td>
+          <td>( d1 -- n1 ) Conversion<br>R( -- )<br>shrink double cell value to single cell.</td>
+        </tr>
+        <tr>
+          <td>decimal</td>
+          <td><a href="CodeAsm/decimal.html#DECIMAL" title="VE_DECIMAL">DECIMAL</a></td>
+          <td>( -- ) Numeric IO<br>R( -- )<br>set base to 10 (decimal)</td>
+        </tr>
+        <tr>
+          <td>defer!</td>
+          <td><a href="CodeAsm/defer-store.html#DEFERSTORE" title="VE_DEFERSTORE">DEFERSTORE</a></td>
+          <td>( xt1 xt2 -- ) System<br>R( -- )<br>stores xt1 as the xt to be executed when xt2 is called</td>
+        </tr>
+        <tr>
+          <td>defer@</td>
+          <td><a href="CodeAsm/defer-fetch.html#DEFERFETCH" title="VE_DEFERFETCH">DEFERFETCH</a></td>
+          <td>( xt1 -- xt2 ) System<br>R( -- )<br>returns the XT assoziates with the given XT</td>
+        </tr>
+        <tr>
+          <td>depth</td>
+          <td><a href="CodeAsm/depth.html#DEPTH" title="VE_DEPTH">DEPTH</a></td>
+          <td>( -- n ) Stack<br>R( -- )<br>currently used data stack size in cells</td>
+        </tr>
+        <tr>
+          <td>digit</td>
+          <td><a href="CodeAsm/digit.html#DIGIT" title="VE_DIGIT">DIGIT</a></td>
+          <td>( c base -- number flag ) Numeric IO<br>R( -- )<br>convert character to number, set flag if successful</td>
+        </tr>
+        <tr>
+          <td>dinvert</td>
+          <td><a href="CodeAsm/d-invert.html#DINVERT" title="VE_DINVERT">DINVERT</a></td>
+          <td>( d1 -- d2) Arithmetics<br>R( -- )<br>flip all bits in the double cell value</td>
+        </tr>
+        <tr>
+          <td>dinvert</td>
+          <td><a href="CodeAsm/d-invert.html#DINVERT" title="VE_DINVERT">DINVERT</a></td>
+          <td>( d1 -- d2) Arithmetics<br>R( -- )<br>flip all bits in the double cell value</td>
+        </tr>
+        <tr>
+          <td>do</td>
+          <td><a href="CodeAsm/do.html#DO" title="VE_DO">DO</a></td>
+          <td>( -- addr ) Control Structure<br>R( -- )<br>start do .. [+]loop</td>
+        </tr>
+        <tr>
+          <td>does&gt;</td>
+          <td><a href="CodeAsm/does.html#DOES" title="VE_DOES">DOES</a></td>
+          <td>( -- ) Compiler<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>dp</td>
+          <td><a href="CodeAsm/dp.html#DP" title="VE_DP">DP</a></td>
+          <td>( -- eaddr)  System Pointer<br>R( -- )<br>first unused address in flash (NRWW is always used)</td>
+        </tr>
+        <tr>
+          <td>drop</td>
+          <td><a href="CodeAsm/drop.html#DROP" title="VE_DROP">DROP</a></td>
+          <td>( n -- ) Stack<br>R( -- )<br>drop TOS</td>
+        </tr>
+        <tr>
+          <td>dup</td>
+          <td><a href="CodeAsm/dup.html#DUP" title="VE_DUP">DUP</a></td>
+          <td>( n -- n n ) Stack<br>R( -- )<br>duplicate TOS</td>
+        </tr>
+        <tr>
+          <td>e!</td>
+          <td><a href="CodeAsm/estore.html#ESTORE" title="VE_ESTORE">ESTORE</a></td>
+          <td>( n addr -- ) Memory<br>R( -- )<br>write to eeprom address</td>
+        </tr>
+        <tr>
+          <td>e@</td>
+          <td><a href="CodeAsm/efetch.html#EFETCH" title="VE_EFETCH">EFETCH</a></td>
+          <td>( addr - n) Memory<br>R( -- )<br>read 2 bytes from eeprom</td>
+        </tr>
+        <tr>
+          <td>edp</td>
+          <td><a href="CodeAsm/edp.html#EDP" title="VE_EDP">EDP</a></td>
+          <td>( -- eaddr) System Pointer<br>R( -- )<br>first unused address in eeprom</td>
+        </tr>
+        <tr>
+          <td>else</td>
+          <td><a href="CodeAsm/else.html#ELSE" title="VE_ELSE">ELSE</a></td>
+          <td>( addr1 -- addr2) Compiler<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>emit</td>
+          <td><a href="CodeAsm/emit.html#EMIT" title="VE_EMIT">EMIT</a></td>
+          <td>( -- eaddr) Character IO<br>R( -- )<br>fetch the emit vector and execute it</td>
+        </tr>
+        <tr>
+          <td>emit?</td>
+          <td><a href="CodeAsm/emitq.html#EMITQ" title="VE_EMITQ">EMITQ</a></td>
+          <td>( -- c) Character IO<br>R( -- )<br>fetch emit? vector and execute it</td>
+        </tr>
+        <tr>
+          <td>endcase</td>
+          <td><a href="CodeAsm/endcase.html#ENDCASE" title="VE_ENDCASE">ENDCASE</a></td>
+          <td>( f -- ) Compiler<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>endcase</td>
+          <td><a href="CodeAsm/endcase.html#ENDCASE" title="VE_ENDCASE">ENDCASE</a></td>
+          <td>( f -- ) Compiler<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>endof</td>
+          <td><a href="CodeAsm/endof.html#ENDOF" title="VE_ENDOF">ENDOF</a></td>
+          <td>( addr1 -- addr2 ) Compiler<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>endof</td>
+          <td><a href="CodeAsm/endof.html#ENDOF" title="VE_ENDOF">ENDOF</a></td>
+          <td>( addr1 -- addr2 ) Compiler<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>execute</td>
+          <td><a href="CodeAsm/execute.html#EXECUTE" title="VE_EXECUTE">EXECUTE</a></td>
+          <td>( xt -- ) System<br>R( -- )<br>execute XT</td>
+        </tr>
+        <tr>
+          <td>exit</td>
+          <td><a href="CodeAsm/exit.html#EXIT" title="VE_EXIT">EXIT</a></td>
+          <td>( -- ) Compiler<br>R( xt -- )<br>end of current colon word</td>
+        </tr>
+        <tr>
+          <td>f_cpu</td>
+          <td><a href="CodeAsm/f_cpu.html#F_CPU" title="VE_F_CPU">F_CPU</a></td>
+          <td>( -- f_cou ) System<br>R( -- )<br>put the cpu frequency on stack</td>
+        </tr>
+        <tr>
+          <td>find</td>
+          <td><a href="CodeAsm/find.html#FIND" title="VE_FIND">FIND</a></td>
+          <td>( addr --  -- [ addr 0 ] | [ xt [-1|1]] ) Tools<br>R( -- )<br>search dictionary</td>
+        </tr>
+        <tr>
+          <td>handler</td>
+          <td><a href="CodeAsm/handler.html#HANDLER" title="VE_HANDLER">HANDLER</a></td>
+          <td>( -- addr ) Exceptions<br>R( -- )<br>used by catch/throw</td>
+        </tr>
+        <tr>
+          <td>heap</td>
+          <td><a href="CodeAsm/heap.html#HEAP" title="VE_HEAP">HEAP</a></td>
+          <td>( -- eaddr) System Pointer<br>R( -- )<br> address of first unallocated RAM</td>
+        </tr>
+        <tr>
+          <td>here</td>
+          <td><a href="CodeAsm/here.html#HERE" title="VE_HERE">HERE</a></td>
+          <td>( -- addr ) System Pointer<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>hex</td>
+          <td><a href="CodeAsm/hex.html#HEX" title="VE_HEX">HEX</a></td>
+          <td>( -- ) Numeric IO<br>R( -- )<br>set base to 16 (decimal)</td>
+        </tr>
+        <tr>
+          <td>hld</td>
+          <td><a href="CodeAsm/hld.html#HLD" title="VE_HLD">HLD</a></td>
+          <td>( -- addr ) Numeric IO<br>R( -- )<br>address of buffer for pictured numeric output</td>
+        </tr>
+        <tr>
+          <td>hold</td>
+          <td><a href="CodeAsm/hold.html#HOLD" title="VE_HOLD">HOLD</a></td>
+          <td>( c -- ) Numeric IO<br>R( -- )<br>prepend character to pictured numeric output buffer</td>
+        </tr>
+        <tr>
+          <td>i</td>
+          <td><a href="CodeAsm/i.html#I" title="VE_I">I</a></td>
+          <td>( -- n ) Control Structure<br>R( loop-sys -- loop-sys)<br>current loop counter</td>
+        </tr>
+        <tr>
+          <td>i!</td>
+          <td><a href="CodeAsm/istore.html#ISTORE" title="VE_ISTORE">ISTORE</a></td>
+          <td>( n addr -- ) Memory<br>R( -- )<br>writes a cell in flash</td>
+        </tr>
+        <tr>
+          <td>i@</td>
+          <td><a href="CodeAsm/ifetch.html#IFETCH" title="VE_IFETCH">IFETCH</a></td>
+          <td>( addr -- n1 ) Memory<br>R( -- )<br>reads a cell from flash, addr is cell address, not byte addres first byte gets into the lower word on tos</td>
+        </tr>
+        <tr>
+          <td>icount</td>
+          <td><a href="CodeAsm/icount.html#ICOUNT" title="VE_ICOUNT">ICOUNT</a></td>
+          <td>( adr -- adr n )  Tools<br>R( -- )<br>get count byte out of packed counted string in flash</td>
+        </tr>
+        <tr>
+          <td>idump</td>
+          <td><a href="CodeAsm/idump.html#IDUMP" title="VE_IDUMP">IDUMP</a></td>
+          <td>( addr len -- ) Tools<br>R( -- )<br>dumps flash memory beginning with address addr and len cells long</td>
+        </tr>
+        <tr>
+          <td>idump</td>
+          <td><a href="CodeAsm/idump.html#IDUMP" title="VE_IDUMP">IDUMP</a></td>
+          <td>( addr len -- ) Tools<br>R( -- )<br>dumps flash memory beginning with address addr and len cells long</td>
+        </tr>
+        <tr>
+          <td>if</td>
+          <td><a href="CodeAsm/if.html#IF" title="VE_IF">IF</a></td>
+          <td>( -- addr ) Control Structure<br>R( -- )<br>start conditional branch</td>
+        </tr>
+        <tr>
+          <td>immediate</td>
+          <td><a href="CodeAsm/immediate.html#IMMEDIATE" title="VE_IMMEDIATE">IMMEDIATE</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>set immediate flag</td>
+        </tr>
+        <tr>
+          <td>int</td>
+          <td><a href="CodeAsm/intx.html#INTON" title="VE_INTON">INTON</a></td>
+          <td>( --  )  Interrupt<br>R( -- )<br>turns on all interrupts</td>
+        </tr>
+        <tr>
+          <td>int!</td>
+          <td><a href="CodeAsm/intx.html#INTSTORE" title="VE_INTSTORE">INTSTORE</a></td>
+          <td>( xt i -- )  Interrupt<br>R( -- )<br>stores XT as interrupt vector i</td>
+        </tr>
+        <tr>
+          <td>int@</td>
+          <td><a href="CodeAsm/intx.html#INTFETCH" title="VE_INTFETCH">INTFETCH</a></td>
+          <td>( i -- xt ) Interrupt<br>R( -- )<br>fetches XT from interrupt vector i</td>
+        </tr>
+        <tr>
+          <td>interpret</td>
+          <td><a href="CodeAsm/interpret.html#INTERPRET" title="VE_INTERPRET">INTERPRET</a></td>
+          <td>( -- ) System<br>R(i*x - j*x )<br>interpret input word by word. may throw exceptions</td>
+        </tr>
+        <tr>
+          <td>invert</td>
+          <td><a href="CodeAsm/invert.html#INVERT" title="VE_INVERT">INVERT</a></td>
+          <td>( n1 -- n2) Arithmetics<br>R( -- )<br>1-complement of TOS</td>
+        </tr>
+        <tr>
+          <td>is</td>
+          <td><a href="CodeAsm/is.html#IS" title="VE_IS">IS</a></td>
+          <td>( xt1 c&lt;char&gt; -- ) System<br>R( --)<br>stores xt into defer or compiles code to do so at runtime</td>
+        </tr>
+        <tr>
+          <td>is</td>
+          <td><a href="CodeAsm/is.html#IS" title="VE_IS">IS</a></td>
+          <td>( xt1 c&lt;char&gt; -- ) System<br>R( --)<br>stores xt into defer or compiles code to do so at runtime</td>
+        </tr>
+        <tr>
+          <td>itype</td>
+          <td><a href="CodeAsm/itype.html#ITYPE" title="VE_ITYPE">ITYPE</a></td>
+          <td>( addr n --  ) Tools<br>R( -- )<br>reads packed string from flash and emit it</td>
+        </tr>
+        <tr>
+          <td>j</td>
+          <td><a href="CodeAsm/j.html#J" title="VE_J">J</a></td>
+          <td>( -- n ) Control Structure<br>R( loop-sys1 loop-sys2 -- loop-sys1 loop-sys2)<br>loop counter of outer loop</td>
+        </tr>
+        <tr>
+          <td>key</td>
+          <td><a href="CodeAsm/key.html#KEY" title="VE_KEY">KEY</a></td>
+          <td>( -- c ) Character IO<br>R( -- )<br>fetch key vector and execute it</td>
+        </tr>
+        <tr>
+          <td>key?</td>
+          <td><a href="CodeAsm/keyq.html#KEYQ" title="VE_KEYQ">KEYQ</a></td>
+          <td>( -- f) Character IO<br>R( -- )<br>fetch 'key? vector and execute it. Leave true if a character can be read, false otherwise</td>
+        </tr>
+        <tr>
+          <td>leave</td>
+          <td><a href="CodeAsm/leave.html#LEAVE" title="VE_LEAVE">LEAVE</a></td>
+          <td>( -- )<br>R(next limit counter -- next )<br>runtime of leave</td>
+        </tr>
+        <tr>
+          <td>leave</td>
+          <td><a href="CodeAsm/leave.html#LEAVE" title="VE_LEAVE">LEAVE</a></td>
+          <td>( -- )<br>R(next limit counter -- next )<br>runtime of leave</td>
+        </tr>
+        <tr>
+          <td>literal</td>
+          <td><a href="CodeAsm/literal.html#LITERAL" title="VE_LITERAL">LITERAL</a></td>
+          <td>( n -- ) Compiler<br>R( -- )<br>compile a literal in colon defintions</td>
+        </tr>
+        <tr>
+          <td>log2</td>
+          <td><a href="CodeAsm/log2.html#LOG2" title="VE_LOG2">LOG2</a></td>
+          <td>( n1 -- n2 ) Arithmetics<br>R( -- )<br>logarithm base 2 or highest set bitnumber</td>
+        </tr>
+        <tr>
+          <td>loop</td>
+          <td><a href="CodeAsm/loop.html#LOOP" title="VE_LOOP">LOOP</a></td>
+          <td>( addr -- ) Control Structure<br>R( -- )<br>cpmpile (loop) and resolve branch</td>
+        </tr>
+        <tr>
+          <td>lshift</td>
+          <td><a href="CodeAsm/lshift.html#LSHIFT" title="VE_LSHIFT">LSHIFT</a></td>
+          <td>( n1 n2 -- n3) Arithmetics<br>R( -- )<br>logical shift left</td>
+        </tr>
+        <tr>
+          <td>m*</td>
+          <td><a href="CodeAsm/mstar.html#MSTAR" title="VE_MSTAR">MSTAR</a></td>
+          <td>( n1 n2 -- d) Arithmetics<br>R( -- )<br>multiply 2 cells to a double cell</td>
+        </tr>
+        <tr>
+          <td>max</td>
+          <td><a href="CodeAsm/max.html#MAX" title="VE_MAX">MAX</a></td>
+          <td>( n1 n2 -- n1|n2 ) Compare<br>R( -- )<br>compare two values, leave the bigger one</td>
+        </tr>
+        <tr>
+          <td>min</td>
+          <td><a href="CodeAsm/min.html#MIN" title="VE_MIN">MIN</a></td>
+          <td>( n1 n2 -- n1|n2 ) Compare<br>R( -- )<br>compare two values leave the smaller one</td>
+        </tr>
+        <tr>
+          <td>mod</td>
+          <td><a href="CodeAsm/mod.html#MOD" title="VE_MOD">MOD</a></td>
+          <td>( n1 n2 -- n3) Arithmetics<br>R( -- )<br>remainder of division</td>
+        </tr>
+        <tr>
+          <td>negate</td>
+          <td><a href="CodeAsm/negate.html#NEGATE" title="VE_NEGATE">NEGATE</a></td>
+          <td>( n1 -- n2 ) Logic<br>R( -- )<br>2-complement</td>
+        </tr>
+        <tr>
+          <td>noop</td>
+          <td><a href="CodeAsm/noop.html#NOOP" title="VE_NOOP">NOOP</a></td>
+          <td>( -- ) Tools<br>R( -- )<br>do nothing</td>
+        </tr>
+        <tr>
+          <td>not</td>
+          <td><a href="CodeAsm/not.html#NOT" title="VE_NOT">NOT</a></td>
+          <td>( flag -- flag' ) Logic<br>R( -- )<br>identical to 0=</td>
+        </tr>
+        <tr>
+          <td>number</td>
+          <td><a href="CodeAsm/number.html#NUMBER" title="VE_NUMBER">NUMBER</a></td>
+          <td>(addr -- n ) Numeric IO<br>R( -- )<br>convert a word to a number, throw exception -1 on error</td>
+        </tr>
+        <tr>
+          <td>of</td>
+          <td><a href="CodeAsm/of.html#OF" title="VE_OF">OF</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>see case</td>
+        </tr>
+        <tr>
+          <td>of</td>
+          <td><a href="CodeAsm/of.html#OF" title="VE_OF">OF</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>see case</td>
+        </tr>
+        <tr>
+          <td>or</td>
+          <td><a href="CodeAsm/or.html#OR" title="VE_OR">OR</a></td>
+          <td>( n1 n2 -- n3 ) Logic<br>R( -- )<br>logical or</td>
+        </tr>
+        <tr>
+          <td>over</td>
+          <td><a href="CodeAsm/over.html#OVER" title="VE_OVER">OVER</a></td>
+          <td>( n1 n2 -- n1 n2 n1 ) Stack<br>R( -- )<br>stack manipulation</td>
+        </tr>
+        <tr>
+          <td>pad</td>
+          <td><a href="CodeAsm/pad.html#PAD" title="VE_PAD">PAD</a></td>
+          <td>( -- addr ) System Pointer<br>R( -- )<br>scratch buffer.</td>
+        </tr>
+        <tr>
+          <td>parse</td>
+          <td><a href="CodeAsm/parse.html#PARSE" title="VE_PARSE">PARSE</a></td>
+          <td>( char &quot;ccc&quot; -- c-addr u ) String<br>R( -- )<br>in input buffer parse ccc delimited string by the delimiter char.</td>
+        </tr>
+        <tr>
+          <td>pause</td>
+          <td><a href="CodeAsm/pause.html#PAUSE" title="VE_PAUSE">PAUSE</a></td>
+          <td>( -- ) Multitasking<br>R( -- )<br>fetch pause vector and execute it. may make a context/task switch</td>
+        </tr>
+        <tr>
+          <td>quit</td>
+          <td><a href="CodeAsm/quit.html#QUIT" title="VE_QUIT">QUIT</a></td>
+          <td>( -- ) System<br>R( -- )<br>main loop of amforth. accept - interpret in an endless loop</td>
+        </tr>
+        <tr>
+          <td>r&gt;</td>
+          <td><a href="CodeAsm/r_from.html#R_FROM" title="VE_R_FROM">R_FROM</a></td>
+          <td>( -- n ) Stack<br>R( n --)<br>move TOR to TOS</td>
+        </tr>
+        <tr>
+          <td>r@</td>
+          <td><a href="CodeAsm/r_fetch.html#R_FETCH" title="VE_R_FETCH">R_FETCH</a></td>
+          <td>( -- n) Stack<br>R( n -- n )<br>fetch content of TOR</td>
+        </tr>
+        <tr>
+          <td>recurse</td>
+          <td><a href="CodeAsm/recurse.html#RECURSE" title="VE_RECURSE">RECURSE</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>compile  XT of the word beeing currently defined into dictionary (! not conforming to ANS!)</td>
+        </tr>
+        <tr>
+          <td>refill</td>
+          <td><a href="CodeAsm/refill.html#REFILL" title="VE_REFILL">REFILL</a></td>
+          <td>( -- f ) IO<br>R( -- )<br>refills the input buffer</td>
+        </tr>
+        <tr>
+          <td>repeat</td>
+          <td><a href="CodeAsm/repeat.html#REPEAT" title="VE_REPEAT">REPEAT</a></td>
+          <td>(addr1 -- addr2 ) Control Structure<br>R( -- )<br>go back to begin</td>
+        </tr>
+        <tr>
+          <td>rot</td>
+          <td><a href="CodeAsm/rot.html#ROT" title="VE_ROT">ROT</a></td>
+          <td>( n1 n2 n3 -- n2 n3 n1) Stack<br>R( -- )<br>stack manupulation</td>
+        </tr>
+        <tr>
+          <td>rp</td>
+          <td><a href="CodeAsm/rp0.html#RP" title="VE_RP">RP</a></td>
+          <td>( -- addr) Stackpointer<br>R( -- )<br>address of variable to store the return stack pointer for inactive tasks</td>
+        </tr>
+        <tr>
+          <td>rp!</td>
+          <td><a href="CodeAsm/rpstore.html#RP_STORE" title="VE_RP_STORE">RP_STORE</a></td>
+          <td>( n  -- ) Stackpointer<br>R( -- xy)<br>set return stack pointer</td>
+        </tr>
+        <tr>
+          <td>rp0</td>
+          <td><a href="CodeAsm/rp0.html#RP0" title="VE_RP0">RP0</a></td>
+          <td>( -- addr) Stackpointer<br>R( -- )<br>start value of return stack</td>
+        </tr>
+        <tr>
+          <td>rp@</td>
+          <td><a href="CodeAsm/rpfetch.html#RP_FETCH" title="VE_RP_FETCH">RP_FETCH</a></td>
+          <td>(  -- n) Stackpointer<br>R( -- )<br>current return stack pointer address</td>
+        </tr>
+        <tr>
+          <td>rshift</td>
+          <td><a href="CodeAsm/rshift.html#RSHIFT" title="VE_RSHIFT">RSHIFT</a></td>
+          <td>( n1 n2 -- n3 ) Arithmetics<br>R( -- )<br>logical shift right</td>
+        </tr>
+        <tr>
+          <td>rx0</td>
+          <td><a href="CodeAsm/usart.html#RX0" title="VE_RX0">RX0</a></td>
+          <td>( -- c)  Hardware Access<br>R( --)<br>get 1 character from input queue, wait if needed</td>
+        </tr>
+        <tr>
+          <td>rx0?</td>
+          <td><a href="CodeAsm/usart.html#RX0Q" title="VE_RX0Q">RX0Q</a></td>
+          <td>( -- f)  Hardware Access<br>R( --)<br>check if unread characters are in the input queue.</td>
+        </tr>
+        <tr>
+          <td>s&quot;</td>
+          <td><a href="CodeAsm/squote.html#SQUOTE" title="VE_SQUOTE">SQUOTE</a></td>
+          <td>( &lt;cchar&gt; -- ) Compiler<br>R( -- )<br>compiles a string to flash, at runtime leaves ( -- addr count) on stack</td>
+        </tr>
+        <tr>
+          <td>s&quot;</td>
+          <td><a href="CodeAsm/squote.html#SQUOTE" title="VE_SQUOTE">SQUOTE</a></td>
+          <td>( &lt;cchar&gt; -- ) Compiler<br>R( -- )<br>compiles a string to flash, at runtime leaves ( -- addr count) on stack</td>
+        </tr>
+        <tr>
+          <td>s,</td>
+          <td><a href="CodeAsm/scomma.html#SCOMMA" title="VE_SCOMMA">SCOMMA</a></td>
+          <td>( addr len -- ) Compiler<br>R( -- )<br>compiles a string from RAM to Flash</td>
+        </tr>
+        <tr>
+          <td>s&gt;d</td>
+          <td><a href="CodeAsm/s_to_d.html#S2D" title="VE_S2D">S2D</a></td>
+          <td>( n1 -- d1 ) Conversion<br>R( -- )<br>extend (signed) single cell value to double cell</td>
+        </tr>
+        <tr>
+          <td>sign</td>
+          <td><a href="CodeAsm/sign.html#SIGN" title="VE_SIGN">SIGN</a></td>
+          <td>( n -- ) Numeric IO<br>R( -- )<br>place a - in HLD if value is negative</td>
+        </tr>
+        <tr>
+          <td>sleep</td>
+          <td><a href="CodeAsm/sleep.html#SLEEP" title="VE_SLEEP">SLEEP</a></td>
+          <td>( -- ) Interrupt<br>R( -- )<br>calls the MCU sleep instruction. Not useful itself!</td>
+        </tr>
+        <tr>
+          <td>source</td>
+          <td><a href="CodeAsm/source.html#SOURCE" title="VE_SOURCE">SOURCE</a></td>
+          <td>( addr1 u1 n-- addr2 u2 ) System<br>R( -- )<br>adjust string from addr1 to addr1+n, reduce length from u1 to u2</td>
+        </tr>
+        <tr>
+          <td>sp</td>
+          <td><a href="CodeAsm/sp0.html#SP" title="VE_SP">SP</a></td>
+          <td>( -- addr) Stackpointer<br>R( -- )<br>address of variable to store data stack pointer for inactive tasks</td>
+        </tr>
+        <tr>
+          <td>sp!</td>
+          <td><a href="CodeAsm/spstore.html#SP_STORE" title="VE_SP_STORE">SP_STORE</a></td>
+          <td>( addr -- i*x) Stackpointer<br>R( -- )<br>data stack pointer changed to addr</td>
+        </tr>
+        <tr>
+          <td>sp0</td>
+          <td><a href="CodeAsm/sp0.html#SP0" title="VE_SP0">SP0</a></td>
+          <td>( -- addr) Stackpointer<br>R( -- )<br>start of data stack</td>
+        </tr>
+        <tr>
+          <td>sp@</td>
+          <td><a href="CodeAsm/spfetch.html#SP_FETCH" title="VE_SP_FETCH">SP_FETCH</a></td>
+          <td>(  -- n) Stackpointer<br>R( -- )<br>current data stack pointer</td>
+        </tr>
+        <tr>
+          <td>space</td>
+          <td><a href="CodeAsm/space.html#SPACE" title="VE_SPACE">SPACE</a></td>
+          <td>( -- ) Character IO<br>R( -- )<br>emits a space (bl)</td>
+        </tr>
+        <tr>
+          <td>state</td>
+          <td><a href="CodeAsm/state.html#STATE" title="VE_STATE">STATE</a></td>
+          <td>( -- addr ) Compiler<br>R( -- )<br>system state</td>
+        </tr>
+        <tr>
+          <td>swap</td>
+          <td><a href="CodeAsm/swap.html#SWAP" title="VE_SWAP">SWAP</a></td>
+          <td>( n1 n2 -- n2 n1) Stack<br>R( -- )<br>stack manipulation</td>
+        </tr>
+        <tr>
+          <td>then</td>
+          <td><a href="CodeAsm/then.html#THEN" title="VE_THEN">THEN</a></td>
+          <td>( addr -- ) Compiler<br>R( -- )<br>finish if</td>
+        </tr>
+        <tr>
+          <td>throw</td>
+          <td><a href="CodeAsm/throw.html#THROW" title="VE_THROW">THROW</a></td>
+          <td>( n -- ) Exceptions<br>R( -- )<br>throw an exception</td>
+        </tr>
+        <tr>
+          <td>tib</td>
+          <td><a href="CodeAsm/tib.html#TIB" title="VE_TIB">TIB</a></td>
+          <td>( -- addr ) System Pointer<br>R( -- )<br>terminal input buffer address</td>
+        </tr>
+        <tr>
+          <td>to</td>
+          <td><a href="CodeAsm/to.html#TO" title="VE_TO">TO</a></td>
+          <td>( n &lt;name&gt; -- ) Tools<br>R( --)<br>store the TOS to value (an EEPROM 16bit cell)</td>
+        </tr>
+        <tr>
+          <td>turnkey</td>
+          <td><a href="CodeAsm/turnkey.html#TURNKEY" title="VE_TURNKEY">TURNKEY</a></td>
+          <td>( -- eaddr) System Pointer<br>R( -- )<br>address of the variable that holds an XT to be started by cold before quit takes over</td>
+        </tr>
+        <tr>
+          <td>tx0</td>
+          <td><a href="CodeAsm/usart.html#TX0" title="VE_TX0">TX0</a></td>
+          <td>(c -- ) Hardware Access<br>R( --)<br>put 1 character into output queue, wait if needed, enable UDRIE0 interrupt</td>
+        </tr>
+        <tr>
+          <td>tx0?</td>
+          <td><a href="CodeAsm/usart.html#TX0Q" title="VE_TX0Q">TX0Q</a></td>
+          <td>( -- f)  Hardware Access<br>R( --)<br>check if a character can be appended to output queue.</td>
+        </tr>
+        <tr>
+          <td>type</td>
+          <td><a href="CodeAsm/type.html#TYPE" title="VE_TYPE">TYPE</a></td>
+          <td>( addr n -- ) Character IO<br>R( -- )<br>emits a string</td>
+        </tr>
+        <tr>
+          <td>u*/mod</td>
+          <td><a href="CodeAsm/ustarslashmod.html#USTARSLASHMOD" title="VE_USTARSLASHMOD">USTARSLASHMOD</a></td>
+          <td>( u1 u2 u3 -- rem quot) Arithmetics<br>R( -- )<br>unsigned division with remainder u3 * u2 / u1</td>
+        </tr>
+        <tr>
+          <td>u.</td>
+          <td><a href="CodeAsm/udot.html#UDOT" title="VE_UDOT">UDOT</a></td>
+          <td>( n -- ) Numeric IO<br>R( -- )<br>unsigned numeric output</td>
+        </tr>
+        <tr>
+          <td>u.</td>
+          <td><a href="CodeAsm/udot.html#UDOT" title="VE_UDOT">UDOT</a></td>
+          <td>( n -- ) Numeric IO<br>R( -- )<br>unsigned numeric output</td>
+        </tr>
+        <tr>
+          <td>u/mod</td>
+          <td><a href="CodeAsm/uslashmod.html#USLASHMOD" title="VE_USLASHMOD">USLASHMOD</a></td>
+          <td>(u1 u2 -- rem quot) Arithmetics<br>R( -- )<br>unsigned division with remainder</td>
+        </tr>
+        <tr>
+          <td>u&lt;</td>
+          <td><a href="CodeAsm/uless.html#ULESS" title="VE_ULESS">ULESS</a></td>
+          <td>( u1 u2 -- flasg) Compare<br>R( -- )<br>compare values u1 &lt; u2 (unsigned)</td>
+        </tr>
+        <tr>
+          <td>u&gt;</td>
+          <td><a href="CodeAsm/ugreater.html#UGREATER" title="VE_UGREATER">UGREATER</a></td>
+          <td>( u1 u2 -- flag ) Compare<br>R( -- )<br>compares u1 &gt; u2 (unsigned)</td>
+        </tr>
+        <tr>
+          <td>um/mod</td>
+          <td><a href="CodeAsm/umslashmod.html#UMSLASHMOD" title="VE_UMSLASHMOD">UMSLASHMOD</a></td>
+          <td>( ud u2 -- rem quot) Arithmetics<br>R( -- )<br>unsigned division ud / u2 with remainder</td>
+        </tr>
+        <tr>
+          <td>unloop</td>
+          <td><a href="CodeAsm/unloop.html#UNLOOP" title="VE_UNLOOP">UNLOOP</a></td>
+          <td>( -- ) Control Structure<br>R(loop-sys -- )<br>remove loop-sys</td>
+        </tr>
+        <tr>
+          <td>until</td>
+          <td><a href="CodeAsm/until.html#UNTIL" title="VE_UNTIL">UNTIL</a></td>
+          <td>( addr -- ) Compiler<br>R( -- )<br>finish begin with conditional branch</td>
+        </tr>
+        <tr>
+          <td>unused</td>
+          <td><a href="CodeAsm/unused.html#UNUSED" title="VE_UNUSED">UNUSED</a></td>
+          <td>( -- n ) Tools<br>R( -- )<br>number of unused flash cells</td>
+        </tr>
+        <tr>
+          <td>up!</td>
+          <td><a href="CodeAsm/up.html#UP_STORE" title="VE_UP_STORE">UP_STORE</a></td>
+          <td>( addr -- ) System<br>R( -- )<br>set user pointer</td>
+        </tr>
+        <tr>
+          <td>up@</td>
+          <td><a href="CodeAsm/up.html#UP_FETCH" title="VE_UP_FETCH">UP_FETCH</a></td>
+          <td>( -- addr ) System<br>R( -- )<br>get user pointer</td>
+        </tr>
+        <tr>
+          <td>usart0</td>
+          <td><a href="CodeAsm/usart.html#USART0" title="VE_USART0">USART0</a></td>
+          <td>( -- ) Hardware Access<br>R( --)<br>initialize usart0</td>
+        </tr>
+        <tr>
+          <td>user</td>
+          <td><a href="CodeAsm/user.html#USER" title="VE_USER">USER</a></td>
+          <td>( n -- ) Compiler<br>R( -- )<br>define  a new user variable</td>
+        </tr>
+        <tr>
+          <td>value</td>
+          <td><a href="CodeAsm/value.html#VALUE" title="VE_VALUE">VALUE</a></td>
+          <td>( n &lt;name&gt; -- ) Compiler<br>R( -- )<br>allocate space for 1 cell in EEPROM. used in conjunction with TO</td>
+        </tr>
+        <tr>
+          <td>variable</td>
+          <td><a href="CodeAsm/variable.html#VARIABLE" title="VE_VARIABLE">VARIABLE</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>create a variable entry and allocate RAM space for it</td>
+        </tr>
+        <tr>
+          <td>ver</td>
+          <td><a href="CodeAsm/ver.html#VER" title="VE_VER">VER</a></td>
+          <td>( -- ) Tools<br>R( -- )<br>emits the version string</td>
+        </tr>
+        <tr>
+          <td>wdr</td>
+          <td><a href="CodeAsm/wdr.html#WDR" title="VE_WDR">WDR</a></td>
+          <td>( -- ) Interrupt<br>R( -- )<br>calls the MCU wdr instruction</td>
+        </tr>
+        <tr>
+          <td>while</td>
+          <td><a href="CodeAsm/while.html#WHILE" title="VE_WHILE">WHILE</a></td>
+          <td>( dest -- orig dest ) Control Structure<br>R( -- )<br>control structure</td>
+        </tr>
+        <tr>
+          <td>word</td>
+          <td><a href="CodeAsm/word.html#WORD" title="VE_WORD">WORD</a></td>
+          <td>( c -- addr ) Tools<br>R( -- )<br>skip leading delimiter characters and parses TIB to the next delimiter. copy the word into PAD</td>
+        </tr>
+        <tr>
+          <td>words</td>
+          <td><a href="CodeAsm/words.html#WORDS" title="VE_WORDS">WORDS</a></td>
+          <td>( -- ) Tools<br>R( -- )<br>emits a list of all (visible) words in the dictionary</td>
+        </tr>
+        <tr>
+          <td>words</td>
+          <td><a href="CodeAsm/words.html#WORDS" title="VE_WORDS">WORDS</a></td>
+          <td>( -- ) Tools<br>R( -- )<br>emits a list of all (visible) words in the dictionary</td>
+        </tr>
+        <tr>
+          <td>xor</td>
+          <td><a href="CodeAsm/xor.html#XOR" title="VE_XOR">XOR</a></td>
+          <td>( n1 n2 -- n3) Logic<br>R( -- )<br>exclusive or</td>
+        </tr>
+      </table>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.cs.ihtml" DO NOT REMOVE -->
+    <!-- ============== PATIČKA ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> Pro zobrazení (vložení) hlavičky je potřeba JavaScript </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

 /Articles/Forth/HTML/WordList.en.html
 ,0 → 1,1251
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
+<html>
+  <head>
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+    <title> Forth amforth </title>
+    <meta name="keywords" content="amforth programming language Forth ATmega ATMEL">
+    <meta name="description" content="amforth - laguage Forth for ATMEL ATmega">
+    <!-- AUTOINCLUDE START "Page/Head.en.ihtml" DO NOT REMOVE -->
+    <link rel="StyleSheet" href="../../../Web/CSS/MLAB.css" type="text/css" title="MLAB Basic Style">
+    <link rel="StyleSheet" href="../../../Web/CSS/MLAB_Print.css" type="text/css" media="print">
+    <link rel="shortcut icon" type="image/x-icon" href="../../../Web/PIC/MLAB.ico">
+    <script type="text/javascript" src="../../../Web/JS/MLAB_Menu.js"></script>
+    <!-- AUTOINCLUDE END -->
+  </head>
+  <body lang="en">
+    <!-- AUTOINCLUDE START "Page/Header.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== HEADER ============== -->
+    <div class="Header">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../");
+        DrawHeader();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the header </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- AUTOINCLUDE START "Page/Menu.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== MENU ============== -->
+    <div class="Menu">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../");
+        DrawMenu();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the menu </b><p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+    <!-- ============== TEXT ============== -->
+    <div class="Text">
+      <p class="Title">
+        amforth - Forth for ATmega
+      </p>
+      <p class="Subtitle">
+        This page provides cross reference of the language amforth. The list is
+        automaticaly generated drectly from assemble source files.
+      </p>
+      <h1> Vesion </h1>
+      <table class="Compact">
+        <tr>
+          <th colspan="2" class="center"> Basic information </th>
+        </tr>
+        <tr>
+          <td> amforth main page </td>
+          <td> <a href="http://amforth.sourceforge.net/">http://amforth.sourceforge.net/</a></td>
+        </tr>
+        <tr>
+          <td> amforth download page </td>
+          <td> <a href="http://sourceforge.net/projects/amforth">http://sourceforge.net/projects/amforth</a></td>
+        </tr>
+        <tr>
+          <td> Subversion server </td>
+          <td> <a href="https://amforth.svn.sourceforge.net/svnroot/amforth">https://amforth.svn.sourceforge.net/svnroot/amforth</a></td>
+        </tr>
+        <tr><th colspan="2">Subversion Info</th></tr><tr><td>URL</td><td> https://amforth.svn.sourceforge.net/svnroot/amforth/trunk</td></tr>
+<tr><td>Repository Root</td><td> https://amforth.svn.sourceforge.net/svnroot/amforth</td></tr>
+<tr><td>Repository UUID</td><td> 1be2a6a9-e81f-0410-9be0-e59bd151596a</td></tr>
+<tr><td>Last Changed Author</td><td> mtrute</td></tr>
+<tr><td>Last Changed Rev</td><td> 328</td></tr>
+<tr><td>Last Changed Date</td><td> 2007-06-11 08:42:09 +0200 (Mon, 11 Jun 2007)</td></tr>
+      </table>
+    <!--
+      <<ReadMe>>
+    -->
+      <h1> Vocabulary </h1>
+      <table>
+        <tr>
+          <th>Word</th>
+          <th>Label</th>
+          <th>Definition</th>
+        </tr>
+        <tr>
+          <td>!</td>
+          <td><a href="CodeAsm/store.html#STORE" title="VE_STORE">STORE</a></td>
+          <td>( n addr -- ) Memory<br>R( -- )<br>write 16bit to RAM memory (or IO or CPU registers)</td>
+        </tr>
+        <tr>
+          <td>#</td>
+          <td><a href="CodeAsm/sharp.html#SHARP" title="VE_SHARP">SHARP</a></td>
+          <td>( d1 -- d2) Numeric IO<br>R( -- )<br>compiles next digit to HLD</td>
+        </tr>
+        <tr>
+          <td>#&gt;</td>
+          <td><a href="CodeAsm/sharp_g.html#SHARP_G" title="VE_SHARP_G">SHARP_G</a></td>
+          <td>( d1 -- addr count ) Numeric IO<br>R( -- )<br>convert HLD buffer to a usable string</td>
+        </tr>
+        <tr>
+          <td>#int</td>
+          <td><a href="CodeAsm/intx.html#NUMINT" title="VE_NUMINT">NUMINT</a></td>
+          <td>( -- n )  Interrupt<br>R( -- )<br>number of interrupt vectors (0 based)</td>
+        </tr>
+        <tr>
+          <td>#s</td>
+          <td><a href="CodeAsm/sharp_s.html#SHARP_S" title="VE_SHARP_S">SHARP_S</a></td>
+          <td>( d1 -- 0) Numeric IO<br>R( -- )<br>call # until a value of zero is reached</td>
+        </tr>
+        <tr>
+          <td>#tib</td>
+          <td><a href="CodeAsm/sharptib.html#NUMBERTIB" title="VE_NUMBERTIB">NUMBERTIB</a></td>
+          <td>( -- addr ) System<br>R( -- )<br>address of variable holding the number of characters in TIB</td>
+        </tr>
+        <tr>
+          <td>'</td>
+          <td><a href="CodeAsm/tick.html#TICK" title="VE_TICK">TICK</a></td>
+          <td>( -- XT ) Dictionary<br>R( -- )<br>search dictionary, returns XT or throw an exception -13</td>
+        </tr>
+        <tr>
+          <td>(</td>
+          <td><a href="CodeAsm/lparenthesis.html#LPARENTHESIS" title="VE_LPARENTHESIS">LPARENTHESIS</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>skip everything up to the closing bracket on the same line</td>
+        </tr>
+        <tr>
+          <td>*</td>
+          <td><a href="CodeAsm/star.html#MUL" title="VE_MUL">MUL</a></td>
+          <td>( n1 n2 -- n3 ) Arithmetics<br>R( -- )<br>multiply routine</td>
+        </tr>
+        <tr>
+          <td>*/</td>
+          <td><a href="CodeAsm/starslash.html#STARSLASH" title="VE_STARSLASH">STARSLASH</a></td>
+          <td>(n1 n2 n3 -- n4) Arithmetics<br>R( -- )<br>signed multiply and division with double precision intermediate</td>
+        </tr>
+        <tr>
+          <td>*/mod</td>
+          <td><a href="CodeAsm/starslashmod.html#STARSLASHMOD" title="VE_STARSLASHMOD">STARSLASHMOD</a></td>
+          <td>( n1 n2 n3 -- rem quot) Arithmetics<br>R( -- )<br>signed multiply and division  with double precision intermediate and remainder</td>
+        </tr>
+        <tr>
+          <td>+</td>
+          <td><a href="CodeAsm/plus.html#PLUS" title="VE_PLUS">PLUS</a></td>
+          <td>( n1 n2 -- n3) Arithmetics<br>R( -- )<br>addition</td>
+        </tr>
+        <tr>
+          <td>+!</td>
+          <td><a href="CodeAsm/plusstore.html#PLUSSTORE" title="VE_PLUSSTORE">PLUSSTORE</a></td>
+          <td>( n addr -- ) Arithmetics<br>R( -- )<br>add value to content of RAM address</td>
+        </tr>
+        <tr>
+          <td>+loop</td>
+          <td><a href="CodeAsm/plusloop.html#PLOOP" title="VE_PLOOP">PLOOP</a></td>
+          <td>( addr -- ) Control Structure<br>R( -- )<br>compile +loop and resolve branch</td>
+        </tr>
+        <tr>
+          <td>,</td>
+          <td><a href="CodeAsm/comma.html#COMMA" title="VE_COMMA">COMMA</a></td>
+          <td>( n -- ) Dictionary<br>R( -- )<br>compile 16 bit into flash at here.</td>
+        </tr>
+        <tr>
+          <td>-</td>
+          <td><a href="CodeAsm/minus.html#MINUS" title="VE_MINUS">MINUS</a></td>
+          <td>( n1 n2 -- n3 ) Arithmetics<br>R( -- )<br>subtract</td>
+        </tr>
+        <tr>
+          <td>.</td>
+          <td><a href="CodeAsm/dot.html#DOT" title="VE_DOT">DOT</a></td>
+          <td>( n -- ) Numeric IO<br>R( -- )<br>prints TOS in free number format</td>
+        </tr>
+        <tr>
+          <td>.&quot;</td>
+          <td><a href="CodeAsm/dotstring.html#DOTSTRING" title="VE_DOTSTRING">DOTSTRING</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>compiles string into dictionary to be typed at runtime</td>
+        </tr>
+        <tr>
+          <td>.&quot;</td>
+          <td><a href="CodeAsm/dotstring.html#DOTSTRING" title="VE_DOTSTRING">DOTSTRING</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>compiles string into dictionary to be typed at runtime</td>
+        </tr>
+        <tr>
+          <td>.s</td>
+          <td><a href="CodeAsm/dot-s.html#DOTS" title="VE_DOTS">DOTS</a></td>
+          <td>( -- ) Tools<br>R( -- )<br>stack dump</td>
+        </tr>
+        <tr>
+          <td>.s</td>
+          <td><a href="CodeAsm/dot-s.html#DOTS" title="VE_DOTS">DOTS</a></td>
+          <td>( -- ) Tools<br>R( -- )<br>stack dump</td>
+        </tr>
+        <tr>
+          <td>/</td>
+          <td><a href="CodeAsm/slash.html#SLASH" title="VE_SLASH">SLASH</a></td>
+          <td>( n1 n2 -- n3) Arithmetics<br>R( -- )<br>diviion</td>
+        </tr>
+        <tr>
+          <td>/int</td>
+          <td><a href="CodeAsm/intx.html#INTOFF" title="VE_INTOFF">INTOFF</a></td>
+          <td>( -- sreg ) Interrupt<br>R( -- )<br>turns off all interrupts and leaves SREG in TOS</td>
+        </tr>
+        <tr>
+          <td>/key</td>
+          <td><a href="CodeAsm/slashkey.html#SLASHKEY" title="VE_SLASHKEY">SLASHKEY</a></td>
+          <td>( -- f) Character IO<br>R( -- )<br>fetch 'key? vector and execute it if not zero. Leave true if a character can be read, false otherwise</td>
+        </tr>
+        <tr>
+          <td>/mod</td>
+          <td><a href="CodeAsm/slashmod.html#SLASHMOD" title="VE_SLASHMOD">SLASHMOD</a></td>
+          <td>( n1 n2 -- rem quot) Arithmetics<br>R( -- )<br>signed division n1/n2 with remainder</td>
+        </tr>
+        <tr>
+          <td>/string</td>
+          <td><a href="CodeAsm/slashstring.html#SLASHSTRING" title="VE_SLASHSTRING">SLASHSTRING</a></td>
+          <td>( addr1 u1 n-- addr2 u2 ) String<br>R( -- )<br>adjust string from addr1 to addr1+n, reduce length from u1 to u2</td>
+        </tr>
+        <tr>
+          <td>0</td>
+          <td><a href="CodeAsm/zero.html#ZERO" title="VE_ZERO">ZERO</a></td>
+          <td>( -- 0 ) Arithmetics<br>R( -- )<br>leaves the value 0 on TOS</td>
+        </tr>
+        <tr>
+          <td>0&lt;</td>
+          <td><a href="CodeAsm/lesszero.html#LESSZERO" title="VE_LESSZERO">LESSZERO</a></td>
+          <td>( n1 -- flag) Compare<br>R( -- )<br>compare with zero</td>
+        </tr>
+        <tr>
+          <td>0&lt;&gt;</td>
+          <td><a href="CodeAsm/notequalzero.html#NOTEQUALZERO" title="VE_NOTEQUALZERO">NOTEQUALZERO</a></td>
+          <td>( n -- flag ) Compare<br>R( -- )<br>compare with zero</td>
+        </tr>
+        <tr>
+          <td>0=</td>
+          <td><a href="CodeAsm/equalzero.html#EQUALZERO" title="VE_EQUALZERO">EQUALZERO</a></td>
+          <td>( n -- flag ) Compare<br>R( -- )<br>compare with 0 (zero)</td>
+        </tr>
+        <tr>
+          <td>0&gt;</td>
+          <td><a href="CodeAsm/greaterzero.html#GREATERZERO" title="VE_GREATERZERO">GREATERZERO</a></td>
+          <td>( n1 -- flag ) Compare<br>R( -- )<br>compare with zero</td>
+        </tr>
+        <tr>
+          <td>1+</td>
+          <td><a href="CodeAsm/1plus.html#1PLUS" title="VE_1PLUS">1PLUS</a></td>
+          <td>( n1 -- n2 ) Arithmetics<br>R( -- )<br>optimized increment</td>
+        </tr>
+        <tr>
+          <td>1-</td>
+          <td><a href="CodeAsm/1minus.html#1MINUS" title="VE_1MINUS">1MINUS</a></td>
+          <td>( n1 -- n2 ) Arithmetics<br>R( -- )<br>optimized decrement (CORE)</td>
+        </tr>
+        <tr>
+          <td>1ms</td>
+          <td><a href="CodeAsm/1ms.html#1MS" title="VE_1MS">1MS</a></td>
+          <td>( -- ) Time<br>R(--)<br>busy waits (almost) exactly 1 millisecond</td>
+        </tr>
+        <tr>
+          <td>2*</td>
+          <td><a href="CodeAsm/2star.html#2STAR" title="VE_2STAR">2STAR</a></td>
+          <td>( n1 -- n2 ) Arithmetics<br>R( -- )<br>arithmetic shift left</td>
+        </tr>
+        <tr>
+          <td>2/</td>
+          <td><a href="CodeAsm/2slash.html#2SLASH" title="VE_2SLASH">2SLASH</a></td>
+          <td>( n1 -- n2 ) Arithmetics<br>R( -- )<br>arithmetic shift right</td>
+        </tr>
+        <tr>
+          <td>:</td>
+          <td><a href="CodeAsm/colon.html#COLON" title="VE_COLON">COLON</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>create named entry in the dictionary</td>
+        </tr>
+        <tr>
+          <td>:noname</td>
+          <td><a href="CodeAsm/colon-noname.html#COLONNONAME" title="VE_COLONNONAME">COLONNONAME</a></td>
+          <td>( -- xt ) Compiler<br>R( -- )<br>create unnamed entry in the dictionary</td>
+        </tr>
+        <tr>
+          <td>;</td>
+          <td><a href="CodeAsm/semicolon.html#SEMICOLON" title="VE_SEMICOLON">SEMICOLON</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>finish colon defintion, compiles (exit) and returns to interpreter state</td>
+        </tr>
+        <tr>
+          <td>&lt;</td>
+          <td><a href="CodeAsm/less.html#LESS" title="VE_LESS">LESS</a></td>
+          <td>( n1 n2 -- flasg) Compare<br>R( -- )<br>compare two values</td>
+        </tr>
+        <tr>
+          <td>&lt;#</td>
+          <td><a href="CodeAsm/l_sharp.html#L_SHARP" title="VE_L_SHARP">L_SHARP</a></td>
+          <td>( -- ) Numeric IO<br>R( -- )<br>emties counted string at address from hld</td>
+        </tr>
+        <tr>
+          <td>&lt;&gt;</td>
+          <td><a href="CodeAsm/notequal.html#NOTEQUAL" title="VE_NOTEQUAL">NOTEQUAL</a></td>
+          <td>( n1 n2 -- flag) Compare<br>R( -- )<br>compare two values</td>
+        </tr>
+        <tr>
+          <td>=</td>
+          <td><a href="CodeAsm/equal.html#EQUAL" title="VE_EQUAL">EQUAL</a></td>
+          <td>( n1 n2 -- flag ) Compare<br>R( -- )<br>compares two values</td>
+        </tr>
+        <tr>
+          <td>&gt;</td>
+          <td><a href="CodeAsm/greater.html#GREATER" title="VE_GREATER">GREATER</a></td>
+          <td>( n1 n2 -- flag ) Compare<br>R( -- )<br>compares two values (signed)</td>
+        </tr>
+        <tr>
+          <td>&gt;&lt;</td>
+          <td><a href="CodeAsm/byteswap.html#BYTESWAP" title="VE_BYTESWAP">BYTESWAP</a></td>
+          <td>( n1 -- n2 ) Arithmetics<br>R( -- )<br>swap the bytes of the TOS</td>
+        </tr>
+        <tr>
+          <td>&gt;in</td>
+          <td><a href="CodeAsm/g_in.html#G_IN" title="VE_G_IN">G_IN</a></td>
+          <td>( -- addr ) System<br>R( -- )<br>pointer to current read position in TIB</td>
+        </tr>
+        <tr>
+          <td>&gt;r</td>
+          <td><a href="CodeAsm/to_r.html#TO_R" title="VE_TO_R">TO_R</a></td>
+          <td>( n -- ) Stack<br>R( -- n)<br>move TOS to TOR</td>
+        </tr>
+        <tr>
+          <td>?do</td>
+          <td><a href="CodeAsm/qdo.html#QDO" title="VE_QDO">QDO</a></td>
+          <td>( -- addr ) Control Structure<br>R( -- )<br>start do .. [+]loop</td>
+        </tr>
+        <tr>
+          <td>?do</td>
+          <td><a href="CodeAsm/qdo.html#QDO" title="VE_QDO">QDO</a></td>
+          <td>( -- addr ) Control Structure<br>R( -- )<br>start do .. [+]loop</td>
+        </tr>
+        <tr>
+          <td>?dup</td>
+          <td><a href="CodeAsm/qdup.html#QDUP" title="VE_QDUP">QDUP</a></td>
+          <td>( n1 -- [ n1 n1 ] | 0) Stack<br>R( -- )<br>duplicate TOS if non-zero</td>
+        </tr>
+        <tr>
+          <td>@</td>
+          <td><a href="CodeAsm/fetch.html#FETCH" title="VE_FETCH">FETCH</a></td>
+          <td>( addr -- n ) Memory<br>R( -- )<br>read 1 cell from RAM (or IO or CPU register)</td>
+        </tr>
+        <tr>
+          <td>Edefer</td>
+          <td><a href="CodeAsm/edefer.html#EDEFER" title="VE_EDEFER">EDEFER</a></td>
+          <td>( n &lt;name&gt; -- ) Compiler<br>R( -- )<br>creates a defer vector which is kept in eeprom.</td>
+        </tr>
+        <tr>
+          <td>Edefer</td>
+          <td><a href="CodeAsm/edefer.html#EDEFER" title="VE_EDEFER">EDEFER</a></td>
+          <td>( n &lt;name&gt; -- ) Compiler<br>R( -- )<br>creates a defer vector which is kept in eeprom.</td>
+        </tr>
+        <tr>
+          <td>Rdefer</td>
+          <td><a href="CodeAsm/rdefer.html#RDEFER" title="VE_RDEFER">RDEFER</a></td>
+          <td>( n &lt;name&gt; -- ) Compiler<br>R( -- )<br>creates a RAM based defer vector</td>
+        </tr>
+        <tr>
+          <td>Rdefer</td>
+          <td><a href="CodeAsm/rdefer.html#RDEFER" title="VE_RDEFER">RDEFER</a></td>
+          <td>( n &lt;name&gt; -- ) Compiler<br>R( -- )<br>creates a RAM based defer vector</td>
+        </tr>
+        <tr>
+          <td>[</td>
+          <td><a href="CodeAsm/leftbracket.html#LBRACKET" title="VE_LBRACKET">LBRACKET</a></td>
+          <td>( --  ) Compiler<br>R( -- )<br>put system to interpreter state</td>
+        </tr>
+        <tr>
+          <td>[']</td>
+          <td><a href="CodeAsm/brackettick.html#BRACKETTICK" title="VE_BRACKETTICK">BRACKETTICK</a></td>
+          <td>( -- XT ) Compiler<br>R( -- )<br>what does ' in the interpreter mode do in colon definitions</td>
+        </tr>
+        <tr>
+          <td>\</td>
+          <td><a href="CodeAsm/backslash.html#BACKSLASH" title="VE_BACKSLASH">BACKSLASH</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>everything up to the end of the current line is a comment</td>
+        </tr>
+        <tr>
+          <td>]</td>
+          <td><a href="CodeAsm/rightbracket.html#RBRACKET" title="VE_RBRACKET">RBRACKET</a></td>
+          <td>( --  ) Compiler<br>R( -- )<br>turn on compiler</td>
+        </tr>
+        <tr>
+          <td>abort</td>
+          <td><a href="CodeAsm/abort.html#ABORT" title="VE_ABORT">ABORT</a></td>
+          <td>( n*x -- ) Exceptions<br>R( n*y -- )<br>send an exception -1</td>
+        </tr>
+        <tr>
+          <td>abort&quot;</td>
+          <td><a href="CodeAsm/abortstring.html#ABORTSTRING" title="VE_ABORTSTRING">ABORTSTRING</a></td>
+          <td>( n*x -- ) Exceptions<br>R( n*y -- )<br>check flag. If true emit some text and throw  exception -2</td>
+        </tr>
+        <tr>
+          <td>abort&quot;</td>
+          <td><a href="CodeAsm/abortstring.html#ABORTSTRING" title="VE_ABORTSTRING">ABORTSTRING</a></td>
+          <td>( n*x -- ) Exceptions<br>R( n*y -- )<br>check flag. If true emit some text and throw  exception -2</td>
+        </tr>
+        <tr>
+          <td>abs</td>
+          <td><a href="CodeAsm/abs.html#ABS" title="VE_ABS">ABS</a></td>
+          <td>( n1 -- u1 ) Arithmetics<br>R( -- )<br>get the absolute value</td>
+        </tr>
+        <tr>
+          <td>accept</td>
+          <td><a href="CodeAsm/accept.html#ACCEPT" title="VE_ACCEPT">ACCEPT</a></td>
+          <td>( addr n1 -- n2 ) System<br>R( -- )<br>reads a line with with KEY into addr until n2 characters are reveived or cr/lf detected.</td>
+        </tr>
+        <tr>
+          <td>again</td>
+          <td><a href="CodeAsm/again.html#AGAIN" title="VE_AGAIN">AGAIN</a></td>
+          <td>( addr -- ) Control Structure<br>R( -- )<br>go back to begin</td>
+        </tr>
+        <tr>
+          <td>allot</td>
+          <td><a href="CodeAsm/allot.html#ALLOT" title="VE_ALLOT">ALLOT</a></td>
+          <td>( n -- ) System<br>R( -- )<br>allocate memory in RAM</td>
+        </tr>
+        <tr>
+          <td>and</td>
+          <td><a href="CodeAsm/and.html#AND" title="VE_AND">AND</a></td>
+          <td>( n1 n2 -- n3 ) Logic<br>R( -- )<br>bitwise and</td>
+        </tr>
+        <tr>
+          <td>base</td>
+          <td><a href="CodeAsm/base.html#BASE" title="VE_BASE">BASE</a></td>
+          <td>( -- addr ) Numeric IO<br>R( -- )<br>base fo numeric IO</td>
+        </tr>
+        <tr>
+          <td>baud0</td>
+          <td><a href="CodeAsm/usart.html#BAUD0" title="VE_BAUD0">BAUD0</a></td>
+          <td>( -- v) System Value<br>R( -- )<br>returns usart0 baudrate</td>
+        </tr>
+        <tr>
+          <td>begin</td>
+          <td><a href="CodeAsm/begin.html#BEGIN" title="VE_BEGIN">BEGIN</a></td>
+          <td>( -- addr ) Control Structure<br>R( -- )<br>start a control structture</td>
+        </tr>
+        <tr>
+          <td>bl</td>
+          <td><a href="CodeAsm/bl.html#BL" title="VE_BL">BL</a></td>
+          <td>( -- 32 ) Character IO<br>R( -- )<br>put ascii code of the blank to the stack</td>
+        </tr>
+        <tr>
+          <td>c!</td>
+          <td><a href="CodeAsm/cstore.html#CSTORE" title="VE_CSTORE">CSTORE</a></td>
+          <td>( c addr -- ) Memory<br>R( -- )<br>store a byte to RAM address</td>
+        </tr>
+        <tr>
+          <td>c@</td>
+          <td><a href="CodeAsm/cfetch.html#CFETCH" title="VE_CFETCH">CFETCH</a></td>
+          <td>( addr - c1 ) Memory<br>R( -- )<br>fetch a single byte from RAM (or IO or CPU register)</td>
+        </tr>
+        <tr>
+          <td>case</td>
+          <td><a href="CodeAsm/case.html#CASE" title="VE_CASE">CASE</a></td>
+          <td>( -- 0 ) Control Structure<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>case</td>
+          <td><a href="CodeAsm/case.html#CASE" title="VE_CASE">CASE</a></td>
+          <td>( -- 0 ) Control Structure<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>catch</td>
+          <td><a href="CodeAsm/catch.html#CATCH" title="VE_CATCH">CATCH</a></td>
+          <td>( xt -- ) Exceptions<br>R( -- ) or R( ny -- )<br>execute the XT and restore stack frame if an exception is thrown</td>
+        </tr>
+        <tr>
+          <td>char</td>
+          <td><a href="CodeAsm/char.html#CHAR" title="VE_CHAR">CHAR</a></td>
+          <td>( -- c ) Tools<br>R( -- )<br>first character of the next word</td>
+        </tr>
+        <tr>
+          <td>cmove&gt;</td>
+          <td><a href="CodeAsm/cmove_g.html#CMOVE_G" title="VE_CMOVE_G">CMOVE_G</a></td>
+          <td>(addr-from addr-to n -- ) Memory<br>R( -- )<br>copy data in RAM</td>
+        </tr>
+        <tr>
+          <td>cold</td>
+          <td><a href="CodeAsm/cold.html#COLD" title="VE_COLD">COLD</a></td>
+          <td>( -- ) System<br>R( -- )<br>main entry word. executes turnkey operation and executes quit</td>
+        </tr>
+        <tr>
+          <td>compile</td>
+          <td><a href="CodeAsm/compile.html#COMPILE" title="VE_COMPILE">COMPILE</a></td>
+          <td>( -- ) Dictionary<br>R( -- )<br>copy the next flash cell to HERE</td>
+        </tr>
+        <tr>
+          <td>constant</td>
+          <td><a href="CodeAsm/constant.html#CONSTANT" title="VE_CONSTANT">CONSTANT</a></td>
+          <td>( n -- ) Compiler<br>R( -- )<br>create a named constant</td>
+        </tr>
+        <tr>
+          <td>count</td>
+          <td><a href="CodeAsm/count.html#COUNT" title="VE_COUNT">COUNT</a></td>
+          <td>( addr -- addr+1 n) String<br>R( -- )<br>addr is the address of a counted string in RAM</td>
+        </tr>
+        <tr>
+          <td>cr</td>
+          <td><a href="CodeAsm/cr.html#CR" title="VE_CR">CR</a></td>
+          <td>( -- ) Character IO<br>R( -- )<br>emits CR/LF</td>
+        </tr>
+        <tr>
+          <td>create</td>
+          <td><a href="CodeAsm/create.html#CREATE" title="VE_CREATE">CREATE</a></td>
+          <td>( -- ) Dictionary<br>R( -- )<br>create a complete dictionary header.</td>
+        </tr>
+        <tr>
+          <td>cscan</td>
+          <td><a href="CodeAsm/char-scan.html#CSCAN" title="VE_CSCAN">CSCAN</a></td>
+          <td>( addr1 n1 c -- addr1 n2 ) String<br>R( -- )<br>Scan string at addr1/n1 until first c, leaving addr1/n2, char at n2 is last non-c character</td>
+        </tr>
+        <tr>
+          <td>cskip</td>
+          <td><a href="CodeAsm/char-skip.html#CSKIP" title="VE_CSKIP">CSKIP</a></td>
+          <td>( addr1 n1 c -- addr2 n2 ) String<br>R( -- )<br>skips leading occurancies in string at addr1/n1 leaving addr2/n2 pointing to the 1st non-c character</td>
+        </tr>
+        <tr>
+          <td>d+</td>
+          <td><a href="CodeAsm/d-plus.html#DPLUS" title="VE_DPLUS">DPLUS</a></td>
+          <td>( d1 d2 -- d3) Arithmetics<br>R( -- )<br>add double cell values</td>
+        </tr>
+        <tr>
+          <td>d+</td>
+          <td><a href="CodeAsm/d-plus.html#DPLUS" title="VE_DPLUS">DPLUS</a></td>
+          <td>( d1 d2 -- d3) Arithmetics<br>R( -- )<br>add double cell values</td>
+        </tr>
+        <tr>
+          <td>d-</td>
+          <td><a href="CodeAsm/d-minus.html#DMINUS" title="VE_DMINUS">DMINUS</a></td>
+          <td>( d1 d2 -- d3 ) Arithmetics<br>R( -- )<br>subtract double cell values</td>
+        </tr>
+        <tr>
+          <td>d-</td>
+          <td><a href="CodeAsm/d-minus.html#DMINUS" title="VE_DMINUS">DMINUS</a></td>
+          <td>( d1 d2 -- d3 ) Arithmetics<br>R( -- )<br>subtract double cell values</td>
+        </tr>
+        <tr>
+          <td>d2*</td>
+          <td><a href="CodeAsm/d-2star.html#D2STAR" title="VE_D2STAR">D2STAR</a></td>
+          <td>( d1 -- d2 ) Arithmetics<br>R( -- )<br>shift a double cell left</td>
+        </tr>
+        <tr>
+          <td>d2*</td>
+          <td><a href="CodeAsm/d-2star.html#D2STAR" title="VE_D2STAR">D2STAR</a></td>
+          <td>( d1 -- d2 ) Arithmetics<br>R( -- )<br>shift a double cell left</td>
+        </tr>
+        <tr>
+          <td>d2/</td>
+          <td><a href="CodeAsm/d-2slash.html#D2SLASH" title="VE_D2SLASH">D2SLASH</a></td>
+          <td>( d1 -- d2 ) Arithmetics<br>R( -- )<br>shift a double cell value right</td>
+        </tr>
+        <tr>
+          <td>d&lt;</td>
+          <td><a href="CodeAsm/d-less.html#DLESS" title="VE_DLESS">DLESS</a></td>
+          <td>( d1 d2 -- flasg) Compare<br>R( -- )<br>compare two values</td>
+        </tr>
+        <tr>
+          <td>d&gt;</td>
+          <td><a href="CodeAsm/d-greater.html#DGREATER" title="VE_DGREATER">DGREATER</a></td>
+          <td>( d1 d2 -- flag ) Compare<br>R( -- )<br>compares two values (signed)</td>
+        </tr>
+        <tr>
+          <td>d&gt;s</td>
+          <td><a href="CodeAsm/d_to_s.html#D2S" title="VE_D2S">D2S</a></td>
+          <td>( d1 -- n1 ) Conversion<br>R( -- )<br>shrink double cell value to single cell.</td>
+        </tr>
+        <tr>
+          <td>decimal</td>
+          <td><a href="CodeAsm/decimal.html#DECIMAL" title="VE_DECIMAL">DECIMAL</a></td>
+          <td>( -- ) Numeric IO<br>R( -- )<br>set base to 10 (decimal)</td>
+        </tr>
+        <tr>
+          <td>defer!</td>
+          <td><a href="CodeAsm/defer-store.html#DEFERSTORE" title="VE_DEFERSTORE">DEFERSTORE</a></td>
+          <td>( xt1 xt2 -- ) System<br>R( -- )<br>stores xt1 as the xt to be executed when xt2 is called</td>
+        </tr>
+        <tr>
+          <td>defer@</td>
+          <td><a href="CodeAsm/defer-fetch.html#DEFERFETCH" title="VE_DEFERFETCH">DEFERFETCH</a></td>
+          <td>( xt1 -- xt2 ) System<br>R( -- )<br>returns the XT assoziates with the given XT</td>
+        </tr>
+        <tr>
+          <td>depth</td>
+          <td><a href="CodeAsm/depth.html#DEPTH" title="VE_DEPTH">DEPTH</a></td>
+          <td>( -- n ) Stack<br>R( -- )<br>currently used data stack size in cells</td>
+        </tr>
+        <tr>
+          <td>digit</td>
+          <td><a href="CodeAsm/digit.html#DIGIT" title="VE_DIGIT">DIGIT</a></td>
+          <td>( c base -- number flag ) Numeric IO<br>R( -- )<br>convert character to number, set flag if successful</td>
+        </tr>
+        <tr>
+          <td>dinvert</td>
+          <td><a href="CodeAsm/d-invert.html#DINVERT" title="VE_DINVERT">DINVERT</a></td>
+          <td>( d1 -- d2) Arithmetics<br>R( -- )<br>flip all bits in the double cell value</td>
+        </tr>
+        <tr>
+          <td>dinvert</td>
+          <td><a href="CodeAsm/d-invert.html#DINVERT" title="VE_DINVERT">DINVERT</a></td>
+          <td>( d1 -- d2) Arithmetics<br>R( -- )<br>flip all bits in the double cell value</td>
+        </tr>
+        <tr>
+          <td>do</td>
+          <td><a href="CodeAsm/do.html#DO" title="VE_DO">DO</a></td>
+          <td>( -- addr ) Control Structure<br>R( -- )<br>start do .. [+]loop</td>
+        </tr>
+        <tr>
+          <td>does&gt;</td>
+          <td><a href="CodeAsm/does.html#DOES" title="VE_DOES">DOES</a></td>
+          <td>( -- ) Compiler<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>dp</td>
+          <td><a href="CodeAsm/dp.html#DP" title="VE_DP">DP</a></td>
+          <td>( -- eaddr)  System Pointer<br>R( -- )<br>first unused address in flash (NRWW is always used)</td>
+        </tr>
+        <tr>
+          <td>drop</td>
+          <td><a href="CodeAsm/drop.html#DROP" title="VE_DROP">DROP</a></td>
+          <td>( n -- ) Stack<br>R( -- )<br>drop TOS</td>
+        </tr>
+        <tr>
+          <td>dup</td>
+          <td><a href="CodeAsm/dup.html#DUP" title="VE_DUP">DUP</a></td>
+          <td>( n -- n n ) Stack<br>R( -- )<br>duplicate TOS</td>
+        </tr>
+        <tr>
+          <td>e!</td>
+          <td><a href="CodeAsm/estore.html#ESTORE" title="VE_ESTORE">ESTORE</a></td>
+          <td>( n addr -- ) Memory<br>R( -- )<br>write to eeprom address</td>
+        </tr>
+        <tr>
+          <td>e@</td>
+          <td><a href="CodeAsm/efetch.html#EFETCH" title="VE_EFETCH">EFETCH</a></td>
+          <td>( addr - n) Memory<br>R( -- )<br>read 2 bytes from eeprom</td>
+        </tr>
+        <tr>
+          <td>edp</td>
+          <td><a href="CodeAsm/edp.html#EDP" title="VE_EDP">EDP</a></td>
+          <td>( -- eaddr) System Pointer<br>R( -- )<br>first unused address in eeprom</td>
+        </tr>
+        <tr>
+          <td>else</td>
+          <td><a href="CodeAsm/else.html#ELSE" title="VE_ELSE">ELSE</a></td>
+          <td>( addr1 -- addr2) Compiler<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>emit</td>
+          <td><a href="CodeAsm/emit.html#EMIT" title="VE_EMIT">EMIT</a></td>
+          <td>( -- eaddr) Character IO<br>R( -- )<br>fetch the emit vector and execute it</td>
+        </tr>
+        <tr>
+          <td>emit?</td>
+          <td><a href="CodeAsm/emitq.html#EMITQ" title="VE_EMITQ">EMITQ</a></td>
+          <td>( -- c) Character IO<br>R( -- )<br>fetch emit? vector and execute it</td>
+        </tr>
+        <tr>
+          <td>endcase</td>
+          <td><a href="CodeAsm/endcase.html#ENDCASE" title="VE_ENDCASE">ENDCASE</a></td>
+          <td>( f -- ) Compiler<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>endcase</td>
+          <td><a href="CodeAsm/endcase.html#ENDCASE" title="VE_ENDCASE">ENDCASE</a></td>
+          <td>( f -- ) Compiler<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>endof</td>
+          <td><a href="CodeAsm/endof.html#ENDOF" title="VE_ENDOF">ENDOF</a></td>
+          <td>( addr1 -- addr2 ) Compiler<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>endof</td>
+          <td><a href="CodeAsm/endof.html#ENDOF" title="VE_ENDOF">ENDOF</a></td>
+          <td>( addr1 -- addr2 ) Compiler<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>execute</td>
+          <td><a href="CodeAsm/execute.html#EXECUTE" title="VE_EXECUTE">EXECUTE</a></td>
+          <td>( xt -- ) System<br>R( -- )<br>execute XT</td>
+        </tr>
+        <tr>
+          <td>exit</td>
+          <td><a href="CodeAsm/exit.html#EXIT" title="VE_EXIT">EXIT</a></td>
+          <td>( -- ) Compiler<br>R( xt -- )<br>end of current colon word</td>
+        </tr>
+        <tr>
+          <td>f_cpu</td>
+          <td><a href="CodeAsm/f_cpu.html#F_CPU" title="VE_F_CPU">F_CPU</a></td>
+          <td>( -- f_cou ) System<br>R( -- )<br>put the cpu frequency on stack</td>
+        </tr>
+        <tr>
+          <td>find</td>
+          <td><a href="CodeAsm/find.html#FIND" title="VE_FIND">FIND</a></td>
+          <td>( addr --  -- [ addr 0 ] | [ xt [-1|1]] ) Tools<br>R( -- )<br>search dictionary</td>
+        </tr>
+        <tr>
+          <td>handler</td>
+          <td><a href="CodeAsm/handler.html#HANDLER" title="VE_HANDLER">HANDLER</a></td>
+          <td>( -- addr ) Exceptions<br>R( -- )<br>used by catch/throw</td>
+        </tr>
+        <tr>
+          <td>heap</td>
+          <td><a href="CodeAsm/heap.html#HEAP" title="VE_HEAP">HEAP</a></td>
+          <td>( -- eaddr) System Pointer<br>R( -- )<br> address of first unallocated RAM</td>
+        </tr>
+        <tr>
+          <td>here</td>
+          <td><a href="CodeAsm/here.html#HERE" title="VE_HERE">HERE</a></td>
+          <td>( -- addr ) System Pointer<br>R( -- )</td>
+        </tr>
+        <tr>
+          <td>hex</td>
+          <td><a href="CodeAsm/hex.html#HEX" title="VE_HEX">HEX</a></td>
+          <td>( -- ) Numeric IO<br>R( -- )<br>set base to 16 (decimal)</td>
+        </tr>
+        <tr>
+          <td>hld</td>
+          <td><a href="CodeAsm/hld.html#HLD" title="VE_HLD">HLD</a></td>
+          <td>( -- addr ) Numeric IO<br>R( -- )<br>address of buffer for pictured numeric output</td>
+        </tr>
+        <tr>
+          <td>hold</td>
+          <td><a href="CodeAsm/hold.html#HOLD" title="VE_HOLD">HOLD</a></td>
+          <td>( c -- ) Numeric IO<br>R( -- )<br>prepend character to pictured numeric output buffer</td>
+        </tr>
+        <tr>
+          <td>i</td>
+          <td><a href="CodeAsm/i.html#I" title="VE_I">I</a></td>
+          <td>( -- n ) Control Structure<br>R( loop-sys -- loop-sys)<br>current loop counter</td>
+        </tr>
+        <tr>
+          <td>i!</td>
+          <td><a href="CodeAsm/istore.html#ISTORE" title="VE_ISTORE">ISTORE</a></td>
+          <td>( n addr -- ) Memory<br>R( -- )<br>writes a cell in flash</td>
+        </tr>
+        <tr>
+          <td>i@</td>
+          <td><a href="CodeAsm/ifetch.html#IFETCH" title="VE_IFETCH">IFETCH</a></td>
+          <td>( addr -- n1 ) Memory<br>R( -- )<br>reads a cell from flash, addr is cell address, not byte addres first byte gets into the lower word on tos</td>
+        </tr>
+        <tr>
+          <td>icount</td>
+          <td><a href="CodeAsm/icount.html#ICOUNT" title="VE_ICOUNT">ICOUNT</a></td>
+          <td>( adr -- adr n )  Tools<br>R( -- )<br>get count byte out of packed counted string in flash</td>
+        </tr>
+        <tr>
+          <td>idump</td>
+          <td><a href="CodeAsm/idump.html#IDUMP" title="VE_IDUMP">IDUMP</a></td>
+          <td>( addr len -- ) Tools<br>R( -- )<br>dumps flash memory beginning with address addr and len cells long</td>
+        </tr>
+        <tr>
+          <td>idump</td>
+          <td><a href="CodeAsm/idump.html#IDUMP" title="VE_IDUMP">IDUMP</a></td>
+          <td>( addr len -- ) Tools<br>R( -- )<br>dumps flash memory beginning with address addr and len cells long</td>
+        </tr>
+        <tr>
+          <td>if</td>
+          <td><a href="CodeAsm/if.html#IF" title="VE_IF">IF</a></td>
+          <td>( -- addr ) Control Structure<br>R( -- )<br>start conditional branch</td>
+        </tr>
+        <tr>
+          <td>immediate</td>
+          <td><a href="CodeAsm/immediate.html#IMMEDIATE" title="VE_IMMEDIATE">IMMEDIATE</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>set immediate flag</td>
+        </tr>
+        <tr>
+          <td>int</td>
+          <td><a href="CodeAsm/intx.html#INTON" title="VE_INTON">INTON</a></td>
+          <td>( --  )  Interrupt<br>R( -- )<br>turns on all interrupts</td>
+        </tr>
+        <tr>
+          <td>int!</td>
+          <td><a href="CodeAsm/intx.html#INTSTORE" title="VE_INTSTORE">INTSTORE</a></td>
+          <td>( xt i -- )  Interrupt<br>R( -- )<br>stores XT as interrupt vector i</td>
+        </tr>
+        <tr>
+          <td>int@</td>
+          <td><a href="CodeAsm/intx.html#INTFETCH" title="VE_INTFETCH">INTFETCH</a></td>
+          <td>( i -- xt ) Interrupt<br>R( -- )<br>fetches XT from interrupt vector i</td>
+        </tr>
+        <tr>
+          <td>interpret</td>
+          <td><a href="CodeAsm/interpret.html#INTERPRET" title="VE_INTERPRET">INTERPRET</a></td>
+          <td>( -- ) System<br>R(i*x - j*x )<br>interpret input word by word. may throw exceptions</td>
+        </tr>
+        <tr>
+          <td>invert</td>
+          <td><a href="CodeAsm/invert.html#INVERT" title="VE_INVERT">INVERT</a></td>
+          <td>( n1 -- n2) Arithmetics<br>R( -- )<br>1-complement of TOS</td>
+        </tr>
+        <tr>
+          <td>is</td>
+          <td><a href="CodeAsm/is.html#IS" title="VE_IS">IS</a></td>
+          <td>( xt1 c&lt;char&gt; -- ) System<br>R( --)<br>stores xt into defer or compiles code to do so at runtime</td>
+        </tr>
+        <tr>
+          <td>is</td>
+          <td><a href="CodeAsm/is.html#IS" title="VE_IS">IS</a></td>
+          <td>( xt1 c&lt;char&gt; -- ) System<br>R( --)<br>stores xt into defer or compiles code to do so at runtime</td>
+        </tr>
+        <tr>
+          <td>itype</td>
+          <td><a href="CodeAsm/itype.html#ITYPE" title="VE_ITYPE">ITYPE</a></td>
+          <td>( addr n --  ) Tools<br>R( -- )<br>reads packed string from flash and emit it</td>
+        </tr>
+        <tr>
+          <td>j</td>
+          <td><a href="CodeAsm/j.html#J" title="VE_J">J</a></td>
+          <td>( -- n ) Control Structure<br>R( loop-sys1 loop-sys2 -- loop-sys1 loop-sys2)<br>loop counter of outer loop</td>
+        </tr>
+        <tr>
+          <td>key</td>
+          <td><a href="CodeAsm/key.html#KEY" title="VE_KEY">KEY</a></td>
+          <td>( -- c ) Character IO<br>R( -- )<br>fetch key vector and execute it</td>
+        </tr>
+        <tr>
+          <td>key?</td>
+          <td><a href="CodeAsm/keyq.html#KEYQ" title="VE_KEYQ">KEYQ</a></td>
+          <td>( -- f) Character IO<br>R( -- )<br>fetch 'key? vector and execute it. Leave true if a character can be read, false otherwise</td>
+        </tr>
+        <tr>
+          <td>leave</td>
+          <td><a href="CodeAsm/leave.html#LEAVE" title="VE_LEAVE">LEAVE</a></td>
+          <td>( -- )<br>R(next limit counter -- next )<br>runtime of leave</td>
+        </tr>
+        <tr>
+          <td>leave</td>
+          <td><a href="CodeAsm/leave.html#LEAVE" title="VE_LEAVE">LEAVE</a></td>
+          <td>( -- )<br>R(next limit counter -- next )<br>runtime of leave</td>
+        </tr>
+        <tr>
+          <td>literal</td>
+          <td><a href="CodeAsm/literal.html#LITERAL" title="VE_LITERAL">LITERAL</a></td>
+          <td>( n -- ) Compiler<br>R( -- )<br>compile a literal in colon defintions</td>
+        </tr>
+        <tr>
+          <td>log2</td>
+          <td><a href="CodeAsm/log2.html#LOG2" title="VE_LOG2">LOG2</a></td>
+          <td>( n1 -- n2 ) Arithmetics<br>R( -- )<br>logarithm base 2 or highest set bitnumber</td>
+        </tr>
+        <tr>
+          <td>loop</td>
+          <td><a href="CodeAsm/loop.html#LOOP" title="VE_LOOP">LOOP</a></td>
+          <td>( addr -- ) Control Structure<br>R( -- )<br>cpmpile (loop) and resolve branch</td>
+        </tr>
+        <tr>
+          <td>lshift</td>
+          <td><a href="CodeAsm/lshift.html#LSHIFT" title="VE_LSHIFT">LSHIFT</a></td>
+          <td>( n1 n2 -- n3) Arithmetics<br>R( -- )<br>logical shift left</td>
+        </tr>
+        <tr>
+          <td>m*</td>
+          <td><a href="CodeAsm/mstar.html#MSTAR" title="VE_MSTAR">MSTAR</a></td>
+          <td>( n1 n2 -- d) Arithmetics<br>R( -- )<br>multiply 2 cells to a double cell</td>
+        </tr>
+        <tr>
+          <td>max</td>
+          <td><a href="CodeAsm/max.html#MAX" title="VE_MAX">MAX</a></td>
+          <td>( n1 n2 -- n1|n2 ) Compare<br>R( -- )<br>compare two values, leave the bigger one</td>
+        </tr>
+        <tr>
+          <td>min</td>
+          <td><a href="CodeAsm/min.html#MIN" title="VE_MIN">MIN</a></td>
+          <td>( n1 n2 -- n1|n2 ) Compare<br>R( -- )<br>compare two values leave the smaller one</td>
+        </tr>
+        <tr>
+          <td>mod</td>
+          <td><a href="CodeAsm/mod.html#MOD" title="VE_MOD">MOD</a></td>
+          <td>( n1 n2 -- n3) Arithmetics<br>R( -- )<br>remainder of division</td>
+        </tr>
+        <tr>
+          <td>negate</td>
+          <td><a href="CodeAsm/negate.html#NEGATE" title="VE_NEGATE">NEGATE</a></td>
+          <td>( n1 -- n2 ) Logic<br>R( -- )<br>2-complement</td>
+        </tr>
+        <tr>
+          <td>noop</td>
+          <td><a href="CodeAsm/noop.html#NOOP" title="VE_NOOP">NOOP</a></td>
+          <td>( -- ) Tools<br>R( -- )<br>do nothing</td>
+        </tr>
+        <tr>
+          <td>not</td>
+          <td><a href="CodeAsm/not.html#NOT" title="VE_NOT">NOT</a></td>
+          <td>( flag -- flag' ) Logic<br>R( -- )<br>identical to 0=</td>
+        </tr>
+        <tr>
+          <td>number</td>
+          <td><a href="CodeAsm/number.html#NUMBER" title="VE_NUMBER">NUMBER</a></td>
+          <td>(addr -- n ) Numeric IO<br>R( -- )<br>convert a word to a number, throw exception -1 on error</td>
+        </tr>
+        <tr>
+          <td>of</td>
+          <td><a href="CodeAsm/of.html#OF" title="VE_OF">OF</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>see case</td>
+        </tr>
+        <tr>
+          <td>of</td>
+          <td><a href="CodeAsm/of.html#OF" title="VE_OF">OF</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>see case</td>
+        </tr>
+        <tr>
+          <td>or</td>
+          <td><a href="CodeAsm/or.html#OR" title="VE_OR">OR</a></td>
+          <td>( n1 n2 -- n3 ) Logic<br>R( -- )<br>logical or</td>
+        </tr>
+        <tr>
+          <td>over</td>
+          <td><a href="CodeAsm/over.html#OVER" title="VE_OVER">OVER</a></td>
+          <td>( n1 n2 -- n1 n2 n1 ) Stack<br>R( -- )<br>stack manipulation</td>
+        </tr>
+        <tr>
+          <td>pad</td>
+          <td><a href="CodeAsm/pad.html#PAD" title="VE_PAD">PAD</a></td>
+          <td>( -- addr ) System Pointer<br>R( -- )<br>scratch buffer.</td>
+        </tr>
+        <tr>
+          <td>parse</td>
+          <td><a href="CodeAsm/parse.html#PARSE" title="VE_PARSE">PARSE</a></td>
+          <td>( char &quot;ccc&quot; -- c-addr u ) String<br>R( -- )<br>in input buffer parse ccc delimited string by the delimiter char.</td>
+        </tr>
+        <tr>
+          <td>pause</td>
+          <td><a href="CodeAsm/pause.html#PAUSE" title="VE_PAUSE">PAUSE</a></td>
+          <td>( -- ) Multitasking<br>R( -- )<br>fetch pause vector and execute it. may make a context/task switch</td>
+        </tr>
+        <tr>
+          <td>quit</td>
+          <td><a href="CodeAsm/quit.html#QUIT" title="VE_QUIT">QUIT</a></td>
+          <td>( -- ) System<br>R( -- )<br>main loop of amforth. accept - interpret in an endless loop</td>
+        </tr>
+        <tr>
+          <td>r&gt;</td>
+          <td><a href="CodeAsm/r_from.html#R_FROM" title="VE_R_FROM">R_FROM</a></td>
+          <td>( -- n ) Stack<br>R( n --)<br>move TOR to TOS</td>
+        </tr>
+        <tr>
+          <td>r@</td>
+          <td><a href="CodeAsm/r_fetch.html#R_FETCH" title="VE_R_FETCH">R_FETCH</a></td>
+          <td>( -- n) Stack<br>R( n -- n )<br>fetch content of TOR</td>
+        </tr>
+        <tr>
+          <td>recurse</td>
+          <td><a href="CodeAsm/recurse.html#RECURSE" title="VE_RECURSE">RECURSE</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>compile  XT of the word beeing currently defined into dictionary (! not conforming to ANS!)</td>
+        </tr>
+        <tr>
+          <td>refill</td>
+          <td><a href="CodeAsm/refill.html#REFILL" title="VE_REFILL">REFILL</a></td>
+          <td>( -- f ) IO<br>R( -- )<br>refills the input buffer</td>
+        </tr>
+        <tr>
+          <td>repeat</td>
+          <td><a href="CodeAsm/repeat.html#REPEAT" title="VE_REPEAT">REPEAT</a></td>
+          <td>(addr1 -- addr2 ) Control Structure<br>R( -- )<br>go back to begin</td>
+        </tr>
+        <tr>
+          <td>rot</td>
+          <td><a href="CodeAsm/rot.html#ROT" title="VE_ROT">ROT</a></td>
+          <td>( n1 n2 n3 -- n2 n3 n1) Stack<br>R( -- )<br>stack manupulation</td>
+        </tr>
+        <tr>
+          <td>rp</td>
+          <td><a href="CodeAsm/rp0.html#RP" title="VE_RP">RP</a></td>
+          <td>( -- addr) Stackpointer<br>R( -- )<br>address of variable to store the return stack pointer for inactive tasks</td>
+        </tr>
+        <tr>
+          <td>rp!</td>
+          <td><a href="CodeAsm/rpstore.html#RP_STORE" title="VE_RP_STORE">RP_STORE</a></td>
+          <td>( n  -- ) Stackpointer<br>R( -- xy)<br>set return stack pointer</td>
+        </tr>
+        <tr>
+          <td>rp0</td>
+          <td><a href="CodeAsm/rp0.html#RP0" title="VE_RP0">RP0</a></td>
+          <td>( -- addr) Stackpointer<br>R( -- )<br>start value of return stack</td>
+        </tr>
+        <tr>
+          <td>rp@</td>
+          <td><a href="CodeAsm/rpfetch.html#RP_FETCH" title="VE_RP_FETCH">RP_FETCH</a></td>
+          <td>(  -- n) Stackpointer<br>R( -- )<br>current return stack pointer address</td>
+        </tr>
+        <tr>
+          <td>rshift</td>
+          <td><a href="CodeAsm/rshift.html#RSHIFT" title="VE_RSHIFT">RSHIFT</a></td>
+          <td>( n1 n2 -- n3 ) Arithmetics<br>R( -- )<br>logical shift right</td>
+        </tr>
+        <tr>
+          <td>rx0</td>
+          <td><a href="CodeAsm/usart.html#RX0" title="VE_RX0">RX0</a></td>
+          <td>( -- c)  Hardware Access<br>R( --)<br>get 1 character from input queue, wait if needed</td>
+        </tr>
+        <tr>
+          <td>rx0?</td>
+          <td><a href="CodeAsm/usart.html#RX0Q" title="VE_RX0Q">RX0Q</a></td>
+          <td>( -- f)  Hardware Access<br>R( --)<br>check if unread characters are in the input queue.</td>
+        </tr>
+        <tr>
+          <td>s&quot;</td>
+          <td><a href="CodeAsm/squote.html#SQUOTE" title="VE_SQUOTE">SQUOTE</a></td>
+          <td>( &lt;cchar&gt; -- ) Compiler<br>R( -- )<br>compiles a string to flash, at runtime leaves ( -- addr count) on stack</td>
+        </tr>
+        <tr>
+          <td>s&quot;</td>
+          <td><a href="CodeAsm/squote.html#SQUOTE" title="VE_SQUOTE">SQUOTE</a></td>
+          <td>( &lt;cchar&gt; -- ) Compiler<br>R( -- )<br>compiles a string to flash, at runtime leaves ( -- addr count) on stack</td>
+        </tr>
+        <tr>
+          <td>s,</td>
+          <td><a href="CodeAsm/scomma.html#SCOMMA" title="VE_SCOMMA">SCOMMA</a></td>
+          <td>( addr len -- ) Compiler<br>R( -- )<br>compiles a string from RAM to Flash</td>
+        </tr>
+        <tr>
+          <td>s&gt;d</td>
+          <td><a href="CodeAsm/s_to_d.html#S2D" title="VE_S2D">S2D</a></td>
+          <td>( n1 -- d1 ) Conversion<br>R( -- )<br>extend (signed) single cell value to double cell</td>
+        </tr>
+        <tr>
+          <td>sign</td>
+          <td><a href="CodeAsm/sign.html#SIGN" title="VE_SIGN">SIGN</a></td>
+          <td>( n -- ) Numeric IO<br>R( -- )<br>place a - in HLD if value is negative</td>
+        </tr>
+        <tr>
+          <td>sleep</td>
+          <td><a href="CodeAsm/sleep.html#SLEEP" title="VE_SLEEP">SLEEP</a></td>
+          <td>( -- ) Interrupt<br>R( -- )<br>calls the MCU sleep instruction. Not useful itself!</td>
+        </tr>
+        <tr>
+          <td>source</td>
+          <td><a href="CodeAsm/source.html#SOURCE" title="VE_SOURCE">SOURCE</a></td>
+          <td>( addr1 u1 n-- addr2 u2 ) System<br>R( -- )<br>adjust string from addr1 to addr1+n, reduce length from u1 to u2</td>
+        </tr>
+        <tr>
+          <td>sp</td>
+          <td><a href="CodeAsm/sp0.html#SP" title="VE_SP">SP</a></td>
+          <td>( -- addr) Stackpointer<br>R( -- )<br>address of variable to store data stack pointer for inactive tasks</td>
+        </tr>
+        <tr>
+          <td>sp!</td>
+          <td><a href="CodeAsm/spstore.html#SP_STORE" title="VE_SP_STORE">SP_STORE</a></td>
+          <td>( addr -- i*x) Stackpointer<br>R( -- )<br>data stack pointer changed to addr</td>
+        </tr>
+        <tr>
+          <td>sp0</td>
+          <td><a href="CodeAsm/sp0.html#SP0" title="VE_SP0">SP0</a></td>
+          <td>( -- addr) Stackpointer<br>R( -- )<br>start of data stack</td>
+        </tr>
+        <tr>
+          <td>sp@</td>
+          <td><a href="CodeAsm/spfetch.html#SP_FETCH" title="VE_SP_FETCH">SP_FETCH</a></td>
+          <td>(  -- n) Stackpointer<br>R( -- )<br>current data stack pointer</td>
+        </tr>
+        <tr>
+          <td>space</td>
+          <td><a href="CodeAsm/space.html#SPACE" title="VE_SPACE">SPACE</a></td>
+          <td>( -- ) Character IO<br>R( -- )<br>emits a space (bl)</td>
+        </tr>
+        <tr>
+          <td>state</td>
+          <td><a href="CodeAsm/state.html#STATE" title="VE_STATE">STATE</a></td>
+          <td>( -- addr ) Compiler<br>R( -- )<br>system state</td>
+        </tr>
+        <tr>
+          <td>swap</td>
+          <td><a href="CodeAsm/swap.html#SWAP" title="VE_SWAP">SWAP</a></td>
+          <td>( n1 n2 -- n2 n1) Stack<br>R( -- )<br>stack manipulation</td>
+        </tr>
+        <tr>
+          <td>then</td>
+          <td><a href="CodeAsm/then.html#THEN" title="VE_THEN">THEN</a></td>
+          <td>( addr -- ) Compiler<br>R( -- )<br>finish if</td>
+        </tr>
+        <tr>
+          <td>throw</td>
+          <td><a href="CodeAsm/throw.html#THROW" title="VE_THROW">THROW</a></td>
+          <td>( n -- ) Exceptions<br>R( -- )<br>throw an exception</td>
+        </tr>
+        <tr>
+          <td>tib</td>
+          <td><a href="CodeAsm/tib.html#TIB" title="VE_TIB">TIB</a></td>
+          <td>( -- addr ) System Pointer<br>R( -- )<br>terminal input buffer address</td>
+        </tr>
+        <tr>
+          <td>to</td>
+          <td><a href="CodeAsm/to.html#TO" title="VE_TO">TO</a></td>
+          <td>( n &lt;name&gt; -- ) Tools<br>R( --)<br>store the TOS to value (an EEPROM 16bit cell)</td>
+        </tr>
+        <tr>
+          <td>turnkey</td>
+          <td><a href="CodeAsm/turnkey.html#TURNKEY" title="VE_TURNKEY">TURNKEY</a></td>
+          <td>( -- eaddr) System Pointer<br>R( -- )<br>address of the variable that holds an XT to be started by cold before quit takes over</td>
+        </tr>
+        <tr>
+          <td>tx0</td>
+          <td><a href="CodeAsm/usart.html#TX0" title="VE_TX0">TX0</a></td>
+          <td>(c -- ) Hardware Access<br>R( --)<br>put 1 character into output queue, wait if needed, enable UDRIE0 interrupt</td>
+        </tr>
+        <tr>
+          <td>tx0?</td>
+          <td><a href="CodeAsm/usart.html#TX0Q" title="VE_TX0Q">TX0Q</a></td>
+          <td>( -- f)  Hardware Access<br>R( --)<br>check if a character can be appended to output queue.</td>
+        </tr>
+        <tr>
+          <td>type</td>
+          <td><a href="CodeAsm/type.html#TYPE" title="VE_TYPE">TYPE</a></td>
+          <td>( addr n -- ) Character IO<br>R( -- )<br>emits a string</td>
+        </tr>
+        <tr>
+          <td>u*/mod</td>
+          <td><a href="CodeAsm/ustarslashmod.html#USTARSLASHMOD" title="VE_USTARSLASHMOD">USTARSLASHMOD</a></td>
+          <td>( u1 u2 u3 -- rem quot) Arithmetics<br>R( -- )<br>unsigned division with remainder u3 * u2 / u1</td>
+        </tr>
+        <tr>
+          <td>u.</td>
+          <td><a href="CodeAsm/udot.html#UDOT" title="VE_UDOT">UDOT</a></td>
+          <td>( n -- ) Numeric IO<br>R( -- )<br>unsigned numeric output</td>
+        </tr>
+        <tr>
+          <td>u.</td>
+          <td><a href="CodeAsm/udot.html#UDOT" title="VE_UDOT">UDOT</a></td>
+          <td>( n -- ) Numeric IO<br>R( -- )<br>unsigned numeric output</td>
+        </tr>
+        <tr>
+          <td>u/mod</td>
+          <td><a href="CodeAsm/uslashmod.html#USLASHMOD" title="VE_USLASHMOD">USLASHMOD</a></td>
+          <td>(u1 u2 -- rem quot) Arithmetics<br>R( -- )<br>unsigned division with remainder</td>
+        </tr>
+        <tr>
+          <td>u&lt;</td>
+          <td><a href="CodeAsm/uless.html#ULESS" title="VE_ULESS">ULESS</a></td>
+          <td>( u1 u2 -- flasg) Compare<br>R( -- )<br>compare values u1 &lt; u2 (unsigned)</td>
+        </tr>
+        <tr>
+          <td>u&gt;</td>
+          <td><a href="CodeAsm/ugreater.html#UGREATER" title="VE_UGREATER">UGREATER</a></td>
+          <td>( u1 u2 -- flag ) Compare<br>R( -- )<br>compares u1 &gt; u2 (unsigned)</td>
+        </tr>
+        <tr>
+          <td>um/mod</td>
+          <td><a href="CodeAsm/umslashmod.html#UMSLASHMOD" title="VE_UMSLASHMOD">UMSLASHMOD</a></td>
+          <td>( ud u2 -- rem quot) Arithmetics<br>R( -- )<br>unsigned division ud / u2 with remainder</td>
+        </tr>
+        <tr>
+          <td>unloop</td>
+          <td><a href="CodeAsm/unloop.html#UNLOOP" title="VE_UNLOOP">UNLOOP</a></td>
+          <td>( -- ) Control Structure<br>R(loop-sys -- )<br>remove loop-sys</td>
+        </tr>
+        <tr>
+          <td>until</td>
+          <td><a href="CodeAsm/until.html#UNTIL" title="VE_UNTIL">UNTIL</a></td>
+          <td>( addr -- ) Compiler<br>R( -- )<br>finish begin with conditional branch</td>
+        </tr>
+        <tr>
+          <td>unused</td>
+          <td><a href="CodeAsm/unused.html#UNUSED" title="VE_UNUSED">UNUSED</a></td>
+          <td>( -- n ) Tools<br>R( -- )<br>number of unused flash cells</td>
+        </tr>
+        <tr>
+          <td>up!</td>
+          <td><a href="CodeAsm/up.html#UP_STORE" title="VE_UP_STORE">UP_STORE</a></td>
+          <td>( addr -- ) System<br>R( -- )<br>set user pointer</td>
+        </tr>
+        <tr>
+          <td>up@</td>
+          <td><a href="CodeAsm/up.html#UP_FETCH" title="VE_UP_FETCH">UP_FETCH</a></td>
+          <td>( -- addr ) System<br>R( -- )<br>get user pointer</td>
+        </tr>
+        <tr>
+          <td>usart0</td>
+          <td><a href="CodeAsm/usart.html#USART0" title="VE_USART0">USART0</a></td>
+          <td>( -- ) Hardware Access<br>R( --)<br>initialize usart0</td>
+        </tr>
+        <tr>
+          <td>user</td>
+          <td><a href="CodeAsm/user.html#USER" title="VE_USER">USER</a></td>
+          <td>( n -- ) Compiler<br>R( -- )<br>define  a new user variable</td>
+        </tr>
+        <tr>
+          <td>value</td>
+          <td><a href="CodeAsm/value.html#VALUE" title="VE_VALUE">VALUE</a></td>
+          <td>( n &lt;name&gt; -- ) Compiler<br>R( -- )<br>allocate space for 1 cell in EEPROM. used in conjunction with TO</td>
+        </tr>
+        <tr>
+          <td>variable</td>
+          <td><a href="CodeAsm/variable.html#VARIABLE" title="VE_VARIABLE">VARIABLE</a></td>
+          <td>( -- ) Compiler<br>R( -- )<br>create a variable entry and allocate RAM space for it</td>
+        </tr>
+        <tr>
+          <td>ver</td>
+          <td><a href="CodeAsm/ver.html#VER" title="VE_VER">VER</a></td>
+          <td>( -- ) Tools<br>R( -- )<br>emits the version string</td>
+        </tr>
+        <tr>
+          <td>wdr</td>
+          <td><a href="CodeAsm/wdr.html#WDR" title="VE_WDR">WDR</a></td>
+          <td>( -- ) Interrupt<br>R( -- )<br>calls the MCU wdr instruction</td>
+        </tr>
+        <tr>
+          <td>while</td>
+          <td><a href="CodeAsm/while.html#WHILE" title="VE_WHILE">WHILE</a></td>
+          <td>( dest -- orig dest ) Control Structure<br>R( -- )<br>control structure</td>
+        </tr>
+        <tr>
+          <td>word</td>
+          <td><a href="CodeAsm/word.html#WORD" title="VE_WORD">WORD</a></td>
+          <td>( c -- addr ) Tools<br>R( -- )<br>skip leading delimiter characters and parses TIB to the next delimiter. copy the word into PAD</td>
+        </tr>
+        <tr>
+          <td>words</td>
+          <td><a href="CodeAsm/words.html#WORDS" title="VE_WORDS">WORDS</a></td>
+          <td>( -- ) Tools<br>R( -- )<br>emits a list of all (visible) words in the dictionary</td>
+        </tr>
+        <tr>
+          <td>words</td>
+          <td><a href="CodeAsm/words.html#WORDS" title="VE_WORDS">WORDS</a></td>
+          <td>( -- ) Tools<br>R( -- )<br>emits a list of all (visible) words in the dictionary</td>
+        </tr>
+        <tr>
+          <td>xor</td>
+          <td><a href="CodeAsm/xor.html#XOR" title="VE_XOR">XOR</a></td>
+          <td>( n1 n2 -- n3) Logic<br>R( -- )<br>exclusive or</td>
+        </tr>
+      </table>
+    </div>
+    <!-- AUTOINCLUDE START "Page/Footer.en.ihtml" DO NOT REMOVE -->
+    <!-- ============== FOOTER ============== -->
+    <div class="Footer">
+      <script type="text/javascript">
+      <!--
+        SetRelativePath("../../../");
+        DrawFooter();
+      // -->
+      </script>
+      <noscript>
+        <p><b> JavaScript is required for including of the footer </b></p>
+      </noscript>
+    </div>
+    <!-- AUTOINCLUDE END -->
+  </body>
+</html>

Subversion Repositories – MLAB

/Articles/Forth @ 1918 → /Articles/Forth @ 4985

Compare Path:	Rev
With Path:	Rev