From 99b4d1bc34d9dee50ef1fd98fcb68391d51d44c3 Mon Sep 17 00:00:00 2001
From: visionmercer <62051836+visionmercer@users.noreply.github.com>
Date: Tue, 10 May 2022 22:44:23 +0200
Subject: [PATCH] Create savehexpalette.bm

---
 savehexpalette.bm | 9 +++++++++
 1 file changed, 9 insertions(+)
 create mode 100644 savehexpalette.bm

diff --git a/savehexpalette.bm b/savehexpalette.bm
new file mode 100644
index 0000000..d9c492c
--- /dev/null
+++ b/savehexpalette.bm
@@ -0,0 +1,9 @@
+Sub SaveHexPalette (palettearray() As _Unsigned Long, filename As String)
+    ff = FreeFile
+    Open filename For Output As ff
+    For i = 0 To UBound(palettearray)
+        Print #ff, Right$(Hex$(palettearray(i)), 6);
+        If i < UBound(palettearray) Then Print #ff, ""
+    Next i
+    Close ff
+End Sub