mirror of
https://github.com/dgis/emu48android
synced 2025-01-13 08:01:25 +01:00
This commit is contained in:
dgis
parent
510fa69fe0
commit
afd40ada96
39 changed files with 608 additions and 479 deletions
|
|
@ -28,9 +28,9 @@ add_library( # Sets the name of the library.
|
||||||
# src/main/cpp/debugger.c
|
# src/main/cpp/debugger.c
|
||||||
# src/main/cpp/disasm.c
|
# src/main/cpp/disasm.c
|
||||||
src/main/cpp/dismem.c
|
src/main/cpp/dismem.c
|
||||||
src/main/cpp/display.c
|
src/main/cpp/display.c -> To rewrite
|
||||||
src/main/cpp/disrpl.c
|
src/main/cpp/disrpl.c
|
||||||
# src/main/cpp/Emu48.c
|
# src/main/cpp/Emu48.c -> To rewrite
|
||||||
src/main/cpp/engine.c
|
src/main/cpp/engine.c
|
||||||
src/main/cpp/external.c
|
src/main/cpp/external.c
|
||||||
src/main/cpp/fetch.c
|
src/main/cpp/fetch.c
|
||||||
|
|
|
||||||
|
|
@ -29,4 +29,60 @@ DWORD dwWaveTime;
|
||||||
VOID SoundOut(CHIPSET* w, WORD wOut) {
|
VOID SoundOut(CHIPSET* w, WORD wOut) {
|
||||||
}
|
}
|
||||||
VOID SoundBeep(DWORD dwFrequency, DWORD dwDuration) {
|
VOID SoundBeep(DWORD dwFrequency, DWORD dwDuration) {
|
||||||
}
|
}
|
||||||
|
|
||||||
|
// Emu48.c
|
||||||
|
|
||||||
|
#define VERSION "1.59+"
|
||||||
|
|
||||||
|
//static BOOL bOwnCursor = FALSE;
|
||||||
|
//static BOOL bTitleBar = TRUE;
|
||||||
|
//
|
||||||
|
//CRITICAL_SECTION csGDILock; // critical section for hWindowDC
|
||||||
|
//CRITICAL_SECTION csLcdLock; // critical section for display update
|
||||||
|
//CRITICAL_SECTION csKeyLock; // critical section for key scan
|
||||||
|
//CRITICAL_SECTION csIOLock; // critical section for I/O access
|
||||||
|
//CRITICAL_SECTION csT1Lock; // critical section for timer1 access
|
||||||
|
//CRITICAL_SECTION csT2Lock; // critical section for timer2 access
|
||||||
|
//CRITICAL_SECTION csTxdLock; // critical section for transmit byte
|
||||||
|
//CRITICAL_SECTION csRecvLock; // critical section for receive byte
|
||||||
|
//CRITICAL_SECTION csSlowLock; // critical section for speed slow down
|
||||||
|
//CRITICAL_SECTION csDbgLock; // critical section for debugger purpose
|
||||||
|
//INT nArgc; // no. of command line arguments
|
||||||
|
//LPCTSTR *ppArgv; // command line arguments
|
||||||
|
//LARGE_INTEGER lFreq; // high performance counter frequency
|
||||||
|
//LARGE_INTEGER lAppStart; // high performance counter value at Appl. start
|
||||||
|
//DWORD idDdeInst; // DDE server id
|
||||||
|
//UINT uCF_HpObj; // DDE clipboard format
|
||||||
|
//HANDLE hThread;
|
||||||
|
//HANDLE hEventShutdn; // event handle to stop cpu thread
|
||||||
|
//
|
||||||
|
//HINSTANCE hApp = NULL;
|
||||||
|
//HWND hWnd = NULL;
|
||||||
|
//HWND hDlgDebug = NULL; // handle for debugger dialog
|
||||||
|
//HWND hDlgFind = NULL; // handle for debugger find dialog
|
||||||
|
//HWND hDlgProfile = NULL; // handle for debugger profile dialog
|
||||||
|
//HWND hDlgRplObjView = NULL; // handle for debugger rpl object viewer
|
||||||
|
//HDC hWindowDC = NULL;
|
||||||
|
//HPALETTE hPalette = NULL;
|
||||||
|
//HPALETTE hOldPalette = NULL; // old palette of hWindowDC
|
||||||
|
//DWORD dwTColor = (DWORD) -1; // transparency color
|
||||||
|
//DWORD dwTColorTol = 0; // transparency color tolerance
|
||||||
|
HRGN hRgn = NULL;
|
||||||
|
//HCURSOR hCursorArrow = NULL;
|
||||||
|
//HCURSOR hCursorHand = NULL;
|
||||||
|
//UINT uWaveDevId = WAVE_MAPPER; // default audio device
|
||||||
|
//DWORD dwWakeupDelay = 200; // ON key hold time to switch on calculator
|
||||||
|
//BOOL bAutoSave = FALSE;
|
||||||
|
//BOOL bAutoSaveOnExit = TRUE;
|
||||||
|
//BOOL bSaveDefConfirm = TRUE; // yes
|
||||||
|
//BOOL bStartupBackup = FALSE;
|
||||||
|
//BOOL bAlwaysDisplayLog = TRUE;
|
||||||
|
//BOOL bLoadObjectWarning = TRUE;
|
||||||
|
//BOOL bShowTitle = TRUE; // show main window title bar
|
||||||
|
//BOOL bShowMenu = TRUE; // show main window menu bar
|
||||||
|
//BOOL bAlwaysOnTop = FALSE; // emulator window always on top
|
||||||
|
//BOOL bActFollowsMouse = FALSE; // emulator window activation follows mouse
|
||||||
|
//BOOL bClientWinMove = FALSE; // emulator window can be moved over client area
|
||||||
|
//BOOL bSingleInstance = FALSE; // multiple emulator instances allowed
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -1,415 +1,415 @@
|
||||||
/*
|
/*
|
||||||
* apple.c
|
* apple.c
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2005 CdB for HP
|
* Copyright (C) 2005 CdB for HP
|
||||||
* Copyright (C) 2006 Christoph Gießelink
|
* Copyright (C) 2006 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
#include "Emu48.h"
|
#include "Emu48.h"
|
||||||
#include "Opcodes.h"
|
#include "Opcodes.h"
|
||||||
#include "apple.h"
|
#include "apple.h"
|
||||||
#include "io.h" // I/O register definitions
|
#include "io.h" // I/O register definitions
|
||||||
#include "i28f160.h"
|
#include "i28f160.h"
|
||||||
|
|
||||||
#define w Chipset
|
#define w Chipset
|
||||||
|
|
||||||
#define _KB(s) ((s) * 1024 * 2)
|
#define _KB(s) ((s) * 1024 * 2)
|
||||||
|
|
||||||
#pragma intrinsic(memset,memcpy)
|
#pragma intrinsic(memset,memcpy)
|
||||||
|
|
||||||
#include "Ops.h"
|
#include "Ops.h"
|
||||||
|
|
||||||
//
|
//
|
||||||
// ROM buffer access functions
|
// ROM buffer access functions
|
||||||
//
|
//
|
||||||
|
|
||||||
static __inline void WrDirtyPage(DWORD d)
|
static __inline void WrDirtyPage(DWORD d)
|
||||||
{
|
{
|
||||||
if (pbyRomDirtyPage) // using dirty ROM page table
|
if (pbyRomDirtyPage) // using dirty ROM page table
|
||||||
{
|
{
|
||||||
DWORD dwPage = d / ROMPAGESIZE; // this is the page
|
DWORD dwPage = d / ROMPAGESIZE; // this is the page
|
||||||
|
|
||||||
_ASSERT(dwPage < dwRomDirtyPageSize);
|
_ASSERT(dwPage < dwRomDirtyPageSize);
|
||||||
pbyRomDirtyPage[dwPage] = TRUE; // page is dirty
|
pbyRomDirtyPage[dwPage] = TRUE; // page is dirty
|
||||||
}
|
}
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
static __inline void EraseBlock(DWORD d,DWORD dwNibSize)
|
static __inline void EraseBlock(DWORD d,DWORD dwNibSize)
|
||||||
{
|
{
|
||||||
LPBYTE pbyAddr = pbyRom + d;
|
LPBYTE pbyAddr = pbyRom + d;
|
||||||
|
|
||||||
while (dwNibSize--)
|
while (dwNibSize--)
|
||||||
{
|
{
|
||||||
WrDirtyPage(d++); // make page dirty
|
WrDirtyPage(d++); // make page dirty
|
||||||
*pbyAddr++ = 0x0F; // clear address
|
*pbyAddr++ = 0x0F; // clear address
|
||||||
}
|
}
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
static CONST LPBYTE ppReg[] = { w.A, w.B, w.C, w.D };
|
static CONST LPBYTE ppReg[] = { w.A, w.B, w.C, w.D };
|
||||||
|
|
||||||
static QWORD DecodeReg64(LPBYTE R, BYTE byNF)
|
static QWORD DecodeReg64(LPBYTE R, BYTE byNF)
|
||||||
{
|
{
|
||||||
QWORD qwVal = Npack64(R,16); // generate 64bit number from register
|
QWORD qwVal = Npack64(R,16); // generate 64bit number from register
|
||||||
|
|
||||||
switch (byNF) // field selector
|
switch (byNF) // field selector
|
||||||
{
|
{
|
||||||
case 0: return (qwVal >> (w.P*4)) & 0xf; // P
|
case 0: return (qwVal >> (w.P*4)) & 0xf; // P
|
||||||
case 1: return qwVal & ~((QWORD)~0 << ((w.P+1)*4));// WP
|
case 1: return qwVal & ~((QWORD)~0 << ((w.P+1)*4));// WP
|
||||||
case 2: return (qwVal >> 8) & 0xf; // XS
|
case 2: return (qwVal >> 8) & 0xf; // XS
|
||||||
case 3: return qwVal & 0xfff; // X
|
case 3: return qwVal & 0xfff; // X
|
||||||
case 4: return (qwVal >> 60) & 0xf; // S
|
case 4: return (qwVal >> 60) & 0xf; // S
|
||||||
case 5: return (qwVal >> 12) & 0x0000ffffffffffff; // M
|
case 5: return (qwVal >> 12) & 0x0000ffffffffffff; // M
|
||||||
case 6: return qwVal & 0xff; // B
|
case 6: return qwVal & 0xff; // B
|
||||||
case 7: return qwVal; // W
|
case 7: return qwVal; // W
|
||||||
case 15: return qwVal & 0xfffff; // A
|
case 15: return qwVal & 0xfffff; // A
|
||||||
// default: return qwVal & w.fld[byNF-8]; // F1-F7
|
// default: return qwVal & w.fld[byNF-8]; // F1-F7
|
||||||
default: return qwVal;
|
default: return qwVal;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
static void EncodeReg64(QWORD v, LPBYTE R, BYTE byNF)
|
static void EncodeReg64(QWORD v, LPBYTE R, BYTE byNF)
|
||||||
{
|
{
|
||||||
if (byNF > 7 && byNF < 15) // user mask area F1-F7
|
if (byNF > 7 && byNF < 15) // user mask area F1-F7
|
||||||
{
|
{
|
||||||
// QWORD qwMask = w.fld[byNF-8]; // F1-F7
|
// QWORD qwMask = w.fld[byNF-8]; // F1-F7
|
||||||
// QWORD qwVal = Npack64(R,16); // original content of register
|
// QWORD qwVal = Npack64(R,16); // original content of register
|
||||||
// v = (v & qwMask) | (qwVal & ~qwMask); // mask operation
|
// v = (v & qwMask) | (qwVal & ~qwMask); // mask operation
|
||||||
byNF = 7; // write W area
|
byNF = 7; // write W area
|
||||||
}
|
}
|
||||||
|
|
||||||
Nunpack64(R+F_s[byNF], v, F_l[byNF]);
|
Nunpack64(R+F_s[byNF], v, F_l[byNF]);
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
static QWORD o80BReg164(LPBYTE I)
|
static QWORD o80BReg164(LPBYTE I)
|
||||||
{
|
{
|
||||||
_ASSERT((I[5] & 3) < ARRAYSIZEOF(ppReg));
|
_ASSERT((I[5] & 3) < ARRAYSIZEOF(ppReg));
|
||||||
return DecodeReg64(ppReg[I[5] & 3], I[6]);
|
return DecodeReg64(ppReg[I[5] & 3], I[6]);
|
||||||
}
|
}
|
||||||
|
|
||||||
static QWORD o80BReg264(LPBYTE I)
|
static QWORD o80BReg264(LPBYTE I)
|
||||||
{
|
{
|
||||||
_ASSERT((I[5] >> 2) < ARRAYSIZEOF(ppReg));
|
_ASSERT((I[5] >> 2) < ARRAYSIZEOF(ppReg));
|
||||||
return DecodeReg64(ppReg[I[5] >> 2], I[6]);
|
return DecodeReg64(ppReg[I[5] >> 2], I[6]);
|
||||||
}
|
}
|
||||||
|
|
||||||
static void o80BRegWrite(QWORD v, LPBYTE I)
|
static void o80BRegWrite(QWORD v, LPBYTE I)
|
||||||
{
|
{
|
||||||
_ASSERT((I[5] & 3) < ARRAYSIZEOF(ppReg));
|
_ASSERT((I[5] & 3) < ARRAYSIZEOF(ppReg));
|
||||||
EncodeReg64(v, ppReg[I[5] & 3], I[6]);
|
EncodeReg64(v, ppReg[I[5] & 3], I[6]);
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
// SETFLDx
|
// SETFLDx
|
||||||
VOID o80BF7x(LPBYTE I)
|
VOID o80BF7x(LPBYTE I)
|
||||||
{
|
{
|
||||||
QWORD qwVal;
|
QWORD qwVal;
|
||||||
|
|
||||||
_ASSERT(FALSE); // not tested so far
|
_ASSERT(FALSE); // not tested so far
|
||||||
w.pc+=1; // skip x nibble
|
w.pc+=1; // skip x nibble
|
||||||
qwVal = Npack64(w.C,16); // generate 64bit number from C register
|
qwVal = Npack64(w.C,16); // generate 64bit number from C register
|
||||||
w.carry = (qwVal == 0) // set carry if field mask = 0
|
w.carry = (qwVal == 0) // set carry if field mask = 0
|
||||||
|| (I[5] < 8) || (I[5] > 14); // or x argument not in range 8..15
|
|| (I[5] < 8) || (I[5] > 14); // or x argument not in range 8..15
|
||||||
|
|
||||||
if (!w.carry) // field mask and argument are valid
|
if (!w.carry) // field mask and argument are valid
|
||||||
{
|
{
|
||||||
_ASSERT(I[5] >= 8 && I[5] <= 14);
|
_ASSERT(I[5] >= 8 && I[5] <= 14);
|
||||||
// w.fld[I[5]-8] = qwVal;
|
// w.fld[I[5]-8] = qwVal;
|
||||||
}
|
}
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
// RPL2 (normal LOOP with preserving Carry)
|
// RPL2 (normal LOOP with preserving Carry)
|
||||||
VOID o80B00(VOID)
|
VOID o80B00(VOID)
|
||||||
{
|
{
|
||||||
BYTE p[5];
|
BYTE p[5];
|
||||||
|
|
||||||
Nread(w.A, w.d0, 5); // A=DAT0 A
|
Nread(w.A, w.d0, 5); // A=DAT0 A
|
||||||
w.d0 = (w.d0 + 5) & 0xFFFFF; // D0=D0+ 5
|
w.d0 = (w.d0 + 5) & 0xFFFFF; // D0=D0+ 5
|
||||||
Nread(p, Npack(w.A,5), 5); // PC=(A)
|
Nread(p, Npack(w.A,5), 5); // PC=(A)
|
||||||
w.pc = Npack(p,5);
|
w.pc = Npack(p,5);
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
// FALSE +5
|
// FALSE +5
|
||||||
VOID o80B30(VOID)
|
VOID o80B30(VOID)
|
||||||
{
|
{
|
||||||
Ndec(w.D, 5, 0); // D=D-1 A
|
Ndec(w.D, 5, 0); // D=D-1 A
|
||||||
if (w.carry) w.pc = 0x03A9B; // memerr?
|
if (w.carry) w.pc = 0x03A9B; // memerr?
|
||||||
w.d1 -= 5; // D1=D1- 5 (don't care about carry here)
|
w.d1 -= 5; // D1=D1- 5 (don't care about carry here)
|
||||||
Nwrite(w.A, w.d1, 5); // DAT1=A A
|
Nwrite(w.A, w.d1, 5); // DAT1=A A
|
||||||
o80B00(); // LOOP
|
o80B00(); // LOOP
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
// DOFALSE
|
// DOFALSE
|
||||||
VOID o80B40(VOID)
|
VOID o80B40(VOID)
|
||||||
{
|
{
|
||||||
w.P = 0; // P= 0
|
w.P = 0; // P= 0
|
||||||
PCHANGED;
|
PCHANGED;
|
||||||
Nunpack(w.C,0x03AC0,5); // LC(5) =FALSE
|
Nunpack(w.C,0x03AC0,5); // LC(5) =FALSE
|
||||||
memcpy(w.A, w.C, 5); // A=C A
|
memcpy(w.A, w.C, 5); // A=C A
|
||||||
o80B30(); // PC=(A) (call FALSE)
|
o80B30(); // PC=(A) (call FALSE)
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
// MOVEDOWN
|
// MOVEDOWN
|
||||||
VOID o80B60(VOID)
|
VOID o80B60(VOID)
|
||||||
{
|
{
|
||||||
BYTE byData[16];
|
BYTE byData[16];
|
||||||
DWORD dwC,s;
|
DWORD dwC,s;
|
||||||
|
|
||||||
for (dwC = Npack(w.C,5); dwC > 0; dwC -= s)
|
for (dwC = Npack(w.C,5); dwC > 0; dwC -= s)
|
||||||
{
|
{
|
||||||
s = ARRAYSIZEOF(byData); // max size for data
|
s = ARRAYSIZEOF(byData); // max size for data
|
||||||
if (dwC < s) s = dwC;
|
if (dwC < s) s = dwC;
|
||||||
|
|
||||||
Npeek(byData,w.d0,s); // read source without CRC update
|
Npeek(byData,w.d0,s); // read source without CRC update
|
||||||
Nwrite(byData,w.d1,s); // write destination
|
Nwrite(byData,w.d1,s); // write destination
|
||||||
|
|
||||||
w.d0 = (w.d0 + s) & 0xFFFFF;
|
w.d0 = (w.d0 + s) & 0xFFFFF;
|
||||||
w.d1 = (w.d1 + s) & 0xFFFFF;
|
w.d1 = (w.d1 + s) & 0xFFFFF;
|
||||||
}
|
}
|
||||||
|
|
||||||
w.P = 0;
|
w.P = 0;
|
||||||
PCHANGED;
|
PCHANGED;
|
||||||
w.carry = FALSE;
|
w.carry = FALSE;
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
// MOVEUP
|
// MOVEUP
|
||||||
VOID o80B70(VOID)
|
VOID o80B70(VOID)
|
||||||
{
|
{
|
||||||
BYTE byData[16];
|
BYTE byData[16];
|
||||||
DWORD dwC,s;
|
DWORD dwC,s;
|
||||||
|
|
||||||
for (dwC = Npack(w.C,5); dwC > 0; dwC -= s)
|
for (dwC = Npack(w.C,5); dwC > 0; dwC -= s)
|
||||||
{
|
{
|
||||||
s = ARRAYSIZEOF(byData); // max size for data
|
s = ARRAYSIZEOF(byData); // max size for data
|
||||||
if (dwC < s) s = dwC;
|
if (dwC < s) s = dwC;
|
||||||
|
|
||||||
w.d0 = (w.d0 - s) & 0xFFFFF;
|
w.d0 = (w.d0 - s) & 0xFFFFF;
|
||||||
w.d1 = (w.d1 - s) & 0xFFFFF;
|
w.d1 = (w.d1 - s) & 0xFFFFF;
|
||||||
|
|
||||||
Npeek(byData,w.d0,s); // read source without CRC update
|
Npeek(byData,w.d0,s); // read source without CRC update
|
||||||
Nwrite(byData,w.d1,s); // write destination
|
Nwrite(byData,w.d1,s); // write destination
|
||||||
}
|
}
|
||||||
|
|
||||||
w.P = 0;
|
w.P = 0;
|
||||||
PCHANGED;
|
PCHANGED;
|
||||||
w.carry = FALSE;
|
w.carry = FALSE;
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
// CREATETEMP
|
// CREATETEMP
|
||||||
VOID o80B80(VOID)
|
VOID o80B80(VOID)
|
||||||
{
|
{
|
||||||
DWORD dwC,dwAddress;
|
DWORD dwC,dwAddress;
|
||||||
|
|
||||||
dwC = Npack(w.C,5); // desired size of hole
|
dwC = Npack(w.C,5); // desired size of hole
|
||||||
dwAddress = RPL_CreateTemp(dwC,FALSE); // allocate memory
|
dwAddress = RPL_CreateTemp(dwC,FALSE); // allocate memory
|
||||||
if (dwAddress)
|
if (dwAddress)
|
||||||
{
|
{
|
||||||
w.d0 = dwAddress; // object position
|
w.d0 = dwAddress; // object position
|
||||||
w.d1 = (w.d0 + dwC) & 0xFFFFF; // link field of hole
|
w.d1 = (w.d0 + dwC) & 0xFFFFF; // link field of hole
|
||||||
w.carry = FALSE; // no error
|
w.carry = FALSE; // no error
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
w.carry = TRUE; // error
|
w.carry = TRUE; // error
|
||||||
}
|
}
|
||||||
|
|
||||||
dwC += 6; // desired size + link field
|
dwC += 6; // desired size + link field
|
||||||
Nunpack(w.B,dwC,5); // B[A] = size + 6
|
Nunpack(w.B,dwC,5); // B[A] = size + 6
|
||||||
Nunpack(w.C,dwC,5); // C[A] = size + 6
|
Nunpack(w.C,dwC,5); // C[A] = size + 6
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
// setup basic memory configuration
|
// setup basic memory configuration
|
||||||
VOID o80B04(VOID)
|
VOID o80B04(VOID)
|
||||||
{
|
{
|
||||||
DWORD a;
|
DWORD a;
|
||||||
|
|
||||||
a = Npack(w.C,5); // save C[A]
|
a = Npack(w.C,5); // save C[A]
|
||||||
Reset(); // unconfig all devices
|
Reset(); // unconfig all devices
|
||||||
Nunpack(w.C,0x100,5); // IO: 0x00100
|
Nunpack(w.C,0x100,5); // IO: 0x00100
|
||||||
Config(); // addr
|
Config(); // addr
|
||||||
Nunpack(w.C,0x80000,5); // RAM: 0x80000 size 256KB
|
Nunpack(w.C,0x80000,5); // RAM: 0x80000 size 256KB
|
||||||
Config(); // size
|
Config(); // size
|
||||||
Config(); // addr
|
Config(); // addr
|
||||||
Nunpack(w.C,a,5); // restore C[A]
|
Nunpack(w.C,a,5); // restore C[A]
|
||||||
w.P = 0;
|
w.P = 0;
|
||||||
PCHANGED;
|
PCHANGED;
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
// erase flash bank
|
// erase flash bank
|
||||||
VOID o80B14(VOID)
|
VOID o80B14(VOID)
|
||||||
{
|
{
|
||||||
DWORD dwStart,dwStop;
|
DWORD dwStart,dwStop;
|
||||||
|
|
||||||
BYTE byBank = w.C[15]; // C[S] = bank to erase
|
BYTE byBank = w.C[15]; // C[S] = bank to erase
|
||||||
|
|
||||||
_ASSERT(FALSE); // not tested so far
|
_ASSERT(FALSE); // not tested so far
|
||||||
// ROM is logically organized in 16 banks with 128KB
|
// ROM is logically organized in 16 banks with 128KB
|
||||||
dwStart = byBank * _KB(128); // start address
|
dwStart = byBank * _KB(128); // start address
|
||||||
dwStop = dwStart + _KB(128); // last address
|
dwStop = dwStart + _KB(128); // last address
|
||||||
if (byBank == 0) dwStart += _KB(64); // skip boot loader
|
if (byBank == 0) dwStart += _KB(64); // skip boot loader
|
||||||
|
|
||||||
// clear bank
|
// clear bank
|
||||||
EraseBlock(dwStart,dwStop-dwStart);
|
EraseBlock(dwStart,dwStop-dwStart);
|
||||||
|
|
||||||
w.carry = FALSE; // no error
|
w.carry = FALSE; // no error
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
// write bytes to flash
|
// write bytes to flash
|
||||||
VOID o80B24(VOID)
|
VOID o80B24(VOID)
|
||||||
{
|
{
|
||||||
LPBYTE pbyBuffer;
|
LPBYTE pbyBuffer;
|
||||||
DWORD dwNib,dwAddr,dwSize;
|
DWORD dwNib,dwAddr,dwSize;
|
||||||
|
|
||||||
dwNib = Npack(w.C,5) * 2; // no. of nibbles to copy
|
dwNib = Npack(w.C,5) * 2; // no. of nibbles to copy
|
||||||
dwAddr = FlashROMAddr(w.d1); // linear addr in flash chip
|
dwAddr = FlashROMAddr(w.d1); // linear addr in flash chip
|
||||||
|
|
||||||
dwSize = dwRomSize - dwAddr; // remaining memory size in flash
|
dwSize = dwRomSize - dwAddr; // remaining memory size in flash
|
||||||
if (dwNib > dwSize) dwNib = dwSize; // prevent buffer overflow
|
if (dwNib > dwSize) dwNib = dwSize; // prevent buffer overflow
|
||||||
|
|
||||||
pbyBuffer = (LPBYTE) malloc(dwNib); // allocate data buffer
|
pbyBuffer = (LPBYTE) malloc(dwNib); // allocate data buffer
|
||||||
if (pbyBuffer != NULL)
|
if (pbyBuffer != NULL)
|
||||||
{
|
{
|
||||||
DWORD i;
|
DWORD i;
|
||||||
|
|
||||||
Npeek(pbyBuffer,w.d0,dwNib); // get data
|
Npeek(pbyBuffer,w.d0,dwNib); // get data
|
||||||
|
|
||||||
for (i = 0; i < dwNib; ++i)
|
for (i = 0; i < dwNib; ++i)
|
||||||
{
|
{
|
||||||
WrDirtyPage(dwAddr); // make page dirty
|
WrDirtyPage(dwAddr); // make page dirty
|
||||||
pbyRom[dwAddr++] = pbyBuffer[i]; // write data
|
pbyRom[dwAddr++] = pbyBuffer[i]; // write data
|
||||||
}
|
}
|
||||||
free(pbyBuffer);
|
free(pbyBuffer);
|
||||||
}
|
}
|
||||||
|
|
||||||
w.d0 += dwNib; // update source register
|
w.d0 += dwNib; // update source register
|
||||||
w.d1 += dwNib; // update destination register
|
w.d1 += dwNib; // update destination register
|
||||||
w.carry = FALSE; // no error
|
w.carry = FALSE; // no error
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
// OUTBYT
|
// OUTBYT
|
||||||
VOID o80B65(VOID)
|
VOID o80B65(VOID)
|
||||||
{
|
{
|
||||||
// set Transmitting annunciator
|
// set Transmitting annunciator
|
||||||
BYTE byAnn = w.IORam[ANNCTRL+1] | 0x2;
|
BYTE byAnn = w.IORam[ANNCTRL+1] | 0x2;
|
||||||
WriteIO(&byAnn,ANNCTRL+1,1);
|
WriteIO(&byAnn,ANNCTRL+1,1);
|
||||||
|
|
||||||
SendByteUdp((BYTE) Npack(w.A,2)); // send data byte
|
SendByteUdp((BYTE) Npack(w.A,2)); // send data byte
|
||||||
|
|
||||||
w.P = 0;
|
w.P = 0;
|
||||||
PCHANGED;
|
PCHANGED;
|
||||||
w.carry = FALSE; // no error
|
w.carry = FALSE; // no error
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
// CdB for HP: add apples BUSCC commands
|
// CdB for HP: add apples BUSCC commands
|
||||||
VOID o80BExt(LPBYTE I) // Saturnator extentions
|
VOID o80BExt(LPBYTE I) // Saturnator extentions
|
||||||
{
|
{
|
||||||
DWORD a;
|
DWORD a;
|
||||||
|
|
||||||
w.pc+=2;
|
w.pc+=2;
|
||||||
switch (I[3]+(I[4]<<4))
|
switch (I[3]+(I[4]<<4))
|
||||||
{
|
{
|
||||||
case 0x00: o80B00(); break; // RPL2 (preserve Carry)
|
case 0x00: o80B00(); break; // RPL2 (preserve Carry)
|
||||||
case 0x03: o80B30(); break; // FALSE
|
case 0x03: o80B30(); break; // FALSE
|
||||||
case 0x04: o80B40(); break; // DOFALSE
|
case 0x04: o80B40(); break; // DOFALSE
|
||||||
case 0x05: External(&w); PCHANGED; break; // BEEP2 implemented using Emu48's beep
|
case 0x05: External(&w); PCHANGED; break; // BEEP2 implemented using Emu48's beep
|
||||||
case 0x06: o80B60(); break; // MOVEDOWN
|
case 0x06: o80B60(); break; // MOVEDOWN
|
||||||
case 0x07: o80B70(); break; // MOVEUP
|
case 0x07: o80B70(); break; // MOVEUP
|
||||||
case 0x08: o80B80(); break; // CREATETEMP
|
case 0x08: o80B80(); break; // CREATETEMP
|
||||||
case 0x09: RCKBp(&w); PCHANGED; break; // RCKBp
|
case 0x09: RCKBp(&w); PCHANGED; break; // RCKBp
|
||||||
case 0x0A: break; // KEYDN not implemented
|
case 0x0A: break; // KEYDN not implemented
|
||||||
case 0x0B: break; // no doslow implemented
|
case 0x0B: break; // no doslow implemented
|
||||||
case 0x10: // simulate off function
|
case 0x10: // simulate off function
|
||||||
{
|
{
|
||||||
BOOL bShutdn = TRUE; // shut down
|
BOOL bShutdn = TRUE; // shut down
|
||||||
|
|
||||||
// only shut down when no timer wake up
|
// only shut down when no timer wake up
|
||||||
if (w.IORam[TIMER1_CTRL]&WKE) // WKE bit of timer1 is set
|
if (w.IORam[TIMER1_CTRL]&WKE) // WKE bit of timer1 is set
|
||||||
{
|
{
|
||||||
if (ReadT1()&0x08) // and MSB of timer1 is set
|
if (ReadT1()&0x08) // and MSB of timer1 is set
|
||||||
{
|
{
|
||||||
w.IORam[TIMER1_CTRL] &= ~WKE; // clear WKE
|
w.IORam[TIMER1_CTRL] &= ~WKE; // clear WKE
|
||||||
bShutdn = FALSE; // don't shut down
|
bShutdn = FALSE; // don't shut down
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
if (w.IORam[TIMER2_CTRL]&WKE) // WKE bit of timer2 is set
|
if (w.IORam[TIMER2_CTRL]&WKE) // WKE bit of timer2 is set
|
||||||
{
|
{
|
||||||
if (ReadT2()&0x80000000) // and MSB of timer2 is set
|
if (ReadT2()&0x80000000) // and MSB of timer2 is set
|
||||||
{
|
{
|
||||||
w.IORam[TIMER2_CTRL] &= ~WKE; // clear WKE
|
w.IORam[TIMER2_CTRL] &= ~WKE; // clear WKE
|
||||||
bShutdn = FALSE; // don't shut down
|
bShutdn = FALSE; // don't shut down
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
if (w.in==0 && bShutdn) // shut down only when enabled
|
if (w.in==0 && bShutdn) // shut down only when enabled
|
||||||
{
|
{
|
||||||
w.Shutdn = TRUE; // set mode before exit emulation loop
|
w.Shutdn = TRUE; // set mode before exit emulation loop
|
||||||
bInterrupt = TRUE;
|
bInterrupt = TRUE;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
case 0x11: w.pc+=2; break; // do not do gettime, just skip the RTN after it to fall in the normal gettime function (only valid in untouched ROM)
|
case 0x11: w.pc+=2; break; // do not do gettime, just skip the RTN after it to fall in the normal gettime function (only valid in untouched ROM)
|
||||||
case 0x12: break; // do not do settime, fall in the normal settime function (only valid in untouched ROM)
|
case 0x12: break; // do not do settime, fall in the normal settime function (only valid in untouched ROM)
|
||||||
case 0x13: break; // RESETOS not implemented
|
case 0x13: break; // RESETOS not implemented
|
||||||
case 0x14: break; // AUTOTEST not implemented
|
case 0x14: break; // AUTOTEST not implemented
|
||||||
case 0x15: break; // NATIVE? not implemented
|
case 0x15: break; // NATIVE? not implemented
|
||||||
case 0x17: break; // SERIAL not implemented
|
case 0x17: break; // SERIAL not implemented
|
||||||
case 0x28: w.HST |= I[5]; w.pc+=1; break; // HST=1.x
|
case 0x28: w.HST |= I[5]; w.pc+=1; break; // HST=1.x
|
||||||
case 0x29: w.A[4]= w.A[3]= w.A[2]= w.A[0]= 0; if (cCurrentRomType=='Q') w.A[1]=5; else w.A[1]=4; break; // screen height = 0x50 = 80
|
case 0x29: w.A[4]= w.A[3]= w.A[2]= w.A[0]= 0; if (cCurrentRomType=='Q') w.A[1]=5; else w.A[1]=4; break; // screen height = 0x50 = 80
|
||||||
case 0x2A: w.A[4]= w.A[3]= w.A[2]= 0; w.A[1]=8; w.A[0]=3; break; // screen width = 0x83 = 131
|
case 0x2A: w.A[4]= w.A[3]= w.A[2]= 0; w.A[1]=8; w.A[0]=3; break; // screen width = 0x83 = 131
|
||||||
case 0x2B: w.carry = (cCurrentRomType == '2'); break; // it is medium apple
|
case 0x2B: w.carry = (cCurrentRomType == '2'); break; // it is medium apple
|
||||||
case 0x2C: w.carry = (cCurrentRomType == 'Q'); break; // it is big apple
|
case 0x2C: w.carry = (cCurrentRomType == 'Q'); break; // it is big apple
|
||||||
case 0x2E: w.carry = (nCurrentClass == 50); break; // it is big apple V2
|
case 0x2E: w.carry = (nCurrentClass == 50); break; // it is big apple V2
|
||||||
case 0x30: w.d0address= Npack(w.C,5)>>12; Map(0,0xff); break; //config_disp0 Ca:address 4K data
|
case 0x30: w.d0address= Npack(w.C,5)>>12; Map(0,0xff); break; //config_disp0 Ca:address 4K data
|
||||||
case 0x31: w.d0address=0; Map(0,0xff); RefreshDisp0(); break; //unconfig_disp0 does the refresh
|
case 0x31: w.d0address=0; Map(0,0xff); RefreshDisp0(); break; //unconfig_disp0 does the refresh
|
||||||
case 0x32: RefreshDisp0(); break; //refresh_disp0 force refresh
|
case 0x32: RefreshDisp0(); break; //refresh_disp0 force refresh
|
||||||
case 0x33: a= Npack(w.C,2); if (a>(DWORD)SCREENHEIGHT) a= SCREENHEIGHT; /* w.lcounter = (SCREENHEIGHT-a) */; w.d0size= a; RefreshDisp0(); break; //set_lines_disp0 nb in Cb
|
case 0x33: a= Npack(w.C,2); if (a>(DWORD)SCREENHEIGHT) a= SCREENHEIGHT; /* w.lcounter = (SCREENHEIGHT-a) */; w.d0size= a; RefreshDisp0(); break; //set_lines_disp0 nb in Cb
|
||||||
case 0x34: w.d0offset= Npack(w.C,5); w.d0offset &= 0x7FF; break; //set_offset_disp0 offset to disp in disp0
|
case 0x34: w.d0offset= Npack(w.C,5); w.d0offset &= 0x7FF; break; //set_offset_disp0 offset to disp in disp0
|
||||||
case 0x35: Nunpack(w.C,w.d0offset,5); break; // native_get_line_disp0
|
case 0x35: Nunpack(w.C,w.d0offset,5); break; // native_get_line_disp0
|
||||||
case 0x38: w.HST |= I[5]; w.pc+=3; break; // ?HST=1.x not implemented
|
case 0x38: w.HST |= I[5]; w.pc+=3; break; // ?HST=1.x not implemented
|
||||||
case 0x40: o80B04(); break; // setup basic memory configuration
|
case 0x40: o80B04(); break; // setup basic memory configuration
|
||||||
// case 0x41: o80B14(); break; // erase flash bank
|
// case 0x41: o80B14(); break; // erase flash bank
|
||||||
case 0x42: o80B24(); break; // write bytes into flash
|
case 0x42: o80B24(); break; // write bytes into flash
|
||||||
// case 0x43: ??? // format flash bank
|
// case 0x43: ??? // format flash bank
|
||||||
case 0x50: break; // REMON not implemented
|
case 0x50: break; // REMON not implemented
|
||||||
case 0x51: break; // REMOFF not implemented
|
case 0x51: break; // REMOFF not implemented
|
||||||
case 0x56: o80B65(); break; // OUTBYT
|
case 0x56: o80B65(); break; // OUTBYT
|
||||||
case 0x57: w.D[0]= w.D[1]= 0; break;
|
case 0x57: w.D[0]= w.D[1]= 0; break;
|
||||||
case 0x60: break; // ACCESSSD not implemented
|
case 0x60: break; // ACCESSSD not implemented
|
||||||
case 0x61: break; // PORTTAG? not implemented
|
case 0x61: break; // PORTTAG? not implemented
|
||||||
case 0x64: w.carry = FALSE; break; // no SD card inserted
|
case 0x64: w.carry = FALSE; break; // no SD card inserted
|
||||||
case 0x66: w.carry = FALSE; break; // simulate format fail card inserted
|
case 0x66: w.carry = FALSE; break; // simulate format fail card inserted
|
||||||
case 0x7F: w.carry = TRUE; w.pc+=1; break; // SETFLDn not implemented, set carry for failed
|
case 0x7F: w.carry = TRUE; w.pc+=1; break; // SETFLDn not implemented, set carry for failed
|
||||||
case 0x80: { QWORD b = o80BReg264(I); o80BRegWrite(b, I); w.pc+=2; break; } // r=s
|
case 0x80: { QWORD b = o80BReg264(I); o80BRegWrite(b, I); w.pc+=2; break; } // r=s
|
||||||
case 0x81: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a+b, I); w.pc+=2; break; } // r=r+s
|
case 0x81: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a+b, I); w.pc+=2; break; } // r=r+s
|
||||||
case 0x82: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a-b, I); w.pc+=2; break; } // r=r-s
|
case 0x82: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a-b, I); w.pc+=2; break; } // r=r-s
|
||||||
case 0x83: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a*b, I); w.pc+=2; break; } // r=r*s
|
case 0x83: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a*b, I); w.pc+=2; break; } // r=r*s
|
||||||
case 0x84: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a/b, I); w.pc+=2; break; } // r=r/s
|
case 0x84: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a/b, I); w.pc+=2; break; } // r=r/s
|
||||||
case 0x85: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a%b, I); w.pc+=2; break; } // r=r%s
|
case 0x85: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a%b, I); w.pc+=2; break; } // r=r%s
|
||||||
case 0x86: { QWORD b = o80BReg264(I); o80BRegWrite(~b, I); w.pc+=2; break; } // r=-r-1
|
case 0x86: { QWORD b = o80BReg264(I); o80BRegWrite(~b, I); w.pc+=2; break; } // r=-r-1
|
||||||
case 0x87: { QWORD b = o80BReg264(I); o80BRegWrite((QWORD)(-(__int64)b), I); w.pc+=2; break; } // r=-r
|
case 0x87: { QWORD b = o80BReg264(I); o80BRegWrite((QWORD)(-(__int64)b), I); w.pc+=2; break; } // r=-r
|
||||||
case 0x88: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a<<b, I); w.pc+=2; break; } // r=r<s
|
case 0x88: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a<<b, I); w.pc+=2; break; } // r=r<s
|
||||||
case 0x89: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a>>b, I); w.pc+=2; break; } // r=r>s
|
case 0x89: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a>>b, I); w.pc+=2; break; } // r=r>s
|
||||||
case 0x8A: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a^b, I); w.pc+=2; break; } // r=r^s
|
case 0x8A: { QWORD a = o80BReg164(I); QWORD b = o80BReg264(I); o80BRegWrite(a^b, I); w.pc+=2; break; } // r=r^s
|
||||||
case 0x90: break; // data streamer not implemented
|
case 0x90: break; // data streamer not implemented
|
||||||
case 0xEE: break; // ARMFLUSH not implemented
|
case 0xEE: break; // ARMFLUSH not implemented
|
||||||
case 0xEF: break; // ARMSYS not implemented
|
case 0xEF: break; // ARMSYS not implemented
|
||||||
case 0xFF: break; // ARMSAT not implemented
|
case 0xFF: break; // ARMSAT not implemented
|
||||||
default: w.pc-= 2;
|
default: w.pc-= 2;
|
||||||
}
|
}
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2006 Christoph Gießelink
|
* Copyright (C) 2006 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 1999 Christoph Gießelink
|
* Copyright (C) 1999 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2004 Christoph Gießelink
|
* Copyright (C) 2004 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 1998 Christoph Gießelink
|
* Copyright (C) 1998 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2000 Christoph Gießelink
|
* Copyright (C) 2000 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 1999 Christoph Gießelink
|
* Copyright (C) 1999 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 1999 Christoph Gießelink
|
* Copyright (C) 1999 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -4,7 +4,7 @@
|
||||||
* This file is part of Emu48, a ported version of x48
|
* This file is part of Emu48, a ported version of x48
|
||||||
*
|
*
|
||||||
* Copyright (C) 1994 Eddie C. Dost
|
* Copyright (C) 1994 Eddie C. Dost
|
||||||
* Copyright (C) 1998 Christoph Gießelink
|
* Copyright (C) 1998 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2012 Christoph Gießelink
|
* Copyright (C) 2012 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -4,7 +4,7 @@
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 1995 Sebastien Carlier
|
* Copyright (C) 1995 Sebastien Carlier
|
||||||
* Copyright (C) 2002 Christoph Gießelink
|
* Copyright (C) 2002 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2008 Christoph Gießelink
|
* Copyright (C) 2008 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2008 Christoph Gießelink
|
* Copyright (C) 2008 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2000 Christoph Gießelink
|
* Copyright (C) 2000 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2000 Christoph Gießelink
|
* Copyright (C) 2000 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -4,7 +4,7 @@
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 1995 Sebastien Carlier
|
* Copyright (C) 1995 Sebastien Carlier
|
||||||
* Copyright (C) 2005 Christoph Gießelink
|
* Copyright (C) 2005 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 1999 Christoph Gießelink
|
* Copyright (C) 1999 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2000 Christoph Gießelink
|
* Copyright (C) 2000 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2000 Christoph Gießelink
|
* Copyright (C) 2000 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 1999 Christoph Gießelink
|
* Copyright (C) 1999 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2004 Christoph Gießelink
|
* Copyright (C) 2004 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2006 Christoph Gießelink
|
* Copyright (C) 2006 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2007 Christoph Gießelink
|
* Copyright (C) 2007 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -4,7 +4,7 @@
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 1995 Sebastien Carlier
|
* Copyright (C) 1995 Sebastien Carlier
|
||||||
* Copyright (C) 1999 Christoph Gießelink
|
* Copyright (C) 1999 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 1999 Christoph Gießelink
|
* Copyright (C) 1999 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2011 Christoph Gießelink
|
* Copyright (C) 2011 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 1998 Christoph Gießelink
|
* Copyright (C) 1998 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2000 Christoph Gießelink
|
* Copyright (C) 2000 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2015 Christoph Gießelink
|
* Copyright (C) 2015 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2015 Christoph Gießelink
|
* Copyright (C) 2015 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2013 Christoph Gießelink
|
* Copyright (C) 2013 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2005 Christoph Gießelink
|
* Copyright (C) 2005 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2008 Christoph Gießelink
|
* Copyright (C) 2008 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@
|
||||||
*
|
*
|
||||||
* This file is part of Emu48
|
* This file is part of Emu48
|
||||||
*
|
*
|
||||||
* Copyright (C) 2011 Christoph Gießelink
|
* Copyright (C) 2011 Christoph Gießelink
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
|
|
|
||||||
|
|
@ -1,6 +1,6 @@
|
||||||
#include "pch.h"
|
#include "pch.h"
|
||||||
#import <mach/mach_time.h>
|
#include <mach/mach_time.h>
|
||||||
#import <fcntl.h>
|
#include <fcntl.h>
|
||||||
|
|
||||||
HANDLE hWnd;
|
HANDLE hWnd;
|
||||||
LPTSTR szTitle;
|
LPTSTR szTitle;
|
||||||
|
|
@ -414,3 +414,25 @@ BOOL GetSystemPowerStatus(LPSYSTEM_POWER_STATUS status)
|
||||||
status->ACLineStatus = AC_LINE_ONLINE;
|
status->ACLineStatus = AC_LINE_ONLINE;
|
||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
// file.c
|
||||||
|
|
||||||
|
BOOL GetWindowPlacement(HWND hWnd, WINDOWPLACEMENT *lpwndpl) { return 0; }
|
||||||
|
DWORD GetFullPathName(LPCWSTR lpFileName, DWORD nBufferLength, LPWSTR lpBuffer, LPWSTR* lpFilePart) { return 0; }
|
||||||
|
void __cdecl _wsplitpath(wchar_t const* _FullPath, wchar_t* _Drive, wchar_t* _Dir, wchar_t* _Filename, wchar_t* _Ext) {}
|
||||||
|
LPWSTR lstrcpyn(LPWSTR lpString1, LPCWSTR lpString2,int iMaxLength) {
|
||||||
|
return strcpy(lpString1, lpString2);
|
||||||
|
}
|
||||||
|
LPWSTR lstrcat(LPWSTR lpString1, LPCWSTR lpString2) {
|
||||||
|
return NULL;
|
||||||
|
}
|
||||||
|
void _wmakepath(wchar_t _Buffer, wchar_t const* _Drive, wchar_t const* _Dir, wchar_t const* _Filename, wchar_t const* _Ext)
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
BOOL GetClientRect(HWND hWnd, LPRECT lpRect)
|
||||||
|
{
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
@ -1,12 +1,13 @@
|
||||||
#import <stdint.h>
|
#include <stdint.h>
|
||||||
#import <pthread.h>
|
#include <pthread.h>
|
||||||
|
#include <wchar.h>
|
||||||
|
|
||||||
#ifndef __OBJC__
|
#ifndef __OBJC__
|
||||||
typedef signed char BOOL; // deliberately same type as defined in objc
|
typedef signed char BOOL; // deliberately same type as defined in objc
|
||||||
#endif
|
#endif
|
||||||
#define TRUE 1
|
#define TRUE 1
|
||||||
#define FALSE 0
|
#define FALSE 0
|
||||||
#define MAX_PATH MAXPATHLEN
|
#define MAX_PATH PATH_MAX
|
||||||
#define INFINITE 0
|
#define INFINITE 0
|
||||||
|
|
||||||
typedef unsigned long ulong; // ushort is already in types.h
|
typedef unsigned long ulong; // ushort is already in types.h
|
||||||
|
|
@ -47,6 +48,7 @@ typedef struct _RECT {
|
||||||
short top;
|
short top;
|
||||||
short bottom;
|
short bottom;
|
||||||
} RECT;
|
} RECT;
|
||||||
|
typedef RECT *LPRECT
|
||||||
typedef BYTE *LPCVOID;
|
typedef BYTE *LPCVOID;
|
||||||
typedef struct _RGBQUAD {
|
typedef struct _RGBQUAD {
|
||||||
BYTE rgbRed;
|
BYTE rgbRed;
|
||||||
|
|
@ -161,20 +163,8 @@ typedef struct _SYSTEM_POWER_STATUS
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <string.h>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
#import <stdio.h>
|
|
||||||
#import <string.h>
|
|
||||||
|
|
||||||
enum
|
enum
|
||||||
{
|
{
|
||||||
|
|
@ -347,3 +337,73 @@ extern void Sleep(int);
|
||||||
#define UNREFERENCED_PARAMETER(a)
|
#define UNREFERENCED_PARAMETER(a)
|
||||||
|
|
||||||
extern BOOL GetSystemPowerStatus(LPSYSTEM_POWER_STATUS l);
|
extern BOOL GetSystemPowerStatus(LPSYSTEM_POWER_STATUS l);
|
||||||
|
|
||||||
|
|
||||||
|
//RC
|
||||||
|
struct HRGN__ { int unused; };
|
||||||
|
typedef struct HRGN__ *HRGN;
|
||||||
|
|
||||||
|
#define _ASSERT(expr)
|
||||||
|
//#define _ASSERT(expr) \
|
||||||
|
// (void)( \
|
||||||
|
// (!!(expr)) || \
|
||||||
|
// (1 != _CrtDbgReportW(_CRT_ASSERT, _CRT_WIDE(__FILE__), __LINE__, NULL, L"%ls", NULL)) || \
|
||||||
|
// (_CrtDbgBreak(), 0) \
|
||||||
|
// )
|
||||||
|
|
||||||
|
|
||||||
|
// disrpl.c
|
||||||
|
//wvsprintf(cOutput,lpFormat,arglist);
|
||||||
|
|
||||||
|
//_tcschr(_T(" \t\n\r"),str->szBuffer[str->dwPos-1]) == NULL)
|
||||||
|
//_tcschr(lpszStart,_T('\n')
|
||||||
|
|
||||||
|
//lstrcmp(lpszObject,ObjDecode[i].lpszName)
|
||||||
|
//lstrcmp(lpszObject,_T("::"))
|
||||||
|
|
||||||
|
//_tcsncmp(lpszObject,_T("DIR\n"),4)
|
||||||
|
//_tcsncmp(lpszStart,_T("ENDDIR"),lpszEnd-lpszStart)
|
||||||
|
|
||||||
|
|
||||||
|
// file.c
|
||||||
|
typedef struct tagPOINT
|
||||||
|
{
|
||||||
|
LONG x;
|
||||||
|
LONG y;
|
||||||
|
} POINT, *PPOINT;
|
||||||
|
typedef struct tagWINDOWPLACEMENT {
|
||||||
|
UINT length;
|
||||||
|
UINT flags;
|
||||||
|
UINT showCmd;
|
||||||
|
POINT ptMinPosition;
|
||||||
|
POINT ptMaxPosition;
|
||||||
|
RECT rcNormalPosition;
|
||||||
|
#ifdef _MAC
|
||||||
|
RECT rcDevice;
|
||||||
|
#endif
|
||||||
|
} WINDOWPLACEMENT;
|
||||||
|
typedef WINDOWPLACEMENT *PWINDOWPLACEMENT, *LPWINDOWPLACEMENT;
|
||||||
|
|
||||||
|
extern BOOL WINAPI GetWindowPlacement(HWND hWnd, WINDOWPLACEMENT *lpwndpl);
|
||||||
|
extern BOOL WINAPI SetWindowPlacement(HWND hWnd, CONST WINDOWPLACEMENT *lpwndpl);
|
||||||
|
|
||||||
|
#define _MAX_PATH 260 // max. length of full pathname
|
||||||
|
#define _MAX_DRIVE 3 // max. length of drive component
|
||||||
|
#define _MAX_DIR 256 // max. length of path component
|
||||||
|
#define _MAX_FNAME 256 // max. length of file name component
|
||||||
|
#define _MAX_EXT 256 // max. length of extension component
|
||||||
|
|
||||||
|
typedef wchar_t WCHAR; // wc, 16-bit UNICODE character
|
||||||
|
typedef CONST WCHAR *LPCWSTR, *PCWSTR;
|
||||||
|
typedef WCHAR *NWPSTR, *LPWSTR, *PWSTR;
|
||||||
|
extern DWORD WINAPI GetFullPathName(LPCWSTR lpFileName, DWORD nBufferLength, LPWSTR lpBuffer, LPWSTR* lpFilePart);
|
||||||
|
extern void __cdecl _wsplitpath(wchar_t const* _FullPath, wchar_t* _Drive, wchar_t* _Dir, wchar_t* _Filename, wchar_t* _Ext);
|
||||||
|
#define _tsplitpath _wsplitpath
|
||||||
|
#define _tcschr wcschr
|
||||||
|
extern LPWSTR WINAPI lstrcpyn(LPWSTR lpString1, LPCWSTR lpString2,int iMaxLength);
|
||||||
|
extern LPWSTR WINAPI lstrcat(LPWSTR lpString1, LPCWSTR lpString2);
|
||||||
|
#define _tmakepath _wmakepath
|
||||||
|
extern void _wmakepath(wchar_t _Buffer, wchar_t const* _Drive, wchar_t const* _Dir, wchar_t const* _Filename, wchar_t const* _Ext);
|
||||||
|
extern BOOL WINAPI GetClientRect(HWND hWnd, LPRECT lpRect);
|
||||||
|
|
||||||
|
typedef char *PSZ;
|
||||||
|
|
|
||||||
|
|
@ -1,9 +0,0 @@
|
||||||
## This file must *NOT* be checked into Version Control Systems,
|
|
||||||
# as it contains information specific to your local configuration.
|
|
||||||
#
|
|
||||||
# Location of the SDK. This is only used by Gradle.
|
|
||||||
# For customization when using a Version Control System, please read the
|
|
||||||
# header note.
|
|
||||||
#Mon Nov 12 10:19:12 CET 2018
|
|
||||||
ndk.dir=C\:\\Users\\cosnier\\AppData\\Local\\Android\\Sdk\\ndk-bundle
|
|
||||||
sdk.dir=C\:\\Users\\cosnier\\AppData\\Local\\Android\\Sdk
|
|
||||||
Loading…
Reference in a new issue