Apple-2-SW/a2d
1
0
Fork 0
mirror of https://github.com/mi57730/a2d.git synced 2024-11-25 10:30:50 +00:00
Code Issues Projects Releases Wiki Activity

Split out include files for ProDOS, AuxMem and A2D

Browse Source
This commit is contained in:
Joshua Bell 2017-08-29 08:07:02 -07:00
parent cc8a783ac6
commit 6f9fa94739
6 changed files with 173 additions and 148 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
desk.acc/show.text.file/a2d.inc Normal file
View File

@ -0,0 +1,23 @@
;;; ------------------------------
;;; A2Desktop
;;; ------------------------------
;;; Entry Points
A2D := $4000
UNKNOWN_CALL := $8E00
A2D_TEXT := $19
;;; Macros
.macro A2D_CALL op, addr
jsr A2D
.byte op
.addr addr
.endmacro
.macro A2D_DEFSTRING str ; String definition, for use with A2D_TEXT
.local data
.addr data
.byte .strlen(str)
data: .byte str
.endmacro

15
desk.acc/show.text.file/auxmem.inc Normal file
View File

@ -0,0 +1,15 @@
;;; ------------------------------
;;; Aux Memory
;;; ------------------------------
;;; Softswitches
RAMRDOFF := $C002
RAMRDON := $C003
RAMWRTOFF := $C004
RAMWRTON := $C005
ALTZPOFF := $C008
ALTZPON := $C009
LCBANK1 := $C08B
;;; Routines
AUXMOVE := $C311

43
desk.acc/show.text.file/prodos.inc Normal file
View File

@ -0,0 +1,43 @@
;;; ------------------------------
;;; ProDOS MLI
;;; ------------------------------
;;; Entry point
MLI := $BF00
;;; Housekeeping Calls
CREATE := $C0
DESTROY := $C1
RENAME := $C2
SET_FILE_INFO := $C3
GET_FILE_INFO := $C4
ON_LINE := $C5
SET_PREFIX := $C6
GET_PREFIX := $C7
;;; Filing Calls
OPEN := $C8
NEWLINE := $C9
READ := $CA
WRITE := $CB
CLOSE := $CC
FLUSH := $CD
SET_MARK := $CE
GET_MARK := $CF
SET_EOF := $D0
GET_EOF := $D1
SET_BUF := $D2
GET_BUF := $D3
;;; System Calls
GET_TIME := $82
ALLOC_INTERRUPT := $40
DEALLOC_INTERRUPT := $41
;;; Direct Disk Access Commands
READ_BLOCK := $80
WRITE_BLOCK := $71
;;; Macros
.macro MLI_CALL op, addr
jsr MLI
.byte op
.addr addr
.endmacro

162
desk.acc/show.text.file/stf.list
View File

@ -5,87 +5,101 @@ Current file: stf.s
000000r 1 .setcpu "65C02"
000000r 1 .org $800
000800 1
000800 1 .include "prodos.inc"
000800 2 ;;; ------------------------------
000800 2 ;;; ProDOS MLI
000800 2 ;;; ------------------------------
000800 2
000800 2 ;;; Entry point
000800 2 MLI := $BF00
000800 2
000800 2 ;;; Housekeeping Calls
000800 2 CREATE := $C0
000800 2 DESTROY := $C1
000800 2 RENAME := $C2
000800 2 SET_FILE_INFO := $C3
000800 2 GET_FILE_INFO := $C4
000800 2 ON_LINE := $C5
000800 2 SET_PREFIX := $C6
000800 2 GET_PREFIX := $C7
000800 2 ;;; Filing Calls
000800 2 OPEN := $C8
000800 2 NEWLINE := $C9
000800 2 READ := $CA
000800 2 WRITE := $CB
000800 2 CLOSE := $CC
000800 2 FLUSH := $CD
000800 2 SET_MARK := $CE
000800 2 GET_MARK := $CF
000800 2 SET_EOF := $D0
000800 2 GET_EOF := $D1
000800 2 SET_BUF := $D2
000800 2 GET_BUF := $D3
000800 2 ;;; System Calls
000800 2 GET_TIME := $82
000800 2 ALLOC_INTERRUPT := $40
000800 2 DEALLOC_INTERRUPT := $41
000800 2 ;;; Direct Disk Access Commands
000800 2 READ_BLOCK := $80
000800 2 WRITE_BLOCK := $71
000800 2
000800 2 ;;; Macros
000800 2 .macro MLI_CALL op, addr
000800 2 jsr MLI
000800 2 .byte op
000800 2 .addr addr
000800 2 .endmacro
000800 2
000800 1 .include "auxmem.inc"
000800 2 ;;; ------------------------------
000800 2 ;;; Aux Memory
000800 2 ;;; ------------------------------
000800 2
000800 2 ;;; Softswitches
000800 2 RAMRDOFF := $C002
000800 2 RAMRDON := $C003
000800 2 RAMWRTOFF := $C004
000800 2 RAMWRTON := $C005
000800 2 ALTZPOFF := $C008
000800 2 ALTZPON := $C009
000800 2 LCBANK1 := $C08B
000800 2
000800 2 ;;; Routines
000800 2 AUXMOVE := $C311
000800 2
000800 1 .include "a2d.inc"
000800 2 ;;; ------------------------------
000800 2 ;;; A2Desktop
000800 2 ;;; ------------------------------
000800 2
000800 2 ;;; Entry Points
000800 2 A2D := $4000
000800 2 UNKNOWN_CALL := $8E00
000800 2
000800 2 A2D_TEXT := $19
000800 2
000800 2 ;;; Macros
000800 2 .macro A2D_CALL op, addr
000800 2 jsr A2D
000800 2 .byte op
000800 2 .addr addr
000800 2 .endmacro
000800 2
000800 2 .macro A2D_DEFSTRING str ; String definition, for use with A2D_TEXT
000800 2 .local data
000800 2 .addr data
000800 2 .byte .strlen(str)
000800 2 data: .byte str
000800 2 .endmacro
000800 2
000800 1
000800 1 NULL := 0
000800 1
000800 1 ;;; TODO: Figure this one out
000800 1 L0020 := $0020
000800 1
000800 1 ;;; ------------------------------
000800 1 ;;; Aux Memory
000800 1
000800 1 ;;; Softswitches
000800 1 RAMRDOFF := $C002
000800 1 RAMRDON := $C003
000800 1 RAMWRTOFF := $C004
000800 1 RAMWRTON := $C005
000800 1 ALTZPOFF := $C008
000800 1 ALTZPON := $C009
000800 1 LCBANK1 := $C08B
000800 1
000800 1 ;;; Routines
000800 1 AUXMOVE := $C311
000800 1
000800 1 ;;; ------------------------------
000800 1 ;;; ProDOS MLI
000800 1 MLI := $BF00
000800 1
000800 1 ;;; Housekeeping Calls
000800 1 CREATE := $C0
000800 1 DESTROY := $C1
000800 1 RENAME := $C2
000800 1 SET_FILE_INFO := $C3
000800 1 GET_FILE_INFO := $C4
000800 1 ON_LINE := $C5
000800 1 SET_PREFIX := $C6
000800 1 GET_PREFIX := $C7
000800 1 ;;; Filing Calls
000800 1 OPEN := $C8
000800 1 NEWLINE := $C9
000800 1 READ := $CA
000800 1 WRITE := $CB
000800 1 CLOSE := $CC
000800 1 FLUSH := $CD
000800 1 SET_MARK := $CE
000800 1 GET_MARK := $CF
000800 1 SET_EOF := $D0
000800 1 GET_EOF := $D1
000800 1 SET_BUF := $D2
000800 1 GET_BUF := $D3
000800 1 ;;; System Calls
000800 1 GET_TIME := $82
000800 1 ALLOC_INTERRUPT := $40
000800 1 DEALLOC_INTERRUPT := $41
000800 1 ;;; Direct Disk Access Commands
000800 1 READ_BLOCK := $80
000800 1 WRITE_BLOCK := $71
000800 1
000800 1 ;;; Macros
000800 1 .macro MLI_CALL op, addr
000800 1 jsr MLI
000800 1 .byte op
000800 1 .addr addr
000800 1 .endmacro
000800 1
000800 1 ;;; ------------------------------
000800 1 ;;; A2Desktop Entry Points
000800 1 A2D := $4000
000800 1 UNKNOWN_CALL := $8E00
000800 1
000800 1 A2D_TEXT := $19
000800 1
000800 1 ;;; Macros
000800 1 .macro A2D_CALL op, addr
000800 1 jsr A2D
000800 1 .byte op
000800 1 .addr addr
000800 1 .endmacro
000800 1
000800 1 .macro A2D_DEFSTRING str ; String definition, for use with A2D_TEXT
000800 1 .local data
000800 1 .addr data
000800 1 .byte .strlen(str)
000800 1 data: .byte str
000800 1 .endmacro
000800 1
000800 1
000800 1 4C 04 08 start: jmp copy2aux

BIN
desk.acc/show.text.file/stf.o
View File

Binary file not shown.

78
desk.acc/show.text.file/stf.s
View File

@ -1,87 +1,17 @@
.setcpu "65C02"
.org $800
.include "prodos.inc"
.include "auxmem.inc"
.include "a2d.inc"
NULL := 0
;;; TODO: Figure this one out
L0020 := $0020
;;; ------------------------------
;;; Aux Memory
;;; Softswitches
RAMRDOFF := $C002
RAMRDON := $C003
RAMWRTOFF := $C004
RAMWRTON := $C005
ALTZPOFF := $C008
ALTZPON := $C009
LCBANK1 := $C08B
;;; Routines
AUXMOVE := $C311
;;; ------------------------------
;;; ProDOS MLI
MLI := $BF00
;;; Housekeeping Calls
CREATE := $C0
DESTROY := $C1
RENAME := $C2
SET_FILE_INFO := $C3
GET_FILE_INFO := $C4
ON_LINE := $C5
SET_PREFIX := $C6
GET_PREFIX := $C7
;;; Filing Calls
OPEN := $C8
NEWLINE := $C9
READ := $CA
WRITE := $CB
CLOSE := $CC
FLUSH := $CD
SET_MARK := $CE
GET_MARK := $CF
SET_EOF := $D0
GET_EOF := $D1
SET_BUF := $D2
GET_BUF := $D3
;;; System Calls
GET_TIME := $82
ALLOC_INTERRUPT := $40
DEALLOC_INTERRUPT := $41
;;; Direct Disk Access Commands
READ_BLOCK := $80
WRITE_BLOCK := $71
;;; Macros
.macro MLI_CALL op, addr
jsr MLI
.byte op
.addr addr
.endmacro
;;; ------------------------------
;;; A2Desktop Entry Points
A2D := $4000
UNKNOWN_CALL := $8E00
A2D_TEXT := $19
;;; Macros
.macro A2D_CALL op, addr
jsr A2D
.byte op
.addr addr
.endmacro
.macro A2D_DEFSTRING str ; String definition, for use with A2D_TEXT
.local data
.addr data
.byte .strlen(str)
data: .byte str
.endmacro
start: jmp copy2aux