mirror of
https://github.com/mrkite/regs.git
synced 2024-12-01 16:52:30 +00:00
128 lines
2.1 KiB
Plaintext
128 lines
2.1 KiB
Plaintext
ADBErr enum<uint16> {
|
|
cmndIncomplete = $910,
|
|
cantSync = $911,
|
|
adbBusy = $982,
|
|
devNotAtAddr = $983,
|
|
srqListFull = $984,
|
|
}
|
|
|
|
ADBCommand enum<int16> {
|
|
abort = $1,
|
|
resetKbd = $2,
|
|
flushKbd = $3,
|
|
setModes = $4,
|
|
clearModes = $5,
|
|
setConfig = $6,
|
|
synch = $7,
|
|
writeMicroMem = $8,
|
|
readMicroMem = $9,
|
|
readModes = $a,
|
|
readConfig = $b,
|
|
readADBError = $c,
|
|
readVersionNum = $d,
|
|
readAvailCharSet = $e,
|
|
readAvailLayout = $f,
|
|
resetSys = $10,
|
|
keyCode = $11,
|
|
resetADB = $40,
|
|
transmitADBBytes = $47,
|
|
enableSRQ = $50,
|
|
flushADBDevBuf = $60,
|
|
disableSRQ = $70,
|
|
listen = $80,
|
|
talk = $c0,
|
|
}
|
|
|
|
ReadConfigRecPtr = ^ReadConfigRec;
|
|
ReadConfigRec struct {
|
|
rcRepeatDelay: uint8;
|
|
rcLayoutOrLang: uint8;
|
|
rcADBAddr: uint8;
|
|
}
|
|
SetConfigRecPtr = ^SetConfigRec;
|
|
SetConfigRec struct {
|
|
scADBAddr: uint8;
|
|
scLayoutOrLang: uint8;
|
|
scRepeatDelay: uint8;
|
|
}
|
|
SynchRecPtr = ^SynchRec;
|
|
SynchRec struct {
|
|
synchMode: uint8;
|
|
synchKybdMouseAddr: uint8;
|
|
synchLayoutOrLang: uint8;
|
|
synchRepeatDelay: uint8;
|
|
}
|
|
ADBData union {
|
|
readConfig: ReadConfigRec;
|
|
setConfig: SetConfigRec;
|
|
synch: SynchRec;
|
|
raw: uint8[];
|
|
}
|
|
ScaleRecPtr = ^ScaleRec;
|
|
ScaleRec struct {
|
|
xDivide: int16;
|
|
yDivide: int16;
|
|
xOffset: int16;
|
|
yOffset: int16;
|
|
xMultiply: int16;
|
|
yMultiply: int16;
|
|
}
|
|
|
|
ADBBootInit() {
|
|
$09, $01
|
|
}
|
|
ADBStartUp() {
|
|
$09, $02
|
|
}
|
|
ADBShutDown() {
|
|
$09, $03
|
|
}
|
|
ADBVersion(): int16 {
|
|
$09, $04
|
|
}
|
|
ADBReset() {
|
|
$09, $05
|
|
}
|
|
ADBStatus(): bool {
|
|
$09, $06
|
|
}
|
|
AbsOff() {
|
|
$09, $10
|
|
}
|
|
AbsOn() {
|
|
$09, $0f
|
|
}
|
|
AsynchADBReceive(compPtr: Ptr) {
|
|
$09, $0d
|
|
}
|
|
ClearSRQTable() {
|
|
$09, $16
|
|
}
|
|
GetAbsScale(dataInPtr: ^ScaleRec) {
|
|
$09, $13
|
|
}
|
|
ReadAbs(): int16 {
|
|
$09, $11
|
|
}
|
|
ReadKeyMicroData(dataLength: int16, dataPtr: ^ADBData, adbCommand: ADBCommand) {
|
|
$09, $0a
|
|
}
|
|
ReadKeyMicroMem(dataLength: int16, dataPtr: ^ADBData, adbCommand: ADBCommand) {
|
|
$09, $0b
|
|
}
|
|
SendInfo(dataLength: int16, dataPtr: ^ADBData, adbCommand: ADBCommand) {
|
|
$09, $09
|
|
}
|
|
SetAbsScale(dataOutPtr: ^ScaleRec) {
|
|
$09, $12
|
|
}
|
|
SRQPoll(compPtr: Ptr, adbRegAddr: int16) {
|
|
$09, $14
|
|
}
|
|
SRQRemove(adbRegAddr: int16) {
|
|
$09, $15
|
|
}
|
|
SyncADBReceive(intputWord: int16, compPtr: Ptr, adbCommand: ADBCommand) {
|
|
$09, $0e
|
|
}
|