diff --git a/graphics/hgr/vgi/color_test.s b/graphics/hgr/vgi/color_test.s
new file mode 100644
index 00000000..d7ffe4ae
--- /dev/null
+++ b/graphics/hgr/vgi/color_test.s
@@ -0,0 +1,45 @@
+; Color test
+
+.include "zp.inc"
+.include "hardware.inc"
+
+
+vgi_color_test:
+	jsr	SETGR
+	jsr	HGR
+	bit	FULLGR
+
+	jsr	vgi_make_tables
+
+	; get pointer to image data
+
+	lda	#<color_test_data
+	sta	VGIL
+	lda	#>color_test_data
+	sta	VGIH
+
+	jsr	play_vgi
+
+	jsr	wait_until_keypress
+
+done:
+	jmp	done
+
+.include "vgi_common.s"
+
+.include "color_test.data"
+
+
+	;============================
+	; WAIT UNTIL KEYPRESS
+	;============================
+
+wait_until_keypress:
+
+	lda	KEYPRESS
+	bpl	wait_until_keypress
+
+	bit	KEYRESET
+
+	rts
+
diff --git a/graphics/hgr/vgi/doom_vgi.s b/graphics/hgr/vgi/doom_vgi.s
index ab565371..d8fe1b7c 100644
--- a/graphics/hgr/vgi/doom_vgi.s
+++ b/graphics/hgr/vgi/doom_vgi.s
@@ -88,7 +88,7 @@ setup_interrupt:
 	jsr	HOME
 ;	bit	FULLGR
 
-	jsr	make_tables
+	jsr	vgi_make_tables
 
 
 	;============================
diff --git a/graphics/hgr/vgi/myst_vgi.s b/graphics/hgr/vgi/myst_vgi.s
index 83ff9128..e8a65aaa 100644
--- a/graphics/hgr/vgi/myst_vgi.s
+++ b/graphics/hgr/vgi/myst_vgi.s
@@ -9,7 +9,7 @@ vgi_myst:
 	jsr	HGR
 	bit	FULLGR
 
-	jsr	make_tables
+	jsr	vgi_make_tables
 
 	; get pointer to image data