Mercurial > hg > Members > kono > nitros9-code
changeset 822:83e3677c8b1f
Made option comparisons lowercase, added more help
author | boisy |
---|---|
date | Mon, 13 Jan 2003 22:05:35 +0000 |
parents | b0b1886efbd0 |
children | 357c62d55b8f |
files | level1/cmds/ngu.asm |
diffstat | 1 files changed, 6 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/level1/cmds/ngu.asm Mon Jan 13 21:47:07 2003 +0000 +++ b/level1/cmds/ngu.asm Mon Jan 13 22:05:35 2003 +0000 @@ -98,6 +98,8 @@ fcb C$LF fcc / -b option 2/ fcb C$LF + fcc / -c=f option 3/ + fcb C$LF fcb C$CR HlpMsgL equ *-HlpMsg ENDC @@ -170,16 +172,16 @@ GetDash lda #C$SPAC get a space char sta -1,x and wipe out the dash from the cmd line GetDash2 ldd ,x+ load option char and char following - anda #$5F make uppercase -IsItA cmpa #'A is it this option? + ora #$20 make lowercase +IsItA cmpa #'a is it this option? bne IsItB branch if not inc <gota lbra FixCmdLn -IsItB cmpa #'B is it this option? +IsItB cmpa #'b is it this option? bne IsItC branch if not inc <gotb bra FixCmdLn -IsItC cmpa #'C is it this option? +IsItC cmpa #'c is it this option? bne BadOpt branch if not tst <coptflg was this option already specified? bne BadOpt show help if so