469 lines
17 KiB
Java
469 lines
17 KiB
Java
/**
|
|
* Copyright 2024 Brendan Robert
|
|
*
|
|
* Licensed under the Apache License, Version 2.0 (the "License");
|
|
* you may not use this file except in compliance with the License.
|
|
* You may obtain a copy of the License at
|
|
*
|
|
* http://www.apache.org/licenses/LICENSE-2.0
|
|
*
|
|
* Unless required by applicable law or agreed to in writing, software
|
|
* distributed under the License is distributed on an "AS IS" BASIS,
|
|
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
* See the License for the specific language governing permissions and
|
|
* limitations under the License.
|
|
**/
|
|
|
|
package jace.apple2e;
|
|
|
|
import java.io.IOException;
|
|
import java.util.ArrayList;
|
|
import java.util.HashSet;
|
|
import java.util.List;
|
|
import java.util.Optional;
|
|
import java.util.Set;
|
|
import java.util.concurrent.ScheduledExecutorService;
|
|
import java.util.concurrent.ScheduledFuture;
|
|
import java.util.concurrent.ScheduledThreadPoolExecutor;
|
|
import java.util.concurrent.TimeUnit;
|
|
import java.util.logging.Level;
|
|
import java.util.logging.Logger;
|
|
|
|
import jace.apple2e.softswitch.VideoSoftSwitch;
|
|
import jace.cheat.Cheats;
|
|
import jace.config.ConfigurableField;
|
|
import jace.config.DeviceSelection;
|
|
import jace.core.Card;
|
|
import jace.core.Computer;
|
|
import jace.core.Device;
|
|
import jace.core.Motherboard;
|
|
import jace.core.RAM;
|
|
import jace.core.RAMEvent;
|
|
import jace.core.RAMListener;
|
|
import jace.core.Utility;
|
|
import jace.hardware.Cards;
|
|
import jace.hardware.Joystick;
|
|
import jace.hardware.NoSlotClock;
|
|
import jace.hardware.VideoImpls;
|
|
import jace.hardware.ZipWarpAccelerator;
|
|
import jace.lawless.FPSMonitorDevice;
|
|
import jace.state.Stateful;
|
|
|
|
/**
|
|
* Apple2e is a computer with a 65c02 CPU, 128k of bankswitched ram,
|
|
* double-hires graphics, and up to seven peripheral I/O cards installed. Pause
|
|
* and resume are implemented by the Motherboard class. This class provides
|
|
* overall configuration of the computer, but the actual operation of the
|
|
* computer and its timing characteristics are managed in the Motherboard class.
|
|
*
|
|
* @author Brendan Robert (BLuRry) brendan.robert@gmail.com
|
|
*/
|
|
@Stateful
|
|
public class Apple2e extends Computer {
|
|
static int IRQ_VECTOR = 0x003F2;
|
|
|
|
@ConfigurableField(name = "Production mode", shortName = "production")
|
|
public boolean PRODUCTION_MODE = true;
|
|
@ConfigurableField(name = "Slot 1", shortName = "s1card")
|
|
public DeviceSelection<Cards> card1 = new DeviceSelection<>(Cards.class, null);
|
|
@ConfigurableField(name = "Slot 2", shortName = "s2card")
|
|
public DeviceSelection<Cards> card2 = new DeviceSelection<>(Cards.class, null);
|
|
@ConfigurableField(name = "Slot 3", shortName = "s3card")
|
|
public DeviceSelection<Cards> card3 = new DeviceSelection<>(Cards.class, null);
|
|
@ConfigurableField(name = "Slot 4", shortName = "s4card")
|
|
public DeviceSelection<Cards> card4 = new DeviceSelection<>(Cards.class, null);
|
|
@ConfigurableField(name = "Slot 5", shortName = "s5card")
|
|
public DeviceSelection<Cards> card5 = new DeviceSelection<>(Cards.class, null);
|
|
@ConfigurableField(name = "Slot 6", shortName = "s6card")
|
|
public DeviceSelection<Cards> card6 = new DeviceSelection<>(Cards.class, Cards.DiskIIDrive, true);
|
|
@ConfigurableField(name = "Slot 7", shortName = "s7card")
|
|
public DeviceSelection<Cards> card7 = new DeviceSelection<>(Cards.class, Cards.MassStorage, true);
|
|
@ConfigurableField(name = "Debug rom", shortName = "debugRom", description = "Use debugger //e rom")
|
|
public boolean useDebugRom = false;
|
|
@ConfigurableField(name = "Helpful hints", shortName = "hints")
|
|
public boolean enableHints = true;
|
|
@ConfigurableField(name = "Renderer", shortName = "video", description = "Video rendering implementation")
|
|
public DeviceSelection<VideoImpls> videoRenderer = new DeviceSelection<>(VideoImpls.class, PRODUCTION_MODE ? VideoImpls.Lawless : VideoImpls.NTSC, false);
|
|
@ConfigurableField(name = "Aux Ram", shortName = "ram", description = "Aux ram card")
|
|
public DeviceSelection<RAM128k.RamCards> ramCard = new DeviceSelection<>(RAM128k.RamCards.class, RAM128k.RamCards.CardRamworks, false);
|
|
@ConfigurableField(name = "Joystick 1 Enabled", shortName = "joy1", description = "If unchecked, then there is no joystick support.", enablesDevice = true)
|
|
public boolean joy1enabled = true;
|
|
@ConfigurableField(name = "Joystick 2 Enabled", shortName = "joy2", description = "If unchecked, then there is no joystick support.", enablesDevice = true)
|
|
public boolean joy2enabled = false;
|
|
@ConfigurableField(name = "No-Slot Clock Enabled", shortName = "clock", description = "If checked, no-slot clock will be enabled", enablesDevice = true)
|
|
public boolean clockEnabled = true;
|
|
@ConfigurableField(name = "Accelerator Enabled", shortName = "zip", description = "If checked, add support for Zip/Transwarp", enablesDevice = true)
|
|
public boolean acceleratorEnabled = true;
|
|
|
|
public Joystick joystick1;
|
|
public Joystick joystick2;
|
|
@ConfigurableField(name = "Activate Cheats", shortName = "cheat")
|
|
public DeviceSelection<Cheats.Cheat> cheatEngine = new DeviceSelection<>(Cheats.Cheat.class, null);
|
|
public Cheats activeCheatEngine = null;
|
|
public NoSlotClock clock;
|
|
public ZipWarpAccelerator accelerator;
|
|
FPSMonitorDevice fpsCounters;
|
|
@ConfigurableField(name = "Show speed monitors", shortName = "showFps")
|
|
public boolean showSpeedMonitors = !PRODUCTION_MODE;
|
|
|
|
/**
|
|
* Creates a new instance of Apple2e
|
|
*/
|
|
public Apple2e() {
|
|
super();
|
|
fpsCounters = new FPSMonitorDevice();
|
|
try {
|
|
setCpu(new MOS65C02());
|
|
setMotherboard(new Motherboard(null));
|
|
if (PRODUCTION_MODE) {
|
|
getMotherboard().setSpeedInPercentage(200);
|
|
}
|
|
} catch (Throwable t) {
|
|
System.err.println("Unable to initialize virtual machine");
|
|
t.printStackTrace(System.err);
|
|
}
|
|
}
|
|
|
|
@Override
|
|
public String getName() {
|
|
return "Computer (Apple //e)";
|
|
}
|
|
|
|
|
|
@Override
|
|
public void coldStart() {
|
|
RAM128k r = (RAM128k) getMemory();
|
|
System.err.println("Cold starting computer: RESETTING SOFT SWITCHES");
|
|
r.resetState();
|
|
for (SoftSwitches s : SoftSwitches.values()) {
|
|
if ((s.getSwitch() instanceof VideoSoftSwitch)) {
|
|
if (s == SoftSwitches.TEXT && PRODUCTION_MODE) {
|
|
s.getSwitch().setState(true);
|
|
} else {
|
|
s.getSwitch().reset();
|
|
}
|
|
s.getSwitch().reset();
|
|
}
|
|
}
|
|
// This isn't really authentic behavior but sometimes games like memory to have a consistent state when booting.
|
|
r.zeroAllRam();
|
|
// Sather 4-15:
|
|
// An open Apple (left Apple) reset causes meaningless values to be stored in two locations
|
|
// of every memory page from Page $01 through Page $BF before the power-up byte is checked.
|
|
int offset = IRQ_VECTOR & 0x0ff;
|
|
byte garbage = (byte) (Math.random() * 256.0);
|
|
for (int page=1; page < 0xc0; page++) {
|
|
r.write(page << 8 + offset, garbage, false, true);
|
|
r.write(page << 8 + 1 + offset, garbage, false, true);
|
|
}
|
|
warmStart();
|
|
}
|
|
|
|
@Override
|
|
public void warmStart() {
|
|
for (SoftSwitches s : SoftSwitches.values()) {
|
|
if (! (s.getSwitch() instanceof VideoSoftSwitch)) {
|
|
s.getSwitch().reset();
|
|
}
|
|
}
|
|
getMemory().configureActiveMemory();
|
|
getVideo().configureVideoMode();
|
|
getCpu().reset();
|
|
for (Optional<Card> c : getMemory().getAllCards()) {
|
|
c.ifPresent(Card::reset);
|
|
}
|
|
motherboard.disableTempMaxSpeed();
|
|
resume();
|
|
}
|
|
|
|
public Cheats getActiveCheatEngine() {
|
|
return activeCheatEngine;
|
|
}
|
|
|
|
private void insertCard(DeviceSelection<Cards> type, int slot) {
|
|
if (getMemory().getCard(slot).isPresent()) {
|
|
if (type.getValue() != null && type.getValue().isInstance(getMemory().getCard(slot).get())) {
|
|
return;
|
|
}
|
|
getMemory().removeCard(slot);
|
|
}
|
|
if (type != null && type.getValue() != null) {
|
|
Card card = type.getValue().create();
|
|
getMemory().addCard(card, slot);
|
|
}
|
|
}
|
|
|
|
private RAM128k.RamCards getDesiredMemoryConfiguration() {
|
|
if (ramCard.getValue() == null) {
|
|
return RAM128k.RamCards.CardExt80Col;
|
|
} else {
|
|
return ramCard.getValue();
|
|
}
|
|
}
|
|
|
|
private boolean isMemoryConfigurationCorrect() {
|
|
if (getMemory() == null) {
|
|
return false;
|
|
}
|
|
return getDesiredMemoryConfiguration().isInstance((RAM128k) getMemory());
|
|
}
|
|
|
|
private boolean isVideoConfigurationCorrect() {
|
|
VideoImpls videoSelection = videoRenderer.getValue();
|
|
return videoSelection != null && videoSelection.isInstance(getVideo());
|
|
}
|
|
|
|
@Override
|
|
protected RAM createMemory() {
|
|
return getDesiredMemoryConfiguration().create();
|
|
}
|
|
|
|
@Override
|
|
public void loadRom(boolean reload) throws IOException {
|
|
if (!romLoaded.isDone() && reload) {
|
|
if (useDebugRom) {
|
|
loadRom("/jace/data/apple2e_debug.rom");
|
|
} else {
|
|
loadRom("/jace/data/apple2e.rom");
|
|
}
|
|
}
|
|
}
|
|
|
|
@Override
|
|
public final void reconfigure() {
|
|
super.reconfigure();
|
|
|
|
if (Utility.isHeadlessMode()) {
|
|
joy1enabled = false;
|
|
joy2enabled = false;
|
|
}
|
|
|
|
if (getMotherboard() == null) {
|
|
System.err.println("No motherboard, cannot reconfigure");
|
|
Thread.dumpStack();
|
|
return;
|
|
}
|
|
getMotherboard().whileSuspended(()-> {
|
|
// System.err.println("Reconfiguring computer...");
|
|
if (!isMemoryConfigurationCorrect()) {
|
|
System.out.println("Creating new ram using " + getDesiredMemoryConfiguration().getName());
|
|
setMemory(createMemory());
|
|
}
|
|
|
|
// Make sure all softswitches are configured after confirming memory exists
|
|
for (SoftSwitches s : SoftSwitches.values()) {
|
|
s.getSwitch().register();
|
|
}
|
|
|
|
try {
|
|
loadRom(true);
|
|
} catch (IOException e) {
|
|
Logger.getLogger(Apple2e.class.getName()).log(Level.SEVERE, "Failed to load system rom ROMs", e);
|
|
}
|
|
|
|
getMemory().configureActiveMemory();
|
|
|
|
Set<Device> newDeviceSet = new HashSet<>();
|
|
|
|
if (acceleratorEnabled) {
|
|
if (accelerator == null) {
|
|
accelerator = new ZipWarpAccelerator();
|
|
}
|
|
newDeviceSet.add(accelerator);
|
|
}
|
|
|
|
if (joy1enabled) {
|
|
if (joystick1 == null) {
|
|
joystick1 = new Joystick(0, this);
|
|
}
|
|
newDeviceSet.add(joystick1);
|
|
} else {
|
|
joystick1 = null;
|
|
}
|
|
|
|
if (joy2enabled) {
|
|
if (joystick2 == null) {
|
|
joystick2 = new Joystick(1, this);
|
|
}
|
|
newDeviceSet.add(joystick2);
|
|
} else {
|
|
joystick2 = null;
|
|
}
|
|
|
|
if (clockEnabled) {
|
|
if (clock == null) {
|
|
clock = new NoSlotClock();
|
|
}
|
|
newDeviceSet.add(clock);
|
|
} else {
|
|
clock = null;
|
|
}
|
|
|
|
if (!isVideoConfigurationCorrect()) {
|
|
setVideo(videoRenderer.getValue().create());
|
|
}
|
|
|
|
// Add all new cards
|
|
insertCard(card1, 1);
|
|
insertCard(card2, 2);
|
|
insertCard(card3, 3);
|
|
insertCard(card4, 4);
|
|
insertCard(card5, 5);
|
|
insertCard(card6, 6);
|
|
insertCard(card7, 7);
|
|
if (enableHints) {
|
|
enableHints();
|
|
} else {
|
|
disableHints();
|
|
}
|
|
|
|
if (cheatEngine.getValue() == null) {
|
|
if (activeCheatEngine != null) {
|
|
activeCheatEngine.detach();
|
|
activeCheatEngine.suspend();
|
|
activeCheatEngine = null;
|
|
}
|
|
} else {
|
|
if (activeCheatEngine != null && !cheatEngine.getValue().isInstance(activeCheatEngine)) {
|
|
activeCheatEngine.detach();
|
|
activeCheatEngine.suspend();
|
|
activeCheatEngine = null;
|
|
}
|
|
if (activeCheatEngine == null && cheatEngine.getValue() != null) {
|
|
activeCheatEngine = cheatEngine.getValue().create();
|
|
}
|
|
if (activeCheatEngine != null) {
|
|
newDeviceSet.add(activeCheatEngine);
|
|
}
|
|
}
|
|
|
|
newDeviceSet.add(getCpu());
|
|
newDeviceSet.add(getVideo());
|
|
for (Optional<Card> c : getMemory().getAllCards()) {
|
|
c.ifPresent(newDeviceSet::add);
|
|
}
|
|
if (showSpeedMonitors) {
|
|
newDeviceSet.add(fpsCounters);
|
|
}
|
|
getMotherboard().setAllDevices(newDeviceSet);
|
|
getMotherboard().attach();
|
|
getMotherboard().reconfigure();
|
|
});
|
|
}
|
|
|
|
@Override
|
|
protected void doPause() {
|
|
if (getMotherboard() == null) {
|
|
return;
|
|
}
|
|
getMotherboard().setPaused(true);
|
|
}
|
|
|
|
@Override
|
|
protected void doResume() {
|
|
if (getMotherboard() == null) {
|
|
return;
|
|
}
|
|
getMotherboard().resumeAll();
|
|
}
|
|
|
|
private final List<RAMListener> hints = new ArrayList<>();
|
|
|
|
ScheduledExecutorService animationTimer = new ScheduledThreadPoolExecutor(1);
|
|
Runnable drawHints = () -> {
|
|
if (getCpu().getProgramCounter() >> 8 != 0x0c6) {
|
|
return;
|
|
}
|
|
int row = 2;
|
|
for (String s : new String[]{
|
|
" Welcome to",
|
|
" _ __ ___ ____ ",
|
|
" | | / /\\ / / ` | |_ ",
|
|
" \\_|_| /_/--\\ \\_\\_, |_|__ ",
|
|
"",
|
|
" Java Apple Computer Emulator",
|
|
"",
|
|
" Presented by BLuRry",
|
|
" https://goo.gl/SnzqG",
|
|
"",
|
|
"To insert a disk, please drag it over",
|
|
"this window and drop on the desired",
|
|
"drive icon.",
|
|
"",
|
|
"Press CTRL+SHIFT+C for configuration.",
|
|
"Press CTRL+SHIFT+I for IDE window.",
|
|
"",
|
|
"O-A: Alt/Option",
|
|
"C-A: Shortcut/Command",
|
|
"Reset: Delete/Backspace"
|
|
}) {
|
|
int addr = 0x0401 + VideoDHGR.calculateTextOffset(row++);
|
|
for (char c : s.toCharArray()) {
|
|
getMemory().write(addr++, (byte) (c | 0x080), false, true);
|
|
}
|
|
}
|
|
};
|
|
int animAddr, animCycleNumber;
|
|
byte animOldValue;
|
|
final String animation = "+xX*+-";
|
|
ScheduledFuture<?> animationSchedule;
|
|
Runnable doAnimation = () -> {
|
|
if (animAddr == 0 || animCycleNumber >= animation.length()) {
|
|
if (animAddr > 0) {
|
|
getMemory().write(animAddr, animOldValue, true, true);
|
|
}
|
|
int animX = (int) (Math.random() * 24.0) + 7;
|
|
int animY = (int) (Math.random() * 3.0) + 3;
|
|
animAddr = 0x0400 + VideoDHGR.calculateTextOffset(animY) + animX;
|
|
animOldValue = getMemory().readRaw(animAddr);
|
|
animCycleNumber = 0;
|
|
}
|
|
if (getCpu().getProgramCounter() >> 8 == 0x0c6) {
|
|
getMemory().write(animAddr, (byte) (animation.charAt(animCycleNumber) | 0x080), true, true);
|
|
animCycleNumber++;
|
|
} else {
|
|
getMemory().write(animAddr, animOldValue, true, true);
|
|
animationSchedule.cancel(false);
|
|
animAddr = 0;
|
|
}
|
|
};
|
|
|
|
private void enableHints() {
|
|
if (hints.isEmpty()) {
|
|
hints.add(getMemory().observe("Helpful hints", RAMEvent.TYPE.EXECUTE, 0x0FB63, (e)->{
|
|
animationTimer.schedule(drawHints, 1, TimeUnit.SECONDS);
|
|
animationSchedule =
|
|
animationTimer.scheduleAtFixedRate(doAnimation, 1250, 100, TimeUnit.MILLISECONDS);
|
|
}));
|
|
// Latch to the PRODOS SYNTAX CHECK parser
|
|
/*
|
|
hints.add(new RAMListener(RAMEvent.TYPE.EXECUTE, RAMEvent.SCOPE.ADDRESS, RAMEvent.VALUE.ANY) {
|
|
@Override
|
|
protected void doConfig() {setScopeStart(0x0a685);}
|
|
|
|
@Override
|
|
protected void doEvent(RAMEvent e) {
|
|
String in = "";
|
|
for (int i=0x0200; i < 0x0300; i++) {
|
|
char c = (char) (getMemory().readRaw(i) & 0x07f);
|
|
if (c == 0x0d) break;
|
|
in += c;
|
|
}
|
|
|
|
System.err.println("Intercepted command: "+in);
|
|
}
|
|
});
|
|
*/
|
|
}
|
|
}
|
|
|
|
private void disableHints() {
|
|
hints.forEach((hint) -> getMemory().removeListener(hint));
|
|
hints.clear();
|
|
}
|
|
|
|
@Override
|
|
public String getShortName() {
|
|
return "computer";
|
|
}
|
|
} |