Mercurial > hg > Members > kono > nitros9-code

diff lib/kreiderclib/l3tol.as @ 2824:1647f1874cdf lwtools-port

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added Kreidier C library
author Boisy Pitre <boisy.pitre@nuance.com>
date Thu, 23 May 2013 05:49:13 -0500
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lib/kreiderclib/l3tol.as	Thu May 23 05:49:13 2013 -0500
@@ -0,0 +1,30 @@
+* Disassembly by Os9disasm of l3tol.r
+
+ section code
+
+l3tol: pshs  u 
+ ldu   4,s 
+ ldd   6,s 
+ addd  #1 
+ bra   L0021 
+L000b clra   
+ clrb   
+ stb   ,u 
+ ldx   6,s 
+ ldb   -1,x 
+ stb   1,u 
+ ldd   [6,s] 
+ std   2,u 
+ leau  4,u 
+ ldd   6,s 
+ addd  #3 
+L0021 std   6,s 
+ ldd   8,s 
+ addd  #-1 
+ std   8,s 
+ subd  #-1 
+ bgt   L000b 
+ puls  u,pc 
+
+ endsect  
+