9 lines
265 B
QBasic
9 lines
265 B
QBasic
|
' equpix color pallete
|
||
|
Dim equpix15 As Array
|
||
|
equpix15 = [5389390, 2763322, 4084802, 8672348, 3694716, 6060630, 1052708, 11697750, 13913682, 5613716, 8432704, 15501899, 9162938, 16764008, 16775360]
|
||
|
|
||
|
Dim color As Integer
|
||
|
For Each color In equpix15
|
||
|
Print color
|
||
|
Next
|