diff --git a/savehexpalette.bm b/savehexpalette.bm
index a2c55bc..3621e73 100644
--- a/savehexpalette.bm
+++ b/savehexpalette.bm
@@ -5,7 +5,7 @@ SUB SaveHexPalette (palettearray() AS _UNSIGNED LONG, filename AS STRING)
     DIM i AS LONG
     ff = FREEFILE
     OPEN filename FOR OUTPUT AS ff
-    FOR i = 0 TO UBOUND(palettearray)
+    FOR i = LBOUND(palettearray) TO UBOUND(palettearray)
         PRINT #ff, RIGHT$(HEX$(palettearray(i)), 6);
         IF i < UBOUND(palettearray) THEN PRINT #ff, ""
     NEXT i