diff --git a/vt100.screen.S b/vt100.screen.S
index 4a3677a..7edd0ee 100644
--- a/vt100.screen.S
+++ b/vt100.screen.S
@@ -318,16 +318,91 @@ fill_screen ent
 	php
 	rep #$30
 
-	ldx #$0400
-	ldy #$0401
-	lda #40*24+64-2
-	mvn $010000,$010000
 
 	ldx #$0400
 	ldy #$0401
-	lda #40*24+64-2
+	lda #40*3-2
+	mvn $010000,$010000
+
+	ldx #$0400
+	ldy #$0480
+	lda #40*3-1
+	mvn $010000,$010000
+
+	ldx #$0400
+	ldy #$0500
+	lda #40*3-1
+	mvn $010000,$010000
+
+	ldx #$0400
+	ldy #$0580
+	lda #40*3-1
+	mvn $010000,$010000
+
+	ldx #$0400
+	ldy #$0600
+	lda #40*3-1
+	mvn $010000,$010000
+
+	ldx #$0400
+	ldy #$0680
+	lda #40*3-1
+	mvn $010000,$010000
+
+	ldx #$0400
+	ldy #$0700
+	lda #40*3-1
+	mvn $010000,$010000
+
+	ldx #$0400
+	ldy #$0780
+	lda #40*3-1
+	mvn $010000,$010000
+
+* 
+	ldx #$0400
+	ldy #$0401
+	lda #40*3-2
 	mvn $000000,$000000
 
+	ldx #$0400
+	ldy #$0480
+	lda #40*3-1
+	mvn $000000,$000000
+
+	ldx #$0400
+	ldy #$0500
+	lda #40*3-1
+	mvn $000000,$000000
+
+	ldx #$0400
+	ldy #$0580
+	lda #40*3-1
+	mvn $000000,$000000
+
+	ldx #$0400
+	ldy #$0600
+	lda #40*3-1
+	mvn $000000,$000000
+
+	ldx #$0400
+	ldy #$0680
+	lda #40*3-1
+	mvn $000000,$000000
+
+	ldx #$0400
+	ldy #$0700
+	lda #40*3-1
+	mvn $000000,$000000
+
+	ldx #$0400
+	ldy #$0780
+	lda #40*3-1
+	mvn $000000,$000000
+
+
+
+
 * not needed since $0,$0 last
 *	phk
 *	plb