47 lines
1.3 KiB
Go
47 lines
1.3 KiB
Go
package main
|
|
|
|
import (
|
|
"fmt"
|
|
"testing"
|
|
"time"
|
|
|
|
"github.com/freewilll/apple2-go/cpu"
|
|
"github.com/freewilll/apple2-go/disk"
|
|
"github.com/freewilll/apple2-go/keyboard"
|
|
"github.com/freewilll/apple2-go/mmu"
|
|
"github.com/freewilll/apple2-go/system"
|
|
"github.com/freewilll/apple2-go/utils"
|
|
"github.com/freewilll/apple2-go/video"
|
|
)
|
|
|
|
const dosDiskImage = "dos33.dsk"
|
|
|
|
// TestDOS33Boot goes through the boot process and asserts that the code ends
|
|
// up in the BASIC interpreter after DOS has loaded.
|
|
func TestDOS33Boot(t *testing.T) {
|
|
cpu.InitInstructionDecoder()
|
|
mmu.InitRAM()
|
|
mmu.InitApple2eROM()
|
|
mmu.InitIO()
|
|
disk.ReadDiskImage(dosDiskImage)
|
|
cpu.Init()
|
|
keyboard.Init()
|
|
video.Init()
|
|
system.Init()
|
|
cpu.SetColdStartReset()
|
|
cpu.Reset()
|
|
|
|
t0 := time.Now()
|
|
|
|
// Boot up DOS3.3
|
|
utils.RunUntilBreakPoint(t, 0x0801, 2, false, "Boot0")
|
|
utils.RunUntilBreakPoint(t, 0xb700, 1, false, "Boot1") // $3700 is for master disk, $b700 for a slave disk
|
|
utils.RunUntilBreakPoint(t, 0x9d84, 3, false, "Boot2")
|
|
utils.RunUntilBreakPoint(t, 0xd7d2, 2, false, "JMP to basic interpreter NEWSTT")
|
|
|
|
elapsed := float64(time.Since(t0) / time.Millisecond)
|
|
fmt.Printf("CPU Cycles: %d\n", system.FrameCycles)
|
|
fmt.Printf("Time elapsed: %0.2f ms\n", elapsed)
|
|
fmt.Printf("Speed: %0.2f cycles/ms\n", float64(system.FrameCycles)/elapsed)
|
|
}
|