Mercurial > hg > Members > kono > nitros9-code
annotate lib/alib/putspace.a @ 2474:7d70b7e1cb21
Moved net and alib files into here
author | boisy |
---|---|
date | Tue, 30 Mar 2010 02:44:42 +0000 |
parents | |
children | aaba193af04f |
rev | line source |
---|---|
2474 | 1 **************************************** |
2 | |
3 * Subroutine to print a space to std. out | |
4 | |
5 * OTHER MODULES REQUIRED: FPUTSPACE | |
6 | |
7 * ENTRY: none | |
8 | |
9 * EXIT: CC carry set if error (from I$WritLn) | |
10 * B error code if any. | |
11 | |
12 nam Output One Space Char. to Std. Out | |
13 ttl Assembler Library Module | |
14 | |
15 | |
16 psect PUTSPACE,0,0,0,0,0 | |
17 | |
18 PUTSPACE: | |
19 pshs a | |
20 lda #1 | |
21 lbsr FPUTSPACE | |
22 puls a,pc | |
23 | |
24 endsect |