Update savehexpalette.bm

This commit is contained in:
visionmercer 2022-09-19 10:55:34 +02:00
commit aa00c22a80

View file

@ -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