Apple-2-SW/prodos-more
1
0
Fork 0
mirror of https://github.com/gungwald/prodos-more.git synced 2024-06-02 13:41:30 +00:00
Code Issues Projects Releases Wiki Activity

Add breaks to switch statement

Browse Source
This commit is contained in:
Bill Chatfield 2024-02-07 03:15:27 -05:00
parent 903b810f1b
commit 7c803937da
1 changed files with 60 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

61
more.S
View File

@ -61,7 +61,7 @@ SCR.HGHT .EQ 24 ;SCREEN HEIGHT
* *
* DEBUGGING * DEBUGGING
TRACE EQU 1 TRACE EQU 0
******************************** ********************************
* * * *
@ -508,97 +508,156 @@ ERRPROC
CMP #0 CMP #0
BNE :EEOF BNE :EEOF
JMP :END JMP :END
:EEOF CMP #EOFERR :EEOF CMP #EOFERR
BNE :E01 BNE :E01
JMP :END JMP :END
:E01 CMP #1 :E01 CMP #1
BNE :E04 BNE :E04
PUTS E01MSG PUTS E01MSG
JMP :END
:E04 CMP #4 :E04 CMP #4
BNE :E25 BNE :E25
PUTS E04MSG PUTS E04MSG
JMP :END
:E25 CMP #$25 :E25 CMP #$25
BNE :E27 BNE :E27
PUTS E25MSG PUTS E25MSG
JMP :END
:E27 CMP #$27 :E27 CMP #$27
BNE :E28 BNE :E28
PUTS E27MSG PUTS E27MSG
JMP :END
:E28 CMP #$28 :E28 CMP #$28
BNE :E2B BNE :E2B
PUTS E28MSG PUTS E28MSG
JMP :END
:E2B CMP #$2B :E2B CMP #$2B
BNE :E2E BNE :E2E
PUTS E2BMSG PUTS E2BMSG
JMP :END
:E2E CMP #$2E :E2E CMP #$2E
BNE :E40 BNE :E40
PUTS E2EMSG PUTS E2EMSG
JMP :END
:E40 CMP #$40 :E40 CMP #$40
BNE :E42 BNE :E42
PUTS E40MSG PUTS E40MSG
JMP :END
:E42 CMP #$42 :E42 CMP #$42
BNE :E43 BNE :E43
PUTS E42MSG PUTS E42MSG
JMP :END
:E43 CMP #$43 :E43 CMP #$43
BNE :E44 BNE :E44
PUTS E43MSG PUTS E43MSG
JMP :END
:E44 CMP #$44 :E44 CMP #$44
BNE :E45 BNE :E45
PUTS E44MSG PUTS E44MSG
JMP :END
:E45 CMP #$45 :E45 CMP #$45
BNE :E46 BNE :E46
PUTS E45MSG PUTS E45MSG
JMP :END
:E46 CMP #$46 :E46 CMP #$46
BNE :E47 BNE :E47
PUTS E46MSG PUTS E46MSG
JMP :END
:E47 CMP #$47 :E47 CMP #$47
BNE :E48 BNE :E48
PUTS E47MSG PUTS E47MSG
JMP :END
:E48 CMP #$48 :E48 CMP #$48
BNE :E49 BNE :E49
PUTS E48MSG PUTS E48MSG
JMP :END
:E49 CMP #$49 :E49 CMP #$49
BNE :E4A BNE :E4A
PUTS E49MSG PUTS E49MSG
JMP :END
:E4A CMP #$4A :E4A CMP #$4A
BNE :E4B BNE :E4B
PUTS E4AMSG PUTS E4AMSG
JMP :END
:E4B CMP #$4B :E4B CMP #$4B
BNE :E4C BNE :E4C
PUTS E4BMSG PUTS E4BMSG
JMP :END
:E4C CMP #$4C :E4C CMP #$4C
BNE :E4D BNE :E4D
PUTS E4CMSG PUTS E4CMSG
JMP :END
:E4D CMP #$4D :E4D CMP #$4D
BNE :E4E BNE :E4E
PUTS E4DMSG PUTS E4DMSG
JMP :END
:E4E CMP #$4E :E4E CMP #$4E
BNE :E50 BNE :E50
PUTS E4EMSG PUTS E4EMSG
JMP :END
:E50 CMP #$50 :E50 CMP #$50
BNE :E51 BNE :E51
PUTS E50MSG PUTS E50MSG
JMP :END
:E51 CMP #$51 :E51 CMP #$51
BNE :E52 BNE :E52
PUTS E51MSG PUTS E51MSG
JMP :END
:E52 CMP #$52 :E52 CMP #$52
BNE :E53 BNE :E53
PUTS E52MSG PUTS E52MSG
JMP :END
:E53 CMP #$53 :E53 CMP #$53
BNE :E55 BNE :E55
PUTS E53MSG PUTS E53MSG
JMP :END
:E55 CMP #$55 :E55 CMP #$55
BNE :E56 BNE :E56
PUTS E55MSG PUTS E55MSG
JMP :END
:E56 CMP #$56 :E56 CMP #$56
BNE :E57 BNE :E57
PUTS E56MSG PUTS E56MSG
JMP :END
:E57 CMP #$57 :E57 CMP #$57
BNE :E5A BNE :E5A
PUTS E57MSG PUTS E57MSG
JMP :END
:E5A CMP #$5A :E5A CMP #$5A
BNE :E_UNK BNE :E_UNK
PUTS E5AMSG PUTS E5AMSG
JMP :END JMP :END
:E_UNK PUTS E_UNK_MSG :E_UNK PUTS E_UNK_MSG
LDA #":" LDA #":"
JSR COUT JSR COUT