From 9ac00426f3e41a4afff3d2c707f8d7e56b69bd67 Mon Sep 17 00:00:00 2001
From: Paul Gardner-Stephen <paul@servalproject.org>
Date: Sun, 28 Apr 2019 21:26:33 +0930
Subject: [PATCH] display correct # of basic bytes free on startup

---
 c64/basic/basic_cold_start.s | 14 ++++++++++----
 1 file changed, 10 insertions(+), 4 deletions(-)

diff --git a/c64/basic/basic_cold_start.s b/c64/basic/basic_cold_start.s
index ac809f32..7f399c7d 100644
--- a/c64/basic/basic_cold_start.s
+++ b/c64/basic/basic_cold_start.s
@@ -11,8 +11,16 @@ basic_cold_start:
 	lda #<startup_message
 	jsr print_string
 
-	lda #>64738
-	ldx #<64738
+		
+	;; Work out free bytes, and display
+	jsr basic_do_new
+	lda basic_top_of_memory_ptr+0
+	sec
+	sbc basic_end_of_text_ptr+0
+	tax
+	lda basic_top_of_memory_ptr+1
+	sbc basic_end_of_text_ptr+1
+	
 	jsr print_integer	
 
 	lda #$20
@@ -22,8 +30,6 @@ basic_cold_start:
 	ldx #34
 	jsr print_packed_message
 
-	jsr basic_do_new
-	
 	;; jump into warm start loop
 	jmp basic_warm_start