I have used "sorchard" Dragon 64 Information and merge it with a disassembled rom, with the Perl scripts from
http://www.6809.org.uk/dragon/
Now i have some missmatches, for this:
Code: Select all
$bb3c-$bb7e ; * reset routine continued
$bb3c ; initialise PIA0:
$bb3f ; $FF00 PDR rrrrrrrr
$bb42 ; $FF02 PDR wwwwwwww
$bb44 ; CA2 bit3 output mode
$bb46 ; CB2 bit3 output mode
$bb48 ; IRQA disabled (hsync)
$bb49 ; IRQB disabled (vsync)
$bb4f ; initialise PIA1:
$bb52 ; $FF20 PDR wwwwwwwr
$bb54 ; $FF22 PDR wwwwwrrr
$bb56 ; CA2 bit3 output mode
$bb57 ; CB2 bit3 output mode
$bb59 ; IRQA disabled (ack)
$bb5b ; IRQB disabled (cart)
$bb65 ; initialise serial hardware:
$bb68 ; no parity, no IRQ, DTR low
$bb6b ; 1200 baud, 8 data, 2 stop
$bb6e ; initialise SAM:
$bb71 ; 512 byte display
$bb73 ; display base 1024
$bb75 ; mem page 0
$bb76 ; slow MPU rate
$bb78 ; 64K dynamic memory
$bb7b ; MAP 0
From the code listing:
Code: Select all
BB39 0000 neg <$00
BB3B 00CC neg <$cc
BB3D 0034 neg <$34
BB3F 8EFF00 ldx #$ff00 ; $FF00 PDR rrrrrrrr
BB42 A701 sta 1,x ; $FF02 PDR wwwwwwww
BB44 A703 sta 3,x ; CA2 bit3 output mode
BB46 A784 sta ,x ; CB2 bit3 output mode
BB48 43 coma ; IRQA disabled (hsync)
BB49 A702 sta 2,x ; IRQB disabled (vsync)
BB4B E701 stb 1,x
BB4D E703 stb 3,x
BB4F 8EFF20 ldx #$ff20 ; initialise PIA1:
BB52 6F01 clr 1,x ; $FF20 PDR wwwwwwwr
BB54 6F03 clr 3,x ; $FF22 PDR wwwwwrrr
BB56 4A deca ; CA2 bit3 output mode
BB57 A784 sta ,x ; CB2 bit3 output mode
BB59 86F8 lda #$f8 ; IRQA disabled (ack)
BB5B A702 sta 2,x ; IRQB disabled (cart)
BB5D E701 stb 1,x
BB5F E703 stb 3,x
BB61 6F84 clr ,x
BB63 6F02 clr 2,x
BB65 CC0A98 ldd #$0a98 ; initialise serial hardware:
BB68 FDFF06 std >$ff06 ; no parity, no IRQ, DTR low
BB6B B6FF04 lda >$ff04 ; 1200 baud, 8 data, 2 stop
BB6E 8EFFC0 ldx #$ffc0 ; initialise SAM:
BB71 C610 ldb #$10 ; 512 byte display
BB73 A781 L_BB73 sta ,x++ ; display base 1024
BB75 5A decb ; mem page 0
BB76 26FB bne L_BB73 ; slow MPU rate
BB78 F7FFC9 stb >$ffc9 ; 64K dynamic memory
BB7B F7FFDD stb >$ffdd ; MAP 0
The
initialise PIA0 block seems to be wrong commented.
Are the addresses in "sorchard" "out of alignment" or does the perl scripts something wrong or have i use them wrong?