343 lines
14 KiB
Plaintext
Executable File
343 lines
14 KiB
Plaintext
Executable File
vCol = (vertCol as string)
|
|
-- print ("VertColour for vert "+(v as string)+" = "+(vCol))
|
|
|
|
if vCol == ((color 0 0 0) as string) then
|
|
(
|
|
append vertBitArray[1] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 5 5 5 ) as string) then
|
|
(
|
|
append vertBitArray[2] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 10 10 10) as string) then
|
|
(
|
|
append vertBitArray[3] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 15 15 15) as string) then
|
|
(
|
|
append vertBitArray[4] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 20 20 20) as string) then
|
|
(
|
|
append vertBitArray[5] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 25 25 25) as string) then
|
|
(
|
|
append vertBitArray[6] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 30 30 30) as string) then
|
|
(
|
|
append vertBitArray[7] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 35 35 35) as string) then
|
|
(
|
|
append vertBitArray[8] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 40 40 40) as string) then
|
|
(
|
|
append vertBitArray[9] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 50 50 50) as string) then
|
|
(
|
|
append vertBitArray[10] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 55 55 55) as string) then
|
|
(
|
|
append vertBitArray[11] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 60 60 60) as string) then
|
|
(
|
|
append vertBitArray[12] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 65 65 65) as string) then
|
|
(
|
|
append vertBitArray[13] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 70 70 70) as string) then
|
|
(
|
|
append vertBitArray[14] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 75 75 75) as string) then
|
|
(
|
|
append vertBitArray[15] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 80 80 80) as string) then
|
|
(
|
|
append vertBitArray[16] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 85 85 85) as string) then
|
|
(
|
|
append vertBitArray[17] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 90 90 90) as string) then
|
|
(
|
|
append vertBitArray[18] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 95 95 95) as string) then
|
|
(
|
|
append vertBitArray[19] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 100 100 100) as string) then
|
|
(
|
|
append vertBitArray[20] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 105 105 105) as string) then
|
|
(
|
|
append vertBitArray[21] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 110 110 110) as string) then
|
|
(
|
|
append vertBitArray[22] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 115 115 115) as string) then
|
|
(
|
|
append vertBitArray[23] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 120 120 120) as string) then
|
|
(
|
|
append vertBitArray[24] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 125 125 125) as string) then
|
|
(
|
|
append vertBitArray[25] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 130 130 130) as string) then
|
|
(
|
|
append vertBitArray[26] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 135 135 135) as string) then
|
|
(
|
|
append vertBitArray[27] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 140 140 140) as string) then
|
|
(
|
|
append vertBitArray[28] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 145 145 145) as string) then
|
|
(
|
|
append vertBitArray[29] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 150 150 150) as string) then
|
|
(
|
|
append vertBitArray[30] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 155 155 155) as string) then
|
|
(
|
|
append vertBitArray[31] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 160 160 160) as string) then
|
|
(
|
|
append vertBitArray[32] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 165 165 165) as string) then
|
|
(
|
|
append vertBitArray[33] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 170 170 170) as string) then
|
|
(
|
|
append vertBitArray[34] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 175 175 175) as string) then
|
|
(
|
|
append vertBitArray[35] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 180 180 180) as string) then
|
|
(
|
|
append vertBitArray[36] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 185 185 185) as string) then
|
|
(
|
|
append vertBitArray[37] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 190 190 190) as string) then
|
|
(
|
|
append vertBitArray[38] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 195 195 195) as string) then
|
|
(
|
|
append vertBitArray[39] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 200 200 200) as string) then
|
|
(
|
|
append vertBitArray[40] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 205 205 205) as string) then
|
|
(
|
|
append vertBitArray[41] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 210 210 210) as string) then
|
|
(
|
|
append vertBitArray[42] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 215 215 215) as string) then
|
|
(
|
|
append vertBitArray[43] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 220 220 220) as string) then
|
|
(
|
|
append vertBitArray[44] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 225 225 225) as string) then
|
|
(
|
|
append vertBitArray[45] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 230 230 230) as string) then
|
|
(
|
|
append vertBitArray[46] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 235 235 235) as string) then
|
|
(
|
|
append vertBitArray[47] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 240 240 240) as string) then
|
|
(
|
|
append vertBitArray[48] v
|
|
)
|
|
else
|
|
(
|
|
if vCol == ((color 245 245 245) as string) do
|
|
(
|
|
append vertBitArray[49] v
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
) |