From 1990c113e51863cdf66010272d5f6c53c621042f Mon Sep 17 00:00:00 2001
From: Philip Zembrod <pzembrod@gmail.com>
Date: Tue, 9 Jun 2020 22:38:00 +0200
Subject: [PATCH] Rename build-in-vice.sh to run-in-vice.sh. Checkin of dev
 environment build script, and initial checkin of load-from-file and dos
 words, branched from cc64

---
 6502/C64/disks/file-words.d64                 |  Bin 0 -> 174848 bytes
 6502/C64/disks/file-words.fth                 | 4760 +++++++++++++++++
 6502/C64/emulator/build-devenv.sh             |    2 +-
 .../{build-in-vice.sh => run-in-vice.sh}      |    2 +-
 4 files changed, 4762 insertions(+), 2 deletions(-)
 create mode 100644 6502/C64/disks/file-words.d64
 create mode 100644 6502/C64/disks/file-words.fth
 rename 6502/C64/emulator/{build-in-vice.sh => run-in-vice.sh} (95%)

diff --git a/6502/C64/disks/file-words.d64 b/6502/C64/disks/file-words.d64
new file mode 100644
index 0000000000000000000000000000000000000000..82fe08ad53a5374de7e561fe5516e00b0a0710f0
GIT binary patch
literal 174848
zcmeI$Z*SYi9RT1Id$HH;(APUVeUUX$V|(+^d95Q_q7!YhXi$=qZrOM1SLrZ!H4r4l
zmSJ!DQ3iN-NByB}*^BLVK!AsULYh1tfA{e2cgNhjXCpv>009C72oNAZfB*pk1PBly
zK!5-N0t5&UAV7cs0RjXF5FkK+009C7-Zz1lVKC|qr~NVvtD-;d)nz#f%WdoPKTJnE
zTgQJ|p864w_QK$C)frEU$#ncAgin6A6?)z9`#U^gFHA?nsyYs#?$>eG{`YqE?uCAN
z62gOieG<Ci^YHLa@x`X?Md`=S2K(VbJP6MQq0<S|@T>KW-r3y^#i$>4c7Gc_4dds<
zaXf5J-8qo;Pi)R^hu?&UlV|nxx<anK{{k;#6AshR@1$;iSeHeAI2e`lhVASY$MsFe
ze@r69q-<3ihs~pTjqUwP!JXL6!}ji)l0Ss)U+;uoHHw*HGzpIn2M6t1+Q;)6V~Jd>
z7!IpRyTJVTq^JkQ!LSVXuc>Wb_#O5?#Bp6#!zXc6_tJ<yylO<py86@Ou=Qm#n(z1O
z@MWm#aQ1E33gwHzB)t9Z^mX&Zc6N-{x7*h{+c!=`DaPd+evrZ}tF?hHdqj8k8q?e9
zhJ)#N(4HPb!pqPH)pXP!Uk&xQH|geXZhLl$#moAN^0BRFp|=rEU;Xnm<UGDKS=^Ep
zzgYZv-9fA`*OKcyizz&X-DzI^M)=q3S8v{YpYLyj$8f8|!#4Ti5xIPBcJ4hJiwhSI
zKHCh>i+VH|J&jpE4Xg4+uPmd}QSl;dHgcb(n_@4BWy=?nx(K~zMLiCKr=zMa`<v-f
zYy0cz-_Kq*l$mk+VT}Ln*{fEO=5S3@)=hxR@n0RMnZJ4Sy<s)ZIp7xKKlienQF4tB
zLecNn&7in2$+dggrTE(?nu1Li-0tK)v^>?;Pwy-@qkZ?f<DJxdqU_|W<1%UH{knpi
z;nDa}9p6Ii-;+hjS>IR(x~`J;xg}47oQL5Bn5KN2XW86tyRzmuwI%k0WtlcfyLb${
zdFX8dZ&$QDjv1xsO$H}r%6uvB4U4DiQr|MTZc6fB+&FnHA2~mYkIvmJH>nddeG|bY
z%SC`Gh3>YPx*=wzm942T&4k^UffigLCfkRLB#~#SWqUT7gndWSz3}pi@K*v12g5(6
z*uD*a?o~&}gJJoXc;kg>Bj0g<5_4QP?8kh)5wQnHM`eGIrsdTwjsN)<!0MI!*Y?&?
z@zo9I|JfY89|P!A_26kpM=_L3OMsMx^R=t`>zaW6$Eo;5F`AV1aa~S2CxfDM)#To!
z(dA^gACqjNN*RA;%L%?4vSti(QG5Kr*q>$Io4)xJWAn*%_1I4_G_U%bgQ}ivhEcV+
z>#(kl(#6erpa;Wn9H)%<YMWkpO$uDZf2~e?V9g)0exF?u+8pnu80)Kb_WvdDGV}*^
z=vU*=E7mNOZ}I&fKbT{U@085)r}b9KvrU&R#=XHHe3DLV<g<&>m{M{s7{_S5npdLT
zu#;DHD^$(Ejx+nUrQ$8^^-)}m|NFbMSEnmA&Hq?dH2ZF!<`vug@^ar=nmtKVa#Lme
zY}p9^IQ{<go450#v%g}+Io&MUcFVarg2&hQZs0LhJg@5hY&ny|oJVzOpH|J0Jx-Y^
z(&=*bbFt*CArbw$1^cqD)lZ0vwS|^r#%sT+m9_5dxj$CQ*_#c4Syo<McVCDyHD)Kf
z<mKinYm95Lo}9&)CG!ob@fTZ|D!<&y`K?zy`j*{gwYvB1|0~5yfB*pk1PBlyK!5-N
z0t5&UAV7cs0RjXF5FkK+009C72oNAZfB*pk1PBlyK!5-N0t5&UAV7cs0RjXF5FkK+
z009C72oNAZfB*pk1PBlyK!5-N0t5&UAV7cs0RjXF5FkK+009C72oNAZfB*pk1PBly
zK!5-N0t5&UAV7cs0RjXF5FkK+009C72oNAZfB*pk1PBlyK!5-N0t5&UAV7cs0RjXF
z5FkK+009C72oNAZfB*pk1PBlyK!5-N0t5&UAV7cs0RjXF5FkK+009C72oNAZfB*pk
z1PBlyK!5-N0t5&UAV7cs0RjXF5FkK+009C72oNAZfB*pk1PBlyK!5-N0t5&UAV7cs
z0RjXF5FkK+009C72oNAZfB*pk1PBlyK!5-N0t5&UAV7cs0RjXF5FkK+009C72oNAZ
zfB*pk1d_l<9~AdKK0p8EU4I|`=ltitIA8z!==}U=>wX`epMP-i7rwr@h4A%Gkxu?J
zFYNrMsaCB72oNAZfB*pk1PBlyK!5-N0t5&UAV7cs0RjXF5FkK+009C72oNAZfB*pk
z1PBlyK!5-N0t5&UAV7cs0RjXF5FkK+009C72oNAZfB*pk1PBlyK!5-N0t5&UAV7cs
z0RjXF5FkK+009C72oNAZfB*pk1PBlyK!5-N0t5&UAV7cs0RjXF5FkK+009C72oNAZ
zfB*pk1PBlyK!5-N0t5&UAV7cs0RjXF5FkK+009C72oNAZfB*pk1PBlyK!5-N0t5&U
zAV7cs0RjXF5FkK+009C72oNAZfB*pk1PBlyK!5-N0t5&UAV7cs0RjXF5FkK+009C7
z2oNAZfB*pk1PBlyK!5-N0t5&UAV7cs0RjXF5FkK+009C72oNAZfB*pk1PBlyK!5-N
z0t5&UAV7cs0RjXF5FkK+009C72oNAZfB*pk1PBlyK!5-N0t5&UAV7cs0RjXF5FkK+
L009C7-bLWQ53UH>

literal 0
HcmV?d00001

diff --git a/6502/C64/disks/file-words.fth b/6502/C64/disks/file-words.fth
new file mode 100644
index 0000000..1a931ee
--- /dev/null
+++ b/6502/C64/disks/file-words.fth
@@ -0,0 +1,4760 @@
+
+\ *** Block No. 0, Hexblock 0
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 1, Hexblock 1
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 2, Hexblock 2
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 3, Hexblock 3
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 4, Hexblock 4
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 5, Hexblock 5
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 6, Hexblock 6
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 7, Hexblock 7
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 8, Hexblock 8
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 9, Hexblock 9
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 10, Hexblock a
+
+\ include loadscreen           08jun20pz
+
+
+  : i/o-status?  $90 c@ ;
+
+  : unloop  rdrop rdrop rdrop ;
+
+  : dev  (drv @ 8 + ;
+
+ : lo/hi> ( lo hi -- u )
+     255 and 256 * swap 255 and + ;
+
+
+  1 4 +thru
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 11, Hexblock b
+
+\   fload-dev freadline        25apr20pz
+
+  create fload-dev  8 ,
+  create fload-2nd  15 ,
+| 132 constant /fib
+  create fib /fib allot
+  variable #fib
+
+| : eol? ( c -- f )
+   dup 0= swap #cr = or IF 0 exit THEN
+   i/o-status? IF 1 exit THEN  -1 ;
+
+| : freadline ( -- eof )
+ fload-dev @ fload-2nd @ busin
+ fib /fib bounds
+ DO bus@ dup eol? under
+     IF I c! ELSE drop THEN
+ dup 0<
+   IF drop ELSE I + fib - #fib ! UNLOOP
+   i/o-status? busoff exit THEN
+ LOOP /fib #fib !
+ ." warning: line exceeds max " /fib .
+ cr ." extra chars ignored" cr
+ BEGIN bus@ eol? 1+ UNTIL
+ i/o-status? busoff ;
+
+\ *** Block No. 12, Hexblock c
+
+\   fload-open  fload-close    25apr20pz
+
+| : fload-open ( addr c -- )
+ fload-dev @
+ fload-2nd @ 1- dup fload-2nd !
+ busopen
+ 2dup cr type bustype
+ " ,s,r" count bustype busoff ;
+
+| : fload-close ( -- )
+ fload-dev @ fload-2nd @
+ dup 1+ fload-2nd !
+ busclose ;
+
+  : factive? ( -- flag )
+ fload-2nd @ 15 < ;
+
+  : fload-close-all ( -- )
+ factive? IF 15 fload-2nd @ DO
+   fload-dev @ I busclose  -1 +LOOP
+ 15 fload-2nd ! THEN ;
+
+  : \ ( -- )
+ blk @ IF [compile] \ exit THEN
+ #tib @ >in ! ; immediate
+
+\ *** Block No. 13, Hexblock d
+
+\   include                    10may20pz
+
+ create >tib-orig >tib @ ,
+ fib >tib !
+
+  : interpret-via-fib
+ BEGIN freadline >r  >in off
+ #fib @ #tib !  interpret  r> UNTIL ;
+
+  : include ( -- )
+ blk @ Abort" no include from blk"
+ bl parse  fload-open
+   interpret-via-fib
+ fload-close
+ #tib off >in off ;
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 14, Hexblock e
+
+\ dir dos cat                  08jun20pz
+
+: dir  ( -- )
+   dev 0 busopen  ascii $ bus! busoff
+   dev 0 busin bus@ bus@ 2drop
+   BEGIN cr bus@ bus@ 2drop
+   i/o-status? 0= WHILE
+   bus@ bus@ lo/hi> u.
+   BEGIN bus@ ?dup WHILE con! REPEAT
+   REPEAT busoff  dev 0 busclose ;
+
+: dos  ( -- )
+   bl word count ?dup
+      IF dev 15 busout bustype
+      busoff cr ELSE drop THEN
+   dev 15 busin
+   BEGIN bus@ con! i/o-status? UNTIL
+   busoff ;
+
+: cat   ( -- ) cr
+   dev 2 busopen  bl word count bustype
+   busoff  dev 2 busin  BEGIN bus@ con!
+   i/o-status? UNTIL busoff
+   dev 2 busclose ;
+
+
+\ *** Block No. 15, Hexblock f
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 16, Hexblock 10
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 17, Hexblock 11
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 18, Hexblock 12
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 19, Hexblock 13
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 20, Hexblock 14
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 21, Hexblock 15
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 22, Hexblock 16
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 23, Hexblock 17
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 24, Hexblock 18
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 25, Hexblock 19
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 26, Hexblock 1a
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 27, Hexblock 1b
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 28, Hexblock 1c
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 29, Hexblock 1d
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 30, Hexblock 1e
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 31, Hexblock 1f
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 32, Hexblock 20
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 33, Hexblock 21
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 34, Hexblock 22
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 35, Hexblock 23
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 36, Hexblock 24
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 37, Hexblock 25
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 38, Hexblock 26
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 39, Hexblock 27
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 40, Hexblock 28
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 41, Hexblock 29
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 42, Hexblock 2a
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 43, Hexblock 2b
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 44, Hexblock 2c
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 45, Hexblock 2d
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 46, Hexblock 2e
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 47, Hexblock 2f
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 48, Hexblock 30
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 49, Hexblock 31
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 50, Hexblock 32
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 51, Hexblock 33
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 52, Hexblock 34
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 53, Hexblock 35
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 54, Hexblock 36
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 55, Hexblock 37
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 56, Hexblock 38
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 57, Hexblock 39
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 58, Hexblock 3a
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 59, Hexblock 3b
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 60, Hexblock 3c
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 61, Hexblock 3d
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 62, Hexblock 3e
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 63, Hexblock 3f
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 64, Hexblock 40
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 65, Hexblock 41
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 66, Hexblock 42
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 67, Hexblock 43
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 68, Hexblock 44
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 69, Hexblock 45
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 70, Hexblock 46
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 71, Hexblock 47
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 72, Hexblock 48
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 73, Hexblock 49
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 74, Hexblock 4a
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 75, Hexblock 4b
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 76, Hexblock 4c
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 77, Hexblock 4d
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 78, Hexblock 4e
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 79, Hexblock 4f
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 80, Hexblock 50
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 81, Hexblock 51
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 82, Hexblock 52
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 83, Hexblock 53
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 84, Hexblock 54
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 85, Hexblock 55
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 86, Hexblock 56
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 87, Hexblock 57
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 88, Hexblock 58
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 89, Hexblock 59
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 90, Hexblock 5a
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 91, Hexblock 5b
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 92, Hexblock 5c
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 93, Hexblock 5d
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 94, Hexblock 5e
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 95, Hexblock 5f
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 96, Hexblock 60
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 97, Hexblock 61
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 98, Hexblock 62
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 99, Hexblock 63
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 100, Hexblock 64
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 101, Hexblock 65
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 102, Hexblock 66
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 103, Hexblock 67
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 104, Hexblock 68
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 105, Hexblock 69
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 106, Hexblock 6a
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 107, Hexblock 6b
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 108, Hexblock 6c
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 109, Hexblock 6d
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 110, Hexblock 6e
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 111, Hexblock 6f
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 112, Hexblock 70
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 113, Hexblock 71
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 114, Hexblock 72
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 115, Hexblock 73
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 116, Hexblock 74
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 117, Hexblock 75
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 118, Hexblock 76
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 119, Hexblock 77
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 120, Hexblock 78
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 121, Hexblock 79
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 122, Hexblock 7a
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 123, Hexblock 7b
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 124, Hexblock 7c
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 125, Hexblock 7d
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 126, Hexblock 7e
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 127, Hexblock 7f
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 128, Hexblock 80
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 129, Hexblock 81
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 130, Hexblock 82
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 131, Hexblock 83
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 132, Hexblock 84
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 133, Hexblock 85
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 134, Hexblock 86
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 135, Hexblock 87
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 136, Hexblock 88
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 137, Hexblock 89
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 138, Hexblock 8a
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 139, Hexblock 8b
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 140, Hexblock 8c
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 141, Hexblock 8d
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 142, Hexblock 8e
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 143, Hexblock 8f
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 144, Hexblock 90
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 145, Hexblock 91
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 146, Hexblock 92
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 147, Hexblock 93
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 148, Hexblock 94
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 149, Hexblock 95
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 150, Hexblock 96
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 151, Hexblock 97
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 152, Hexblock 98
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 153, Hexblock 99
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 154, Hexblock 9a
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 155, Hexblock 9b
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 156, Hexblock 9c
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 157, Hexblock 9d
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 158, Hexblock 9e
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 159, Hexblock 9f
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 160, Hexblock a0
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 161, Hexblock a1
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 162, Hexblock a2
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 163, Hexblock a3
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 164, Hexblock a4
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 165, Hexblock a5
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 166, Hexblock a6
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 167, Hexblock a7
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 168, Hexblock a8
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+\ *** Block No. 169, Hexblock a9
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/6502/C64/emulator/build-devenv.sh b/6502/C64/emulator/build-devenv.sh
index 3621fbc..2c237f9 100755
--- a/6502/C64/emulator/build-devenv.sh
+++ b/6502/C64/emulator/build-devenv.sh
@@ -12,6 +12,6 @@ rm -f cbmfiles/devenv
 
 keybuf="2 drive 19 load\n1 drive 26 load\nsavesystem devenv\n"
 
-"${emulatordir}/build-in-vice.sh" "c64-volksforth83" "${keybuf}"
+"${emulatordir}/run-in-vice.sh" "c64-volksforth83" "${keybuf}"
 
 make emulator/devenv.T64
diff --git a/6502/C64/emulator/build-in-vice.sh b/6502/C64/emulator/run-in-vice.sh
similarity index 95%
rename from 6502/C64/emulator/build-in-vice.sh
rename to 6502/C64/emulator/run-in-vice.sh
index 51d37d0..9ee6192 100755
--- a/6502/C64/emulator/build-in-vice.sh
+++ b/6502/C64/emulator/run-in-vice.sh
@@ -30,7 +30,7 @@ x64 \
   -fs8 "${basedir}/cbmfiles" \
   -9 "${basedir}/disks/vforth4_1.d64" \
   -10 "${basedir}/disks/vforth4_3.d64" \
-  -11 "${basedir}/disks/vforth4_4.d64" \
+  -11 "${basedir}/disks/file-words.d64" \
   -symkeymap "${emulatordir}/x11_sym_vf_de.vkm" \
   -keymap 2 \
   $autostart \