mirror of
https://github.com/ivanizag/izapple2.git
synced 2025-02-22 05:28:58 +00:00
Split of screen.go
This commit is contained in:
Ivan Izaguirre
parent
847dbbc8bf
commit
c8c5ab9fd6
367
apple2/screen.go
367
apple2/screen.go
@ -6,7 +6,6 @@ import (
|
|||||||
"image/color"
|
"image/color"
|
||||||
"image/png"
|
"image/png"
|
||||||
"os"
|
"os"
|
||||||
"time"
|
|
||||||
)
|
)
|
||||||
|
|
||||||
/*
|
/*
|
||||||
@ -80,369 +79,3 @@ func linesSeparatedFilter(in *image.RGBA) *image.RGBA {
|
|||||||
}
|
}
|
||||||
return out
|
return out
|
||||||
}
|
}
|
||||||
|
|
||||||
func getNTSCColorMap() []color.Color {
|
|
||||||
// RGB values from https://mrob.com/pub/xapple2/colors.html
|
|
||||||
black := color.RGBA{0, 0, 0, 255} /*COLOR=0 */ /* 0 0 0*/
|
|
||||||
|
|
||||||
dkBlue := color.RGBA{96, 78, 189, 255} /*COLOR=2 */ /* 0 60 25*/
|
|
||||||
red := color.RGBA{227, 30, 96, 255} /*COLOR=1 */ /* 90 60 25*/
|
|
||||||
brown := color.RGBA{96, 114, 3, 255} /*COLOR=8 */ /*180 60 25*/
|
|
||||||
dkGreen := color.RGBA{0, 163, 96, 255} /*COLOR=4 */ /*270 60 25*/
|
|
||||||
|
|
||||||
grey := color.RGBA{156, 156, 156, 255} /*COLOR=10*/ /* 0 0 50*/
|
|
||||||
purple := color.RGBA{255, 68, 253, 255} /*HCOLOR=2*/ /* 45 100 50*/
|
|
||||||
orange := color.RGBA{255, 106, 60, 255} /*HCOLOR=5*/ /*135 100 50*/
|
|
||||||
green := color.RGBA{20, 245, 60, 255} /*HCOLOR=1*/ /*225 100 50*/
|
|
||||||
blue := color.RGBA{20, 207, 253, 255} /*HCOLOR=6*/ /*315 100 50*/
|
|
||||||
|
|
||||||
//purple := color.RGBA{255, 68, 253, 255} /*COLOR=3 */ /* 45 100 50*/
|
|
||||||
//orange := color.RGBA{255, 106, 60, 255} /*COLOR=9 */ /*135 100 50*/
|
|
||||||
//green := color.RGBA{20, 245, 60, 255} /*COLOR=12*/ /*225 100 50*/
|
|
||||||
//blue := color.RGBA{20, 207, 253, 255} /*COLOR=6 */ /*315 100 50*/
|
|
||||||
|
|
||||||
ltBlue := color.RGBA{208, 195, 255, 255} /*COLOR=7 */ /* 0 60 75*/
|
|
||||||
pink := color.RGBA{255, 160, 208, 255} /*COLOR=11*/ /* 90 60 75*/
|
|
||||||
yellow := color.RGBA{208, 221, 141, 255} /*COLOR=13*/ /*180 60 75*/
|
|
||||||
aqua := color.RGBA{114, 255, 208, 255} /*COLOR=14*/ /*270 60 75*/
|
|
||||||
|
|
||||||
white := color.RGBA{255, 255, 255, 255} /*COLOR=15*/ /* 0 0 100*/
|
|
||||||
|
|
||||||
colorMap := []color.Color{
|
|
||||||
/* 0000 */ black,
|
|
||||||
/* 0001 */ brown,
|
|
||||||
/* 0010 */ dkGreen,
|
|
||||||
/* 0011 */ green,
|
|
||||||
/* 0100 */ dkBlue,
|
|
||||||
/* 0101 */ grey,
|
|
||||||
/* 0110 */ blue,
|
|
||||||
/* 0111 */ aqua,
|
|
||||||
/* 1000 */ red,
|
|
||||||
/* 1001 */ orange,
|
|
||||||
/* 1010 */ grey,
|
|
||||||
/* 1011 */ yellow,
|
|
||||||
/* 1100 */ purple,
|
|
||||||
/* 1101 */ pink,
|
|
||||||
/* 1110 */ ltBlue,
|
|
||||||
/* 1111 */ white,
|
|
||||||
}
|
|
||||||
return colorMap
|
|
||||||
}
|
|
||||||
|
|
||||||
func filterNTSCColorStatic(in *image.RGBA) *image.RGBA {
|
|
||||||
colorMap := getNTSCColorMap()
|
|
||||||
|
|
||||||
b := in.Bounds()
|
|
||||||
size := image.Rect(0, 0, b.Dx()/4, b.Dy())
|
|
||||||
out := image.NewRGBA(size)
|
|
||||||
for y := b.Min.Y; y < b.Max.Y; y++ {
|
|
||||||
for x := b.Min.X; x < b.Max.X; x += 4 {
|
|
||||||
v := 0
|
|
||||||
for i := 0; i < 4; i++ {
|
|
||||||
cIn := in.At(x+i, y)
|
|
||||||
r, _, _, _ := cIn.RGBA()
|
|
||||||
v = v << 1
|
|
||||||
if r != 0 {
|
|
||||||
v++
|
|
||||||
}
|
|
||||||
}
|
|
||||||
cOut := colorMap[v]
|
|
||||||
out.Set(x/4, y, cOut)
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return out
|
|
||||||
}
|
|
||||||
|
|
||||||
func filterNTSCColorMoving(blacker bool, in *image.RGBA) *image.RGBA {
|
|
||||||
colorMap := getNTSCColorMap()
|
|
||||||
|
|
||||||
b := in.Bounds()
|
|
||||||
size := image.Rect(0, 0, b.Dx()+3, b.Dy())
|
|
||||||
out := image.NewRGBA(size)
|
|
||||||
|
|
||||||
// We store the last four bits. We start will 0000
|
|
||||||
v := 0
|
|
||||||
for y := b.Min.Y; y < b.Max.Y; y++ {
|
|
||||||
for x := b.Min.X; x < b.Dx(); x++ {
|
|
||||||
cIn := in.At(x, y)
|
|
||||||
r, _, _, _ := cIn.RGBA()
|
|
||||||
|
|
||||||
pos := 1 << (3 - uint(x%4))
|
|
||||||
var cOut color.Color
|
|
||||||
if r != 0 {
|
|
||||||
v |= pos
|
|
||||||
cOut = colorMap[v]
|
|
||||||
} else {
|
|
||||||
v &^= pos
|
|
||||||
if blacker {
|
|
||||||
// If there is no luminance, let's have black anyway
|
|
||||||
cOut = colorMap[0]
|
|
||||||
} else {
|
|
||||||
cOut = colorMap[v]
|
|
||||||
}
|
|
||||||
}
|
|
||||||
out.Set(x, y, cOut)
|
|
||||||
}
|
|
||||||
|
|
||||||
// We fade for the last three positions
|
|
||||||
for x := b.Dx(); x < b.Max.X; x++ {
|
|
||||||
v = (v << 1) & 0xF
|
|
||||||
cOut := colorMap[v]
|
|
||||||
out.Set(x, y, cOut)
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return out
|
|
||||||
}
|
|
||||||
|
|
||||||
const (
|
|
||||||
charWidth = 7
|
|
||||||
charHeight = 8
|
|
||||||
textColumns = 40
|
|
||||||
textLines = 24
|
|
||||||
textPage1Address = uint16(0x0400)
|
|
||||||
textPage2Address = uint16(0x0800)
|
|
||||||
graphWidth = 280
|
|
||||||
graphHeight = 192
|
|
||||||
graphPage1Address = uint16(0x2000)
|
|
||||||
graphPage2Address = uint16(0x4000)
|
|
||||||
)
|
|
||||||
|
|
||||||
func getTextCharOffset(col int, line int) uint16 {
|
|
||||||
|
|
||||||
// See "Understanding the Apple II", page 5-10
|
|
||||||
// http://www.applelogic.org/files/UNDERSTANDINGTHEAII.pdf
|
|
||||||
section := line / 8 // Top, middle and bottom
|
|
||||||
eigth := line % 8
|
|
||||||
return uint16(section*40 + eigth*0x80 + col)
|
|
||||||
}
|
|
||||||
|
|
||||||
func getTextChar(a *Apple2, col int, line int, page int) uint8 {
|
|
||||||
address := textPage1Address
|
|
||||||
if page == 1 {
|
|
||||||
address = textPage2Address
|
|
||||||
}
|
|
||||||
address += getTextCharOffset(col, line)
|
|
||||||
return a.mmu.internalPeek(address)
|
|
||||||
}
|
|
||||||
|
|
||||||
func snapshotTextMode(a *Apple2, page int) *image.RGBA {
|
|
||||||
// Color for typical Apple ][ period green phosphor monitors
|
|
||||||
// See: https://superuser.com/questions/361297/what-colour-is-the-dark-green-on-old-fashioned-green-screen-computer-displays
|
|
||||||
p1GreenPhosphorColor := color.RGBA{65, 255, 0, 255}
|
|
||||||
|
|
||||||
// Flash mode is 2Hz
|
|
||||||
isFlashedFrame := time.Now().Nanosecond() > (1 * 1000 * 1000 * 1000 / 2)
|
|
||||||
|
|
||||||
width := textColumns * charWidth
|
|
||||||
height := textLines * charHeight
|
|
||||||
size := image.Rect(0, 0, width, height)
|
|
||||||
img := image.NewRGBA(size)
|
|
||||||
|
|
||||||
for x := 0; x < width; x++ {
|
|
||||||
for y := 0; y < height; y++ {
|
|
||||||
line := y / charHeight
|
|
||||||
col := x / charWidth
|
|
||||||
rowInChar := y % charHeight
|
|
||||||
colInChar := x % charWidth
|
|
||||||
char := getTextChar(a, col, line, page)
|
|
||||||
topBits := char >> 6
|
|
||||||
isInverse := topBits == 0
|
|
||||||
isFlash := topBits == 1
|
|
||||||
|
|
||||||
pixel := a.cg.getPixel(char, rowInChar, colInChar)
|
|
||||||
pixel = pixel != (isInverse || (isFlash && isFlashedFrame))
|
|
||||||
var colour color.Color
|
|
||||||
if pixel {
|
|
||||||
colour = p1GreenPhosphorColor
|
|
||||||
} else {
|
|
||||||
colour = color.Black
|
|
||||||
}
|
|
||||||
img.Set(x, y, colour)
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return img
|
|
||||||
}
|
|
||||||
|
|
||||||
func getGraphLineOffset(line int) uint16 {
|
|
||||||
|
|
||||||
// See "Understanding the Apple II", page 5-14
|
|
||||||
// http://www.applelogic.org/files/UNDERSTANDINGTHEAII.pdf
|
|
||||||
section := line >> 6 // Top, middle and bottom
|
|
||||||
outerEigth := (line >> 3) & 0x07
|
|
||||||
innerEigth := line & 0x07
|
|
||||||
return uint16(section*40 + outerEigth*0x80 + innerEigth*0x400)
|
|
||||||
}
|
|
||||||
|
|
||||||
func getGraphLine(a *Apple2, line int, page int) []uint8 {
|
|
||||||
address := graphPage1Address
|
|
||||||
if page == 1 {
|
|
||||||
address = graphPage2Address
|
|
||||||
}
|
|
||||||
|
|
||||||
address += getGraphLineOffset(line)
|
|
||||||
hi := uint8(address >> 8)
|
|
||||||
lo := uint8(address)
|
|
||||||
|
|
||||||
memPage := a.mmu.internalPage(hi)
|
|
||||||
return memPage[lo : lo+40]
|
|
||||||
}
|
|
||||||
|
|
||||||
func snapshotHiResModeReferenceMono(a *Apple2, page int) *image.RGBA {
|
|
||||||
// As defined on "Apple II Reference Manual", page 19
|
|
||||||
size := image.Rect(0, 0, graphWidth, graphHeight)
|
|
||||||
img := image.NewRGBA(size)
|
|
||||||
|
|
||||||
for y := 0; y < graphHeight; y++ {
|
|
||||||
bytes := getGraphLine(a, y, page)
|
|
||||||
x := 0
|
|
||||||
for _, b := range bytes {
|
|
||||||
for j := uint(0); j < 7; j++ {
|
|
||||||
bit := (b >> j) & 1
|
|
||||||
colour := color.Black
|
|
||||||
if bit == 1 {
|
|
||||||
colour = color.White
|
|
||||||
}
|
|
||||||
img.Set(x, y, colour)
|
|
||||||
x++
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return img
|
|
||||||
}
|
|
||||||
|
|
||||||
func snapshotHiResModeMonoShift(a *Apple2, page int) *image.RGBA {
|
|
||||||
// As described in "Undertanding the Apple II", with half pixel shifts
|
|
||||||
size := image.Rect(0, 0, 2*graphWidth, graphHeight)
|
|
||||||
img := image.NewRGBA(size)
|
|
||||||
|
|
||||||
for y := 0; y < graphHeight; y++ {
|
|
||||||
bytes := getGraphLine(a, y, page)
|
|
||||||
x := 0
|
|
||||||
previousColour := color.Black
|
|
||||||
for _, b := range bytes {
|
|
||||||
shifted := b>>7 == 1
|
|
||||||
for j := uint(0); j < 7; j++ {
|
|
||||||
bit := (b >> j) & 1
|
|
||||||
colour := color.Black
|
|
||||||
if bit == 1 {
|
|
||||||
colour = color.White
|
|
||||||
}
|
|
||||||
|
|
||||||
if shifted {
|
|
||||||
img.Set(x, y, previousColour)
|
|
||||||
} else {
|
|
||||||
img.Set(x, y, colour)
|
|
||||||
}
|
|
||||||
img.Set(x+1, y, colour)
|
|
||||||
previousColour = colour
|
|
||||||
x += 2
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return img
|
|
||||||
}
|
|
||||||
|
|
||||||
func snapshotHiResModeReferenceColor(a *Apple2, page int) *image.RGBA {
|
|
||||||
// As defined on "Apple II Reference Manual", page 19
|
|
||||||
size := image.Rect(0, 0, graphWidth, graphHeight)
|
|
||||||
img := image.NewRGBA(size)
|
|
||||||
|
|
||||||
// RGB values from https://mrob.com/pub/xapple2/colors.html
|
|
||||||
black := color.RGBA{0, 0, 0, 255}
|
|
||||||
violet := color.RGBA{255, 68, 253, 255}
|
|
||||||
red := color.RGBA{255, 106, 60, 255}
|
|
||||||
green := color.RGBA{20, 246, 60, 255}
|
|
||||||
blue := color.RGBA{20, 207, 253, 255}
|
|
||||||
white := color.RGBA{255, 255, 255, 255}
|
|
||||||
colorMap := [][][]color.Color{
|
|
||||||
{
|
|
||||||
/* 00 */ {black, black},
|
|
||||||
/* 01 */ {black, green},
|
|
||||||
/* 10 */ {violet, black},
|
|
||||||
/* 11 */ {white, white},
|
|
||||||
},
|
|
||||||
{
|
|
||||||
/* 00 */ {black, black},
|
|
||||||
/* 01 */ {black, red},
|
|
||||||
/* 10 */ {blue, black},
|
|
||||||
/* 11 */ {white, white},
|
|
||||||
},
|
|
||||||
}
|
|
||||||
|
|
||||||
for y := 0; y < graphHeight; y++ {
|
|
||||||
bytes := getGraphLine(a, y, page)
|
|
||||||
x := 0
|
|
||||||
previous := uint8(0)
|
|
||||||
for _, b := range bytes {
|
|
||||||
shift := b >> 7
|
|
||||||
for j := uint(0); j < 7; j++ {
|
|
||||||
bit := (b >> j) & 1
|
|
||||||
even := x%2 == 0
|
|
||||||
if even {
|
|
||||||
previous = bit
|
|
||||||
} else {
|
|
||||||
pair := colorMap[shift][(previous<<1)+bit]
|
|
||||||
img.Set(x-1, y, pair[0])
|
|
||||||
img.Set(x, y, pair[1])
|
|
||||||
}
|
|
||||||
x++
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return img
|
|
||||||
}
|
|
||||||
|
|
||||||
func snapshotHiResModeReferenceColorSolid(a *Apple2, page int) *image.RGBA {
|
|
||||||
// As defined on "Apple II Reference Manual", page 19
|
|
||||||
// but with more solid colors
|
|
||||||
size := image.Rect(0, 0, graphWidth, graphHeight)
|
|
||||||
img := image.NewRGBA(size)
|
|
||||||
|
|
||||||
// RGB values from https://mrob.com/pub/xapple2/colors.html
|
|
||||||
black := color.RGBA{0, 0, 0, 255}
|
|
||||||
violet := color.RGBA{255, 68, 253, 255}
|
|
||||||
red := color.RGBA{255, 106, 60, 255}
|
|
||||||
green := color.RGBA{20, 246, 60, 255}
|
|
||||||
blue := color.RGBA{20, 207, 253, 255}
|
|
||||||
white := color.RGBA{255, 255, 255, 255}
|
|
||||||
colorMap := [][]color.Color{
|
|
||||||
{
|
|
||||||
/* 00 */ black,
|
|
||||||
/* 01 */ green,
|
|
||||||
/* 10 */ violet,
|
|
||||||
/* 11 */ white,
|
|
||||||
},
|
|
||||||
{
|
|
||||||
/* 00 */ black,
|
|
||||||
/* 01 */ red,
|
|
||||||
/* 10 */ blue,
|
|
||||||
/* 11 */ white,
|
|
||||||
},
|
|
||||||
}
|
|
||||||
|
|
||||||
for y := 0; y < graphHeight; y++ {
|
|
||||||
bytes := getGraphLine(a, y, page)
|
|
||||||
x := 0
|
|
||||||
previous := uint8(0)
|
|
||||||
for _, b := range bytes {
|
|
||||||
shift := b >> 7
|
|
||||||
for j := uint(0); j < 7; j++ {
|
|
||||||
bit := (b >> j) & 1
|
|
||||||
even := x%2 == 0
|
|
||||||
if even {
|
|
||||||
previous = bit
|
|
||||||
} else {
|
|
||||||
colour := colorMap[shift][(previous<<1)+bit]
|
|
||||||
img.Set(x-1, y, colour)
|
|
||||||
img.Set(x, y, colour)
|
|
||||||
}
|
|
||||||
x++
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return img
|
|
||||||
}
|
|
||||||
|
|||||||
189
apple2/screenHgr.go
Normal file
189
apple2/screenHgr.go
Normal file
@ -0,0 +1,189 @@
|
|||||||
|
package apple2
|
||||||
|
|
||||||
|
import (
|
||||||
|
"image"
|
||||||
|
"image/color"
|
||||||
|
)
|
||||||
|
|
||||||
|
func getGraphLineOffset(line int) uint16 {
|
||||||
|
|
||||||
|
// See "Understanding the Apple II", page 5-14
|
||||||
|
// http://www.applelogic.org/files/UNDERSTANDINGTHEAII.pdf
|
||||||
|
section := line >> 6 // Top, middle and bottom
|
||||||
|
outerEigth := (line >> 3) & 0x07
|
||||||
|
innerEigth := line & 0x07
|
||||||
|
return uint16(section*40 + outerEigth*0x80 + innerEigth*0x400)
|
||||||
|
}
|
||||||
|
|
||||||
|
func getGraphLine(a *Apple2, line int, page int) []uint8 {
|
||||||
|
address := graphPage1Address
|
||||||
|
if page == 1 {
|
||||||
|
address = graphPage2Address
|
||||||
|
}
|
||||||
|
|
||||||
|
address += getGraphLineOffset(line)
|
||||||
|
hi := uint8(address >> 8)
|
||||||
|
lo := uint8(address)
|
||||||
|
|
||||||
|
memPage := a.mmu.internalPage(hi)
|
||||||
|
return memPage[lo : lo+40]
|
||||||
|
}
|
||||||
|
|
||||||
|
func snapshotHiResModeReferenceMono(a *Apple2, page int) *image.RGBA {
|
||||||
|
// As defined on "Apple II Reference Manual", page 19
|
||||||
|
size := image.Rect(0, 0, graphWidth, graphHeight)
|
||||||
|
img := image.NewRGBA(size)
|
||||||
|
|
||||||
|
for y := 0; y < graphHeight; y++ {
|
||||||
|
bytes := getGraphLine(a, y, page)
|
||||||
|
x := 0
|
||||||
|
for _, b := range bytes {
|
||||||
|
for j := uint(0); j < 7; j++ {
|
||||||
|
bit := (b >> j) & 1
|
||||||
|
colour := color.Black
|
||||||
|
if bit == 1 {
|
||||||
|
colour = color.White
|
||||||
|
}
|
||||||
|
img.Set(x, y, colour)
|
||||||
|
x++
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return img
|
||||||
|
}
|
||||||
|
|
||||||
|
func snapshotHiResModeMonoShift(a *Apple2, page int) *image.RGBA {
|
||||||
|
// As described in "Undertanding the Apple II", with half pixel shifts
|
||||||
|
size := image.Rect(0, 0, 2*graphWidth, graphHeight)
|
||||||
|
img := image.NewRGBA(size)
|
||||||
|
|
||||||
|
for y := 0; y < graphHeight; y++ {
|
||||||
|
bytes := getGraphLine(a, y, page)
|
||||||
|
x := 0
|
||||||
|
previousColour := color.Black
|
||||||
|
for _, b := range bytes {
|
||||||
|
shifted := b>>7 == 1
|
||||||
|
for j := uint(0); j < 7; j++ {
|
||||||
|
bit := (b >> j) & 1
|
||||||
|
colour := color.Black
|
||||||
|
if bit == 1 {
|
||||||
|
colour = color.White
|
||||||
|
}
|
||||||
|
|
||||||
|
if shifted {
|
||||||
|
img.Set(x, y, previousColour)
|
||||||
|
} else {
|
||||||
|
img.Set(x, y, colour)
|
||||||
|
}
|
||||||
|
img.Set(x+1, y, colour)
|
||||||
|
previousColour = colour
|
||||||
|
x += 2
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return img
|
||||||
|
}
|
||||||
|
|
||||||
|
func snapshotHiResModeReferenceColor(a *Apple2, page int) *image.RGBA {
|
||||||
|
// As defined on "Apple II Reference Manual", page 19
|
||||||
|
size := image.Rect(0, 0, graphWidth, graphHeight)
|
||||||
|
img := image.NewRGBA(size)
|
||||||
|
|
||||||
|
// RGB values from https://mrob.com/pub/xapple2/colors.html
|
||||||
|
black := color.RGBA{0, 0, 0, 255}
|
||||||
|
violet := color.RGBA{255, 68, 253, 255}
|
||||||
|
red := color.RGBA{255, 106, 60, 255}
|
||||||
|
green := color.RGBA{20, 246, 60, 255}
|
||||||
|
blue := color.RGBA{20, 207, 253, 255}
|
||||||
|
white := color.RGBA{255, 255, 255, 255}
|
||||||
|
colorMap := [][][]color.Color{
|
||||||
|
{
|
||||||
|
/* 00 */ {black, black},
|
||||||
|
/* 01 */ {black, green},
|
||||||
|
/* 10 */ {violet, black},
|
||||||
|
/* 11 */ {white, white},
|
||||||
|
},
|
||||||
|
{
|
||||||
|
/* 00 */ {black, black},
|
||||||
|
/* 01 */ {black, red},
|
||||||
|
/* 10 */ {blue, black},
|
||||||
|
/* 11 */ {white, white},
|
||||||
|
},
|
||||||
|
}
|
||||||
|
|
||||||
|
for y := 0; y < graphHeight; y++ {
|
||||||
|
bytes := getGraphLine(a, y, page)
|
||||||
|
x := 0
|
||||||
|
previous := uint8(0)
|
||||||
|
for _, b := range bytes {
|
||||||
|
shift := b >> 7
|
||||||
|
for j := uint(0); j < 7; j++ {
|
||||||
|
bit := (b >> j) & 1
|
||||||
|
even := x%2 == 0
|
||||||
|
if even {
|
||||||
|
previous = bit
|
||||||
|
} else {
|
||||||
|
pair := colorMap[shift][(previous<<1)+bit]
|
||||||
|
img.Set(x-1, y, pair[0])
|
||||||
|
img.Set(x, y, pair[1])
|
||||||
|
}
|
||||||
|
x++
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return img
|
||||||
|
}
|
||||||
|
|
||||||
|
func snapshotHiResModeReferenceColorSolid(a *Apple2, page int) *image.RGBA {
|
||||||
|
// As defined on "Apple II Reference Manual", page 19
|
||||||
|
// but with more solid colors
|
||||||
|
size := image.Rect(0, 0, graphWidth, graphHeight)
|
||||||
|
img := image.NewRGBA(size)
|
||||||
|
|
||||||
|
// RGB values from https://mrob.com/pub/xapple2/colors.html
|
||||||
|
black := color.RGBA{0, 0, 0, 255}
|
||||||
|
violet := color.RGBA{255, 68, 253, 255}
|
||||||
|
red := color.RGBA{255, 106, 60, 255}
|
||||||
|
green := color.RGBA{20, 246, 60, 255}
|
||||||
|
blue := color.RGBA{20, 207, 253, 255}
|
||||||
|
white := color.RGBA{255, 255, 255, 255}
|
||||||
|
colorMap := [][]color.Color{
|
||||||
|
{
|
||||||
|
/* 00 */ black,
|
||||||
|
/* 01 */ green,
|
||||||
|
/* 10 */ violet,
|
||||||
|
/* 11 */ white,
|
||||||
|
},
|
||||||
|
{
|
||||||
|
/* 00 */ black,
|
||||||
|
/* 01 */ red,
|
||||||
|
/* 10 */ blue,
|
||||||
|
/* 11 */ white,
|
||||||
|
},
|
||||||
|
}
|
||||||
|
|
||||||
|
for y := 0; y < graphHeight; y++ {
|
||||||
|
bytes := getGraphLine(a, y, page)
|
||||||
|
x := 0
|
||||||
|
previous := uint8(0)
|
||||||
|
for _, b := range bytes {
|
||||||
|
shift := b >> 7
|
||||||
|
for j := uint(0); j < 7; j++ {
|
||||||
|
bit := (b >> j) & 1
|
||||||
|
even := x%2 == 0
|
||||||
|
if even {
|
||||||
|
previous = bit
|
||||||
|
} else {
|
||||||
|
colour := colorMap[shift][(previous<<1)+bit]
|
||||||
|
img.Set(x-1, y, colour)
|
||||||
|
img.Set(x, y, colour)
|
||||||
|
}
|
||||||
|
x++
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return img
|
||||||
|
}
|
||||||
119
apple2/screenNtscFilter.go
Normal file
119
apple2/screenNtscFilter.go
Normal file
@ -0,0 +1,119 @@
|
|||||||
|
package apple2
|
||||||
|
|
||||||
|
import (
|
||||||
|
"image"
|
||||||
|
"image/color"
|
||||||
|
)
|
||||||
|
|
||||||
|
func getNTSCColorMap() []color.Color {
|
||||||
|
// RGB values from https://mrob.com/pub/xapple2/colors.html
|
||||||
|
black := color.RGBA{0, 0, 0, 255} /*COLOR=0 */ /* 0 0 0*/
|
||||||
|
|
||||||
|
dkBlue := color.RGBA{96, 78, 189, 255} /*COLOR=2 */ /* 0 60 25*/
|
||||||
|
red := color.RGBA{227, 30, 96, 255} /*COLOR=1 */ /* 90 60 25*/
|
||||||
|
brown := color.RGBA{96, 114, 3, 255} /*COLOR=8 */ /*180 60 25*/
|
||||||
|
dkGreen := color.RGBA{0, 163, 96, 255} /*COLOR=4 */ /*270 60 25*/
|
||||||
|
|
||||||
|
grey := color.RGBA{156, 156, 156, 255} /*COLOR=10*/ /* 0 0 50*/
|
||||||
|
purple := color.RGBA{255, 68, 253, 255} /*HCOLOR=2*/ /* 45 100 50*/
|
||||||
|
orange := color.RGBA{255, 106, 60, 255} /*HCOLOR=5*/ /*135 100 50*/
|
||||||
|
green := color.RGBA{20, 245, 60, 255} /*HCOLOR=1*/ /*225 100 50*/
|
||||||
|
blue := color.RGBA{20, 207, 253, 255} /*HCOLOR=6*/ /*315 100 50*/
|
||||||
|
|
||||||
|
//purple := color.RGBA{255, 68, 253, 255} /*COLOR=3 */ /* 45 100 50*/
|
||||||
|
//orange := color.RGBA{255, 106, 60, 255} /*COLOR=9 */ /*135 100 50*/
|
||||||
|
//green := color.RGBA{20, 245, 60, 255} /*COLOR=12*/ /*225 100 50*/
|
||||||
|
//blue := color.RGBA{20, 207, 253, 255} /*COLOR=6 */ /*315 100 50*/
|
||||||
|
|
||||||
|
ltBlue := color.RGBA{208, 195, 255, 255} /*COLOR=7 */ /* 0 60 75*/
|
||||||
|
pink := color.RGBA{255, 160, 208, 255} /*COLOR=11*/ /* 90 60 75*/
|
||||||
|
yellow := color.RGBA{208, 221, 141, 255} /*COLOR=13*/ /*180 60 75*/
|
||||||
|
aqua := color.RGBA{114, 255, 208, 255} /*COLOR=14*/ /*270 60 75*/
|
||||||
|
|
||||||
|
white := color.RGBA{255, 255, 255, 255} /*COLOR=15*/ /* 0 0 100*/
|
||||||
|
|
||||||
|
colorMap := []color.Color{
|
||||||
|
/* 0000 */ black,
|
||||||
|
/* 0001 */ brown,
|
||||||
|
/* 0010 */ dkGreen,
|
||||||
|
/* 0011 */ green,
|
||||||
|
/* 0100 */ dkBlue,
|
||||||
|
/* 0101 */ grey,
|
||||||
|
/* 0110 */ blue,
|
||||||
|
/* 0111 */ aqua,
|
||||||
|
/* 1000 */ red,
|
||||||
|
/* 1001 */ orange,
|
||||||
|
/* 1010 */ grey,
|
||||||
|
/* 1011 */ yellow,
|
||||||
|
/* 1100 */ purple,
|
||||||
|
/* 1101 */ pink,
|
||||||
|
/* 1110 */ ltBlue,
|
||||||
|
/* 1111 */ white,
|
||||||
|
}
|
||||||
|
return colorMap
|
||||||
|
}
|
||||||
|
|
||||||
|
func filterNTSCColorStatic(in *image.RGBA) *image.RGBA {
|
||||||
|
colorMap := getNTSCColorMap()
|
||||||
|
|
||||||
|
b := in.Bounds()
|
||||||
|
size := image.Rect(0, 0, b.Dx()/4, b.Dy())
|
||||||
|
out := image.NewRGBA(size)
|
||||||
|
for y := b.Min.Y; y < b.Max.Y; y++ {
|
||||||
|
for x := b.Min.X; x < b.Max.X; x += 4 {
|
||||||
|
v := 0
|
||||||
|
for i := 0; i < 4; i++ {
|
||||||
|
cIn := in.At(x+i, y)
|
||||||
|
r, _, _, _ := cIn.RGBA()
|
||||||
|
v = v << 1
|
||||||
|
if r != 0 {
|
||||||
|
v++
|
||||||
|
}
|
||||||
|
}
|
||||||
|
cOut := colorMap[v]
|
||||||
|
out.Set(x/4, y, cOut)
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return out
|
||||||
|
}
|
||||||
|
|
||||||
|
func filterNTSCColorMoving(blacker bool, in *image.RGBA) *image.RGBA {
|
||||||
|
colorMap := getNTSCColorMap()
|
||||||
|
|
||||||
|
b := in.Bounds()
|
||||||
|
size := image.Rect(0, 0, b.Dx()+3, b.Dy())
|
||||||
|
out := image.NewRGBA(size)
|
||||||
|
|
||||||
|
// We store the last four bits. We start will 0000
|
||||||
|
v := 0
|
||||||
|
for y := b.Min.Y; y < b.Max.Y; y++ {
|
||||||
|
for x := b.Min.X; x < b.Dx(); x++ {
|
||||||
|
cIn := in.At(x, y)
|
||||||
|
r, _, _, _ := cIn.RGBA()
|
||||||
|
|
||||||
|
pos := 1 << (3 - uint(x%4))
|
||||||
|
var cOut color.Color
|
||||||
|
if r != 0 {
|
||||||
|
v |= pos
|
||||||
|
cOut = colorMap[v]
|
||||||
|
} else {
|
||||||
|
v &^= pos
|
||||||
|
if blacker {
|
||||||
|
// If there is no luminance, let's have black anyway
|
||||||
|
cOut = colorMap[0]
|
||||||
|
} else {
|
||||||
|
cOut = colorMap[v]
|
||||||
|
}
|
||||||
|
}
|
||||||
|
out.Set(x, y, cOut)
|
||||||
|
}
|
||||||
|
|
||||||
|
// We fade for the last three positions
|
||||||
|
for x := b.Dx(); x < b.Max.X; x++ {
|
||||||
|
v = (v << 1) & 0xF
|
||||||
|
cOut := colorMap[v]
|
||||||
|
out.Set(x, y, cOut)
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return out
|
||||||
|
}
|
||||||
77
apple2/screenText.go
Normal file
77
apple2/screenText.go
Normal file
@ -0,0 +1,77 @@
|
|||||||
|
package apple2
|
||||||
|
|
||||||
|
import (
|
||||||
|
"image"
|
||||||
|
"image/color"
|
||||||
|
"time"
|
||||||
|
)
|
||||||
|
|
||||||
|
const (
|
||||||
|
charWidth = 7
|
||||||
|
charHeight = 8
|
||||||
|
textColumns = 40
|
||||||
|
textLines = 24
|
||||||
|
textPage1Address = uint16(0x0400)
|
||||||
|
textPage2Address = uint16(0x0800)
|
||||||
|
graphWidth = 280
|
||||||
|
graphHeight = 192
|
||||||
|
graphPage1Address = uint16(0x2000)
|
||||||
|
graphPage2Address = uint16(0x4000)
|
||||||
|
)
|
||||||
|
|
||||||
|
func getTextCharOffset(col int, line int) uint16 {
|
||||||
|
|
||||||
|
// See "Understanding the Apple II", page 5-10
|
||||||
|
// http://www.applelogic.org/files/UNDERSTANDINGTHEAII.pdf
|
||||||
|
section := line / 8 // Top, middle and bottom
|
||||||
|
eigth := line % 8
|
||||||
|
return uint16(section*40 + eigth*0x80 + col)
|
||||||
|
}
|
||||||
|
|
||||||
|
func getTextChar(a *Apple2, col int, line int, page int) uint8 {
|
||||||
|
address := textPage1Address
|
||||||
|
if page == 1 {
|
||||||
|
address = textPage2Address
|
||||||
|
}
|
||||||
|
address += getTextCharOffset(col, line)
|
||||||
|
return a.mmu.internalPeek(address)
|
||||||
|
}
|
||||||
|
|
||||||
|
func snapshotTextMode(a *Apple2, page int) *image.RGBA {
|
||||||
|
// Color for typical Apple ][ period green phosphor monitors
|
||||||
|
// See: https://superuser.com/questions/361297/what-colour-is-the-dark-green-on-old-fashioned-green-screen-computer-displays
|
||||||
|
p1GreenPhosphorColor := color.RGBA{65, 255, 0, 255}
|
||||||
|
|
||||||
|
// Flash mode is 2Hz
|
||||||
|
isFlashedFrame := time.Now().Nanosecond() > (1 * 1000 * 1000 * 1000 / 2)
|
||||||
|
|
||||||
|
width := textColumns * charWidth
|
||||||
|
height := textLines * charHeight
|
||||||
|
size := image.Rect(0, 0, width, height)
|
||||||
|
img := image.NewRGBA(size)
|
||||||
|
|
||||||
|
for x := 0; x < width; x++ {
|
||||||
|
for y := 0; y < height; y++ {
|
||||||
|
line := y / charHeight
|
||||||
|
col := x / charWidth
|
||||||
|
rowInChar := y % charHeight
|
||||||
|
colInChar := x % charWidth
|
||||||
|
char := getTextChar(a, col, line, page)
|
||||||
|
topBits := char >> 6
|
||||||
|
isInverse := topBits == 0
|
||||||
|
isFlash := topBits == 1
|
||||||
|
|
||||||
|
pixel := a.cg.getPixel(char, rowInChar, colInChar)
|
||||||
|
pixel = pixel != (isInverse || (isFlash && isFlashedFrame))
|
||||||
|
var colour color.Color
|
||||||
|
if pixel {
|
||||||
|
colour = p1GreenPhosphorColor
|
||||||
|
} else {
|
||||||
|
colour = color.Black
|
||||||
|
}
|
||||||
|
img.Set(x, y, colour)
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return img
|
||||||
|
}
|
||||||
Loading…
x
Reference in New Issue
Block a user