Calendar for Planet Xhilr

  • R/O
  • R/O (HTTP)
  • R/W (SSH)
  • R/W (HTTPS)
Fork

Functions for working with the idealized calendar of Planet Xhilr

License

I do not have a particular license ready yet. I will eventually release it under an open source or free software compatible license. For now, anyone who reads it has my permission to play with the code for personal use only.

If Fair Use where you live does not allow you to use it as inspiration in writing your own, much better version, you have my explicit permission to do so.

Release Files

FilenameGrößeZeitAnzahl der Downloads
xhilr_calendar-c9ca731.tar.gz59.19 k2017-06-17 13:22:2052

Recent Commits

Rev.ZeitAutorNachricht RSS
c9ca731a2017-06-17 10:35:04Joel Matthew ReesUD/MOD double integer division in M6800 assembler within ...
1613405c2017-06-13 18:18:37Joel Matthew ReesNow it runs more or less correctly.
cadfda112017-06-13 18:16:48Joel Matthew ReesFixing errors, a little code cleanup
a53e70fc2017-06-13 18:13:25Joel Matthew Reesat this point it more or less runs
f01969bb2017-06-13 18:11:14Joel Matthew Reesrefactoring and comments, progress
746c818c2017-06-13 18:09:13Joel Matthew Reescycles and the digging into the actual calendar
f5c8fe4a2017-06-13 18:07:37Joel Matthew Reesdebugging the division
4df80e852017-06-13 18:05:45Joel Matthew Reesfull double division in Forth-level code
6ec616a82017-06-13 18:04:11Joel Matthew Reesmore on cycle counting for synthetic division
ae9ce3df2017-06-13 17:58:44Joel Matthew Reesprogress, corrections, and a detour in C

Latest updated Tickets

No tickets

About Calendar for Xhilr

There are a number of files here, but the primary file is

* econmonths.fs

If using gforth, copy the source from the line:

 From here, we should load okay in modern Forths.

(about line 146) to the end and paste it into a running gforth session.

The lines before that are definitions for less complete Forth interpreters. In particular, you can assemble the file

* fig-forth_exorsim-doubles.68c

with my 6800 assembler at

* am68c

(which you will need to compile first). Copy the fig-forth_exorsim-doubles.x S1/S9 object output using a text editor and load it into Joe H. Allen's

* 6800 Exorcisor simulator

To load it in, start exorsim with

 exor --mon

and use the "l" command, then paste the S1/S9 object in. Press one more return at the end, to get the message "PC set to 2000". Type Ctl-c to break out of the load function, then enter "c" to "continue" at address 2000.

You should get the welcome message:

Forth-68 

at which point you can select the entire contents of econmonths.fs and paste it in to the terminal session. It will take a while to load, and you can watch the interpreter's responses.

When it has finished loading, type

2017 6 17 CALMONTH 

and you should get something like this:

                               2017   IMPERIOUS  
+----------+----------+----------+----------+----------+----------+----------+
|  SUNDAY  | MOONSDAY | AEGISDAY | GEFNDAY  | FREYDAY  | TEWESDAY | VENSDAY  |
+----------+----------+----------+----------+----------+----------+----------+
|          |          |          |          |          |          |          |
|    28    |    29    |     0    |     1    |     2    |     3    |     4    |
|          |          |          |          |          |          |          |
|          |          |          |          |          |          |          |
|S:6    F:0|S:7    F:E|S:7    F:C|S:8    F:9|S:9    F:7|S:9    F:5|S:A    F:3|
+----------+----------+----------+----------+----------+----------+----------+
|          |          |          |          |          |          |          |
|     5    |     6    |     7    |     8    |     9    |    10    |    11    |
|          |          |          |          |          |          |          |
|          |          |          |          |          |          |          |
|S:A    F:0|S:B    F:E|S:B    F:C|S:C    F:A|S:C    F:7|S:D    F:5|S:E    F:3|
+----------+----------+----------+----------+----------+----------+----------+
|          |          |          |          |          |          |          |
|    12    |    13    |    14    |    15    |    16    |   *17*   |    18    |
|          |          |          |          |          |          |          |
|          |          |          |          |          |          |          |
|S:E    F:1|S:F    F:E|S:F    F:C|S:0    F:A|S:0    F:8|S:1    F:6|S:1    F:3|
+----------+----------+----------+----------+----------+----------+----------+
|          |          |          |          |          |          |          |
|    19    |    20    |    21    |    22    |    23    |    24    |    25    |
|          |          |          |          |          |          |          |
|          |          |          |          |          |          |          |
|S:2    F:1|S:3    F:F|S:3    F:D|S:4    F:A|S:4    F:8|S:5    F:6|S:5    F:4|
+----------+----------+----------+----------+----------+----------+----------+
|          |          |          |          |          |          |          |
|    26    |    27    |    28    |     0    |     1    |     2    |     3    |
|          |          |          |          |          |          |          |
|          |          |          |          |          |          |          |
|S:6    F:1|S:6    F:F|S:7    F:D|S:8    F:B|S:8    F:8|S:9    F:6|S:9    F:4|
+----------+----------+----------+----------+----------+----------+----------+
 OK

Thanks to the OSDN Wiki team for providing me with chamber Wiki space.

(Reminding myself about Wiki Guide (English) syntax and function documentation.)