Apple-2-SW
/
A2osX
mirror of https://github.com/A2osX/A2osX.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

fix a typo, save a byte

This commit is contained in:
Peter Ferrie 2021-06-09 15:56:38 -07:00
parent 90ae0b3a54
commit 1304a9a076
2 changed files with 14 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
BIN/MD4.S.txt
View File

@ -77,11 +77,11 @@ CS.RUN ldy #S.PS.ARGC
lda (ZPPtr1),y
beq .99
ldx #OptionVars-OptionList-1
ldy #OptionVars-OptionList-1
.2 cmp OptionList,x
.2 cmp OptionList,y
beq .3
dex
dey
bpl .2
.99 >PUSHW L.MSG.USAGE
@ -91,9 +91,9 @@ CS.RUN ldy #S.PS.ARGC
sec
rts
.3 ldy OptionVars,x
lda #$80
sta 0,y
.3 ldx OptionVars,y
sec
ror 0,x
bra .1
.4 lda Arg
@ -196,7 +196,7 @@ CS.END
LIBCRYPT .AZ "libcrypt"
hLIBCRYPT .BS 1
*--------------------------------------
OptionList .AZ "Dd"
OptionList .AS "Dd"
OptionVars .DA #bText,#bText
*--------------------------------------
MSG.USAGE .AZ "Usage : MD4 [ -d input text | input file ]\r\n"

14
BIN/MD5.S.txt
View File

@ -69,11 +69,11 @@ CS.RUN ldy #S.PS.ARGC
lda (ZPPtr1),y
beq .99
ldx #OptionVars-OptionList-1
ldy #OptionVars-OptionList-1
.2 cmp OptionList,x
.2 cmp OptionList,y
beq .3
dex
dey
bpl .2
.99 >PUSHW L.MSG.USAGE
@ -83,9 +83,9 @@ CS.RUN ldy #S.PS.ARGC
sec
rts
.3 ldy OptionVars,x
lda #$80
sta 0,y
.3 ldx OptionVars,y
sec
ror 0,x
bra .1
.4 lda Arg
@ -181,7 +181,7 @@ CS.QUIT lda hDataBuf
*--------------------------------------
CS.END
*--------------------------------------
OptionList .AZ "Dd"
OptionList .AS "Dd"
OptionVars .DA #bText,#bText
*--------------------------------------
MSG.USAGE .AZ "Usage : MD5 [ -d input text | input file ]\r\n"