mirror of
https://github.com/AppleWin/AppleWin.git
synced 2024-12-25 14:31:01 +00:00
Custom No Slot and Thunderclock WIP
This commit is contained in:
mpohoreski
parent
00bfa5b2ab
commit
1482abe1b4
119
source/Peripheral_Clock_Generic.cpp
Normal file
119
source/Peripheral_Clock_Generic.cpp
Normal file
@ -0,0 +1,119 @@
|
||||
/*
|
||||
AppleWin : An Apple //e emulator for Windows
|
||||
|
||||
Copyright (C) 2008, Michael Pohoreski
|
||||
|
||||
AppleWin is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
AppleWin is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with AppleWin; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
*/
|
||||
|
||||
/* Description: Generic No-Slot Clock
|
||||
*
|
||||
* Author: Michael Pohoreski
|
||||
*/
|
||||
|
||||
#include "StdAfx.h"
|
||||
#pragma hdrstop
|
||||
#include "..\resource\resource.h"
|
||||
// #include "resource.h" // BUG -- wrong resource!!!
|
||||
#include <time.h>
|
||||
|
||||
/*
|
||||
|
||||
Old:
|
||||
|
||||
File: PRODOS
|
||||
BLOAD PRODOS,TSYS,A$2000
|
||||
CALL-151
|
||||
2F76:60 5F 5E 5D 5C 5C 60
|
||||
File offset $0F76-$0F7C:
|
||||
|
||||
|
||||
ProDOS has a built-in clock driver that queries a clock/calendar card for the date and time. After the routine stores that information in the ProDOS Global Page ($BF90-$BF93), either ProDOS or your own application programs can use it. See Figure 6-1.
|
||||
|
||||
Figure 6-1. ProDOS Date and Time Locations
|
||||
|
||||
49041 ($BF91) 49040 ($BF90)
|
||||
|
||||
7 6 5 4 3 2 1 0 7 6 5 4 3 2 1 0
|
||||
+-+-+-+-+-+-+-+-+ +-+-+-+-+-+-+-+-+
|
||||
DATE: | year | month | day |
|
||||
+-+-+-+-+-+-+-+-+ +-+-+-+-+-+-+-+-+
|
||||
|
||||
7 6 5 4 3 2 1 0 7 6 5 4 3 2 1 0
|
||||
+-+-+-+-+-+-+-+-+ +-+-+-+-+-+-+-+-+
|
||||
TIME: | hour | | minute |
|
||||
+-+-+-+-+-+-+-+-+ +-+-+-+-+-+-+-+-+
|
||||
|
||||
49043 ($BF93) 49042 ($BF92)
|
||||
|
||||
|
||||
ProDOS recognizes a clock card if the following bytes are present in
|
||||
the Cn00 ROM:
|
||||
|
||||
$Cn00 = $08
|
||||
$Cn02 = $28
|
||||
$Cn04 = $58
|
||||
$Cn06 = $70
|
||||
|
||||
The address is preceded by a $4C (JMP) if a clock card is recognized,
|
||||
or by a $60 (RTS) if not.
|
||||
|
||||
The ProDOS clock driver uses the following addresses for its I/O to the
|
||||
clock:
|
||||
|
||||
Cn08 - READ entry point
|
||||
Cn0B - WRITE entry point
|
||||
|
||||
The accumulator is loaded with an #A3 before the JSR to the WRITE
|
||||
*/
|
||||
|
||||
tm* Clock_Util_GetTime()
|
||||
{
|
||||
time_t tRawTime;
|
||||
time( &tRawTime );
|
||||
|
||||
tm* pTime = localtime ( &tRawTime );
|
||||
if( pTime ) {
|
||||
mktime( pTime ); // get day of week: tm_wday
|
||||
}
|
||||
return pTime;
|
||||
}
|
||||
|
||||
void Clock_Util_ConvertTimeToProdos( tm *pTime, unsigned char *pProDosBytes4_ )
|
||||
{
|
||||
if( pTime )
|
||||
{
|
||||
BYTE nMonth = pTime->tm_mon + 1;
|
||||
|
||||
BYTE nDate1 = 0
|
||||
| ((pTime->tm_mday & 0x1F) << 0)
|
||||
| ((nMonth & 0x0F) << 5);
|
||||
BYTE nDate2 = 0
|
||||
| ((pTime->tm_year % 100) << 1)
|
||||
| (nMonth >> 3) & 1;
|
||||
BYTE nTime1 = (pTime->tm_min & 0x3F); // 60 = max(64) 0x3F
|
||||
BYTE nTime2 = (pTime->tm_hour & 0x1F); // 24 = max(32) 0x1F
|
||||
pProDosBytes4_[0] = nDate1;
|
||||
pProDosBytes4_[1] = nDate2;
|
||||
pProDosBytes4_[2] = nTime1;
|
||||
pProDosBytes4_[3] = nTime2;
|
||||
}
|
||||
}
|
||||
|
||||
void Clock_Generic_UpdateProDos()
|
||||
{
|
||||
tm* pTime = Clock_Util_GetTime();
|
||||
Clock_Util_ConvertTimeToProdos( pTime, &mem[ 0xBF90 ] ); // ProDos date/time buffer
|
||||
}
|
||||
5
source/Peripheral_Clock_Generic.h
Normal file
5
source/Peripheral_Clock_Generic.h
Normal file
@ -0,0 +1,5 @@
|
||||
// Util
|
||||
tm* Clock_Util_GetTime();
|
||||
void Clock_Util_ConvertTimeToProdos( tm *pTime, unsigned char *pProdosBytes4_ );
|
||||
|
||||
void Clock_Generic_UpdateProDos();
|
||||
240
source/Peripheral_Clock_ThunderClockPlus.cpp
Normal file
240
source/Peripheral_Clock_ThunderClockPlus.cpp
Normal file
@ -0,0 +1,240 @@
|
||||
/*
|
||||
AppleWin : An Apple //e emulator for Windows
|
||||
|
||||
Copyright (C) 2008, Michael Pohoreski
|
||||
|
||||
AppleWin is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
AppleWin is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with AppleWin; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
*/
|
||||
|
||||
/* Description: Thunderware ThunderClock+
|
||||
*
|
||||
* Author: Michael Pohoreski
|
||||
*/
|
||||
|
||||
#include "StdAfx.h"
|
||||
#pragma hdrstop
|
||||
#include "..\resource\resource.h"
|
||||
// #include "resource.h" // BUG -- wrong resource!!!
|
||||
#include <time.h>
|
||||
|
||||
void LoadRom_Clock_ThunderClockPlus(LPBYTE pCxRomPeripheral, UINT uSlot);
|
||||
|
||||
/*
|
||||
|
||||
static BYTE __stdcall Clock_Generic_Read_C0(WORD PC, WORD nAddr, BYTE bWrite, BYTE nValue, ULONG nCyclesLeft);
|
||||
static BYTE __stdcall Clock_Generic_Write_C0(WORD PC, WORD nAddr, BYTE bWrite, BYTE nValue, ULONG nCyclesLeft);
|
||||
static BYTE __stdcall Clock_Generic_Read_CX(WORD PC, WORD nAddr, BYTE bWrite, BYTE nValue, ULONG nCyclesLeft);
|
||||
static BYTE __stdcall Clock_Generic_Write_CX(WORD PC, WORD nAddr, BYTE bWrite, BYTE nValue, ULONG nCyclesLeft);
|
||||
|
||||
UINT g_uClockInSlot4 = CT_GenericClock;
|
||||
BYTE *g_pGenericClockFirmware = NULL;
|
||||
|
||||
enum ClockCommandEnum
|
||||
{
|
||||
CC_READ = 0x18
|
||||
};
|
||||
|
||||
enum ClockLatchEnum
|
||||
{
|
||||
CL_SEC_0X,
|
||||
CL_SEC_X0,
|
||||
CL_MINS_0X,
|
||||
CL_MINS_X0,
|
||||
CL_HOURS_0X,
|
||||
CL_HOURS_X0,
|
||||
CL_DAY_0X,
|
||||
CL_DAY_X0,
|
||||
CL_DOW_0X,
|
||||
CL_DOW_X0,
|
||||
CL_MONTH
|
||||
};
|
||||
|
||||
int iClockCommand = 0;
|
||||
int iClockLatch = 0;
|
||||
int iClockStrobe = 0;
|
||||
int iClockBit = 0;
|
||||
|
||||
BYTE iClockOutByte = 0;
|
||||
|
||||
static BYTE __stdcall Clock_Generic_Read_C0(WORD PC, WORD nAddr, BYTE bWrite, BYTE nValue, ULONG nCyclesLeft)
|
||||
{
|
||||
BYTE nOutput = 0;
|
||||
{
|
||||
|
||||
// BCD
|
||||
static int y = 0x2013;
|
||||
static int d = 4; // min
|
||||
static int n = 5;
|
||||
static int w = 6;
|
||||
static int h = 7;
|
||||
static int m = 8;
|
||||
static int s = 9;
|
||||
// int nDOW = pLocalTime->tm_wday + 1;
|
||||
|
||||
switch( iClockLatch )
|
||||
{
|
||||
case CL_MONTH:
|
||||
// nOutput = (pLocalTime->tm_mon << (7 + iClockBit)) & 0x80;
|
||||
nOutput = ((n >> 0) & 0xF) << (7 + iClockBit);
|
||||
break;
|
||||
case CL_DOW_X0:
|
||||
nOutput = ((w >> 4) & 0xF) << (7 + iClockBit);
|
||||
break;
|
||||
case CL_DOW_0X:
|
||||
nOutput = ((w >> 0) & 0xF) << (7 + iClockBit);
|
||||
break;
|
||||
case CL_DAY_X0:
|
||||
nOutput = ((d >> 4) & 0xF) << (7 + iClockBit);
|
||||
break;
|
||||
case CL_DAY_0X:
|
||||
nOutput = ((d >> 0) & 0xF) << (7 + iClockBit);
|
||||
break;
|
||||
case CL_HOURS_X0:
|
||||
nOutput = ((h >> 4) & 0xF) << (7 + iClockBit);
|
||||
break;
|
||||
case CL_HOURS_0X:
|
||||
nOutput = ((h >> 0) & 0xF) << (7 + iClockBit);
|
||||
break;
|
||||
case CL_MINS_X0:
|
||||
nOutput = ((m >> 4) & 0xF) << (7 + iClockBit);
|
||||
break;
|
||||
case CL_MINS_0X:
|
||||
nOutput = ((m >> 0) & 0xF) << (7 + iClockBit);
|
||||
break;
|
||||
case CL_SEC_X0:
|
||||
nOutput = ((s >> 4) & 0xF) << (7 + iClockBit);
|
||||
break;
|
||||
case CL_SEC_0X:
|
||||
nOutput = ((s >> 0) & 0xF) << (7 + iClockBit);
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
}
|
||||
// nOutput = 0xFF;
|
||||
|
||||
}
|
||||
char sText[ 128 ];
|
||||
sprintf( sText, " Read [%d] (%d) = %02X\n", iClockLatch, iClockBit, nOutput );
|
||||
OutputDebugString( sText );
|
||||
|
||||
return nOutput;
|
||||
}
|
||||
|
||||
static BYTE __stdcall Clock_Generic_Write_C0(WORD PC, WORD nAddr, BYTE bWrite, BYTE nValue, ULONG nCyclesLeft)
|
||||
{
|
||||
int iSlot = (nAddr >> 12) - 0x8;
|
||||
|
||||
if( iSlot > 0 )
|
||||
{
|
||||
if( nValue & 0x02)
|
||||
{
|
||||
iClockBit++;
|
||||
if( iClockBit >= 4 )
|
||||
{
|
||||
iClockBit = 0;
|
||||
iClockLatch++;
|
||||
}
|
||||
}
|
||||
|
||||
switch( nAddr & 0x0F )
|
||||
{
|
||||
case 0x00: // set time format
|
||||
if( nValue == CC_READ )
|
||||
{
|
||||
iClockCommand = nValue;
|
||||
iClockLatch = 0;
|
||||
iClockBit = 0;
|
||||
}
|
||||
// 0x18 = Time Read
|
||||
// get 10 nibbles
|
||||
// 0x1C =
|
||||
// 0x18
|
||||
// 0x04
|
||||
// 0x0C
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
}
|
||||
|
||||
char sText[ 128 ];
|
||||
sprintf( sText, " Write: $%04X: %02X Clock: %s Strobe: %s\n"
|
||||
, nAddr, nValue
|
||||
, (nValue & 0x02)
|
||||
? "Raise "
|
||||
: "Drop "
|
||||
, (nValue & 0x04)
|
||||
? "On "
|
||||
: "off"
|
||||
);
|
||||
OutputDebugString( sText );
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
static BYTE __stdcall Clock_Generic_Read_CX(WORD PC, WORD nAddr, BYTE bWrite, BYTE nValue, ULONG nCyclesLeft)
|
||||
{
|
||||
return 0;
|
||||
// Chain to default...
|
||||
}
|
||||
|
||||
static BYTE __stdcall Clock_Generic_Write_CX(WORD PC, WORD nAddr, BYTE bWrite, BYTE nValue, ULONG nCyclesLeft)
|
||||
{
|
||||
return 0;
|
||||
// Chain to default...
|
||||
}
|
||||
|
||||
|
||||
void LoadRom_Clock_ThunderClockPlus(LPBYTE pCxRomPeripheral, UINT uSlot)
|
||||
{
|
||||
HRSRC hResInfo = FindResource(NULL, MAKEINTRESOURCE(IDR_THUNDERCLOCKPLUS_FW), "FIRMWARE");
|
||||
if(hResInfo == NULL)
|
||||
return;
|
||||
|
||||
DWORD dwResSize = SizeofResource(NULL, hResInfo);
|
||||
if(dwResSize != FIRMWARE_EXPANSION_SIZE)
|
||||
return;
|
||||
|
||||
HGLOBAL hResData = LoadResource(NULL, hResInfo);
|
||||
if(hResData == NULL)
|
||||
return;
|
||||
|
||||
BYTE* pData = (BYTE*) LockResource(hResData); // NB. Don't need to unlock resource
|
||||
if(pData == NULL)
|
||||
return;
|
||||
|
||||
// Slot ROM is a mirror of the 1st page of the firmware
|
||||
memcpy(pCxRomPeripheral + uSlot*256, pData, APPLE_SLOT_SIZE);
|
||||
|
||||
#if _DEBUG
|
||||
if (pCxRomPeripheral[ uSlot*256 + 0 ] != 0x08)
|
||||
MessageBox( NULL, "Bad ThunderClock ROM: 1st byte", NULL, MB_OK );
|
||||
if (pCxRomPeripheral[ uSlot*256 + 2 ] != 0x28)
|
||||
MessageBox( NULL, "Bad ThunderClock ROM: 2nd byte", NULL, MB_OK );
|
||||
#endif
|
||||
|
||||
if( !g_pGenericClockFirmware )
|
||||
{
|
||||
g_pGenericClockFirmware = new BYTE [FIRMWARE_EXPANSION_SIZE];
|
||||
|
||||
if (g_pGenericClockFirmware)
|
||||
memcpy(g_pGenericClockFirmware, pData, FIRMWARE_EXPANSION_SIZE);
|
||||
}
|
||||
|
||||
// RegisterIoHandler( uSlot, &Clock_Generic_Read_C0, &Clock_Generic_Write_C0, Clock_Generic_Read_CX, Clock_Generic_Write_CX, NULL, g_pGenericClockFirmware );
|
||||
RegisterIoHandler( uSlot, &Clock_Generic_Read_C0, &Clock_Generic_Write_C0, NULL, NULL, NULL, g_pGenericClockFirmware );
|
||||
}
|
||||
|
||||
*/
|
||||
Loading…
Reference in New Issue
Block a user