From 23ead1316b8f245d10b193d97ab3657077552104 Mon Sep 17 00:00:00 2001 From: Philip Zembrod Date: Sat, 25 Nov 2023 22:03:32 +0100 Subject: [PATCH 1/3] Adapt IOStatus, MsgFlg and Pen/BkgCol to X16 Kernal R46 --- 6502/C64/src/vf-sys-x16.fth | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/6502/C64/src/vf-sys-x16.fth b/6502/C64/src/vf-sys-x16.fth index e6d9244..1ec73e1 100644 --- a/6502/C64/src/vf-sys-x16.fth +++ b/6502/C64/src/vf-sys-x16.fth @@ -7,11 +7,10 @@ include vf-lbls-cbm.fth 0ffd2 >label ConOut 0febd >label KbdbufPeek - 0289 >label IOStatus - 028c >label MsgFlg + 0287 >label IOStatus + 028d >label MsgFlg 09f2c >label BrdCol - 0266 >label BkgCol - 0284 >label PenCol + 0376 >label BkgPenCol 0381 >label CurFlg \ aka qtsw 0385 >label InsCnt \ aka insrt @@ -95,9 +94,10 @@ Label first-init sei cld RomBank lda $f8 # and RomBank sta \ map in KERNAL ROM IOINIT jsr CINT jsr RESTOR jsr \ init. and set I/O-Vectors - ink-pot lda BrdCol sta \ border - ink-pot 1+ lda BkgCol sta \ backgrnd - ink-pot 2+ lda PenCol sta \ pen + ink-pot lda BrdCol sta \ border + ink-pot 1+ lda + .a asl .a asl .a asl .a asl \ backgrnd + ink-pot 2+ ora BkgPenCol sta \ pen $0e # lda ConOut jsr \ lower/uppercase cli rts end-code first-init dup bootsystem 1+ ! From 872716c538cd4356e2774fa11306c085d78f85ba Mon Sep 17 00:00:00 2001 From: Philip Zembrod Date: Sun, 26 Nov 2023 00:05:39 +0100 Subject: [PATCH 2/3] Bump all versions to 3.9.5 - reflecting the X16-R46 support. --- 6502/C64/src/vf-head-c16.fth | 4 ++-- 6502/C64/src/vf-head-c64.fth | 2 +- 6502/C64/src/vf-head-x16.fth | 2 +- 3 files changed, 4 insertions(+), 4 deletions(-) diff --git a/6502/C64/src/vf-head-c16.fth b/6502/C64/src/vf-head-c16.fth index 012ecb2..ca8446a 100644 --- a/6502/C64/src/vf-head-c16.fth +++ b/6502/C64/src/vf-head-c16.fth @@ -28,5 +28,5 @@ here dup origin! $100 allot Create logo - (C16+ ," volksFORTH-83 3.9.4-C16+ " ) - (C16- ," volksFORTH-83 3.9.4-C16- " ) + (C16+ ," volksFORTH-83 3.9.5-C16+ " ) + (C16- ," volksFORTH-83 3.9.5-C16- " ) diff --git a/6502/C64/src/vf-head-c64.fth b/6502/C64/src/vf-head-c64.fth index 7e4d7f0..994bc03 100644 --- a/6502/C64/src/vf-head-c64.fth +++ b/6502/C64/src/vf-head-c64.fth @@ -28,4 +28,4 @@ here dup origin! $100 allot Create logo - ," volksFORTH-83 3.9.4-C64 " + ," volksFORTH-83 3.9.5-C64 " diff --git a/6502/C64/src/vf-head-x16.fth b/6502/C64/src/vf-head-x16.fth index 4671b87..4771059 100644 --- a/6502/C64/src/vf-head-x16.fth +++ b/6502/C64/src/vf-head-x16.fth @@ -27,4 +27,4 @@ here dup origin! $100 allot Create logo - ," volksFORTH-83 3.9.4-X16 " + ," volksFORTH-83 3.9.5-X16 " From 69b189d94369eb868ee28a5a0c903740dda11643 Mon Sep 17 00:00:00 2001 From: Philip Zembrod Date: Sun, 26 Nov 2023 00:10:33 +0100 Subject: [PATCH 3/3] Update all binaries to version 3.9.5 which supports X16 R46 --- 6502/C64/cbmfiles/v4th-c16+ | Bin 14029 -> 14029 bytes 6502/C64/cbmfiles/v4th-c16- | Bin 13868 -> 13868 bytes 6502/C64/cbmfiles/v4th-c64 | Bin 13942 -> 13942 bytes 6502/C64/cbmfiles/v4th-x16 | Bin 13823 -> 13824 bytes 6502/C64/cbmfiles/v4thblk-c16+ | Bin 16202 -> 16202 bytes 6502/C64/cbmfiles/v4thblk-c16- | Bin 16042 -> 16042 bytes 6502/C64/cbmfiles/v4thblk-c64 | Bin 16115 -> 16115 bytes 7 files changed, 0 insertions(+), 0 deletions(-) diff --git a/6502/C64/cbmfiles/v4th-c16+ b/6502/C64/cbmfiles/v4th-c16+ index 1bfb30e2077b25e650bbd1556c3c9e17e6b86589..4e6da3627b204789990e2600666d03e0bd29fd68 100644 GIT binary patch delta 14 VcmX?`dp382EhD4pW;@1yQvfeF1y29~ delta 14 VcmX?`dp382EhD4JW;@1yQvfe91x^3} diff --git a/6502/C64/cbmfiles/v4th-c16- b/6502/C64/cbmfiles/v4th-c16- index a2a959f8428b70d842f3e644f0df263187caa34b..01b1f663375c094baf0f6fc2ac0ad68d6e6c9315 100644 GIT binary patch delta 14 VcmZ3JvnFSQEhD4pW;@1rCIBpg1!({P delta 14 VcmZ3JvnFSQEhD4JW;@1rCIBpa1!w>O diff --git a/6502/C64/cbmfiles/v4th-c64 b/6502/C64/cbmfiles/v4th-c64 index 53df8320a0b4222f0088d93f446408d88b9822e2..89dac12fd8da43878ac4bdd2580c7f27767081b8 100644 GIT binary patch delta 14 VcmeyC^DSqCEhD4pW;;d;QvfoX1xNq@ delta 14 VcmeyC^DSqCEhD4JW;;d;QvfoR1xEk? diff --git a/6502/C64/cbmfiles/v4th-x16 b/6502/C64/cbmfiles/v4th-x16 index 9e36648444590131a2a9a6f6d34cf06885328f1c..9e79d4c86dd48a400234253e94762df8a9331aaf 100644 GIT binary patch delta 748 zcmYk1ZAep57{||@Z+p|NU3*c?WE{omW^>ND-R)#*Yb0X66h%}-fgj2U?2U9_AW@`{^y+hg`2}u zwT3(bKns4l=3BoucA%M(V2)9zQ?||EY0IK70O!2_LT(shILxnq z;&ym8stT=x)`17R93G)D3t<)IB`gLuX{*foW2Yn?%DlRT3_yBCKwCc@Py7zF+q28_@_O8=N z&wEe!vfeut8Y3Ab10(D+=g!inzOMRsE&zvgV<5@OPS?2PJ6GTA%K65C26e_QTO}H) zlW9p=vbkHxK@e0UO;ncow=t2IEOh{^p~1Q!0H7$dEH6blXe|!{KPo0>$Lhj5hzf~v z(1YbHQb`#O_JJU{gjCBI2QZEz)pZ&3QOviHO2Bv$;}oJ&92~(kO)?Z5cm&HVqEg5Q+RC@X0WZs2cxMg>?o_(=N~ DB4Zyi delta 733 zcmYk1ZAep59LCR`rhC(^-K-R~F^=JMSLU31x!cLN#<0XpiwY!)U?0kY5(0BzpdSj9 z8u!wNGN~vsQYh93D1rZShQ6D5M!gY=j^x?qoInVQd&i`B-DxA7n zr&~t=sKF1%eCwCSc2phecpvI3<91NBls&wQDypHH!kx9ZG*ox^qq(7ky3CbZk5ZG| zY3ndG8UA4PQI@HIVm{-Znov9_H)aZlkA=WDcWKOF7n7pg#Tqqi&$N9nJM_B{0#0tg zW}^DI^EMMb%&HPnDiUYnLjIRY2}0l+_t4g1zQbCygY2`$fW{9AKfy=kUSaoCjaI%e zj2qg)eypO}1+Jpy!q@`aq?@7F3R|6`GoT59Syq`!G8@G=%ul_3IP3XWGNOy(GM{$N zWpl4r7h47_{kON<+@f=Z{r|0~wn;}~aTn>k=}{&kFxuK#qf1C* zCZ*XNEQboFUP1gC3B_+vvFKp00w<8a51{mW-ErH;YMG$fPrZ%;d!g zBa2Z#TxH*?UpCZLsq|9)PxTD_y+E=)Z>gA!Nx8V-hs{+Mt;s_7?lX4xcJ**mc0E1k zIpWQEE>)`ZWRMJ;SN1(7|@IYfs^eH=WFkY`ew(HcN8d5XUzQ9G9YCl zm5~=2R|~laf*PcXWV6Dns3c^}I{{ebI$G(m-KZp;%Pv|YJalXcf__v?BoEzK97l>w znumQL2+kly4r4#Y5v0gsJcw}uDMXBe7_T5I$-{G)u9FHG_Z`6EE~1urcoNfNv?(jd xq~u+B5Ijf4Nnu&$8F&bLA}U#av!UU%JqYr6r&L;AO7UOVQk8qNR! diff --git a/6502/C64/cbmfiles/v4thblk-c16+ b/6502/C64/cbmfiles/v4thblk-c16+ index a8e27c46684897f3123b55e6c01d7710086c3348..38aa5e752f88bda437f66ee167574054a12354bb 100644 GIT binary patch delta 14 VcmX?AcdBlKEhD4pW;;e6I{+_)1n~d> delta 14 VcmX?AcdBlKEhD4JW;;e6I{+_!1n>X= diff --git a/6502/C64/cbmfiles/v4thblk-c16- b/6502/C64/cbmfiles/v4thblk-c16- index 1c3fd426e917c24255d3b39d35b879f0a9552cf7..17c9eed9d44cf06e168f9d0dc92994c4525f7903 100644 GIT binary patch delta 14 VcmZ2gyQ+4BEhD4pW;@0lTL3KU1r7iJ delta 14 VcmZ2gyQ+4BEhD4JW;@0lTL3KO1q}cI diff --git a/6502/C64/cbmfiles/v4thblk-c64 b/6502/C64/cbmfiles/v4thblk-c64 index 2a7cb92eeee0857bb0452befeb3fea85f8e4ef41..9ecbfc2b03d47da2ce1ae1a1f4217a65e072072d 100644 GIT binary patch delta 14 Vcmexd`?+?5EhD4pW;@2Mwg5Ee1?d0) delta 14 Vcmexd`?+?5EhD4JW;@2Mwg5EY1?T_(