Apple-2-SW/a2audit
1
0
Fork 0
mirror of https://github.com/zellyn/a2audit.git synced 2024-11-21 22:32:23 +00:00
Code Issues Projects Releases Wiki Activity

Revert tech note "fix" until I understand things

Browse Source
This commit is contained in:
Zellyn Hunter 2016-12-08 16:44:38 -05:00
parent 4b1b6b9195
commit 56440264c9
3 changed files with 12 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
audit/audit.asm
View File

@ -19,6 +19,10 @@ main:
!zone detect { !zone detect {
jsr IDENTIFY jsr IDENTIFY
lda MACHINE lda MACHINE
jsr PRBYTE
lda #$8D
jsr COUT
lda MACHINE
bne .known bne .known
;; MACHINE=0 - unknown machine ;; MACHINE=0 - unknown machine
jsr print jsr print

BIN
audit/audit.dsk
View File

Binary file not shown.

16
audit/technote2.asm
View File

@ -204,7 +204,7 @@ IDENTIFY
lda .lc1 ;bank on and check lda .lc1 ;bank on and check
cmp .save cmp .save
beq .exit3 beq .exit3
lda $C081 lda $C080
jmp .exit6 jmp .exit6
.exit3 lda .lc2 .exit3 lda .lc2
cmp .save+1 ;if all locations check cmp .save+1 ;if all locations check
@ -327,13 +327,13 @@ IDENTIFY
;;; * The storage locations for the returned machine ID: ;;; * The storage locations for the returned machine ID:
MACHINE !byte 1 ;the type of Apple II MACHINE !byte 0 ;the type of Apple II
ROMLEVEL !byte 1 ;which revision of the machine ROMLEVEL !byte 0 ;which revision of the machine
MEMORY !byte 1 ;how much memory (up to 128K) MEMORY !byte 0 ;how much memory (up to 128K)
.IIgsA !byte 2 ;16-bit field .IIgsA !word 0 ;16-bit field
.IIgsX !byte 2 ;16-bit field .IIgsX !word 0 ;16-bit field
.IIgsY !byte 2 ;16-bit field .IIgsY !word 0 ;16-bit field
.save !byte 6 ;six bytes for saved data .save !fill 6,0 ;six bytes for saved data
.IDTable .IDTable
;dc I1'1,1' ;Apple ][ ;dc I1'1,1' ;Apple ][