diff --git a/durexforth.asm b/durexforth.asm
index 26c920c46..a1fd29d26 100755
--- a/durexforth.asm
+++ b/durexforth.asm
@@ -28,11 +28,13 @@
 !set TARGET = 128
 
 !if TARGET = 128 {
-* = $1c01
+BASIC_START = $1c01
 } else {
-* = $0801
+BASIC_START = $0801
 }
 
+* = BASIC_START
+
 !byte $b, $08, $a, 0 
 !byte $9E ; SYS
 !byte '0' + entry % 10000 / 1000 ; entrypoint address as decimal digits       
@@ -192,6 +194,9 @@ ONE
 !src "lowercase.asm"
 !src "disk.asm"
 
+    +BACKLINK "basic-start", 11
+    +VALUE BASIC_START
+
     +BACKLINK "native-c128?", 12
 !if TARGET = 128 {
     +VALUE 1
diff --git a/forth_src/base.fs b/forth_src/base.fs
index d62a3d524..d2e4b42b6 100755
--- a/forth_src/base.fs
+++ b/forth_src/base.fs
@@ -224,7 +224,7 @@ include turnkey
 cr
 .( cart: )
 $4000 $68 -
-here $1c01 - top latest -
+here basic-start - top latest -
 $21 + + -
 . .( bytes remain.) cr
 
diff --git a/forth_src/turnkey.fs b/forth_src/turnkey.fs
index 3b90e4010..6feb26f49 100644
--- a/forth_src/turnkey.fs
+++ b/forth_src/turnkey.fs
@@ -20,7 +20,7 @@ start @ to oldstart
 top to oldtop 
 ['] restore-forth start ! 
 here $20 + top latest - + top!
-$1c01 top 1+ $d word count saveb ;
+basic-start top 1+ $d word count saveb ;
 
 : save-prg ( strptr strlen -- )
 here 0 , top to latest top!