hex addresses can be in lower case characters now. A request of Kelvin S.
This commit is contained in:
Antoine Vignau 2021-03-20 23:58:32 +01:00
parent 3713b4bfdd
commit b0f41ef13f
7 changed files with 58 additions and 31 deletions

BIN
tfbd/.DS_Store vendored

Binary file not shown.

View File

@ -429,7 +429,8 @@ L02018D DB $00
L02018F STRL '9:Expand:'
L02019A STRL '9:Configs:'
L0201A6 STR "The Flaming Bird Disassembler Written by Ferox - (c) 1994 Phoenix corporation"
*L0201A6 STR "The Flaming Bird Disassembler Written by Ferox - (c) 1994 Phoenix corporation"
L0201A6 STR "The Flaming Bird Disassembler Written by Ferox - (c) 1994-2021 Phoenix Corp"
L0201F7 STR 87">ERR: "
L0201FF DA L020239 ; 0 Not enough memory
@ -2157,11 +2158,11 @@ L021367 PHP
REP #$30
LDA [$F8]
AND #$00FF
CMP #$00A4
CMP #$00A4 ; $
BEQ L0213A6
CMP #$00B0
CMP #$00B0 ; 0
BCC L0213BB
CMP #$00BA
CMP #$00BA ; 9+1
BCC L0213A8
LDA #L0213D1
JSR L021F2A
@ -2188,7 +2189,7 @@ L0213A8 PEI $FA
PLX
STX $FA
BCC L0213CD
L0213BB LDA #$0001
L0213BB LDA #$0001 ; Err: Syntax
L0213BE JSR L020AB8
L0213C1 PLP
SEC
@ -2630,7 +2631,7 @@ L021656 DW $0100
L021658 DS $0002
L02165A DS $00FE
L021758 ADRL L0217D6 ; 0
L021758 ADRL L0217D6 ; 0 DB
ADRL L0217D5 ; 1
ADRL L0217D4 ; 2
ADRL L0217D3 ; 3
@ -2698,6 +2699,7 @@ L0217D2 INY
L0217D3 INY
L0217D4 INY
L0217D5 INY
L0217D6 LDA L021847,Y
AND #$00FF
STA L021843
@ -3638,31 +3640,38 @@ L021F2A PHP
LDY #$00
L021F36 LDA [$F8],Y
BEQ L021F85
cmp #'a'
bcc nochange
cmp #'z'+1
bcs nochange
sec
sbc #$20
nochange
CMP #$A0
BEQ L021F85
CMP #$AC
CMP #$AC ; ,
BEQ L021F85
CMP #$AE
CMP #$AE ; .
BEQ L021F85
CMP #$BA
CMP #$BA ; 9+1
BEQ L021F7C
CMP #$B0
CMP #$B0 ; 0
BCC L021F6E
CMP #$BA
CMP #$BA ; 9+1
BCC L021F76
CMP #$FE
CMP #$FE ; {
BEQ L021F80
CMP #$C1
CMP #$C1 ; A
BCC L021F6E
CMP #$FB
CMP #$FB ; z+1
BCS L021F6E
CMP #$DD
CMP #$DD ; ]
BEQ L021F7C
CMP #$DF
CMP #$DF ; _
BEQ L021F80
CMP #$DB
CMP #$DB ; [
BCC L021F80
CMP #$E1
CMP #$E1 ; a
BCS L021F80
L021F6E LDA #$04
JSR L020AB8
@ -11168,12 +11177,13 @@ L0272CA LDA L027318,X
RTS
L02730B STR "TFB-Disasm v"
L027318 STR "1.0.4" ; was "1.0.2"
L027318 STR "1.0.5" ; was "1.0.4" was "1.0.2"
DB $00
DB $00
DB $00
DB $00
L027322 STR " 19-SEP-2020"8D ; was "10-MAY-94"
*L027322 STR " 19-SEP-2020"8D ; was "10-MAY-94"
L027322 STR " 21-MAR-2021"8D ; was "10-MAY-94"
L027330 JSR L021586
LDA L0215CD

View File

@ -1705,7 +1705,8 @@ L040EC1 LDA L040E86
PHA
L040ED3 RTS
L040ED4 BRK $00
L040ED4 DW $0000
L040ED6 PHP
REP #$30
LDA $05,S
@ -3956,7 +3957,8 @@ L041DD6 PLP
SEC
RTL
L041DDA BRK $00
L041DDA DW $0000
L041DDC ENT
PHP
REP #$30
@ -5083,6 +5085,7 @@ L042642 PHY
L04264F BRK $00
L042651 BRK $00
L042653 PHP
REP #$30
SEC
@ -7621,7 +7624,7 @@ L0439CF BVS L0439D4
L0439D4 BRL L043A2F
L0439D7 JSR L044071
BRL L043A4A
L0439DD BRK $00
L0439DD DW $0000
L0439DF LDX #$0002
STX $C2
STA L043AFB
@ -7729,8 +7732,8 @@ L043AA9 PHA
JSR L043A89
SEP #$10
L043ABC PLY
LDA #$00
BRK $38
LDA #$0000
SEC
ROL
L043AC2 ASL
DEY

View File

@ -1022,6 +1022,8 @@ L030670 ENT
JSL L03065A
JMP L03064C
*--- Eval hex expression
L030683 PHP
REP #$30
PHD
@ -1030,14 +1032,22 @@ L030683 PHP
ADC #$0007
TCD
LDA [$00]
and #$00ff
cmp #$e1
bcc nochange2
cmp #$e7
bcs nochange2
sec
sbc #$20
nochange2
AND #$007F
CMP #$0030
CMP #$0030 ; >0
BCC L0306A6
CMP #$0047
CMP #$0047 ; >F
BCS L0306A6
CMP #$003A
CMP #$003A ; <9+1
BCC L0306AD
CMP #$0041
CMP #$0041 ; >A
BCS L0306B3
L0306A6 LDA #$0000
PLD
@ -1046,10 +1056,10 @@ L0306A6 LDA #$0000
RTL
L0306AD SEC
SBC #$0030
SBC #$0030 ; 0
BRA L0306B7
L0306B3 SEC
SBC #$0037
SBC #$0037 ; 7
L0306B7 INC $00
PLD
PLP
@ -1108,6 +1118,7 @@ L03070D LDA #$0000
L030715 DW $0000
L030717 DW $0000
L030719 ENT
PHP
REP #$30

BIN
tfbd/TFBD Normal file

Binary file not shown.

View File

@ -11,3 +11,6 @@ Changed the text buffer pointer because Sweet 16 does not refresh E0/0400 indire
v1.0.4 - AV 202009
Scripts: lowercase commands added, now oa-q works :-)
v1.0.5 - AV 202103
hex addresses can be in lower case characters now. A request of Kelvin S.

BIN
tfbd/tfbd_v105.2mg Normal file

Binary file not shown.