diff --git a/.Floppies/A2OSX.BUILD.po b/.Floppies/A2OSX.BUILD.po index 0f5c3be3..37f81a07 100644 Binary files a/.Floppies/A2OSX.BUILD.po and b/.Floppies/A2OSX.BUILD.po differ diff --git a/BIN/USERADD.S.txt b/BIN/USERADD.S.txt index d317d080..c9a3d9ae 100644 --- a/BIN/USERADD.S.txt +++ b/BIN/USERADD.S.txt @@ -106,7 +106,7 @@ CS.RUN >LDYAI S.PW jsr CS.RUN.MkDir * bcs .99 - >LDYA pData + >PUSHW pData >SYSCALL putpw bcs .99 @@ -248,22 +248,29 @@ CS.RUN.CheckArg inc ArgIndex .4 lda ArgUsername bne CS.RUN.CheckArg.9 + lda pData clc adc #S.PW.DIR+11 sta ZPTmpPtr + lda pData+1 adc /S.PW.DIR+11 sta ZPTmpPtr+1 + ldy #0 + .5 lda (ZPStrPtr),y sta (pData),y sta (ZPTmpPtr),y beq .6 + iny cpy #16 bne .5 + bra CS.RUN.CheckArg.9 + .6 lda #'/' sta (ZPTmpPtr),y @@ -274,7 +281,9 @@ CS.RUN.CheckArg inc ArgIndex >SYSCALL GetPWName bcc .9 + bra CS.RUN.CheckArg + .8 lda ArgUsername beq CS.RUN.CheckArg.9 clc diff --git a/SYS/KERNEL.S.PWDX.txt b/SYS/KERNEL.S.PWDX.txt index d80158fe..d6bd5eff 100644 --- a/SYS/KERNEL.S.PWDX.txt +++ b/SYS/KERNEL.S.PWDX.txt @@ -133,7 +133,7 @@ PWDX.PutPW lda PWD.hUsrDB sta CLRWRITEAUX sta (TXTPTR),y sta SETWRITEAUX - + >DEBUG jsr PWD.GetRecordLen clc