Mercurial > hg > Members > kono > nitros9-code
annotate lib/alib/fputcr.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 carriage return | |
4 | |
5 * OTHER MODULES REQUIRED: FPUTC | |
6 | |
7 * ENTRY: A=path | |
8 | |
9 * EXIT: CC carry set if error (from I$WritLn) | |
10 * B error code if any. | |
11 | |
12 | |
13 nam Output Carriage Return | |
14 ttl Assembler Library Module | |
15 | |
16 | |
17 psect FPUTCR,0,0,0,0,0 | |
18 | |
19 FPUTCR: | |
20 ldb #$0d | |
21 lbra FPUTC | |
22 | |
23 endsect |