d6
/
kodiak
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases 4 Wiki Activity

use EOR2 instead of MUL2 to avoid problems with zero

This commit is contained in:
~d6 2024-07-28 16:22:13 -04:00
parent 6063a95967
commit 96348c69b7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
cards.tal
View File

@ -139,7 +139,7 @@
#00 .DateTime/hr DEI #0e10 MUL2 ADD2
#00 .DateTime/min DEI #003c MUL2 ADD2
#00 .DateTime/sec DEI ADD2 ( s* )
DUP2 .DateTime/doy DEI2 MUL2 ( s* sdoy* )
DUP2 .DateTime/doy DEI2 EOR2 ( s* sdoy* )
#0001 ROT2 OVR2 ( y* 1* x* 1* )
ORA2 ;rng-x STA2 ( y* 1* )
ORA2 ;rng-x STA2 JMP2r ( )