Properly report dates in the year 2000 and beyond with the __DATE__ macro.

This should now work properly through the end of the year 2155, i.e. the limit of what the ReadTimeHex format can represent.
2016-11-15 00:23:24 -06:00 · 2016-11-15 00:23:24 -06:00 · 1994e7e353
parent af48935d43
commit 1994e7e353
1 changed files with 13 additions and 1 deletions
--- a/Scanner.asm
+++ b/Scanner.asm
@ -602,8 +602,20 @@ SetDateTime private
         sta   time+2
         pla                            set the year
         xba
+         and   #$00FF
+         ldy   #19
+yearloop sec
+         sbc   #100
+         bmi   yeardone
+         iny
+         bra   yearloop
+yeardone clc
+         adc   #100
         jsr   convert
         sta   date+11
+         tya
+         jsr   convert
+         sta   date+9
         lda   1,S                      set the day
         inc   A
         jsr   convert
@ -624,7 +636,7 @@ SetDateTime private
         rtl

 month    dc    c'Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec'
-date     dc    i'12',c'mmm dd 19yy',i1'0'
+date     dc    i'12',c'mmm dd YYyy',i1'0'
 time     dc    i'9',c'hh:mm:ss',i1'0'

 convert  and   #$00FF