6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2025-04-19 07:37:34 +00:00
Code Issues Projects Releases Wiki Activity

Use imperical RGB chromas

Browse Source
This commit is contained in:
David Schmenk 2024-11-19 18:15:26 -08:00
parent 3e2bdd4803
commit 47b8e18cf7
1 changed files with 33 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

45
src/samplesrc/dcgrrgb.pla
View File

@ -20,15 +20,15 @@ byte[] ntscChroma
//byte[] = 1, 77, 64 // BROWN
//byte[] = 64, 20, 128 // RED
// Imperical 0-63 B G R
//byte[] = 32, 14, 16 // BLUE
//byte[] = 16, 28, 0 // GREEN
//byte[] = 0, 18, 16 // BROWN
//byte[] = 16, 4, 32 // RED
byte[] = 32, 14, 16 // BLUE
byte[] = 16, 28, 0 // GREEN
byte[] = 0, 18, 16 // BROWN
byte[] = 16, 4, 32 // RED
// Ideal/simplified 0-63 B G R
byte[] = 32, 16, 16 // BLUE
byte[] = 16, 32, 0 // GREEN
byte[] = 0, 16, 16 // BROWN
byte[] = 16, 0, 32 // RED
//byte[] = 32, 16, 16 // BLUE
//byte[] = 16, 32, 0 // GREEN
//byte[] = 0, 16, 16 // BROWN
//byte[] = 16, 0, 32 // RED
// Test 0-63 B G R
//byte[] = 63, 0, 0 // BLUE
//byte[] = 0, 63, 0 // GREEN
@ -145,54 +145,75 @@ def rgbTest#0
for i = 0 to 63
rgbpix(i, 0, 0, i, 0)
next
for i = 64 to 127
rgbpix(63, 0, 0, i, 0)
next
er, eg, eb, = -32, -32, -32
memset(@ntscCycle, 0, 12)
for i = 0 to 63
rgbpix(0, i, 0, i, 2)
next
for i = 64 to 127
rgbpix(0, 63, 0, i, 2)
next
er, eg, eb, = -32, -32, -32
memset(@ntscCycle, 0, 12)
for i = 0 to 63
rgbpix(0, 0, i, i, 4)
next
for i = 64 to 127
rgbpix(0, 0, 63, i, 4)
next
er, eg, eb, = -32, -32, -32
memset(@ntscCycle, 0, 12)
for i = 0 to 63
rgbpix(i, i, i, i, 6)
next
for i = 64 to 127
rgbpix(63, 63, 63, i, 6)
next
er, eg, eb, = -32, -32, -32
memset(@ntscCycle, 0, 12)
for i = 0 to 63
rgbpix(i, i/2, i/2, i, 8)
next
for i = 64 to 127
rgbpix(63, 32, 32, i, 8)
next
er, eg, eb, = -32, -32, -32
memset(@ntscCycle, 0, 12)
for i = 0 to 63
rgbpix(i/2, i, i/2, i, 10)
next
for i = 64 to 127
rgbpix(32, 63, 32, i, 10)
next
er, eg, eb, = -32, -32, -32
memset(@ntscCycle, 0, 12)
for i = 0 to 63
rgbpix(i/2, i/2, i, i, 12)
next
for i = 64 to 127
rgbpix(32, 32, 63, i, 12)
next
er, eg, eb, = -32, -32, -32
memset(@ntscCycle, 0, 12)
for i = 0 to 63
for i = 0 to 127
rgbpix(16, 16, 16, i, 14)
next
er, eg, eb, = -32, -32, -32
memset(@ntscCycle, 0, 12)
for i = 0 to 63
for i = 0 to 127
rgbpix(32, 32, 32, i, 16)
next
er, eg, eb, = -32, -32, -32
memset(@ntscCycle, 0, 12)
for i = 0 to 63
for i = 0 to 127
rgbpix(48, 48, 48, i, 18)
next
er, eg, eb, = -32, -32, -32
memset(@ntscCycle, 0, 12)
for i = 0 to 63
for i = 0 to 127
rgbpix(63, 63, 63, i, 20)
next
end