mirror of
https://github.com/V2RetroComputing/analog.git
synced 2024-06-01 17:41:35 +00:00
0835003caa
Progress on PCPI mode bug fixes. PCPI mode is now working again, but the config interface is still broken enough to prevent the use of the config utility while in this mode.. Sending the FORMAT command from the monitor rom returns the card to defaults. Replace n with the slot number the card is installed in: ]CALL -151 *CnF0:46 4F 52 4D 41 54 00 00 Correction of mousetext / inverse / flashing handling on IIe see https://github.com/V2RetroComputing/analog/issues/3 Monochrome mode & color palettes are now implemented. $C0n1: Monochrome mode & palette $80: B&W $90: Inverse $A0: Amber $B0: Inverse Amber $C0: Green $D0: Inverse Green $E0: Commodore 64 Theme $F0: Use IIgs palette $C0n2: Mirror of IIgs TBCOLOR register $C0n3: Mirror of IIgs BORDER register
212 lines
8.7 KiB
C
212 lines
8.7 KiB
C
#include <string.h>
|
|
#include <hardware/pio.h>
|
|
#include "common/config.h"
|
|
#include "abus.pio.h"
|
|
#include "vga/businterface.h"
|
|
#include "vga/vgabuf.h"
|
|
|
|
|
|
volatile uint8_t *terminal_page = terminal_memory;
|
|
|
|
|
|
void __time_critical_func(vga_businterface)(uint32_t address, uint32_t value) {
|
|
// Shadow the soft-switches by observing all read & write bus cycles
|
|
if((address & 0xff80) == 0xc000) {
|
|
switch(address & 0x7f) {
|
|
case 0x00:
|
|
if((internal_flags & (IFLAGS_IIGS_REGS | IFLAGS_IIE_REGS)) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
soft_switches &= ~SOFTSW_80STORE;
|
|
}
|
|
break;
|
|
case 0x01:
|
|
if((internal_flags & (IFLAGS_IIGS_REGS | IFLAGS_IIE_REGS)) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
soft_switches |= SOFTSW_80STORE;
|
|
}
|
|
break;
|
|
case 0x04:
|
|
if((internal_flags & (IFLAGS_IIGS_REGS | IFLAGS_IIE_REGS)) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
soft_switches &= ~SOFTSW_AUX_WRITE;
|
|
}
|
|
break;
|
|
case 0x05:
|
|
if((internal_flags & (IFLAGS_IIGS_REGS | IFLAGS_IIE_REGS)) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
soft_switches |= SOFTSW_AUX_WRITE;
|
|
}
|
|
break;
|
|
case 0x08:
|
|
if((internal_flags & (IFLAGS_IIGS_REGS | IFLAGS_IIE_REGS)) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
soft_switches &= ~SOFTSW_AUXZP;
|
|
}
|
|
break;
|
|
case 0x09:
|
|
if((internal_flags & (IFLAGS_IIGS_REGS | IFLAGS_IIE_REGS)) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
soft_switches |= SOFTSW_AUXZP;
|
|
}
|
|
break;
|
|
case 0x0c:
|
|
if((internal_flags & (IFLAGS_IIGS_REGS | IFLAGS_IIE_REGS)) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
soft_switches &= ~SOFTSW_80COL;
|
|
}
|
|
break;
|
|
case 0x0d:
|
|
if((internal_flags & (IFLAGS_IIGS_REGS | IFLAGS_IIE_REGS)) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
soft_switches |= SOFTSW_80COL;
|
|
}
|
|
break;
|
|
case 0x0e:
|
|
if((internal_flags & (IFLAGS_IIGS_REGS | IFLAGS_IIE_REGS)) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
soft_switches &= ~SOFTSW_ALTCHAR;
|
|
}
|
|
break;
|
|
case 0x0f:
|
|
if((internal_flags & (IFLAGS_IIGS_REGS | IFLAGS_IIE_REGS)) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
soft_switches |= SOFTSW_ALTCHAR;
|
|
}
|
|
break;
|
|
case 0x21:
|
|
if((internal_flags & (IFLAGS_IIGS_REGS | IFLAGS_IIE_REGS)) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
if(value & 0x80) {
|
|
soft_switches |= SOFTSW_MONOCHROME;
|
|
} else {
|
|
soft_switches &= ~SOFTSW_MONOCHROME;
|
|
}
|
|
}
|
|
break;
|
|
case 0x22:
|
|
if((internal_flags & IFLAGS_IIGS_REGS) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
terminal_tbcolor = value & 0xff;
|
|
}
|
|
break;
|
|
case 0x29:
|
|
if((internal_flags & IFLAGS_IIGS_REGS) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
soft_switches = (soft_switches & ~(SOFTSW_NEWVID_MASK << SOFTSW_NEWVID_SHIFT)) | ((value & SOFTSW_NEWVID_MASK) << SOFTSW_NEWVID_SHIFT);
|
|
}
|
|
break;
|
|
case 0x34:
|
|
if((internal_flags & IFLAGS_IIGS_REGS) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
terminal_border = value & 0x0f;
|
|
}
|
|
break;
|
|
case 0x35:
|
|
if((internal_flags & IFLAGS_IIGS_REGS) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
soft_switches = (soft_switches & ~(SOFTSW_SHADOW_MASK << SOFTSW_SHADOW_SHIFT)) | ((value & SOFTSW_SHADOW_MASK) << SOFTSW_SHADOW_SHIFT);
|
|
}
|
|
break;
|
|
case 0x50:
|
|
soft_switches &= ~SOFTSW_TEXT_MODE;
|
|
break;
|
|
case 0x51:
|
|
soft_switches |= SOFTSW_TEXT_MODE;
|
|
break;
|
|
case 0x52:
|
|
soft_switches &= ~SOFTSW_MIX_MODE;
|
|
break;
|
|
case 0x53:
|
|
soft_switches |= SOFTSW_MIX_MODE;
|
|
break;
|
|
case 0x54:
|
|
soft_switches &= ~SOFTSW_PAGE_2;
|
|
break;
|
|
case 0x55:
|
|
soft_switches |= SOFTSW_PAGE_2;
|
|
break;
|
|
case 0x56:
|
|
soft_switches &= ~SOFTSW_HIRES_MODE;
|
|
break;
|
|
case 0x57:
|
|
soft_switches |= SOFTSW_HIRES_MODE;
|
|
break;
|
|
case 0x5e:
|
|
if(internal_flags & (IFLAGS_IIGS_REGS | IFLAGS_IIE_REGS)) {
|
|
soft_switches |= SOFTSW_DGR;
|
|
}
|
|
break;
|
|
case 0x5f:
|
|
if(internal_flags & (IFLAGS_IIGS_REGS | IFLAGS_IIE_REGS)) {
|
|
soft_switches &= ~SOFTSW_DGR;
|
|
}
|
|
break;
|
|
case 0x7e:
|
|
if((internal_flags & IFLAGS_IIE_REGS) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
soft_switches |= SOFTSW_IOUDIS;
|
|
}
|
|
break;
|
|
case 0x7f:
|
|
if((internal_flags & IFLAGS_IIE_REGS) && ((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0)) {
|
|
soft_switches &= ~SOFTSW_IOUDIS;
|
|
}
|
|
break;
|
|
}
|
|
return;
|
|
}
|
|
|
|
// Shadow parts of the Apple's memory by observing the bus write cycles
|
|
if((value & (1u << CONFIG_PIN_APPLEBUS_RW-CONFIG_PIN_APPLEBUS_DATA_BASE)) == 0) {
|
|
// Mirror Video Memory from MAIN & AUX banks
|
|
if(soft_switches & SOFTSW_LINEARIZE) {
|
|
if((address >= 0x2000) && (address < 0xC000)) {
|
|
private_memory[address] = value & 0xff;
|
|
return;
|
|
}
|
|
}
|
|
|
|
if(soft_switches & SOFTSW_80STORE) {
|
|
if(soft_switches & SOFTSW_PAGE_2) {
|
|
if((address >= 0x400) && (address < 0x800)) {
|
|
private_memory[address] = value & 0xff;
|
|
return;
|
|
} else if((soft_switches & SOFTSW_HIRES_MODE) && (address >= 0x2000) && (address < 0x4000)) {
|
|
private_memory[address] = value & 0xff;
|
|
return;
|
|
}
|
|
}
|
|
} else if(soft_switches & SOFTSW_AUX_WRITE) {
|
|
if((address >= 0x200) && (address < 0xC000)) {
|
|
private_memory[address] = value & 0xff;
|
|
return;
|
|
}
|
|
}
|
|
|
|
if((address >= 0x200) && (address < 0xC000)) {
|
|
apple_memory[address] = value & 0xff;
|
|
return;
|
|
}
|
|
|
|
if(CARD_SELECT && CARD_DEVSEL) {
|
|
cardslot = (address >> 4) & 0x7;
|
|
switch(address & 0x0F) {
|
|
case 0x01:
|
|
if(value & 0x80) {
|
|
soft_switches |= SOFTSW_MONOCHROME;
|
|
} else {
|
|
soft_switches &= ~SOFTSW_MONOCHROME;
|
|
}
|
|
mono_palette = (value >> 4) & 0x7;
|
|
apple_memory[address] = value;
|
|
break;
|
|
case 0x02:
|
|
terminal_tbcolor = value & 0xff;
|
|
apple_memory[address] = terminal_tbcolor;
|
|
break;
|
|
case 0x03:
|
|
terminal_border = value & 0x0f;
|
|
apple_memory[address] = terminal_border;
|
|
break;
|
|
case 0x08:
|
|
terminal_row = (value < 24) ? value : 23;
|
|
apple_memory[address] = terminal_row;
|
|
apple_memory[address+2] = terminal_memory[terminal_row*80+terminal_col];
|
|
break;
|
|
case 0x09:
|
|
terminal_col = (value < 80) ? value : 79;
|
|
apple_memory[address] = terminal_col;
|
|
apple_memory[address+1] = terminal_memory[terminal_row*80+terminal_col];
|
|
break;
|
|
case 0x0A:
|
|
terminal_memory[terminal_row*80+terminal_col] = value;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|