Mercurial > hg > Members > kono > nitros9-code
changeset 1928:c7fe687a5cbd
Minor source formatting
author | boisy |
---|---|
date | Sat, 26 Nov 2005 16:44:46 +0000 |
parents | 8234be91628d |
children | 83bd67630eb9 |
files | level1/cmds/date.asm |
diffstat | 1 files changed, 6 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/level1/cmds/date.asm Sat Nov 26 16:36:39 2005 +0000 +++ b/level1/cmds/date.asm Sat Nov 26 16:44:46 2005 +0000 @@ -60,8 +60,9 @@ syshour rmb 1 sysmin rmb 1 syssec rmb 1 -u0006 rmb 2 -u0008 rmb 440 +bufptr rmb 2 +buffer rmb 40 + rmb 400 size equ . name fcs /Date/ @@ -83,8 +84,8 @@ start pshs x leax sysyear,u - leau u0008,u - stu <u0006 + leau buffer,u + stu <bufptr os9 F$Time bsr Add2Buff go print the date in buffer ldd [,s++] now, did we have a -t @@ -97,7 +98,7 @@ PrBuff lda #C$CR terminate the line to print sta ,u+ lda #1 standard out - ldx <u0006 + ldx <bufptr ldy #40 os9 I$WritLn and go print it bcs Exit