visionmercer/qb64-include
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Update savehexpalette.bm

Browse source
This commit is contained in:
visionmercer 2022-09-19 10:55:34 +02:00
commit aa00c22a80
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
savehexpalette.bm
View file

@ -5,7 +5,7 @@ SUB SaveHexPalette (palettearray() AS _UNSIGNED LONG, filename AS STRING)
DIM i AS LONG DIM i AS LONG
ff = FREEFILE ff = FREEFILE
OPEN filename FOR OUTPUT AS ff 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); PRINT #ff, RIGHT$(HEX$(palettearray(i)), 6);
IF i < UBOUND(palettearray) THEN PRINT #ff, "" IF i < UBOUND(palettearray) THEN PRINT #ff, ""
NEXT i NEXT i