[movitz-cvs] CVS movitz/losp/x86-pc - movitz-cvs@common-lisp.net - mailman3.common-lisp.net

17 Mar 2007

Update of /project/movitz/cvsroot/movitz/losp/x86-pc
In directory clnet:/tmp/cvs-serv23688
Modified Files:
    vga.lisp 
Log Message:
Tweak rle-blit-splash to take octet array as input. The splash image
plus the rle-blit-splash function now account for less than 5 KB.

--- /project/movitz/cvsroot/movitz/losp/x86-pc/vga.lisp	2007/03/17 14:57:30	1.9
+++ /project/movitz/cvsroot/movitz/losp/x86-pc/vga.lisp	2007/03/17 15:39:26	1.10
@@ -10,7 +10,7 @@
 ;;;; Author:        Frode Vatvedt Fjeld frodef@acm.org
 ;;;; Created at:    Tue Sep 25 14:08:20 2001
 ;;;;                
-;;;; $Id: vga.lisp,v 1.9 2007/03/17 14:57:30 ffjeld Exp $
+;;;; $Id: vga.lisp,v 1.10 2007/03/17 15:39:26 ffjeld Exp $
 ;;;;                
 ;;;;------------------------------------------------------------------
@@ -925,111 +925,129 @@
;; run-length compressed: color count color count ...
 (defvar *vga-g-splash*
-  '(7 1828 0 4 7 315 0 5 7 315 0 2 4 2 0 1 7 314 0 2 4 3 0 1 7 314 0 2 4 3 0 1 1 7 7 307 0 2
-    4 3 0 1 1 17 7 297 0 1 4 3 0 1 1 22 7 292 0 2 4 3 0 1 1 3 7 2 1 9 7 2 1 10 7 288 0 2 4 3
-    0 1 1 3 7 2 1 9 7 2 1 12 7 286 0 2 4 2 0 2 1 2 7 3 1 9 7 2 1 3 7 5 1 6 7 283 0 2 4 3 0 1
-    1 3 7 2 1 9 7 3 1 2 7 8 1 6 7 281 0 2 4 3 0 1 1 3 7 2 1 9 7 3 1 2 7 3 1 1 7 5 1 6 7 280
-    0 2 4 2 0 2 1 3 7 2 1 9 7 2 1 2 7 3 1 4 7 4 1 6 7 279 0 1 4 3 0 1 1 3 7 3 1 9 7 2 1 2 7
-    3 1 6 7 3 1 6 7 277 0 2 4 3 0 1 1 3 7 2 1 10 7 2 1 3 7 2 1 7 7 2 1 7 7 276 0 2 4 3 0 1 1
-    3 7 2 1 9 7 3 1 3 7 3 1 16 7 275 0 2 4 2 0 2 1 2 7 3 1 9 7 3 1 4 7 4 1 8 7 3 1 3 7 274 0
-    2 4 3 0 1 1 3 7 2 1 10 7 2 1 6 7 5 1 5 7 5 1 3 7 273 0 2 4 3 0 1 1 3 7 2 1 10 7 2 1 7 7
-    5 1 4 7 6 1 3 7 272 0 2 4 2 0 2 1 3 7 2 1 10 7 2 1 9 7 4 1 3 7 2 1 1 7 4 1 3 7 271 0 1 4
-    3 0 1 1 3 7 3 1 10 7 2 1 11 7 3 1 2 7 2 1 2 7 3 1 4 7 269 0 2 4 3 0 1 1 3 7 2 1 10 7 3 1
-    2 7 2 1 7 7 3 1 1 7 3 1 3 7 3 1 3 7 269 0 2 4 3 0 1 1 3 7 2 1 5 7 2 1 3 7 3 1 2 7 3 1 6
-    7 3 1 1 7 3 1 4 7 2 1 5 7 267 0 2 4 2 0 2 1 3 7 10 1 2 7 2 1 4 7 4 1 4 7 3 1 1 7 3 1 4 7
-    3 1 5 7 265 0 2 4 3 0 1 1 3 7 10 1 10 7 5 1 1 7 3 1 2 7 4 1 3 7 3 1 6 7 264 0 2 4 3 0 1
-    1 24 7 8 1 2 7 9 1 9 7 262 0 2 4 2 0 2 1 26 7 5 1 2 7 3 1 1 7 6 1 10 7 261 0 1 4 3 0 2 1
-    14 7 8 1 11 7 3 1 3 7 3 1 13 7 258 0 2 4 3 0 2 7 2 1 5 7 17 1 9 7 3 1 21 7 256 0 2 4 3 0
-    1 7 26 1 8 7 2 1 24 7 254 0 2 4 2 0 2 7 28 1 6 7 2 1 26 7 252 0 1 4 3 0 2 7 29 1 5 7 2 1
-    24 7 158 0 8 7 87 0 2 4 3 0 2 7 31 1 26 7 160 0 2 7 7 0 1 7 86 0 2 4 2 0 2 7 34 1 21 7
-    158 0 7 7 3 0 3 7 1 0 7 7 80 0 1 4 3 0 2 7 36 1 15 7 160 0 3 7 4 0 2 7 2 0 9 7 3 0 4 7
-    72 2 5 4 3 0 2 7 40 1 5 7 165 0 2 7 8 0 1 7 2 0 5 7 9 0 2 7 69 2 7 4 3 0 1 7 211 0 1 7 4
-    0 2 7 4 0 1 7 2 0 2 7 8 0 4 7 1 0 1 7 66 2 9 4 2 0 2 7 210 0 2 7 2 0 12 7 8 0 5 7 1 0 1
-    7 65 2 11 4 1 0 1 2 1 7 210 0 1 7 3 0 5 7 5 0 3 7 8 0 4 7 2 0 1 7 63 2 15 7 209 0 2 7 3
-    0 4 7 8 0 2 7 1 0 10 7 2 0 1 7 62 2 18 7 207 0 1 7 5 0 2 7 4 0 3 7 3 0 2 7 6 0 2 7 4 0 1
-    7 62 2 18 7 207 0 2 7 5 0 1 7 4 0 4 7 1 0 2 7 4 0 3 7 1 0 1 7 4 0 1 7 61 2 20 7 199 2 8
-    0 2 7 4 0 1 7 4 0 4 7 1 0 1 7 5 0 6 7 1 0 3 7 61 2 10 0 1 2 9 7 194 2 14 0 6 7 4 0 4 7 1
-    0 1 7 6 0 2 7 2 0 3 2 1 7 62 2 9 0 2 4 2 2 8 7 188 2 24 0 1 7 4 0 3 7 2 0 2 7 8 0 2 2 6
-    7 58 2 10 0 1 4 3 0 1 2 6 7 185 2 28 0 1 7 10 0 1 7 7 0 2 2 9 7 56 2 10 0 1 4 3 0 1 2 6
-    7 182 2 31 0 2 7 9 0 8 2 12 7 54 2 22 7 179 2 35 0 2 7 6 0 2 2 22 7 50 2 23 7 177 2 40 0
-    7 2 24 7 47 2 24 7 175 2 75 7 44 2 26 7 172 2 79 7 41 2 17 0 1 2 11 7 169 2 82 7 38 2 19
-    0 1 4 3 2 8 7 167 2 84 7 36 2 21 0 1 4 3 0 1 2 7 7 165 2 87 7 34 2 21 0 2 4 2 0 2 2 7 7
-    163 2 89 7 32 2 23 0 1 4 3 0 1 2 7 7 162 2 92 7 29 2 25 0 1 4 3 0 1 2 4 7 163 2 95 7 27
-    2 16 7 10 0 1 4 3 0 1 7 166 2 96 7 25 2 16 7 11 0 2 4 2 0 1 7 165 2 99 7 23 2 15 7 13 0
-    1 4 3 0 1 7 164 2 101 7 20 2 15 7 15 0 1 4 3 0 1 7 162 2 62 0 2 2 40 7 18 2 15 7 16 0 4
-    7 162 2 62 0 6 2 39 7 14 2 15 7 183 2 63 0 1 7 1 0 1 7 2 0 4 2 39 7 8 2 17 7 183 2 64 0
-    1 7 1 0 1 7 2 0 1 7 2 0 3 2 61 7 182 2 65 0 4 7 2 0 1 7 2 0 1 7 1 0 3 2 58 7 183 2 65 0
-    1 7 1 0 5 7 1 0 2 7 1 0 1 7 1 0 5 2 52 7 184 2 66 0 1 7 1 0 1 7 1 0 3 7 1 0 1 7 2 0 1 7
-    2 0 1 7 2 0 3 2 49 7 184 2 68 0 2 7 2 0 5 7 1 0 1 7 2 0 1 7 2 0 4 2 47 7 184 2 70 0 2 7
-    1 0 1 7 2 0 5 7 1 0 1 7 2 0 1 7 2 0 2 2 45 7 184 2 72 0 3 7 2 0 1 7 2 0 7 7 2 0 1 2 44 7
-    186 2 73 0 5 7 1 0 2 7 1 0 2 7 1 0 5 2 43 7 186 2 77 0 4 7 2 0 1 7 2 0 1 7 2 0 1 2 16 7
-    2 2 24 7 188 2 79 0 5 7 2 0 1 7 1 0 1 2 17 7 7 2 17 7 190 2 83 0 5 2 18 7 16 2 3 7 194 2
-    107 7 213 2 106 7 214 2 106 7 213 2 107 7 213 2 106 7 214 2 106 7 214 2 106 7 213 2 106
-    7 214 2 106 7 214 2 105 7 215 2 104 7 216 2 104 7 215 2 104 7 216 2 104 7 216 2 105 7
-    215 2 105 7 215 2 83 7 11 2 11 7 214 2 82 7 14 2 10 7 214 2 37 7 34 2 11 7 14 2 10 7 214
-    2 27 7 45 2 10 7 14 2 10 7 214 2 14 7 5 2 8 7 45 2 9 7 15 2 10 7 214 2 9 7 10 2 8 7 45 2
-    9 7 15 2 10 7 213 2 9 7 11 2 8 7 45 2 9 7 16 2 9 7 213 2 8 7 12 2 8 7 45 2 9 7 16 2 9 7
-    213 2 8 7 12 2 7 7 46 2 9 7 16 2 9 7 213 2 8 7 12 2 7 7 46 2 8 7 17 2 9 7 213 2 7 7 12 2
-    8 7 46 2 8 7 17 2 9 7 212 2 8 7 12 2 8 7 46 2 8 7 17 2 9 7 212 2 8 7 12 2 8 7 46 2 8 7
-    18 2 9 7 211 2 8 7 12 2 8 7 46 2 8 7 18 2 9 7 211 2 7 7 13 2 8 7 46 2 8 7 18 2 9 7 211 2
-    7 7 13 2 7 7 47 2 7 7 19 2 9 7 211 2 7 7 13 2 7 7 47 2 7 7 19 2 9 7 210 2 8 7 13 2 7 7
-    46 2 8 7 19 2 9 7 210 2 7 7 13 2 8 7 46 2 8 7 19 2 9 7 210 2 7 7 13 2 8 7 46 2 8 7 20 2
-    8 7 210 2 7 7 13 2 8 7 46 2 8 7 20 2 8 7 210 2 7 7 13 2 7 7 47 2 8 7 20 2 8 7 209 2 8 7
-    13 2 7 7 47 2 7 7 21 2 8 7 209 2 7 7 14 2 7 7 47 2 7 7 21 2 8 7 209 2 7 7 14 2 7 7 47 2
-    7 7 21 2 8 7 209 2 7 7 14 2 7 7 47 2 7 7 21 2 8 7 209 2 7 7 13 2 8 7 47 2 7 7 22 2 8 7
-    208 2 7 7 13 2 8 7 46 2 8 7 22 2 8 7 207 2 7 7 14 2 7 7 47 2 8 7 22 2 8 7 207 2 7 7 14 2
-    7 7 47 2 7 7 23 2 8 7 207 2 7 7 14 2 7 7 47 2 7 7 23 2 8 7 207 2 7 7 14 2 7 7 47 2 7 7
-    23 2 8 7 207 2 7 7 14 2 7 7 47 2 7 7 23 2 8 7 206 2 7 7 15 2 7 7 47 2 7 7 24 2 7 7 206 2
-    7 7 14 2 7 7 48 2 7 7 24 2 7 7 206 2 7 7 14 2 7 7 48 2 7 7 24 2 7 7 206 2 7 7 14 2 7 7
-    48 2 7 7 24 2 7 7 206 2 7 7 14 2 7 7 47 2 8 7 24 2 7 7 206 2 7 7 14 2 7 7 47 2 7 7 25 2
-    7 7 205 2 7 7 15 2 7 7 47 2 7 7 25 2 7 7 202 2 11 7 14 2 7 7 47 2 7 7 25 2 7 7 201 2 13
-    7 10 2 11 7 46 2 7 7 25 2 7 7 201 2 14 7 8 2 13 7 45 2 7 7 25 2 8 7 199 2 16 7 6 2 15 7
-    44 2 7 7 22 2 12 7 198 2 16 7 6 2 15 7 42 2 10 7 20 2 15 7 196 2 16 7 6 2 15 7 41 2 13 7
-    18 2 15 7 197 2 15 7 6 2 15 7 40 2 15 7 16 2 17 7 196 2 14 7 7 2 15 7 40 2 15 7 16 2 17
-    7 198 2 4 7 2 2 5 7 9 2 13 7 41 2 15 7 16 2 17 7 219 2 4 7 3 2 4 7 42 2 15 7 17 2 7 7 2
-    2 6 7 273 2 15 7 18 2 5 7 4 2 3 7 276 2 13 7 308 2 4 7 2 2 5 7 3537 0 3 7 307 0 2 7 7 0
-    4 7 73 0 2 7 231 0 3 7 6 0 5 7 73 0 2 7 2 0 5 7 223 0 4 7 5 0 5 7 73 0 11 7 221 0 4 7 6
-    0 5 7 72 0 13 7 83 0 2 7 134 0 5 7 5 0 5 7 71 0 7 7 6 0 3 7 81 0 3 7 133 0 5 7 5 0 6 7
-    70 0 6 7 9 0 2 7 80 0 3 7 133 0 6 7 4 0 3 7 1 0 2 7 71 0 6 7 9 0 2 7 80 0 3 7 133 0 2 7
-    1 0 2 7 5 0 2 7 1 0 3 7 31 0 2 7 6 0 2 7 30 0 2 7 1 0 2 7 10 0 2 7 79 0 3 7 133 0 2 7 1
-    0 2 7 5 0 2 7 2 0 2 7 31 0 3 7 5 0 3 7 32 0 3 7 10 0 2 7 79 0 2 7 133 0 2 7 2 0 2 7 4 0
-    3 7 1 0 2 7 31 0 4 7 5 0 2 7 33 0 2 7 10 0 2 7 79 0 3 7 132 0 3 7 1 0 2 7 5 0 2 7 1 0 3
-    7 31 0 3 7 5 0 2 7 33 0 3 7 9 0 3 7 78 0 3 7 133 0 2 7 2 0 2 7 4 0 2 7 2 0 2 7 32 0 2 7
-    5 0 3 7 33 0 3 7 9 0 3 7 78 0 3 7 132 0 2 7 2 0 3 7 3 0 2 7 2 0 3 7 39 0 7 7 28 0 3 7 9
-    0 3 7 78 0 3 7 132 0 3 7 2 0 2 7 3 0 3 7 2 0 2 7 39 0 8 7 28 0 3 7 7 0 4 7 79 0 3 7 131
-    0 3 7 2 0 3 7 3 0 2 7 2 0 3 7 37 0 6 7 31 0 3 7 7 0 4 7 79 0 3 7 132 0 2 7 3 0 2 7 3 0 2
-    7 3 0 2 7 9 0 3 7 24 0 5 7 34 0 3 7 5 0 5 7 6 0 3 7 18 0 2 7 51 0 3 7 131 0 3 7 3 0 2 7
-    2 0 3 7 3 0 2 7 8 0 5 7 5 0 2 7 3 0 2 7 6 0 2 7 3 0 5 7 5 0 10 7 16 0 6 7 2 0 7 7 6 0 5
-    7 16 0 3 7 6 0 4 7 8 0 2 7 4 0 3 7 7 0 4 7 8 0 7 7 132 0 2 7 3 0 3 7 2 0 2 7 3 0 3 7 7 0
-    6 7 5 0 2 7 2 0 3 7 6 0 2 7 5 0 2 7 6 0 10 7 17 0 12 7 7 0 6 7 6 0 2 7 8 0 3 7 5 0 5 7 7
-    0 3 7 2 0 5 7 6 0 5 7 7 0 7 7 132 0 2 7 4 0 2 7 2 0 2 7 4 0 2 7 7 0 3 7 2 0 2 7 4 0 3 7
-    2 0 3 7 5 0 2 7 5 0 2 7 12 0 4 7 18 0 10 7 8 0 3 7 2 0 2 7 5 0 3 7 3 0 2 7 3 0 2 7 4 0 3
-    7 2 0 2 7 7 0 2 7 2 0 4 7 6 0 3 7 2 0 2 7 6 0 2 7 3 0 3 7 131 0 3 7 4 0 2 7 2 0 2 7 3 0
-    3 7 6 0 3 7 3 0 2 7 4 0 2 7 2 0 3 7 5 0 3 7 4 0 3 7 11 0 4 7 19 0 7 7 10 0 3 7 3 0 2 7 4
-    0 3 7 3 0 3 7 2 0 3 7 3 0 3 7 3 0 1 7 7 0 2 7 1 0 4 7 5 0 1 7 1 0 3 7 3 0 1 7 6 0 2 7 4
-    0 2 7 132 0 2 7 4 0 3 7 1 0 2 7 4 0 2 7 6 0 3 7 3 0 2 7 4 0 3 7 2 0 3 7 3 0 1 7 1 0 2 7
-    5 0 2 7 11 0 3 7 20 0 3 7 14 0 3 7 3 0 2 7 4 0 3 7 3 0 3 7 3 0 3 7 2 0 3 7 3 0 2 7 7 0 1
-    7 1 0 4 7 3 0 7 7 3 0 2 7 5 0 2 7 4 0 3 7 131 0 3 7 4 0 6 7 3 0 3 7 6 0 2 7 3 0 3 7 4 0
-    2 7 3 0 3 7 1 0 6 7 4 0 3 7 10 0 3 7 21 0 3 7 14 0 2 7 3 0 3 7 4 0 3 7 3 0 2 7 3 0 3 7 3
-    0 2 7 3 0 2 7 7 0 13 7 1 0 2 7 3 0 2 7 6 0 2 7 4 0 2 7 132 0 2 7 5 0 2 7 1 0 2 7 4 0 3 7
-    5 0 2 7 3 0 4 7 3 0 2 7 4 0 6 7 1 0 2 7 5 0 2 7 6 0 1 7 3 0 3 7 21 0 3 7 14 0 2 7 3 0 4
-    7 3 0 3 7 3 0 3 7 3 0 3 7 2 0 3 7 2 0 2 7 8 0 4 7 1 0 6 7 2 0 3 7 2 0 2 7 6 0 2 7 4 0 3
-    7 131 0 3 7 5 0 4 7 5 0 2 7 6 0 2 7 4 0 2 7 4 0 2 7 3 0 6 7 1 0 3 7 5 0 2 7 5 0 2 7 2 0
-    3 7 22 0 3 7 14 0 2 7 4 0 2 7 3 0 3 7 3 0 3 7 3 0 3 7 3 0 2 7 1 0 3 7 4 0 2 7 2 0 4 7 2
-    0 5 7 3 0 2 7 1 0 3 7 4 0 2 7 1 0 2 7 4 0 3 7 131 0 2 7 6 0 4 7 4 0 3 7 5 0 2 7 4 0 2 7
-    5 0 1 7 4 0 2 7 5 0 2 7 5 0 2 7 5 0 2 7 2 0 3 7 22 0 3 7 14 0 2 7 4 0 2 7 4 0 3 7 2 0 4
-    7 3 0 2 7 3 0 6 7 4 0 2 7 3 0 3 7 10 0 6 7 4 0 2 7 1 0 2 7 4 0 3 7 131 0 3 7 6 0 3 7 5 0
-    3 7 5 0 2 7 3 0 3 7 4 0 2 7 3 0 2 7 5 0 3 7 5 0 2 7 4 0 3 7 1 0 3 7 23 0 3 7 14 0 2 7 3
-    0 3 7 3 0 3 7 2 0 4 7 3 0 3 7 3 0 4 7 5 0 2 7 3 0 4 7 10 0 4 7 5 0 2 7 2 0 2 7 4 0 3 7
-    131 0 2 7 15 0 2 7 6 0 2 7 2 0 3 7 5 0 2 7 2 0 2 7 6 0 2 7 6 0 2 7 3 0 3 7 1 0 3 7 23 0
-    3 7 15 0 2 7 2 0 3 7 4 0 3 7 1 0 2 7 1 0 2 7 2 0 3 7 4 0 2 7 6 0 2 7 4 0 3 7 11 0 2 7 6
-    0 2 7 3 0 2 7 3 0 4 7 130 0 3 7 14 0 3 7 6 0 6 7 6 0 6 7 6 0 2 7 6 0 2 7 2 0 3 7 2 0 2 7
-    1 0 6 7 17 0 3 7 15 0 6 7 5 0 5 7 2 0 6 7 5 0 3 7 3 0 3 7 5 0 2 7 12 0 3 7 3 0 3 7 4 0 2
-    7 2 0 2 7 1 0 2 7 130 0 2 7 15 0 3 7 6 0 5 7 7 0 5 7 6 0 3 7 6 0 6 7 2 0 10 7 17 0 2 7
-    16 0 5 7 6 0 4 7 3 0 5 7 6 0 8 7 5 0 3 7 12 0 8 7 5 0 6 7 1 0 2 7 129 0 3 7 15 0 3 7 7 0
-    3 7 9 0 2 7 8 0 2 7 8 0 3 7 4 0 3 7 23 0 3 7 17 0 3 7 8 0 2 7 4 0 4 7 8 0 5 7 7 0 2 7 14
-    0 5 7 7 0 5 7 2 0 3 7 128 0 2 7 16 0 3 7 29 0 2 7 41 0 3 7 58 0 2 7 27 0 3 7 4 0 2 7 127
-    0 3 7 16 0 3 7 72 0 2 7 224 0 2 7 18 0 1 7 2432))
+  #{7 255 7 255 7 255 7 255 7 255 7 255 7 255 7 35 0 3 7 255 7 58 0 4 7 255 7 58 0
+    1 4 1 0 0 7 255 7 57 0 1 4 2 0 0 7 255 7 57 0 1 4 2 0 0 1 6 7 255 7 50 0 1 4 2
+    0 0 1 16 7 255 7 40 0 0 4 2 0 0 1 21 7 255 7 35 0 1 4 2 0 0 1 2 7 1 1 8 7 1 1
+    9 7 255 7 31 0 1 4 2 0 0 1 2 7 1 1 8 7 1 1 11 7 255 7 29 0 1 4 1 0 1 1 1 7 2 1
+    8 7 1 1 2 7 4 1 5 7 255 7 26 0 1 4 2 0 0 1 2 7 1 1 8 7 2 1 1 7 7 1 5 7 255 7
+    24 0 1 4 2 0 0 1 2 7 1 1 8 7 2 1 1 7 2 1 0 7 4 1 5 7 255 7 23 0 1 4 1 0 1 1 2
+    7 1 1 8 7 1 1 1 7 2 1 3 7 3 1 5 7 255 7 22 0 0 4 2 0 0 1 2 7 2 1 8 7 1 1 1 7 2
+    1 5 7 2 1 5 7 255 7 20 0 1 4 2 0 0 1 2 7 1 1 9 7 1 1 2 7 1 1 6 7 1 1 6 7 255 7
+    19 0 1 4 2 0 0 1 2 7 1 1 8 7 2 1 2 7 2 1 15 7 255 7 18 0 1 4 1 0 1 1 1 7 2 1 8
+    7 2 1 3 7 3 1 7 7 2 1 2 7 255 7 17 0 1 4 2 0 0 1 2 7 1 1 9 7 1 1 5 7 4 1 4 7 4
+    1 2 7 255 7 16 0 1 4 2 0 0 1 2 7 1 1 9 7 1 1 6 7 4 1 3 7 5 1 2 7 255 7 15 0 1
+    4 1 0 1 1 2 7 1 1 9 7 1 1 8 7 3 1 2 7 1 1 0 7 3 1 2 7 255 7 14 0 0 4 2 0 0 1 2
+    7 2 1 9 7 1 1 10 7 2 1 1 7 1 1 1 7 2 1 3 7 255 7 12 0 1 4 2 0 0 1 2 7 1 1 9 7
+    2 1 1 7 1 1 6 7 2 1 0 7 2 1 2 7 2 1 2 7 255 7 12 0 1 4 2 0 0 1 2 7 1 1 4 7 1 1
+    2 7 2 1 1 7 2 1 5 7 2 1 0 7 2 1 3 7 1 1 4 7 255 7 10 0 1 4 1 0 1 1 2 7 9 1 1 7
+    1 1 3 7 3 1 3 7 2 1 0 7 2 1 3 7 2 1 4 7 255 7 8 0 1 4 2 0 0 1 2 7 9 1 9 7 4 1
+    0 7 2 1 1 7 3 1 2 7 2 1 5 7 255 7 7 0 1 4 2 0 0 1 23 7 7 1 1 7 8 1 8 7 255 7 5
+    0 1 4 1 0 1 1 25 7 4 1 1 7 2 1 0 7 5 1 9 7 255 7 4 0 0 4 2 0 1 1 13 7 7 1 10 7
+    2 1 2 7 2 1 12 7 255 7 1 0 1 4 2 0 1 7 1 1 4 7 16 1 8 7 2 1 20 7 255 0 1 4 2 0
+    0 7 25 1 7 7 1 1 23 7 253 0 1 4 1 0 1 7 27 1 5 7 1 1 25 7 251 0 0 4 2 0 1 7 28
+    1 4 7 1 1 23 7 157 0 7 7 86 0 1 4 2 0 1 7 30 1 25 7 159 0 1 7 6 0 0 7 85 0 1 4
+    1 0 1 7 33 1 20 7 157 0 6 7 2 0 2 7 0 0 6 7 79 0 0 4 2 0 1 7 35 1 14 7 159 0 2
+    7 3 0 1 7 1 0 8 7 2 0 3 7 71 2 4 4 2 0 1 7 39 1 4 7 164 0 1 7 7 0 0 7 1 0 4 7
+    8 0 1 7 68 2 6 4 2 0 0 7 210 0 0 7 3 0 1 7 3 0 0 7 1 0 1 7 7 0 3 7 0 0 0 7 65
+    2 8 4 1 0 1 7 209 0 1 7 1 0 11 7 7 0 4 7 0 0 0 7 64 2 10 4 0 0 0 2 0 7 209 0 0
+    7 2 0 4 7 4 0 2 7 7 0 3 7 1 0 0 7 62 2 14 7 208 0 1 7 2 0 3 7 7 0 1 7 0 0 9 7
+    1 0 0 7 61 2 17 7 206 0 0 7 4 0 1 7 3 0 2 7 2 0 1 7 5 0 1 7 3 0 0 7 61 2 17 7
+    206 0 1 7 4 0 0 7 3 0 3 7 0 0 1 7 3 0 2 7 0 0 0 7 3 0 0 7 60 2 19 7 198 2 7 0
+    1 7 3 0 0 7 3 0 3 7 0 0 0 7 4 0 5 7 0 0 2 7 60 2 9 0 0 2 8 7 193 2 13 0 5 7 3
+    0 3 7 0 0 0 7 5 0 1 7 1 0 2 2 0 7 61 2 8 0 1 4 1 2 7 7 187 2 23 0 0 7 3 0 2 7
+    1 0 1 7 7 0 1 2 5 7 57 2 9 0 0 4 2 0 0 2 5 7 184 2 27 0 0 7 9 0 0 7 6 0 1 2 8
+    7 55 2 9 0 0 4 2 0 0 2 5 7 181 2 30 0 1 7 8 0 7 2 11 7 53 2 21 7 178 2 34 0 1
+    7 5 0 1 2 21 7 49 2 22 7 176 2 39 0 6 2 23 7 46 2 23 7 174 2 74 7 43 2 25 7
+    171 2 78 7 40 2 16 0 0 2 10 7 168 2 81 7 37 2 18 0 0 4 2 2 7 7 166 2 83 7 35 2
+    20 0 0 4 2 0 0 2 6 7 164 2 86 7 33 2 20 0 1 4 1 0 1 2 6 7 162 2 88 7 31 2 22 0
+    0 4 2 0 0 2 6 7 161 2 91 7 28 2 24 0 0 4 2 0 0 2 3 7 162 2 94 7 26 2 15 7 9 0
+    0 4 2 0 0 7 165 2 95 7 24 2 15 7 10 0 1 4 1 0 0 7 164 2 98 7 22 2 14 7 12 0 0
+    4 2 0 0 7 163 2 100 7 19 2 14 7 14 0 0 4 2 0 0 7 161 2 61 0 1 2 39 7 17 2 14 7
+    15 0 3 7 161 2 61 0 5 2 38 7 13 2 14 7 182 2 62 0 0 7 0 0 0 7 1 0 3 2 38 7 7 2
+    16 7 182 2 63 0 0 7 0 0 0 7 1 0 0 7 1 0 2 2 60 7 181 2 64 0 3 7 1 0 0 7 1 0 0
+    7 0 0 2 2 57 7 182 2 64 0 0 7 0 0 4 7 0 0 1 7 0 0 0 7 0 0 4 2 51 7 183 2 65 0
+    0 7 0 0 0 7 0 0 2 7 0 0 0 7 1 0 0 7 1 0 0 7 1 0 2 2 48 7 183 2 67 0 1 7 1 0 4
+    7 0 0 0 7 1 0 0 7 1 0 3 2 46 7 183 2 69 0 1 7 0 0 0 7 1 0 4 7 0 0 0 7 1 0 0 7
+    1 0 1 2 44 7 183 2 71 0 2 7 1 0 0 7 1 0 6 7 1 0 0 2 43 7 185 2 72 0 4 7 0 0 1
+    7 0 0 1 7 0 0 4 2 42 7 185 2 76 0 3 7 1 0 0 7 1 0 0 7 1 0 0 2 15 7 1 2 23 7
+    187 2 78 0 4 7 1 0 0 7 0 0 0 2 16 7 6 2 16 7 189 2 82 0 4 2 17 7 15 2 2 7 193
+    2 106 7 212 2 105 7 213 2 105 7 212 2 106 7 212 2 105 7 213 2 105 7 213 2 105
+    7 212 2 105 7 213 2 105 7 213 2 104 7 214 2 103 7 215 2 103 7 214 2 103 7 215
+    2 103 7 215 2 104 7 214 2 104 7 214 2 82 7 10 2 10 7 213 2 81 7 13 2 9 7 213 2
+    36 7 33 2 10 7 13 2 9 7 213 2 26 7 44 2 9 7 13 2 9 7 213 2 13 7 4 2 7 7 44 2 8
+    7 14 2 9 7 213 2 8 7 9 2 7 7 44 2 8 7 14 2 9 7 212 2 8 7 10 2 7 7 44 2 8 7 15
+    2 8 7 212 2 7 7 11 2 7 7 44 2 8 7 15 2 8 7 212 2 7 7 11 2 6 7 45 2 8 7 15 2 8
+    7 212 2 7 7 11 2 6 7 45 2 7 7 16 2 8 7 212 2 6 7 11 2 7 7 45 2 7 7 16 2 8 7
+    211 2 7 7 11 2 7 7 45 2 7 7 16 2 8 7 211 2 7 7 11 2 7 7 45 2 7 7 17 2 8 7 210
+    2 7 7 11 2 7 7 45 2 7 7 17 2 8 7 210 2 6 7 12 2 7 7 45 2 7 7 17 2 8 7 210 2 6
+    7 12 2 6 7 46 2 6 7 18 2 8 7 210 2 6 7 12 2 6 7 46 2 6 7 18 2 8 7 209 2 7 7 12
+    2 6 7 45 2 7 7 18 2 8 7 209 2 6 7 12 2 7 7 45 2 7 7 18 2 8 7 209 2 6 7 12 2 7
+    7 45 2 7 7 19 2 7 7 209 2 6 7 12 2 7 7 45 2 7 7 19 2 7 7 209 2 6 7 12 2 6 7 46
+    2 7 7 19 2 7 7 208 2 7 7 12 2 6 7 46 2 6 7 20 2 7 7 208 2 6 7 13 2 6 7 46 2 6
+    7 20 2 7 7 208 2 6 7 13 2 6 7 46 2 6 7 20 2 7 7 208 2 6 7 13 2 6 7 46 2 6 7 20
+    2 7 7 208 2 6 7 12 2 7 7 46 2 6 7 21 2 7 7 207 2 6 7 12 2 7 7 45 2 7 7 21 2 7
+    7 206 2 6 7 13 2 6 7 46 2 7 7 21 2 7 7 206 2 6 7 13 2 6 7 46 2 6 7 22 2 7 7
+    206 2 6 7 13 2 6 7 46 2 6 7 22 2 7 7 206 2 6 7 13 2 6 7 46 2 6 7 22 2 7 7 206
+    2 6 7 13 2 6 7 46 2 6 7 22 2 7 7 205 2 6 7 14 2 6 7 46 2 6 7 23 2 6 7 205 2 6
+    7 13 2 6 7 47 2 6 7 23 2 6 7 205 2 6 7 13 2 6 7 47 2 6 7 23 2 6 7 205 2 6 7 13
+    2 6 7 47 2 6 7 23 2 6 7 205 2 6 7 13 2 6 7 46 2 7 7 23 2 6 7 205 2 6 7 13 2 6
+    7 46 2 6 7 24 2 6 7 204 2 6 7 14 2 6 7 46 2 6 7 24 2 6 7 201 2 10 7 13 2 6 7
+    46 2 6 7 24 2 6 7 200 2 12 7 9 2 10 7 45 2 6 7 24 2 6 7 200 2 13 7 7 2 12 7 44
+    2 6 7 24 2 7 7 198 2 15 7 5 2 14 7 43 2 6 7 21 2 11 7 197 2 15 7 5 2 14 7 41 2
+    9 7 19 2 14 7 195 2 15 7 5 2 14 7 40 2 12 7 17 2 14 7 196 2 14 7 5 2 14 7 39 2
+    14 7 15 2 16 7 195 2 13 7 6 2 14 7 39 2 14 7 15 2 16 7 197 2 3 7 1 2 4 7 8 2
+    12 7 40 2 14 7 15 2 16 7 218 2 3 7 2 2 3 7 41 2 14 7 16 2 6 7 1 2 5 7 255 7 16
+    2 14 7 17 2 4 7 3 2 2 7 255 7 19 2 12 7 255 7 51 2 3 7 1 2 4 7 255 7 255 7 255
+    7 255 7 255 7 255 7 255 7 255 7 255 7 255 7 255 7 255 7 255 7 208 0 2 7 255 7
+    50 0 1 7 6 0 3 7 72 0 1 7 230 0 2 7 5 0 4 7 72 0 1 7 1 0 4 7 222 0 3 7 4 0 4 7
+    72 0 10 7 220 0 3 7 5 0 4 7 71 0 12 7 82 0 1 7 133 0 4 7 4 0 4 7 70 0 6 7 5 0
+    2 7 80 0 2 7 132 0 4 7 4 0 5 7 69 0 5 7 8 0 1 7 79 0 2 7 132 0 5 7 3 0 2 7 0 0
+    1 7 70 0 5 7 8 0 1 7 79 0 2 7 132 0 1 7 0 0 1 7 4 0 1 7 0 0 2 7 30 0 1 7 5 0 1
+    7 29 0 1 7 0 0 1 7 9 0 1 7 78 0 2 7 132 0 1 7 0 0 1 7 4 0 1 7 1 0 1 7 30 0 2 7
+    4 0 2 7 31 0 2 7 9 0 1 7 78 0 1 7 132 0 1 7 1 0 1 7 3 0 2 7 0 0 1 7 30 0 3 7 4
+    0 1 7 32 0 1 7 9 0 1 7 78 0 2 7 131 0 2 7 0 0 1 7 4 0 1 7 0 0 2 7 30 0 2 7 4 0
+    1 7 32 0 2 7 8 0 2 7 77 0 2 7 132 0 1 7 1 0 1 7 3 0 1 7 1 0 1 7 31 0 1 7 4 0 2
+    7 32 0 2 7 8 0 2 7 77 0 2 7 131 0 1 7 1 0 2 7 2 0 1 7 1 0 2 7 38 0 6 7 27 0 2
+    7 8 0 2 7 77 0 2 7 131 0 2 7 1 0 1 7 2 0 2 7 1 0 1 7 38 0 7 7 27 0 2 7 6 0 3 7
+    78 0 2 7 130 0 2 7 1 0 2 7 2 0 1 7 1 0 2 7 36 0 5 7 30 0 2 7 6 0 3 7 78 0 2 7
+    131 0 1 7 2 0 1 7 2 0 1 7 2 0 1 7 8 0 2 7 23 0 4 7 33 0 2 7 4 0 4 7 5 0 2 7 17
+    0 1 7 50 0 2 7 130 0 2 7 2 0 1 7 1 0 2 7 2 0 1 7 7 0 4 7 4 0 1 7 2 0 1 7 5 0 1
+    7 2 0 4 7 4 0 9 7 15 0 5 7 1 0 6 7 5 0 4 7 15 0 2 7 5 0 3 7 7 0 1 7 3 0 2 7 6
+    0 3 7 7 0 6 7 131 0 1 7 2 0 2 7 1 0 1 7 2 0 2 7 6 0 5 7 4 0 1 7 1 0 2 7 5 0 1
+    7 4 0 1 7 5 0 9 7 16 0 11 7 6 0 5 7 5 0 1 7 7 0 2 7 4 0 4 7 6 0 2 7 1 0 4 7 5
+    0 4 7 6 0 6 7 131 0 1 7 3 0 1 7 1 0 1 7 3 0 1 7 6 0 2 7 1 0 1 7 3 0 2 7 1 0 2
+    7 4 0 1 7 4 0 1 7 11 0 3 7 17 0 9 7 7 0 2 7 1 0 1 7 4 0 2 7 2 0 1 7 2 0 1 7 3
+    0 2 7 1 0 1 7 6 0 1 7 1 0 3 7 5 0 2 7 1 0 1 7 5 0 1 7 2 0 2 7 130 0 2 7 3 0 1
+    7 1 0 1 7 2 0 2 7 5 0 2 7 2 0 1 7 3 0 1 7 1 0 2 7 4 0 2 7 3 0 2 7 10 0 3 7 18
+    0 6 7 9 0 2 7 2 0 1 7 3 0 2 7 2 0 2 7 1 0 2 7 2 0 2 7 2 0 0 7 6 0 1 7 0 0 3 7
+    4 0 0 7 0 0 2 7 2 0 0 7 5 0 1 7 3 0 1 7 131 0 1 7 3 0 2 7 0 0 1 7 3 0 1 7 5 0
+    2 7 2 0 1 7 3 0 2 7 1 0 2 7 2 0 0 7 0 0 1 7 4 0 1 7 10 0 2 7 19 0 2 7 13 0 2 7
+    2 0 1 7 3 0 2 7 2 0 2 7 2 0 2 7 1 0 2 7 2 0 1 7 6 0 0 7 0 0 3 7 2 0 6 7 2 0 1
+    7 4 0 1 7 3 0 2 7 130 0 2 7 3 0 5 7 2 0 2 7 5 0 1 7 2 0 2 7 3 0 1 7 2 0 2 7 0
+    0 5 7 3 0 2 7 9 0 2 7 20 0 2 7 13 0 1 7 2 0 2 7 3 0 2 7 2 0 1 7 2 0 2 7 2 0 1
+    7 2 0 1 7 6 0 12 7 0 0 1 7 2 0 1 7 5 0 1 7 3 0 1 7 131 0 1 7 4 0 1 7 0 0 1 7 3
+    0 2 7 4 0 1 7 2 0 3 7 2 0 1 7 3 0 5 7 0 0 1 7 4 0 1 7 5 0 0 7 2 0 2 7 20 0 2 7
+    13 0 1 7 2 0 3 7 2 0 2 7 2 0 2 7 2 0 2 7 1 0 2 7 1 0 1 7 7 0 3 7 0 0 5 7 1 0 2
+    7 1 0 1 7 5 0 1 7 3 0 2 7 130 0 2 7 4 0 3 7 4 0 1 7 5 0 1 7 3 0 1 7 3 0 1 7 2
+    0 5 7 0 0 2 7 4 0 1 7 4 0 1 7 1 0 2 7 21 0 2 7 13 0 1 7 3 0 1 7 2 0 2 7 2 0 2
+    7 2 0 2 7 2 0 1 7 0 0 2 7 3 0 1 7 1 0 3 7 1 0 4 7 2 0 1 7 0 0 2 7 3 0 1 7 0 0
+    1 7 3 0 2 7 130 0 1 7 5 0 3 7 3 0 2 7 4 0 1 7 3 0 1 7 4 0 0 7 3 0 1 7 4 0 1 7
+    4 0 1 7 4 0 1 7 1 0 2 7 21 0 2 7 13 0 1 7 3 0 1 7 3 0 2 7 1 0 3 7 2 0 1 7 2 0
+    5 7 3 0 1 7 2 0 2 7 9 0 5 7 3 0 1 7 0 0 1 7 3 0 2 7 130 0 2 7 5 0 2 7 4 0 2 7
+    4 0 1 7 2 0 2 7 3 0 1 7 2 0 1 7 4 0 2 7 4 0 1 7 3 0 2 7 0 0 2 7 22 0 2 7 13 0
+    1 7 2 0 2 7 2 0 2 7 1 0 3 7 2 0 2 7 2 0 3 7 4 0 1 7 2 0 3 7 9 0 3 7 4 0 1 7 1
+    0 1 7 3 0 2 7 130 0 1 7 14 0 1 7 5 0 1 7 1 0 2 7 4 0 1 7 1 0 1 7 5 0 1 7 5 0 1
+    7 2 0 2 7 0 0 2 7 22 0 2 7 14 0 1 7 1 0 2 7 3 0 2 7 0 0 1 7 0 0 1 7 1 0 2 7 3
+    0 1 7 5 0 1 7 3 0 2 7 10 0 1 7 5 0 1 7 2 0 1 7 2 0 3 7 129 0 2 7 13 0 2 7 5 0
+    5 7 5 0 5 7 5 0 1 7 5 0 1 7 1 0 2 7 1 0 1 7 0 0 5 7 16 0 2 7 14 0 5 7 4 0 4 7
+    1 0 5 7 4 0 2 7 2 0 2 7 4 0 1 7 11 0 2 7 2 0 2 7 3 0 1 7 1 0 1 7 0 0 1 7 129 0
+    1 7 14 0 2 7 5 0 4 7 6 0 4 7 5 0 2 7 5 0 5 7 1 0 9 7 16 0 1 7 15 0 4 7 5 0 3 7
+    2 0 4 7 5 0 7 7 4 0 2 7 11 0 7 7 4 0 5 7 0 0 1 7 128 0 2 7 14 0 2 7 6 0 2 7 8
+    0 1 7 7 0 1 7 7 0 2 7 3 0 2 7 22 0 2 7 16 0 2 7 7 0 1 7 3 0 3 7 7 0 4 7 6 0 1
+    7 13 0 4 7 6 0 4 7 1 0 2 7 127 0 1 7 15 0 2 7 28 0 1 7 40 0 2 7 57 0 1 7 26 0
+    2 7 3 0 1 7 126 0 2 7 15 0 2 7 71 0 1 7 223 0 1 7 17 0 0 7 255 7 255 7 255 7
+    255 7 255 7 255 7 255 7 255 7 255 7 127
+    })
;;
@@ -1070,22 +1088,22 @@
(defun rle-blit-splash (splash)
   (loop with index = 0
-      while splash
-      do (loop with value = (pop splash)
-             with count = (pop splash)
-             repeat count
+      for i from 0 below (length splash) by 2
+      for value = (aref splash i)
+      for count = (1+ (aref splash (1+ i)))
+      do (loop repeat count
              do (setf (memref-int (vga-memory-map)
                        :index index
                        :type :unsigned-byte8)
                       value)
-              (incf index)))
+             (incf index)))
   nil)
;; show the splash screen
 (defun g-show-splash ()
   (with-textmode-restored ()
     (setf (vga-state) +vga-state-320x200x256+)
-    (rle-blit-splash +vga-g-splash+)
+    (rle-blit-splash *vga-g-splash*)
     (read-char)
     (g-clear))
   (values))

    