Apple-2-SW/davex-mg-utils
1
0
Fork 0
mirror of https://github.com/mgcaret/davex-mg-utils.git synced 2024-12-21 09:29:25 +00:00
Code Issues Projects Releases Wiki Activity

update davex-mg.inc to include some other davex includes and fix ensuing minor issues

Browse Source
This commit is contained in:
mgcaret 2018-05-07 15:23:29 -07:00
parent 80689d3ab1
commit 8cc409e1b9
9 changed files with 28 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Makefile
View File

@ -5,7 +5,7 @@ BOOTDSK=~/vii_hd.2mg
CA65=ca65 CA65=ca65
LD65=utils/auto_origin.sh ld65 LD65=utils/auto_origin.sh ld65
GENHELP=utils/gen_help.sh GENHELP=utils/gen_help.sh
MG_CMDS=at.info.p8c at.zones.p8c afp.userprefix.p8c afp.sessions.p8c alias.p8c at.boot.p8c deschw.p8c dmem.p8c nbp.lookup.p8c tardis.p8c nbp.parse.p8c iie.card.p8c idemu.p8c mig.insp.p8c fastchip.p8c afp.timezone.p8c setyear.p8c MG_CMDS=at.info.p8c at.zones.p8c afp.userprefix.p8c afp.sessions.p8c alias.p8c at.boot.p8c deschw.p8c dmem.p8c nbp.lookup.p8c tardis.p8c nbp.parse.p8c iie.card.p8c idemu.p8c mig.insp.p8c fastchip.p8c afp.timezone.p8c setyear.p8c diskinfo.p8c
.PHONY: all .PHONY: all
all: shk ; all: shk ;

2
afp.timezone.s
View File

@ -12,7 +12,7 @@
sptr = xczpage sptr = xczpage
prbyte = $fdda ;prbyte = $fdda
;cout = $fded ;cout = $fded
pfxbuf = filebuff2 pfxbuf = filebuff2

19
davex-mg.inc
View File

@ -21,10 +21,11 @@ I_MG_MAC = 1
; ********* ; *********
.include "Common/2/Globals2.asm" .include "Common/2/Globals2.asm"
.include "Common/2/Apple.Globals2.asm"
.include "Common/2/MLI.Globals2.asm" .include "Common/2/MLI.Globals2.asm"
.include "Common/2/Macros2.asm" .include "Common/Macros.asm"
cout = $fded ; character out ;cout = $fded ; character out
checkmach = $fe1f ; clears carry on IIgs, no effect on //e checkmach = $fe1f ; clears carry on IIgs, no effect on //e
p8_mli = $bf00 p8_mli = $bf00
@ -133,8 +134,18 @@ X_DX_DESC: .byte .strlen(Desc)
.assert (* - ext_start) < 512, warning, "Description must end in the first 512 bytes" .assert (* - ext_start) < 512, warning, "Description must end in the first 512 bytes"
.endmacro .endmacro
.macro DX_main .macro DX_main Addr
X_DX_EXEC = * .ifnblank Addr
.out .sprintf("Note: main code address at %s", .string(Addr))
X_DX_EXEC = Addr
.else
.ifconst *
.out .sprintf("Note: implied main code at * = $%x", *)
.else
.out .sprintf("Note: implied main code at DX_main")
.endif
X_DX_EXEC = *
.endif
.endmacro .endmacro
.macro DX_end .macro DX_end

11
fastchip.s
View File

@ -20,6 +20,9 @@
; No options: List current settings ; No options: List current settings
; %hend ; %hend
.p02
.include "davex-mg.inc"
UNLOCKV = $6a UNLOCKV = $6a
LOCKV = $a6 LOCKV = $a6
CFG_SPEED = $00 CFG_SPEED = $00
@ -31,8 +34,6 @@ CFG_RFSLT = $05
CFG_RWENA = $06 CFG_RWENA = $06
CFG_LIGHT = $07 CFG_LIGHT = $07
ch = $24
fcbase = $c06a fcbase = $c06a
fcenable = fcbase+1 fcenable = fcbase+1
fcslots = fcbase+2 fcslots = fcbase+2
@ -47,12 +48,6 @@ mytemp1 = mytemp+2 ; temp for Disk II check
savex = mytemp1+2 ; place to save x reg savex = mytemp1+2 ; place to save x reg
savey = savex+1 ; place to save y reg savey = savex+1 ; place to save y reg
;cout = $fded
prbyte = $fdda
.p02
.include "davex-mg.inc"
DX_start dx_mg_auto_origin ; load address DX_start dx_mg_auto_origin ; load address
DX_info $01,$12,dx_cc_iie_or_iigs,$00 DX_info $01,$12,dx_cc_iie_or_iigs,$00
DX_ptab DX_ptab

5
iie.card.s
View File

@ -7,11 +7,12 @@
; -x Show experimental info, uses undocumented features. ; -x Show experimental info, uses undocumented features.
; %hend ; %hend
curspeed = xczpage
.pc02 .pc02
.include "davex-mg.inc" .include "davex-mg.inc"
curspeed = xczpage
DX_start dx_mg_auto_origin ; load address DX_start dx_mg_auto_origin ; load address
DX_info $01,$12,dx_cc_iie_or_iigs,$00 DX_info $01,$12,dx_cc_iie_or_iigs,$00
DX_ptab DX_ptab

2
nbp.lookup.s
View File

@ -16,7 +16,7 @@
.pc02 ; appletalk requires it anyway .pc02 ; appletalk requires it anyway
.include "davex-mg.inc" .include "davex-mg.inc"
ch = $24 ; cursor horizontal pos ;ch = $24 ; cursor horizontal pos
sptr = xczpage sptr = xczpage
sptr2 = sptr+2 sptr2 = sptr+2

2
nbp.parse.s
View File

@ -7,7 +7,7 @@
.pc02 .pc02
.include "davex-mg.inc" .include "davex-mg.inc"
ch = $24 ; cursor horizontal pos ;ch = $24 ; cursor horizontal pos
sptr = xczpage sptr = xczpage
sptr2 = sptr+2 sptr2 = sptr+2

2
setyear.s
View File

@ -17,7 +17,7 @@ tmp = xczpage
year = tmp+1 year = tmp+1
count = year+1 count = year+1
prbyte = $fdda ;prbyte = $fdda
;cout = $fded ;cout = $fded
DX_start dx_mg_auto_origin ; load address DX_start dx_mg_auto_origin ; load address

4
tardis.s
View File

@ -15,14 +15,14 @@
.pc02 .pc02
.include "davex-mg.inc" .include "davex-mg.inc"
ch = $24 ; cursor horizontal pos ;ch = $24 ; cursor horizontal pos
entname = filebuff2 ; buffer to build NBP entity name entname = filebuff2 ; buffer to build NBP entity name
NBPBuf = filebuff3 ; buffer for NBP request NBPBuf = filebuff3 ; buffer for NBP request
NBPBufSz = $0400 ; size of the file buffer NBPBufSz = $0400 ; size of the file buffer
P8DtTm = $bf90 P8DtTm = $bf90
prbyte = $fdda ;prbyte = $fdda
sptr = xczpage sptr = xczpage
sptr2 = sptr+2 sptr2 = sptr+2