Skip to content

Commit

Permalink
prepare first release
Browse files Browse the repository at this point in the history
  • Loading branch information
tsupplis committed Dec 31, 2022
1 parent 8d17554 commit b08595b
Show file tree
Hide file tree
Showing 2 changed files with 45 additions and 0 deletions.
17 changes: 17 additions & 0 deletions .gitignore
Original file line number Diff line number Diff line change
@@ -0,0 +1,17 @@
**/*.lock
**/*.lha
**/*.zip
**/.D*
**/*.log
**/*.sys
**/*.lib
**/.*.swp
**/*.obj
**/*.o
**/*.h86
**/*.sym
**/*.lst
**/*.map
**/.vscode
private/**
**/*.img
28 changes: 28 additions & 0 deletions README.md
Original file line number Diff line number Diff line change
Expand Up @@ -27,3 +27,31 @@ A cleaned-up distribution and kernel is available at https://github.com/tsupplis
## Sources and Build

To come .... the sources are in PLM on http://www.cpm.z80.de. I may be complicated to standardize a toolset.

In the meantime, the code pattern corrected on all those tools is the same:

```
emit$date$time: procedure;
if tod.opcode = 0 then
do;
call emitn(.day$list(shl(week$day,2)));
call emitchar(' ');
end;
call emit$slant(month);
call emit$slant(day);
if year>99 then
do;
year=year-100;
end;
call emit$bin$pair(year);
call emitchar(' ');
call emit$colon(hrs);
call emit$colon(min);
if tod.opcode = 0 then
call emit$bcd$pair(sec);
end emit$date$time;
``
The fix is on date display > 99
date is just a bit more involved.

0 comments on commit b08595b

Please sign in to comment.