This program, Palette, prints numbered bars of colour on the screen, giving a complete list of all the available QL colours. As it was written for a TV rather than a monitor, the colours crawl a bit, but there's still a remarkable variety available.

 10 REMark **** PALETTE ****
 20 REMark
 30 REMark by J Jarratt, 1984.
 40 REMark
 50 BORDER 2,7:PAPER 7
 60 CLS #0:CLS #1
 70 REMark The display unit
 80    show 1,9,8
 90    show 10,76,7
100    tell 1
110    show 77,99,7
120    show 100,148,6
130    tell 1
140    show 149,224,6
150    tell 1
160    show 225,255,6
170    tell 2
180 STOP
190 DEFine PROCedure show (first,last,across)
200    FOR x=first TO last:PAPER x:PRINT FILL$(" ",across);:PRINT x;
210 END DEFine show
220 DEFine PROCedure tell (choice)
230    OPEN #4,scr_250x16a30x230
240    PAPER #4,0:CLS #4
250       SELect ON choice
260       -1
270       PRINT #4,"ANY KEY TO CONTINUE"
280       -2
290       PRINT #4,"THAT'S ALL!"
300       END SELect
310    PAUSE
320    CLS #4 : CLOSE #4
330 END DEFine tell

John Jarratt, Welwyn Garden City, Herts.