Mercurial > hg > Members > kono > nitros9-code

view lib/alib/putc.as @ 3038:c6eafb074443

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Do not return error for SDC setstat
author darrenatk
date Thu, 22 Jan 2015 00:05:11 -0700
parents 03f26e88b809
children
line wrap: on
line source

**********************************

* Put single character to standard out.

* OTHER MODULES NEEDED: FPUTC

* ENTRY: B=character to print

* EXIT: CC carry set if error
*       B=error code if any

 nam Print Char to Std. Out
 ttl Assembler Library Module


 section .text

PUTC:
 pshs a
 lda #1 stn out
 lbsr FPUTC
 puls a,pc

 endsect