Macintosh-SW
/
mpw
mirror of https://github.com/ksherlock/mpw.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

InitGraf/FScaleDisable (DuplicateIIgs)

This commit is contained in:
Kelvin Sherlock 2013-04-10 21:21:01 -04:00
parent 288aa35cc1
commit 80e55b8c82
3 changed files with 39 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
toolbox/qd.cpp
View File

@ -5,6 +5,8 @@
#include <cpu/CpuModule.h>
#include <cpu/fmem.h>
#include <macos/sysequ.h>
#include "stackframe.h"
using ToolBox::Log;
@ -62,4 +64,30 @@ namespace QD {
return 0;
}
uint16_t InitGraf(uint16_t trap)
{
// PROCEDURE InitGraf (globalPtr: Ptr);
uint32_t globalPtr;
StackFrame<4>(globalPtr);
Log("%04x InitGraf($%08x)\n", trap, globalPtr);
return 0;
}
uint16_t SetFScaleDisable(uint16_t trap)
{
uint16_t value;
StackFrame<2>(value);
Log("%04x SetFScaleDisable($%04x)\n", trap, value);
// sets FScaleDisable global variable
return 0;
}
}

3
toolbox/qd.h
View File

@ -6,11 +6,14 @@
namespace QD
{
uint16_t InitGraf(uint16_t trap);
uint16_t ShowCursor(uint16_t trap);
uint16_t GetCursor(uint16_t trap);
uint16_t SetCursor(uint16_t trap);
uint16_t GetFNum(uint16_t trap);
uint16_t SetFScaleDisable(uint16_t trap);
}
#endif

8
toolbox/toolbox.cpp
View File

@ -277,11 +277,19 @@ namespace ToolBox {
break;
case 0xa834:
d0 = QD::SetFScaleDisable(trap);
break;
//SetCursor (crsr: Cursor)
case 0xA851:
d0 = QD::SetCursor(trap);
break;
case 0xa86e:
d0 = QD::InitGraf(trap);
break;
// GetFNum (fontName: Str255; VAR theNum: INTEGER);
case 0xa900:
d0 = QD::GetFNum(trap);