Apple-2-HW/AppleIISd
1
0
Fork 1
mirror of https://github.com/freitz85/AppleIISd.git synced 2024-05-28 03:48:26 +00:00
Code Issues Projects Releases Wiki Activity

Load block 0 and 1 on boot

Browse Source
This commit is contained in:
Florian Reitz 2017-11-20 19:13:16 +01:00
parent 9aa65960c4
commit 6517f86ce3
3 changed files with 57 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
AppleIISd.bin
View File

Binary file not shown.

56
AppleIISd.hex
View File

@ -1,31 +1,31 @@
:10000000A220A000A203A0FF2058FFBABD00018DCE
:10000000A220A000A203A03C2058FFBABD00018D91
:10001000F807290F853D0A0A0A0A852BAA2CFFCF6B
:1000200020A7C99003A92F002000C8F00100A90152
:100030008542A62B8543A9088545644464476446E8
:100040002CFFCF20CDC94C0108D848A52B48A53D91
:1000500048A54048A541482058FFBABD00018DF889
:1000600007290F853D0A0A0A0A852BAA2CFFCF20F3
:10007000A7C99005A92F388040A9803C83C0F034DF
:10008000A542C900F015C901F016C902F017C9034D
:10009000F018C9FFF019A90138801E20BFC98019C6
:1000A00020CDC980142034CA800F20A3CA800A2022
:1000B000A7CA80052000C890C7BA9D050168854180
:1000C00068854068853D68852B68600000000000F9
:1000D0000000000000000000000000000000000020
:1000E0000000000000000000000000000000000010
:1000F000000000000000000000000000FFFF1749A2
:1000200020A7C99003A92F002000C8F00100A0005C
:10003000B9FFCAF00699D007C810F5A9018542A6F4
:100040002B8643A90885456444644764462CFFCF4A
:1000500020CDC9A9018542A62B8643A90A854564FE
:10006000446447A90185462CFFCF20CDC9A62B4C5F
:100070000108D848A52B48A53D48A54048A54148BA
:100080002058FFBABD00018DF807290F853D0A0AE7
:100090000A0A852BAA2CFFCF20A7C99005A92F38C3
:1000A0008040A9803C83C0F034A542C900F015C946
:1000B00001F016C902F017C903F018C9FFF019A919
:1000C0000138801E20BFC9801920CDC9801420347A
:1000D000CA800F20A3CA800A20A7CA80052000C8B2
:1000E00090C7BA9D050168854168854068853D686F
:1000F000852B68600000000000000000000007720F
:10010000D8A9039D81C0BD83C009019D83C0A907F3
:100110009D82C0A00AA9FF9D80C03C81C010FB88C1
:10012000D0F5BD83C029FE9D83C0A9FF8540A9CA23
:10013000854120EBC820FFC8C901D039A90B8540F3
:10014000A9CB854120EBC82018C9C901D02AA9171D
:100150008540A9CB854120EBC820FFC8A91D85405B
:10012000D0F5BD83C029FE9D83C0A91F8540A9CB02
:10013000854120EBC820FFC8C901D039A92B8540D3
:10014000A9CB854120EBC82018C9C901D02AA937FD
:100150008540A9CB854120EBC820FFC8A93D85403B
:10016000A9CB854120EBC820FFC8C901F0E0C90038
:10017000D0034CB2C84CD9C8A9178540A9CB85413A
:1001800020EBC8A9238540A9CB854120EBC820FFDF
:10019000C8C901F0E3C900D0034CB2C8A905854025
:10017000D0034CB2C84CD9C8A9378540A9CB85411A
:1001800020EBC8A9438540A9CB854120EBC820FFBF
:10019000C8C901F0E3C900D0034CB2C8A925854005
:1001A000A9CB854120EBC820FFC8C901F0F6C900E2
:1001B000D027A9118540A9CB854120EBC820FFC8D5
:1001B000D027A9318540A9CB854120EBC820FFC8B5
:1001C000C900D015BD83C009809D83C0BD81C00911
:1001D000049D81C018A000900338A027BD83C009EA
:1001E000019D83C0A9009D82C098605AA000B140C3
@ -61,8 +61,10 @@
:1003C000989144C8D0FAE645989144C8D0FAC645F9
:1003D00064466447A62B2034CAB02220CDC9B01D84
:1003E000A00098D144D017C8D0F8E64598D144D0A1
:1003F0000DC8D0F8C64520F8BE18A900600000401E
:1004000000000000954100000000F948000001AA2A
:10041000875000000200FF7700000000656940007F
:090420000000776900000000FFF4
:1003F0000DC8D0F8C64520F8BE18A900600000C19D
:10040000F0F0ECE5DDDBD3E4A0A8E3A9B2B0B1B72E
:10041000A0C6ECEFF2E9E1EEA0D2E5E9F4FA004083
:1004200000000000954100000000F948000001AA0A
:10043000875000000200FF7700000000656940005F
:090440000000776900000000FFD4
:00000001FF

33
AppleIISd.s
View File

@ -57,7 +57,7 @@ INITED = $80
LDX #$20
LDY #$00
LDX #$03
LDY #$FF ; neither 5.25 nor Smartport
LDY #$3C
* find slot nr
@ -148,13 +148,20 @@ INSTALL LDA $BF32,X ; get a devnum
ELSE
BOOT BEQ :BOOT1 ; check for error
BOOT BEQ :DRAW ; check for error
BRK
:DRAW LDY #0 ; display copyright message
:DRAW1 LDA TEXT,Y
BEQ :BOOT1 ; check for NULL
STA $07D0,Y ; put on last line
INY
BPL :DRAW1
:BOOT1 LDA #$01
STA DCMD ; load command
LDX SLOT16
STA $43 ; slot number
STX $43 ; slot number
LDA #$08
STA BUFFER+1 ; buffer hi
STZ BUFFER ; buffer lo
@ -162,6 +169,20 @@ BOOT BEQ :BOOT1 ; check for error
STZ BLOCK ; block lo
BIT $CFFF
JSR READ ; call driver
LDA #$01
STA DCMD ; load command
LDX SLOT16
STX $43 ; slot number
LDA #$0A
STA BUFFER+1 ; buffer hi
STZ BUFFER ; buffer lo
STZ BLOCK+1 ; block hi
LDA #$01
STA BLOCK ; block lo
BIT $CFFF
JSR READ ; call driver
LDX SLOT16
JMP $801 ; goto bootloader
FIN
@ -264,8 +285,8 @@ DRIVER CLD
DS \ ; fill with zeroes
DS -4 ; locate to $xxFC
DW $FFFF ; 65535 blocks
DB $17 ; Status bits
DW $0 ; use status call
DB $07 ; Status bits
DB #<DRIVER ; LSB of driver
********************************
@ -840,6 +861,8 @@ TEST LDA SLOT16
:ERRCMP BRK
TEXT ASC "Apple][Sd (c)2017 Florian Reitz",00
CMD0 HEX 400000
HEX 000095
CMD1 HEX 410000