Apple-2-SW/passport
1
0
Fork 0
mirror of https://github.com/a2-4am/passport.git synced 2025-01-02 17:30:53 +00:00
Code Issues Projects Releases Wiki Activity

some comments

Browse Source
This commit is contained in:
4am 2021-06-16 13:57:30 -04:00
parent b76b442431
commit b8242457ff
1 changed files with 14 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
src/wrapper.a
View File

@ -2,18 +2,18 @@
*=$2000 *=$2000
!to "../build/PASSPORT.SYSTEM",plain !to "../build/PASSPORT.SYSTEM",plain
!source "../build/vars.a" !source "../build/vars.a" ; no code in here
bit $C082 bit $C082 ; read ROM, no write
sta $C00E sta $C00E ; primary character set
sta $C00C sta $C00C ; 40 columns
sta $C000 sta $C000 ; 80STORE off
sta $C002 sta $C002 ; read main memory
jsr $FB2F jsr $FB2F ; TEXT
jsr $FC58 jsr $FC58 ; HOME
jsr $FE84 jsr $FE84 ; NORMAL
jsr $FE93 jsr $FE93 ; PR#0
jsr $FE89 jsr $FE89 ; IN#0
lda $BF98 ; ProDOS MachineID lda $BF98 ; ProDOS MachineID
and #$20 ; at least 64K? and #$20 ; at least 64K?
bne OneTimeSetup bne OneTimeSetup
@ -48,12 +48,12 @@ OneTimeSetup
+ +
jsr ScanForRAMAndHardDisks; scan for things that look like RAM disks or hard disks jsr ScanForRAMAndHardDisks; scan for things that look like RAM disks or hard disks
jsr LoadPrefs ; load preferences (if available) jsr LoadPrefs ; load preferences (if available)
jsr ThisSlot jsr ThisSlot ; get information about selected drive and set gTargetType for main menu
lda #<CheckCache lda #<CheckCache ; set up output hook used to store log messages before they scroll off
sta $36 sta $36
lda #>CheckCache lda #>CheckCache
sta $37 sta $37
lda $FE lda $FE ; set reset vector
sta $03F2 sta $03F2
lda $FF lda $FF
sta $03F3 sta $03F3