Mercurial > hg > Members > kono > nitros9-code

diff lib/alib/print_hex.as @ 2783:03f26e88b809 lwtools-port

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Renamed files and setup for lwasm/lwlink work
author Boisy Pitre <boisy.pitre@nuance.com>
date Sat, 26 Jan 2013 17:18:24 -0600
parents lib/alib/print_hex.a@aaba193af04f
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lib/alib/print_hex.as	Sat Jan 26 17:18:24 2013 -0600
@@ -0,0 +1,27 @@
+***************************************
+
+* Print hex number to standard out.
+
+* ENTRY: D=value to print
+
+* EXIT: CC carry set if error (from I$WritLn)
+*       B error code, if any
+
+
+ nam Print # as Hex String to Std Out
+ ttl Assembler Library Module
+
+
+ section .text
+
+PRINT_HEX:
+ pshs a,x
+ leas -6,s buffer
+ tfr s,x
+ lbsr BIN_HEX convert to hex
+ lbsr PUTS print to standard out
+ leas 6,s clean stack
+ puls a,x,pc return with error in B
+
+ endsect
+