From 0fa7b342cc0d8a91ca399d2c86462ad380c4ec63 Mon Sep 17 00:00:00 2001 From: Carsten Strotmann Date: Fri, 26 Jun 2020 14:09:21 +0200 Subject: [PATCH] ANS-Shim update --- 6502/C64/disks/tc38q.d64 | 0 6502/C64/disks/vforth4_1.d64 | 0 6502/C64/disks/vforth4_2.d64 | 0 6502/C64/disks/vforth4_3.d64 | 0 6502/C64/disks/vforth4_4.d64 | 0 msdos/volks4th.sys | 2 +- sources/msdos/ans-shim.fb.src | 19 ++++++++++++++++++- sources/msdos/volks4th.sys.src | 4 ++-- 8 files changed, 21 insertions(+), 4 deletions(-) mode change 100755 => 100644 6502/C64/disks/tc38q.d64 mode change 100755 => 100644 6502/C64/disks/vforth4_1.d64 mode change 100755 => 100644 6502/C64/disks/vforth4_2.d64 mode change 100755 => 100644 6502/C64/disks/vforth4_3.d64 mode change 100755 => 100644 6502/C64/disks/vforth4_4.d64 diff --git a/6502/C64/disks/tc38q.d64 b/6502/C64/disks/tc38q.d64 old mode 100755 new mode 100644 diff --git a/6502/C64/disks/vforth4_1.d64 b/6502/C64/disks/vforth4_1.d64 old mode 100755 new mode 100644 diff --git a/6502/C64/disks/vforth4_2.d64 b/6502/C64/disks/vforth4_2.d64 old mode 100755 new mode 100644 diff --git a/6502/C64/disks/vforth4_3.d64 b/6502/C64/disks/vforth4_3.d64 old mode 100755 new mode 100644 diff --git a/6502/C64/disks/vforth4_4.d64 b/6502/C64/disks/vforth4_4.d64 old mode 100755 new mode 100644 diff --git a/msdos/volks4th.sys b/msdos/volks4th.sys index d354475..ac4e7b3 100644 --- a/msdos/volks4th.sys +++ b/msdos/volks4th.sys @@ -1 +1 @@ -\\ Startup: Load Standard System cas 10nov05 This file contains commands to create a full volksFORTH from theKERNEL.COM file. The new system will be saved as "VOLKS4TH.COM". If needed this file must be adapted with the simple editor in MINIMAL.COM to create a volksFORTH that can work with not 100% compatible display hardware. \ System LOAD-Screen for MS-DOS volksFORTH cas 19jun20 Onlyforth warning off include asm.fb include extend.fb include multi.vid include dos.fb include tasker.fb include timer.fb include tools.fb include editor.fb include graphic.prn warning on clear status on .status savesystem volks4th.com bell .( new system saved as VOLKS4TH.COM ) cr \ No newline at end of file +\\ Startup: Load Standard System cas 10nov05 This file contains commands to create a full volksFORTH from theKERNEL.COM file. The new system will be saved as "VOLKS4TH.COM". If needed this file must be adapted with the simple editor in MINIMAL.COM to create a volksFORTH that can work with not 100% compatible display hardware. \ System LOAD-Screen for MS-DOS volksFORTH cas 19jun20 Onlyforth warning off include asm.fb include extend.fb include multi.vid include dos.fb include tasker.fb include timer.fb include tools.fb include neditor.fb warning on clear status on .status savesystem volks4th.com bell .( new system saved as VOLKS4TH.COM ) cr \ No newline at end of file diff --git a/sources/msdos/ans-shim.fb.src b/sources/msdos/ans-shim.fb.src index ae1c8c5..c925c72 100644 --- a/sources/msdos/ans-shim.fb.src +++ b/sources/msdos/ans-shim.fb.src @@ -46,7 +46,7 @@ Screen 2 not modified 10 : postpone ' dup >name c@ $40 and 11 IF , ELSE [compile] compile compile , THEN ; immediate 12 -13 +13 ' endloop ALIAS unloop 14 15 Screen 3 not modified @@ -60,6 +60,23 @@ Screen 3 not modified 7 8 : accept expect span @ ; 9 +10 : invert not ; +11 +12 +13 +14 +15 +Screen 4 not modified + 0 + 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 10 11 12 diff --git a/sources/msdos/volks4th.sys.src b/sources/msdos/volks4th.sys.src index 2f3f259..9f21d45 100644 --- a/sources/msdos/volks4th.sys.src +++ b/sources/msdos/volks4th.sys.src @@ -26,8 +26,8 @@ Screen 1 not modified 7 include tasker.fb 8 include timer.fb 9 include tools.fb -10 include editor.fb -11 include graphic.prn +10 include neditor.fb +11 12 13 warning on clear status on .status 14 savesystem volks4th.com bell