diff --git a/.Floppies/A2OSX.BUILD.po b/.Floppies/A2OSX.BUILD.po index 7d2ae7db..04644aef 100644 Binary files a/.Floppies/A2OSX.BUILD.po and b/.Floppies/A2OSX.BUILD.po differ diff --git a/.Floppies/A2OSX.SRC.po b/.Floppies/A2OSX.SRC.po index cda5e108..3723f6b7 100644 Binary files a/.Floppies/A2OSX.SRC.po and b/.Floppies/A2OSX.SRC.po differ diff --git a/BIN/ARP.S.txt b/BIN/ARP.S.txt index 46c0b569..4e1c1419 100644 --- a/BIN/ARP.S.txt +++ b/BIN/ARP.S.txt @@ -110,7 +110,7 @@ CS.RUN.QUERY jsr Init.Timeout bpl .4 >LDYA L.MSG2 - >SYSCALL PrintF.YA + >SYSCALL printf .8 lda #0 @@ -145,7 +145,7 @@ CS.RUN.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.ARP.GETCACHE >STYA ZPPTR1 >LDYA L.MSG0 - >SYSCALL PrintF.YA + >SYSCALL printf ldx #K.ARPCACHE.SIZE @@ -173,7 +173,7 @@ CS.RUN.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.ARP.GETCACHE >LDYA L.MSG1 phx - >SYSCALL PrintF.YA + >SYSCALL printf plx .4 lda ZPPTR1 diff --git a/BIN/ASM.S.OUT.txt b/BIN/ASM.S.OUT.txt index b16d999f..ef61ca80 100644 --- a/BIN/ASM.S.OUT.txt +++ b/BIN/ASM.S.OUT.txt @@ -39,7 +39,7 @@ OUT.PrintLineErr .1 >PUSHB.G DIR.Byte >LDYA L.MSG.ERROR - >SYSCALL PrintF.YA + >SYSCALL printf ldx ZPLinePtr cpx ZPLineBuf @@ -140,7 +140,7 @@ OUT.PrintLineOutBuf tax ldy L.MSG.OUT0,x lda L.MSG.OUT0+1,x - >SYSCALL PrintF.YA + >SYSCALL printf rts OUT.PrintLineAcc @@ -160,10 +160,10 @@ OUT.PrintLineAcc .2 ldy L.MSG.EQU0,x lda L.MSG.EQU0+1,x - >SYSCALL PrintF.YA + >SYSCALL printf rts *--------------------------------------- -OUT.Print >SYSCALL PrintF.YA +OUT.Print >SYSCALL printf bra OUT.Print1 OUT.PrintCR lda #13 diff --git a/BIN/ASM.S.SRC.txt b/BIN/ASM.S.SRC.txt index 086e108a..6eba3c31 100644 --- a/BIN/ASM.S.SRC.txt +++ b/BIN/ASM.S.SRC.txt @@ -392,7 +392,7 @@ SRC.ParseLine.AMCheck * jsr OUT.PrintLine.1 * >PUSHW L.SRC.AM.StrBuf * >LDYA L.MSG.PSTRCRLF -* >SYSCALL PrintF.YA +* >SYSCALL printf * >DEBUG lda SRC.AM.StrBuf beq SRC.ParseLine.OPAMCheckFF diff --git a/BIN/ASM.S.SYM.txt b/BIN/ASM.S.SYM.txt index 514a03da..8a8b0aed 100644 --- a/BIN/ASM.S.SYM.txt +++ b/BIN/ASM.S.SYM.txt @@ -78,7 +78,7 @@ SYM.Dump stz ZPLinePtr bpl .1 >LDYA L.MSG.SYMBOLS - >SYSCALL PrintF.YA + >SYSCALL printf .1 >PUSHB.G SYM.hGlobalList >PUSHW ZPLinePtr @@ -116,12 +116,12 @@ SYM.Dump stz ZPLinePtr .3 ldy L.MSG.EQU0,x lda L.MSG.EQU0+1,x - >SYSCALL PrintF.YA + >SYSCALL printf >PUSHW ZPNameBuf Label (PString) >LDYA L.MSG.PSTR - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 ldy #SYMG.SIZE @@ -146,12 +146,12 @@ SYM.Dump stz ZPLinePtr >PUSHA phy >LDYA L.MSG.LSYMBOL - >SYSCALL PrintF.YA + >SYSCALL printf ply bne .4 .7 >LDYA L.MSG.CRLF - >SYSCALL PrintF.YA + >SYSCALL printf jmp .1 rts diff --git a/BIN/ASM.S.txt b/BIN/ASM.S.txt index fa9f0ca7..e0c4f694 100644 --- a/BIN/ASM.S.txt +++ b/BIN/ASM.S.txt @@ -239,7 +239,7 @@ CS.INIT ldy #S.PS.ARGC rts .99 >LDYA L.MSG.HELP - >SYSCALL PrintF.YA + >SYSCALL printf lda #ERR.INV.ARGS sec .9 rts diff --git a/BIN/ATBROWSE.S.txt b/BIN/ATBROWSE.S.txt index 6608abf6..cc24fe31 100644 --- a/BIN/ATBROWSE.S.txt +++ b/BIN/ATBROWSE.S.txt @@ -53,7 +53,7 @@ CS.RUN >STZ.G P.GetInfo Sync pha >LDYA L.MSG.NOATK - >SYSCALL PrintF.YA + >SYSCALL printf pla sec .99 rts @@ -62,7 +62,7 @@ CS.RUN >STZ.G P.GetInfo Sync >PUSHA >PUSHW.G P.GetInfo+$8 NET >LDYA L.MSG.NETNODE - >SYSCALL PrintF.YA + >SYSCALL printf >STZ.G P.LookupName Sync lda #ATLookupName @@ -98,7 +98,7 @@ CS.RUN >STZ.G P.GetInfo Sync beq .8 >LDYA L.MSG.DUMP0 - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 .1 lda ZPPTR1 @@ -118,7 +118,7 @@ CS.RUN >STZ.G P.GetInfo Sync bpl .2 >LDYA L.MSG.DUMP - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 lda ZPPTR2 diff --git a/BIN/ATLOGON.S.txt b/BIN/ATLOGON.S.txt index 8435a1c2..5311a460 100644 --- a/BIN/ATLOGON.S.txt +++ b/BIN/ATLOGON.S.txt @@ -47,7 +47,7 @@ CS.RUN stz K.MLI.PARAMS Sync pha >LDYA L.MSG.NOATK - >SYSCALL PrintF.YA + >SYSCALL printf pla sec .99 rts diff --git a/BIN/CAT.S.txt b/BIN/CAT.S.txt index 2699fe90..6dc6b3b4 100644 --- a/BIN/CAT.S.txt +++ b/BIN/CAT.S.txt @@ -60,7 +60,7 @@ CS.INIT bne .2 .99 >LDYA L.MSG.USAGE - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts @@ -213,7 +213,7 @@ CS.RUN.PRINT sty BytesRead Y,A = Bytes read .3 >PUSHW ZPPtr1 >LDYA L.MSG.CTRLCHAR - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 bra .7 @@ -242,7 +242,7 @@ CS.RUN.PRINTNUM clc >PUSHYA >LDYA L.MSG.LINENUM - >SYSCALL PrintF.YA + >SYSCALL printf .8 rts *-------------------------------------- CS.RUN.OPEN >SYSCALL RealPath.YA diff --git a/BIN/CHTYP.S.txt b/BIN/CHTYP.S.txt index da2f73b7..b99ccb02 100644 --- a/BIN/CHTYP.S.txt +++ b/BIN/CHTYP.S.txt @@ -66,7 +66,7 @@ CS.INIT bne .2 .99 >LDYA L.MSG.USAGE - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts @@ -181,7 +181,7 @@ CS.RUN.FILE jsr CS.RUN.GetFilePath >PUSHW ZPFullPath >LDYA L.MSG.FILE - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 ldy #HexFileType @@ -208,7 +208,7 @@ CS.RUN.FILE jsr CS.RUN.GetFilePath *-------------------------------------- CS.RUN.CheckErr bcs .1 >LDYA L.MSG.OK - >SYSCALL PrintF.YA + >SYSCALL printf rts .1 pha @@ -220,7 +220,7 @@ CS.RUN.CheckErr bcs .1 >PUSHA >LDYA L.MSG.ERR - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 rts diff --git a/BIN/DNSINFO.S.txt b/BIN/DNSINFO.S.txt index d172137c..f08adf01 100644 --- a/BIN/DNSINFO.S.txt +++ b/BIN/DNSINFO.S.txt @@ -86,7 +86,7 @@ CS.RUN.ADD cmp #2 CS.RUN.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.DNS.GetCache >STYA ZPPTR1 >LDYA L.MSG0 - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.DNSCACHE.SIZE >STA.G EntryCount @@ -121,7 +121,7 @@ CS.RUN.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.DNS.GetCache >PUSHB (ZPPTR1) Entry Status >LDYA L.MSG1 - >SYSCALL PrintF.YA + >SYSCALL printf .2 lda ZPPTR1 clc diff --git a/BIN/EDIT.S.CTRL.txt b/BIN/EDIT.S.CTRL.txt index 38fd5ed2..63d38222 100644 --- a/BIN/EDIT.S.CTRL.txt +++ b/BIN/EDIT.S.CTRL.txt @@ -51,7 +51,7 @@ Ctrl.A ldy #PromptMode >PUSHW ZPPTR1 >LDYA L.MSG.HELPLINE - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 inc .1+1 diff --git a/BIN/EDIT.S.SCRN.txt b/BIN/EDIT.S.SCRN.txt index b97505b3..b6154d8e 100644 --- a/BIN/EDIT.S.SCRN.txt +++ b/BIN/EDIT.S.SCRN.txt @@ -9,7 +9,7 @@ SCRN.Init ldy #ScreenH >PUSHA >LDYA L.SEQ.INIT - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 lda #12 >SYSCALL PutChar.A @@ -56,7 +56,7 @@ SCRN.UpdateTopBar .2 >PUSHYA >LDYA L.MSG.TOPBAR - >SYSCALL PrintF.YA + >SYSCALL printf .9 rts *-------------------------------------- @@ -98,7 +98,7 @@ SCRN.UpdateMain ldy #ScreenY bcs .9 >LDYA L.SEQ.CEOL - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 inc TmpByte @@ -175,7 +175,7 @@ SCRN.UpdateLineAtALenY bcs .9 >LDYA L.SEQ.CEOL - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 rts .9 jmp Ctrl.Q @@ -188,7 +188,7 @@ SCRN.UpdateAttrC bpl .8 >LDYA L.SEQ.NORM - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 stz bSelected rts @@ -197,7 +197,7 @@ SCRN.UpdateAttrC bmi .8 >LDYA L.SEQ.INV - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 lda #$ff sta bSelected @@ -214,11 +214,11 @@ SCRN.UpdateStatusBar >PUSHA >LDYA L.MSG.GOTOXY - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 >LDYA L.SEQ.INV - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 ldy #PromptMode @@ -248,7 +248,7 @@ SCRN.UpdateStatusBar >PUSHB (pData),y >LDYA L.MSG.STATUSBAR - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 lda #58 @@ -256,7 +256,7 @@ SCRN.UpdateStatusBar bcs .9 >LDYA L.SEQ.NORM - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 jmp SCRN.GotoCurXCurY @@ -276,7 +276,7 @@ SCRN.UpdateStatusBar tax >LDYA L.MSG.STATUSBAR,x - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 rts *-------------------------------------- @@ -291,7 +291,7 @@ SCRN.UpdateStatusBarErrA .1 lda #$ff >PUSHA >LDYA L.MSG.STATUSBAR.E - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 rts .9 jmp Ctrl.Q @@ -320,11 +320,11 @@ SCRN.InvLineA sta .2+1 lda .2+1 >PUSHA >LDYA L.MSG.GOTOXY - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 >LDYA L.SEQ.INV - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 ldy #ScreenW @@ -345,7 +345,7 @@ SCRN.InvLineA sta .2+1 .2 lda #$ff >PUSHA >LDYA L.MSG.GOTOXY - >SYSCALL PrintF.YA + >SYSCALL printf .9 rts *-------------------------------------- @@ -366,7 +366,7 @@ GotoXY txa >PUSHA >LDYA L.MSG.GOTOXY - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 rts .9 jmp Ctrl.Q @@ -510,7 +510,7 @@ SCRN.scrollUp ldy #CurX >PUSHA >LDYA L.SEQ.SCROLLUP - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 ldy #ScreenY+1 @@ -545,7 +545,7 @@ SCRN.scrollDn ldy #CurX >PUSHA >LDYA L.SEQ.SCROLLDN - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 ldy #ScreenY+1 diff --git a/BIN/EDIT.S.txt b/BIN/EDIT.S.txt index 27dbc100..e3465423 100644 --- a/BIN/EDIT.S.txt +++ b/BIN/EDIT.S.txt @@ -131,7 +131,7 @@ CS.INIT lda #$ff .9 rts *-------------------------------------- CS.RUN >LDYA L.SEQ.DETECT - >SYSCALL PrintF.YA Send Query for term W & H + >SYSCALL printf Send Query for term W & H bcs .9 .1 >SLEEP @@ -187,7 +187,7 @@ CS.QUIT ldy #hBuffer >SYSCALL FreeMem.A .8 >LDYA L.SEQ.RESET - >SYSCALL PrintF.YA + >SYSCALL printf .9 rts *-------------------------------------- CharIn tax diff --git a/BIN/FORMAT.S.txt b/BIN/FORMAT.S.txt index ee968a3e..fdc69057 100644 --- a/BIN/FORMAT.S.txt +++ b/BIN/FORMAT.S.txt @@ -117,7 +117,7 @@ CS.INIT ldy #S.PS.ARGC rts .99 >LDYA L.MSG.USAGE - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts @@ -132,7 +132,7 @@ CS.RUN jsr CS.RUN.InitCat bcs .9 >LDYA L.MSG.OK - >SYSCALL PrintF.YA + >SYSCALL printf lda #0 sec rts @@ -140,7 +140,7 @@ CS.RUN jsr CS.RUN.InitCat .9 pha >PUSHA >LDYA L.MSG.ERR - >SYSCALL PrintF.YA + >SYSCALL printf pla sec rts @@ -229,7 +229,7 @@ CS.RUN.BuildCat >LDA.G hDev >PUSHW ZPPtr2 >LDYA L.MSG.INIT - >SYSCALL PrintF.YA + >SYSCALL printf .99 bcs .9 jsr .7 diff --git a/BIN/IPCONFIG.S.txt b/BIN/IPCONFIG.S.txt index dafb14ad..4541f5d6 100644 --- a/BIN/IPCONFIG.S.txt +++ b/BIN/IPCONFIG.S.txt @@ -65,7 +65,7 @@ CS.INIT >LDYA L.LIBTCPIP .9 rts *-------------------------------------- CS.RUN >LDYA L.MSG0 - >SYSCALL PrintF.YA + >SYSCALL printf >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG >STYA ZPIPCfgPtr @@ -75,7 +75,7 @@ CS.RUN >LDYA L.MSG0 bne CS.RUN.DUMPDEV >LDYA L.MSG0.NL - >SYSCALL PrintF.YA + >SYSCALL printf jmp CS.RUN.DONE CS.RUN.DUMPDEV >STA.G DevID @@ -87,7 +87,7 @@ CS.RUN.DUMPDEV >STA.G DevID >STYA ZPDevStatPtr >LDYA L.MSG0.L - >SYSCALL PrintF.YA + >SYSCALL printf ldy #S.DSTAT.NIC.MAC+5 @@ -116,7 +116,7 @@ CS.RUN.DUMPDEV >STA.G DevID >PUSHB.G DevID >LDYA L.MSG1.DEV - >SYSCALL PrintF.YA + >SYSCALL printf ldy #S.DSTAT.NIC.FLAGS lda (ZPDevStatPtr),y @@ -125,7 +125,7 @@ CS.RUN.DUMPDEV >STA.G DevID lda #1 .2 >PUSHA >LDYA L.MSG1.DEV.ARP - >SYSCALL PrintF.YA + >SYSCALL printf ldy #S.DSTAT.NIC.FLAGS lda (ZPDevStatPtr),y @@ -134,7 +134,7 @@ CS.RUN.DUMPDEV >STA.G DevID lda #1 .3 >PUSHA >LDYA L.MSG1.DEV.IP - >SYSCALL PrintF.YA + >SYSCALL printf ldy #S.DSTAT.NIC.STATUS lda (ZPDevStatPtr),y @@ -142,15 +142,15 @@ CS.RUN.DUMPDEV >STA.G DevID bne CS.RUN.LINK >PUSHW L.MSG1.LINK.KO >LDYA L.MSG1.LINK - >SYSCALL PrintF.YA + >SYSCALL printf bra CS.RUN.DUMPIP CS.RUN.LINK >PUSHW L.MSG1.LINK.OK >LDYA L.MSG1.LINK - >SYSCALL PrintF.YA + >SYSCALL printf >LDYA L.MSG1.LINKSPEED - >SYSCALL PrintF.YA + >SYSCALL printf ldy #S.DSTAT.NIC.STATUS lda (ZPDevStatPtr),y @@ -171,10 +171,10 @@ CS.RUN.LINK >PUSHW L.MSG1.LINK.OK >LDYA L.MSG1.DPLX.HD bra .6 .5 >LDYA L.MSG1.DPLX.FD -.6 >SYSCALL PrintF.YA +.6 >SYSCALL printf CS.RUN.DUMPIP >LDYA L.MSG2 - >SYSCALL PrintF.YA + >SYSCALL printf lda (ZPIPCfgPtr) and #S.IPCFG.STATUS.OK beq .11 @@ -182,7 +182,7 @@ CS.RUN.DUMPIP >LDYA L.MSG2 bra .10 .11 >LDYA L.MSG2.U -.10 >SYSCALL PrintF.YA +.10 >SYSCALL printf ldy #S.IPCFG.DHCPSRVR+3 ldx #4 @@ -191,7 +191,7 @@ CS.RUN.DUMPIP >LDYA L.MSG2 dex bne .2 >LDYA L.MSG2.DHCPSRVR - >SYSCALL PrintF.YA + >SYSCALL printf ldy #S.IPCFG.IP+7 IP/MASK ldx #8 @@ -200,7 +200,7 @@ CS.RUN.DUMPIP >LDYA L.MSG2 dex bne .3 >LDYA L.MSG2.IP - >SYSCALL PrintF.YA + >SYSCALL printf ldy #S.IPCFG.GW+3 ldx #4 @@ -209,7 +209,7 @@ CS.RUN.DUMPIP >LDYA L.MSG2 dex bne .4 >LDYA L.MSG2.GW - >SYSCALL PrintF.YA + >SYSCALL printf ldy #S.IPCFG.DNS1+7 ldx #8 @@ -218,7 +218,7 @@ CS.RUN.DUMPIP >LDYA L.MSG2 dex bne .5 >LDYA L.MSG2.DNS - >SYSCALL PrintF.YA + >SYSCALL printf lda ZPIPCfgPtr clc @@ -237,7 +237,7 @@ CS.RUN.DUMPIP >LDYA L.MSG2 >PUSHYA >LDYA L.MSG2.HOSTNAME - >SYSCALL PrintF.YA + >SYSCALL printf CS.RUN.DONE lda #0 tell TSKMGR that all done ok, but sec we do not want to stay in memory diff --git a/BIN/LS.S.txt b/BIN/LS.S.txt index a0257dc7..16c0fccb 100644 --- a/BIN/LS.S.txt +++ b/BIN/LS.S.txt @@ -182,7 +182,7 @@ CS.RUN.DEV ldy #bLong >PUSHW ZPFileName >LDYA L.MSG.DEVEXT - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 ldy #bRecurse @@ -211,7 +211,7 @@ CS.RUN.DIR >LDA.G bAllmostAll >PUSHW ZPFileName >LDYA L.MSG.DIR - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 ldy #0 @@ -241,7 +241,7 @@ CS.RUN.DIR >LDA.G bAllmostAll >PUSHW ZPFileName >LDYA L.MSG.DIREXT - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 .5 ldy #bRecurse @@ -271,7 +271,7 @@ CS.RUN.FILE ldy #bLong >PUSHW ZPFileName >LDYA L.MSG.FILE - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 jsr CS.RUN.UpdateColCnt @@ -311,7 +311,7 @@ CS.RUN.FILE ldy #bLong >PUSHW ZPFileName >LDYA L.MSG.FILEEXT - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 jsr GetNextEntry @@ -402,7 +402,7 @@ CS.RUN.ENTER.MSG >SYSCALL GetMemPtr.A >PUSHYA >LDYA L.MSG.ENTER - >SYSCALL PrintF.YA + >SYSCALL printf rts *-------------------------------------- CS.DOEVENT sec diff --git a/BIN/LSDEV.S.txt b/BIN/LSDEV.S.txt index c4ebf31c..1c2f5059 100644 --- a/BIN/LSDEV.S.txt +++ b/BIN/LSDEV.S.txt @@ -43,7 +43,7 @@ CS.INIT clc rts *-------------------------------------- CS.RUN >LDYA L.MSG0 - >SYSCALL PrintF.YA + >SYSCALL printf >LDA.G DEV.ID @@ -125,7 +125,7 @@ DumpHeader ldy #S.DEV.DRV.JMP+1 >PUSHA >LDYA L.MSG1 - >SYSCALL PrintF.YA + >SYSCALL printf rts *-------------------------------------- DumpStatus >LDA.G DEV.S @@ -172,7 +172,7 @@ DumpStatus >LDA.G DEV.S bra .3 .2 >LDYA L.MSG2.C -.3 >SYSCALL PrintF.YA +.3 >SYSCALL printf rts *-------------------------------------- CS.EVENT sec diff --git a/BIN/MD5.S.txt b/BIN/MD5.S.txt index 056dd874..382040a0 100644 --- a/BIN/MD5.S.txt +++ b/BIN/MD5.S.txt @@ -69,7 +69,7 @@ CS.INIT ldy #S.PS.ARGC bne .2 .99 >LDYA L.MSG.USAGE - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts @@ -111,7 +111,7 @@ CS.RUN.TEXT >LDA.G Arg bcs .9 >LEA.G MD5Buf - >SYSCALL PrintF.YA + >SYSCALL printf lda #13 >SYSCALL PutChar.A @@ -177,7 +177,7 @@ CS.RUN.FILE >LDA.G Arg >LIBCALL hLIBCRYPT,LIBCRYPT.MD5Finalize >LEA.G MD5Buf - >SYSCALL PrintF.YA + >SYSCALL printf lda #13 >SYSCALL PutChar.A diff --git a/BIN/MEM.S.txt b/BIN/MEM.S.txt index 1cd352d1..c5e560af 100644 --- a/BIN/MEM.S.txt +++ b/BIN/MEM.S.txt @@ -49,7 +49,7 @@ CS.RUN >LDYA L.MemStat >SYSCALL GetMemStat.YA >LDYA L.MSG.Main - >SYSCALL PrintF.YA + >SYSCALL printf lda MemStat+S.MSTAT.MF sec @@ -64,10 +64,10 @@ CS.RUN >LDYA L.MemStat >PUSHW MemStat+S.MSTAT.ML >LDYA L.MSG.Stat - >SYSCALL PrintF.YA + >SYSCALL printf *-------------------------------------- >LDYA L.MSG.Aux - >SYSCALL PrintF.YA + >SYSCALL printf lda MemStat+S.MSTAT.XF sec @@ -82,10 +82,10 @@ CS.RUN >LDYA L.MemStat >PUSHW MemStat+S.MSTAT.XL >LDYA L.MSG.Stat - >SYSCALL PrintF.YA + >SYSCALL printf *-------------------------------------- >LDYA L.MSG.Kernel - >SYSCALL PrintF.YA + >SYSCALL printf lda MemStat+S.MSTAT.DH sec @@ -100,10 +100,10 @@ CS.RUN >LDYA L.MemStat >PUSHW MemStat+S.MSTAT.DL >LDYA L.MSG.Stat - >SYSCALL PrintF.YA + >SYSCALL printf >LDYA L.MSG.End - >SYSCALL PrintF.YA + >SYSCALL printf lda #0 sec rts diff --git a/BIN/MEMDUMP.S.txt b/BIN/MEMDUMP.S.txt index 466532fa..c9c0f8df 100644 --- a/BIN/MEMDUMP.S.txt +++ b/BIN/MEMDUMP.S.txt @@ -90,7 +90,7 @@ CS.RUN >SYSCALL GetChar bne .1 >LDYA L.MSG0 - >SYSCALL PrintF.YA + >SYSCALL printf .1 >LDA.G MEM.COUNT >SYSCALL GetMemByID.A @@ -133,22 +133,22 @@ CS.RUN >SYSCALL GetChar ldy #USED.COUNT >PUSHB (pData),y >LDYA L.MSG2 - >SYSCALL PrintF.YA + >SYSCALL printf >LDYA.G MemStat+S.MSTAT.MH >PUSHYA >LDYA L.MSG3 - >SYSCALL PrintF.YA + >SYSCALL printf >LDYA.G MemStat+S.MSTAT.MF >PUSHYA >LDYA L.MSG4 - >SYSCALL PrintF.YA + >SYSCALL printf >LDYA.G MemStat+S.MSTAT.ML >PUSHYA >LDYA L.MSG5 - >SYSCALL PrintF.YA + >SYSCALL printf sec >LDA.G MemStat+S.MSTAT.MF @@ -160,7 +160,7 @@ CS.RUN >SYSCALL GetChar >PUSHYA >LDYA L.MSG.FREE - >SYSCALL PrintF.YA + >SYSCALL printf sec rts *-------------------------------------- @@ -217,10 +217,10 @@ CS.RUN.PRINTMEM ldy #S.MEM.LEN+1 bcc .12 >LDYA L.MSG1.INV - >SYSCALL PrintF.YA + >SYSCALL printf .12 >LDYA L.MSG1 - >SYSCALL PrintF.YA + >SYSCALL printf ldy #S.MEM.BIN lda (ZPPTR1),y @@ -265,7 +265,7 @@ CS.RUN.PRINTMEM ldy #S.MEM.LEN+1 >PUSHYA >LDYA L.MSG1.BIN -.8 >SYSCALL PrintF.YA +.8 >SYSCALL printf >INC.G LINE.COUNT cmp #PAGELEN diff --git a/BIN/NETSTAT.S.txt b/BIN/NETSTAT.S.txt index 7e1cab36..c818d22c 100644 --- a/BIN/NETSTAT.S.txt +++ b/BIN/NETSTAT.S.txt @@ -60,7 +60,7 @@ CS.INIT >LDYA L.LIBTCPIP .9 rts *-------------------------------------- CS.RUN >LDYA L.MSG0 - >SYSCALL PrintF.YA + >SYSCALL printf >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.GETTABLE >STYA ZPPTR1 @@ -99,7 +99,7 @@ CS.RUN >LDYA L.MSG0 >PUSHB L.MSG1+1,x >PUSHB L.MSG1,x >LDYA L.MSG1 - >SYSCALL PrintF.YA + >SYSCALL printf .7 lda ZPPTR1 clc diff --git a/BIN/NFSMOUNT.S.txt b/BIN/NFSMOUNT.S.txt index 8eaf405b..11f9d2dd 100644 --- a/BIN/NFSMOUNT.S.txt +++ b/BIN/NFSMOUNT.S.txt @@ -64,7 +64,7 @@ CS.INIT >SYSCALL GetArgC rts .99 >LDYA L.MSG.USAGE - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts diff --git a/BIN/NSCUTIL.S.txt b/BIN/NSCUTIL.S.txt index 8f48779a..3e36f0d8 100644 --- a/BIN/NSCUTIL.S.txt +++ b/BIN/NSCUTIL.S.txt @@ -58,7 +58,7 @@ CS.RUN.READ jsr NSC.Init bpl .1 >LDYA L.MSG.READ.KO - >SYSCALL PrintF.YA + >SYSCALL printf lda #MLI.E.NODEV sec @@ -67,7 +67,7 @@ CS.RUN.READ jsr NSC.Init .8 jsr NSC.Dump >LDYA L.MSG.USAGE - >SYSCALL PrintF.YA + >SYSCALL printf lda #0 tell TSKMGR that all done ok, but sec we do not want to stay in memory @@ -276,16 +276,16 @@ NSC.Dump ldx #1 >PUSHA >LDYA L.MSG.READ.OK1 - >SYSCALL PrintF.YA + >SYSCALL printf >LDYA L.MSG.READ.OK2.24 bit DS1216E.DATA+4 bpl .3 >LDYA L.MSG.READ.OK2.12 -.3 >SYSCALL PrintF.YA +.3 >SYSCALL printf >LDYA L.MSG.READ.OK3 - >SYSCALL PrintF.YA + >SYSCALL printf lda DS1216E.DATA+2 jsr PrintBCD @@ -299,7 +299,7 @@ NSC.Dump ldx #1 jsr PrintBCD >LDYA L.MSG.READ.OK4 - >SYSCALL PrintF.YA + >SYSCALL printf lda DS1216E.DATA+4 bpl .4 diff --git a/BIN/PING.S.txt b/BIN/PING.S.txt index bc30760c..eddd53fc 100644 --- a/BIN/PING.S.txt +++ b/BIN/PING.S.txt @@ -66,7 +66,7 @@ CS.RUN >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG is TCPIP loaded ? bmi CS.RUN.IPOK >LDYA L.MSG.IPKO - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts @@ -95,7 +95,7 @@ CS.RUN.IPOK ldy #S.PS.ARGC bra .99 .9 >LDYA L.MSG.USAGE -.99 >SYSCALL PrintF.YA +.99 >SYSCALL printf lda #K.E.SYN sec rts @@ -115,7 +115,7 @@ CS.RUN.HOSTOK lda #1 bpl .1 >LDYA L.MSG.HOSTOK - >SYSCALL PrintF.YA + >SYSCALL printf CS.RUN.OPENSKT ldx #3 ldy #S.IPCFG.IP+3 @@ -140,7 +140,7 @@ CS.RUN.OPENSKT ldx #3 bcc .2 >LDYA L.MSG.SKTKO - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts @@ -246,7 +246,7 @@ CS.Print.UNREACH dey >PUSHB (pData),y DST.IP >LDYA L.MSG.UNREACH - >SYSCALL PrintF.YA + >SYSCALL printf rts *-------------------------------------- CS.Print.REPLY lda #TIMEOUT.MAX @@ -288,7 +288,7 @@ CS.Print.REPLY lda #TIMEOUT.MAX >PUSHB (ZPFrameBase),y >LDYA L.MSG.REPLY - >SYSCALL PrintF.YA + >SYSCALL printf rts *-------------------------------------- CS.QUIT ldy #hFrame diff --git a/BIN/PS.S.txt b/BIN/PS.S.txt index ac56a1a5..0b58d241 100644 --- a/BIN/PS.S.txt +++ b/BIN/PS.S.txt @@ -43,12 +43,12 @@ CS.RUN >LDYA pData >SYSCALL GetPSStat.YA >LDYA L.MSG0 - >SYSCALL PrintF.YA + >SYSCALL printf >PUSHB.G PS.KCPU >LDYA L.MSGK - >SYSCALL PrintF.YA + >SYSCALL printf >LDA.G PS.Count beq .8 @@ -90,7 +90,7 @@ CS.RUN >LDYA pData lda (ZPPtr),y >PUSHA >LDYA L.MSG1 - >SYSCALL PrintF.YA + >SYSCALL printf .7 >DEC.G PS.COUNT bne .1 diff --git a/BIN/RPCDUMP.S.txt b/BIN/RPCDUMP.S.txt index ab4078e4..24e57989 100644 --- a/BIN/RPCDUMP.S.txt +++ b/BIN/RPCDUMP.S.txt @@ -73,7 +73,7 @@ CS.INIT ldy #S.PS.ARGC rts .99 >LDYA L.MSG.USAGE - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts @@ -95,7 +95,7 @@ CS.RUN jsr Init.Timeout >SYSCALL GetArg.A >PUSHYA >LDYA L.MSG.UNKNOWN - >SYSCALL PrintF.YA + >SYSCALL printf sec rts @@ -157,7 +157,7 @@ CS.RUN jsr Init.Timeout >SYSCALL GetArg.A >PUSHYA >LDYA L.MSG.TIMEOUT - >SYSCALL PrintF.YA + >SYSCALL printf sec rts *-------------------------------------- @@ -206,7 +206,7 @@ DumpRPCFrame lda #S.UDP+24 sta ZPFrameBase+1 >LDYA L.MSG.DUMP0 - >SYSCALL PrintF.YA + >SYSCALL printf .1 ldy #3 lda (ZPFrameBase),y Value follows? @@ -230,7 +230,7 @@ DumpRPCFrame lda #S.UDP+24 bne .7 >LDYA L.MSG.DUMP1 - >SYSCALL PrintF.YA + >SYSCALL printf lda #20 clc diff --git a/BIN/X.CPMVRM.S.txt b/BIN/X.CPMVRM.S.txt index 28a10487..9162016b 100644 --- a/BIN/X.CPMVRM.S.txt +++ b/BIN/X.CPMVRM.S.txt @@ -71,7 +71,7 @@ CS.INIT bne .2 .99 >LDYA L.MSG.USAGE - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts @@ -312,7 +312,7 @@ CS.RUN.LEAVE jsr LeaveSubDir exit this sub dir.... dey >PUSHB (pData),y >LDYA L.MSG.DONE - >SYSCALL PrintF.YA + >SYSCALL printf .91 ldy #RC lda (pData),y get global RC in case of bContinue @@ -498,7 +498,7 @@ CS.RUN.FILE.MSG clc >LDYA L.MSG.DIR bcs .2 .1 >LDYA L.MSG.FILE -.2 >SYSCALL PrintF.YA +.2 >SYSCALL printf rts .8 clc @@ -517,7 +517,7 @@ CS.RUN.OVERWRITE.MSG jsr CS.RUN.GetPathY >PUSHYA >LDYA L.MSG.OVERWRITE - >SYSCALL PrintF.YA + >SYSCALL printf rts CS.RUN.OVERWRITE.KEY @@ -689,7 +689,7 @@ CS.RUN.CheckErr bcs .1 bmi .8 >LDYA L.MSG.OK - >SYSCALL PrintF.YA + >SYSCALL printf rts .1 ldy #RC @@ -704,7 +704,7 @@ CS.RUN.CheckErr bcs .1 >PUSHA >LDYA L.MSG.ERR - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 rts diff --git a/BMP2PIX.S.txt b/BMP2PIX.S.txt index 2e35d52b..35b75b7e 100644 --- a/BMP2PIX.S.txt +++ b/BMP2PIX.S.txt @@ -68,7 +68,7 @@ CS.INIT bne .2 .99 >LDYA L.MSG.USAGE - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts @@ -121,7 +121,7 @@ CS.INIT.OPENINPUT >STYA ZPInputBufPtr >LDYA L.MSG.FILE.OK - >SYSCALL PrintF.YA + >SYSCALL printf lda (ZPInputBufPtr) cmp #'B' @@ -170,12 +170,12 @@ CS.INIT.OPENINPUT >PUSHA >LDYA L.MSG.HEADER.OK - >SYSCALL PrintF.YA + >SYSCALL printf clc rts .99 >LDYA L.MSG.HEADER.KO - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.IBIN sec rts @@ -300,7 +300,7 @@ CS.RUN.LOOP inc ZPLineCount .8 >LDYA L.MSG.DONE - >SYSCALL PrintF.YA + >SYSCALL printf lda #0 sec diff --git a/DRV/CONSOLE.DRV.S.txt b/DRV/CONSOLE.DRV.S.txt index 73b80ebd..3e87caf6 100644 --- a/DRV/CONSOLE.DRV.S.txt +++ b/DRV/CONSOLE.DRV.S.txt @@ -37,7 +37,7 @@ L.MSG.DETECT .DA MSG.DETECT .DA 0 End Of Reloc Table *-------------------------------------- Dev.Detect >LDYA L.MSG.DETECT - >SYSCALL PrintF.YA + >SYSCALL printf clc rts diff --git a/DRV/DHGR.DRV.S.txt b/DRV/DHGR.DRV.S.txt index 4e12661f..5d52dd02 100644 --- a/DRV/DHGR.DRV.S.txt +++ b/DRV/DHGR.DRV.S.txt @@ -63,7 +63,7 @@ L.MSG.DETECT.80C .DA MSG.DETECT.80C .DA 0 End Of Reloc Table *-------------------------------------- Dev.Detect >LDYA L.MSG.DETECT - >SYSCALL PrintF.YA + >SYSCALL printf lda MACHID and #MACHID.T @@ -120,7 +120,7 @@ Dev.Detect >LDYA L.MSG.DETECT >LDYA L.MSG.DETECT.80C -.3 >SYSCALL PrintF.YA +.3 >SYSCALL printf clc rts *-------------------------------------- diff --git a/DRV/LANCEGS.DRV.S.txt b/DRV/LANCEGS.DRV.S.txt index a1f448dd..9094c54f 100644 --- a/DRV/LANCEGS.DRV.S.txt +++ b/DRV/LANCEGS.DRV.S.txt @@ -39,7 +39,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME *-------------------------------------- Dev.Detect >STYA Args >LDYA L.MSG.DETECT - >SYSCALL PrintF.YA + >SYSCALL printf ldx #$70 ldy #7 @@ -60,7 +60,7 @@ Dev.Detect >STYA Args bne .1 >LDYA L.MSG.DETECT.KO - >SYSCALL PrintF.YA + >SYSCALL printf lda #MLI.E.NODEV sec @@ -88,7 +88,7 @@ Dev.Detect >STYA Args .4 >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL PrintF.YA + >SYSCALL printf clc rts *-------------------------------------- diff --git a/DRV/MOUSE.DRV.S.txt b/DRV/MOUSE.DRV.S.txt index 08ecb6d7..93085505 100644 --- a/DRV/MOUSE.DRV.S.txt +++ b/DRV/MOUSE.DRV.S.txt @@ -35,7 +35,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME .DA 0 End Of Reloc Table *-------------------------------------- Dev.Detect >LDYA L.MSG.DETECT - >SYSCALL PrintF.YA + >SYSCALL printf stz ZPTmpPtr1 lda #$C1 @@ -66,7 +66,7 @@ Dev.Detect >LDYA L.MSG.DETECT >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL PrintF.YA + >SYSCALL printf clc rts @@ -76,7 +76,7 @@ Dev.Detect >LDYA L.MSG.DETECT bne .1 >LDYA L.MSG.DETECT.KO - >SYSCALL PrintF.YA + >SYSCALL printf lda #MLI.E.NODEV sec diff --git a/DRV/PIC.DRV.S.txt b/DRV/PIC.DRV.S.txt index 9a55d78f..c6482e0e 100644 --- a/DRV/PIC.DRV.S.txt +++ b/DRV/PIC.DRV.S.txt @@ -36,7 +36,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME *-------------------------------------- Dev.Detect >STYA ARGS >LDYA L.MSG.DETECT - >SYSCALL PrintF.YA + >SYSCALL printf stz ZPTmpPtr1 lda #$C1 @@ -63,7 +63,7 @@ Dev.Detect >STYA ARGS bne .1 >LDYA L.MSG.DETECT.KO - >SYSCALL PrintF.YA + >SYSCALL printf lda #MLI.E.NODEV Not Found in any slot, exiting sec @@ -86,7 +86,7 @@ Dev.Detect >STYA ARGS >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL PrintF.YA + >SYSCALL printf clc rts *-------------------------------------- diff --git a/DRV/UTHER2.AI.DRV.S.txt b/DRV/UTHER2.AI.DRV.S.txt index 9bb3da4d..56a8aefb 100644 --- a/DRV/UTHER2.AI.DRV.S.txt +++ b/DRV/UTHER2.AI.DRV.S.txt @@ -41,7 +41,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME *-------------------------------------- Dev.Detect >STYA Args >LDYA L.MSG.DETECT - >SYSCALL PrintF.YA + >SYSCALL printf ldx #$70+$88 ldy #7 @@ -85,7 +85,7 @@ Dev.Detect >STYA Args bne .1 >LDYA L.MSG.DETECT.KO - >SYSCALL PrintF.YA + >SYSCALL printf lda #MLI.E.NODEV sec @@ -123,7 +123,7 @@ Dev.Detect >STYA Args .8 >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL PrintF.YA + >SYSCALL printf clc rts *-------------------------------------- diff --git a/DRV/UTHERNET.DRV.S.txt b/DRV/UTHERNET.DRV.S.txt index 1d35e5ec..f41a850c 100644 --- a/DRV/UTHERNET.DRV.S.txt +++ b/DRV/UTHERNET.DRV.S.txt @@ -39,7 +39,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME *-------------------------------------- Dev.Detect >STYA ARGS >LDYA L.MSG.DETECT - >SYSCALL PrintF.YA + >SYSCALL printf ldx #$70 ldy #7 @@ -69,7 +69,7 @@ Dev.Detect >STYA ARGS bne .1 >LDYA L.MSG.DETECT.KO - >SYSCALL PrintF.YA + >SYSCALL printf lda #MLI.E.NODEV sec @@ -118,7 +118,7 @@ Dev.Detect >STYA ARGS .8 >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL PrintF.YA + >SYSCALL printf clc rts *-------------------------------------- diff --git a/DRV/UTHERNET2.DRV.S.txt b/DRV/UTHERNET2.DRV.S.txt index 7f1b41a6..d33dfaad 100644 --- a/DRV/UTHERNET2.DRV.S.txt +++ b/DRV/UTHERNET2.DRV.S.txt @@ -40,7 +40,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME *-------------------------------------- Dev.Detect >STYA Args >LDYA L.MSG.DETECT - >SYSCALL PrintF.YA + >SYSCALL printf ldx #$70+$88 ldy #7 @@ -84,7 +84,7 @@ Dev.Detect >STYA Args bne .1 >LDYA L.MSG.DETECT.KO - >SYSCALL PrintF.YA + >SYSCALL printf lda #MLI.E.NODEV sec @@ -123,7 +123,7 @@ Dev.Detect >STYA Args .8 >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL PrintF.YA + >SYSCALL printf clc rts *-------------------------------------- diff --git a/DRV/X.SSC.DRV.S.txt b/DRV/X.SSC.DRV.S.txt index 82db3bed..016b20e8 100644 --- a/DRV/X.SSC.DRV.S.txt +++ b/DRV/X.SSC.DRV.S.txt @@ -40,7 +40,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME Dev.Detect >STYA ARGS >LDYA L.MSG.DETECT - >SYSCALL PrintF.YA + >SYSCALL printf stz ZPTmpPtr1 lda #$C1 @@ -67,7 +67,7 @@ Dev.Detect >STYA ARGS bne .1 >LDYA L.MSG.DETECT.KO - >SYSCALL PrintF.YA + >SYSCALL printf lda #MLI.E.NODEV Not Found in any slot, exiting sec @@ -92,7 +92,7 @@ Dev.Detect >STYA ARGS >PUSHW L.DEV.HEADER.NAME >LDYA L.MSG.DETECT.OK - >SYSCALL PrintF.YA + >SYSCALL printf clc rts *-------------------------------------- diff --git a/FNT2FON.S.txt b/FNT2FON.S.txt index c5cd9aff..33083baa 100644 --- a/FNT2FON.S.txt +++ b/FNT2FON.S.txt @@ -71,7 +71,7 @@ CS.INIT bne .2 .99 >LDYA L.MSG.USAGE - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts @@ -123,7 +123,7 @@ CS.INIT.OPENINPUT >STYA ZPInputBufPtr >LDYA L.MSG.FILE.OK - >SYSCALL PrintF.YA + >SYSCALL printf ldy #S.FNT.dfVersion lda (ZPInputBufPtr),y @@ -160,12 +160,12 @@ CS.INIT.OPENINPUT >PUSHA >LDYA L.MSG.HEADER.OK - >SYSCALL PrintF.YA + >SYSCALL printf clc rts .99 >LDYA L.MSG.HEADER.KO - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.IBIN sec rts @@ -211,7 +211,7 @@ CS.RUN ldy #S.FNT.dfBreakChar >PUSHA >LDYA L.MSG.RANGE - >SYSCALL PrintF.YA + >SYSCALL printf >LDA.G FON.Header+S.FON.Last sec @@ -324,7 +324,7 @@ CS.RUN.LOOP >SLEEP bcs .9 >LDYA L.MSG.DONE - >SYSCALL PrintF.YA + >SYSCALL printf lda #0 sec @@ -402,7 +402,7 @@ CS.RUN.DumpChar >LDA.G CharOutByteW >PUSHA >PUSHA >LDYA L.MSG.DUMP - >SYSCALL PrintF.YA + >SYSCALL printf lda ZPCharBufPtr sta ZPPTR1 diff --git a/SBIN/DHCPCLNT.S.txt b/SBIN/DHCPCLNT.S.txt index c2911e74..9d07a9aa 100644 --- a/SBIN/DHCPCLNT.S.txt +++ b/SBIN/DHCPCLNT.S.txt @@ -98,7 +98,7 @@ CS.INIT >LDYA L.LIBTCPIP .98 >LDYA L.MSG.CFG.ND bra .90 .99 >LDYA L.MSG.CFG.NA -.90 >SYSCALL PrintF.YA +.90 >SYSCALL printf lda #0 sec rts @@ -114,7 +114,7 @@ CS.RUN >PUSHW L.Socket sta (pData),y >LDYA L.MSG.CFG1 - >SYSCALL PrintF.YA + >SYSCALL printf jsr Init.Timeout @@ -153,7 +153,7 @@ CS.RUN.SREQ ldx #3 bpl .1 >LDYA L.MSG.CFG2 - >SYSCALL PrintF.YA + >SYSCALL printf ldy #hSocket >PUSHB (pData),y @@ -196,7 +196,7 @@ CS.RUN.OK lda #S.IPCFG.STATUS.OK bpl .2 >LDYA L.MSG.CFG.OK - >SYSCALL PrintF.YA + >SYSCALL printf lda #0 Leave with NO ERROR sec rts @@ -204,7 +204,7 @@ CS.RUN.OK lda #S.IPCFG.STATUS.OK CS.RUN.KO pha >PUSHA >LDYA L.MSG.CFG.KO - >SYSCALL PrintF.YA + >SYSCALL printf pla sec rts diff --git a/SBIN/GETTY.S.txt b/SBIN/GETTY.S.txt index 75c16bbe..473da1af 100644 --- a/SBIN/GETTY.S.txt +++ b/SBIN/GETTY.S.txt @@ -76,7 +76,7 @@ CS.INIT ldy #S.PS.ARGC rts .90 >LDYA L.MSG.USAGE - >SYSCALL PrintF.YA + >SYSCALL printf lda #0 sec .9 rts @@ -117,7 +117,7 @@ CS.RUN.LOOP bcc .1 >PUSHWI KVER >LDYA L.MSG.GREETINGS - >SYSCALL PrintF.YA + >SYSCALL printf bcs .8 unable to send greetings...reset.. diff --git a/SBIN/HTTPD.S.txt b/SBIN/HTTPD.S.txt index 689c2f0f..d13778a3 100644 --- a/SBIN/HTTPD.S.txt +++ b/SBIN/HTTPD.S.txt @@ -60,7 +60,7 @@ CS.INIT >LDYA L.LIBTCPIP CS.RUN jsr Init.Timeout >LDYA L.MSG.TCPWAIT - >SYSCALL PrintF.YA + >SYSCALL printf .1 >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG is TCPIP loaded ? bcs .99 @@ -78,13 +78,13 @@ CS.RUN jsr Init.Timeout bne .1 >LDYA L.MSG.ABORT - >SYSCALL PrintF.YA + >SYSCALL printf lda #0 clc rts .99 >LDYA L.MSG.TCPIPERR - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec CS.RUN.RTS rts @@ -114,7 +114,7 @@ CS.RUN.INIT ldx #3 >STA.G hLineBuf >LDYA L.MSG.INITOK - >SYSCALL PrintF.YA + >SYSCALL printf CS.RUN.LOOP >SLEEP jsr CS.RUN.SERVER @@ -141,7 +141,7 @@ CS.RUN.LOOP >SLEEP bra CS.RUN.LOOP .9 >LDYA L.MSG.SKTERR - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts @@ -188,7 +188,7 @@ CS.RUN.SERVER ldy #hSrvSocket >PUSHA >LDYA L.MSG.INCOMING - >SYSCALL PrintF.YA + >SYSCALL printf .8 clc .9 rts *-------------------------------------- @@ -201,7 +201,7 @@ CS.RUN.CLIENT sta hClntSocket bcs .1 >PUSHW ZPLinePtr - >SYSCALL PrintF.YA + >SYSCALL printf >PUSHB hClntSocket >PUSHW L.HTTP.200OK diff --git a/SBIN/INSDRV.S.txt b/SBIN/INSDRV.S.txt index 3dd87652..4322d01a 100644 --- a/SBIN/INSDRV.S.txt +++ b/SBIN/INSDRV.S.txt @@ -48,7 +48,7 @@ CS.INIT ldy #S.PS.ARGC >PUSHYA >LDYA L.MSG.LOAD - >SYSCALL PrintF.YA + >SYSCALL printf lda #1 get PTR to ARG[1] (Driver name) >SYSCALL GetArg.A @@ -61,7 +61,7 @@ CS.INIT ldy #S.PS.ARGC rts .9 >LDYA L.MSG.HELP - >SYSCALL PrintF.YA + >SYSCALL printf lda #0 tell TSKMGR that all done ok, but sec we do not want to stay in memory .99 rts diff --git a/SBIN/KCONFIG.S.txt b/SBIN/KCONFIG.S.txt index df0d67ce..b2b59949 100644 --- a/SBIN/KCONFIG.S.txt +++ b/SBIN/KCONFIG.S.txt @@ -71,7 +71,7 @@ CS.RUN >LDYA L.FILENAME >STA.G hFileName >LDYA L.MSG.TOPBAR - >SYSCALL PrintF.YA + >SYSCALL printf jsr CS.RUN.Load bcs .1 @@ -79,19 +79,19 @@ CS.RUN >LDYA L.FILENAME bra .2 .1 >LDYA L.MSG.TOPBAR.KO -.2 >SYSCALL PrintF.YA +.2 >SYSCALL printf >LDYA L.MSG.KCONF - >SYSCALL PrintF.YA + >SYSCALL printf >LDYAI A2osX.HZ jsr CS.RUN.DumpConfYA >LDYA L.MSG.STATUSBAR - >SYSCALL PrintF.YA + >SYSCALL printf CS.RUN.REPaint >LDYA L.MSG.FCONF - >SYSCALL PrintF.YA + >SYSCALL printf >LDYA ZPCfgPtr jsr CS.RUN.DumpConfYA @@ -152,7 +152,7 @@ CS.RUN.Loop >SLEEP bra CS.RUN.REPaint .8 >LDYA L.MSG.QUIT -.9 >SYSCALL PrintF.YA +.9 >SYSCALL printf lda #0 sec rts @@ -254,7 +254,7 @@ CS.RUN.DumpConfYA >PUSHB (ZPTmp1) >LDYA L.MSG.HZ - >SYSCALL PrintF.YA + >SYSCALL printf ldy #8 lda (ZPTmp1),y @@ -266,7 +266,7 @@ CS.RUN.DumpConfYA .12 >PUSHYA >LDYA L.MSG.CHROOT - >SYSCALL PrintF.YA + >SYSCALL printf ldy #8 lda (ZPTmp1),y @@ -278,7 +278,7 @@ CS.RUN.DumpConfYA .14 >PUSHYA >LDYA L.MSG.PMODE - >SYSCALL PrintF.YA + >SYSCALL printf ldy #9 Slot 1 @@ -307,7 +307,7 @@ CS.RUN.DumpConfYA >PUSHA Slot >LDYA L.MSG.SLOT - >SYSCALL PrintF.YA + >SYSCALL printf ply iny @@ -315,7 +315,7 @@ CS.RUN.DumpConfYA bne .1 >LDYA L.MSG.PROMPT - >SYSCALL PrintF.YA + >SYSCALL printf clc rts diff --git a/SBIN/LOGIN.S.txt b/SBIN/LOGIN.S.txt index c50ee9c2..5af8e159 100644 --- a/SBIN/LOGIN.S.txt +++ b/SBIN/LOGIN.S.txt @@ -50,7 +50,7 @@ CS.RUN lda #0 sta (pData),y >LDYA L.MSG.LOGIN - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 lda #0 Echo all caracters @@ -68,7 +68,7 @@ CS.RUN lda #0 bcc .1 >LDYA L.MSG.PASSWORD - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 lda #'*' diff --git a/SBIN/NFSD.S.txt b/SBIN/NFSD.S.txt index b2bc9603..c5bae6e3 100644 --- a/SBIN/NFSD.S.txt +++ b/SBIN/NFSD.S.txt @@ -59,7 +59,7 @@ CS.INIT >LDYA L.LIBTCPIP CS.RUN jsr Init.Timeout >LDYA L.MSG.TCPWAIT - >SYSCALL PrintF.YA + >SYSCALL printf .1 >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG is TCPIP loaded ? bcs .99 @@ -73,7 +73,7 @@ CS.RUN jsr Init.Timeout bcc .1 .99 >LDYA L.MSG.TCPIPERR - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts @@ -94,7 +94,7 @@ CS.RUN.INIT ldx #3 sta (pData),y >LDYA L.MSG.INITOK - >SYSCALL PrintF.YA + >SYSCALL printf .11 >SLEEP ldy #bCTRLC @@ -119,17 +119,17 @@ CS.RUN.INIT ldx #3 bpl .2 >LDYA L.MSG.INCOMING - >SYSCALL PrintF.YA + >SYSCALL printf bra .11 .9 >LDYA L.MSG.SKTERR - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts .99 >LDYA L.MSG.ABORT - >SYSCALL PrintF.YA + >SYSCALL printf lda #0 sec rts diff --git a/SBIN/SHELL.S.CL.txt b/SBIN/SHELL.S.CL.txt index 974e8a02..1c1814d8 100644 --- a/SBIN/SHELL.S.CL.txt +++ b/SBIN/SHELL.S.CL.txt @@ -7,9 +7,9 @@ CL.PrintPrompt >LDYA L.ENV.PS1 >SYSCALL GetEnv.YA >SYSCALL ExpandStr.YA phx - >SYSCALL PrintF.YA + >SYSCALL printf >LDYA L.MSG.PROMPT - >SYSCALL PrintF.YA + >SYSCALL printf plx php pha @@ -252,7 +252,7 @@ CL.PrintEOL.8 clc rts *-------------------------------------- CL.PRINT >LDYA ZPCMDBuf - >SYSCALL PrintF.YA + >SYSCALL printf rts *-------------------------------------- MAN diff --git a/SBIN/SHELL.S.CMD.txt b/SBIN/SHELL.S.CMD.txt index 87e2855a..95368e58 100644 --- a/SBIN/SHELL.S.CMD.txt +++ b/SBIN/SHELL.S.CMD.txt @@ -264,7 +264,7 @@ Cmd.Exec.EXT.SEP Cmd.Exec.PWD ldy #S.PS.hPREFIX lda (pPs),y >SYSCALL GetMemPtr.A - >SYSCALL PrintF.YA + >SYSCALL printf jmp Cmd.Exec.ECHO.CR *-------------------------------------- Cmd.Exec.CD lda (ZPPTR2) @@ -380,7 +380,7 @@ Cmd.Exec.SET lda (ZPPTR2) >PUSHW ZPPTR1 Push name >LDYA L.MSG.PRINTENV - >SYSCALL PrintF.YA + >SYSCALL printf bcs .9 ldy #$ff @@ -438,7 +438,7 @@ Cmd.Exec.SETVAR ldy #0 >PUSHYA push value >PUSHW ZPPTR2 push name >LDYA L.MSG.PRINTENV - >SYSCALL PrintF.YA + >SYSCALL printf .8 clc .9 jmp Cmd.Exec.Done @@ -463,7 +463,7 @@ Cmd.Exec.TIME clc >SYSCALL StrFTime >LDYA ZPCMDBuf - >SYSCALL PrintF.YA + >SYSCALL printf bcs Cmd.Exec.ECHO.END bra Cmd.Exec.ECHO.CR *-------------------------------------- @@ -471,7 +471,7 @@ Cmd.Exec.ECHO lda (ZPPtr2) beq Cmd.Exec.ECHO.CR >LDYA ZPPtr2 - >SYSCALL PrintF.YA + >SYSCALL printf Cmd.Exec.ECHO.CR lda #13 diff --git a/SBIN/SHELL.S.CSH.txt b/SBIN/SHELL.S.CSH.txt index a3e17d8a..f91d30f6 100644 --- a/SBIN/SHELL.S.CSH.txt +++ b/SBIN/SHELL.S.CSH.txt @@ -172,7 +172,7 @@ CSH.Run jsr CL.RESET >PUSHW ZPCMDBuf >LDYA L.MSG.ECHO - >SYSCALL PrintF.YA + >SYSCALL printf .80 clc rts @@ -1201,7 +1201,7 @@ CSH.ErrorMsg >LDA.G CSH.hBuf .8 >PUSHW.G CSH.LineNum >LDYA L.MSG.CSHERR - >SYSCALL PrintF.YA + >SYSCALL printf rts *-------------------------------------- diff --git a/SBIN/SHELL.S.IO.txt b/SBIN/SHELL.S.IO.txt index 5003e148..be32de29 100644 --- a/SBIN/SHELL.S.IO.txt +++ b/SBIN/SHELL.S.IO.txt @@ -38,7 +38,7 @@ IO.PrintErrMsg pha Save EC for PrintF pla >PUSHA >LDYA L.MSG.ERROR - >SYSCALL PrintF.YA + >SYSCALL printf rts *-------------------------------------- MAN diff --git a/SBIN/SHELL.S.txt b/SBIN/SHELL.S.txt index adb28b4f..fc9c5888 100644 --- a/SBIN/SHELL.S.txt +++ b/SBIN/SHELL.S.txt @@ -140,7 +140,7 @@ CS.INIT jsr SetPWD >PUSHWI KVER >LDYA L.MSG.GREETINGS - >SYSCALL PrintF.YA + >SYSCALL printf .9 rts *-------------------------------------- diff --git a/SBIN/TCPIPD.S.CFG.txt b/SBIN/TCPIPD.S.CFG.txt index f1b79c2e..526acef0 100644 --- a/SBIN/TCPIPD.S.CFG.txt +++ b/SBIN/TCPIPD.S.CFG.txt @@ -7,21 +7,21 @@ AUTO 6 *-------------------------------------- CFG.Read >PUSHW L.HOSTNAME >LDYA L.MSG.CFG - >SYSCALL PrintF.YA + >SYSCALL printf jsr CFG.Read.HOSTNAME jsr CFG.Read.Result >PUSHW L.TCPIP.CONF >LDYA L.MSG.CFG - >SYSCALL PrintF.YA + >SYSCALL printf jsr CFG.Read.TCPIP.CONF jsr CFG.Read.Result >PUSHW L.HOSTS >LDYA L.MSG.CFG - >SYSCALL PrintF.YA + >SYSCALL printf jsr CFG.Read.HOSTS *-------------------------------------- @@ -30,7 +30,7 @@ CFG.Read.Result bcc .1 >LDYA L.MSG.CFG.KO bra .2 .1 >LDYA L.MSG.CFG.OK -.2 >SYSCALL PrintF.YA +.2 >SYSCALL printf rts *-------------------------------------- CFG.Read.HOSTNAME diff --git a/SBIN/TCPIPD.S.txt b/SBIN/TCPIPD.S.txt index 5395a9c4..0e8839e7 100644 --- a/SBIN/TCPIPD.S.txt +++ b/SBIN/TCPIPD.S.txt @@ -95,7 +95,7 @@ CS.INIT.DEV >LDYA L.DEVNAME bne CS.INIT.DEV >LDYA L.MSG.DEV.KO - >SYSCALL PrintF.YA + >SYSCALL printf lda #MLI.E.NODEV sec rts @@ -106,7 +106,7 @@ CS.INIT.DEV >LDYA L.DEVNAME >PUSHW L.DEVNAME >LDYA L.MSG.DEV.OK - >SYSCALL PrintF.YA + >SYSCALL printf >PUSHB.G hDev >PUSHBI DEVMGR.OPEN diff --git a/SBIN/TELNETD.S.txt b/SBIN/TELNETD.S.txt index adc7a7e3..af68fd4d 100644 --- a/SBIN/TELNETD.S.txt +++ b/SBIN/TELNETD.S.txt @@ -61,7 +61,7 @@ CS.INIT >LDYA L.LIBTCPIP CS.RUN jsr Init.Timeout >LDYA L.MSG.TCPWAIT - >SYSCALL PrintF.YA + >SYSCALL printf .1 >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG is TCPIP loaded ? bcs .99 @@ -80,7 +80,7 @@ CS.RUN jsr Init.Timeout jmp CS.RUN.ABORT .99 >LDYA L.MSG.TCPIPERR - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts @@ -101,7 +101,7 @@ CS.RUN.INIT ldx #3 sta (pData),y >LDYA L.MSG.INITOK - >SYSCALL PrintF.YA + >SYSCALL printf .2 >SLEEP jsr CS.RUN.SERVER @@ -111,13 +111,13 @@ CS.RUN.INIT ldx #3 bra .2 .9 >LDYA L.MSG.SKTERR - >SYSCALL PrintF.YA + >SYSCALL printf lda #K.E.SYN sec rts CS.RUN.ABORT >LDYA L.MSG.ABORT - >SYSCALL PrintF.YA + >SYSCALL printf lda #0 CS.RUN.ERR sec @@ -162,7 +162,7 @@ CS.RUN.SERVER ldy #hSrvSocket >PUSHA >LDYA L.MSG.INCOMING - >SYSCALL PrintF.YA + >SYSCALL printf .8 clc .9 rts *-------------------------------------- @@ -193,7 +193,7 @@ CS.RUN.CLIENT ldy #SktIndex .10 sta .2+1 >PUSHA >LDYA L.MSG.BYTE - >SYSCALL PrintF.YA + >SYSCALL printf .1 lda #$ff hSocket >PUSHA diff --git a/SYS/KERNEL.S.ARG.txt b/SYS/KERNEL.S.ARG.txt index 53fa00a7..4fcad76e 100644 --- a/SYS/KERNEL.S.ARG.txt +++ b/SYS/KERNEL.S.ARG.txt @@ -15,7 +15,7 @@ K.GetArg pha save requested arg# ldy #S.PS.hARGS lda (pPs),y - jsr K.GetMemPtr.A + jsr K.GetMemPtr plx we want 0 ? diff --git a/SYS/KERNEL.S.BIN.txt b/SYS/KERNEL.S.BIN.txt index 1f5f7dd4..0d93d206 100644 --- a/SYS/KERNEL.S.BIN.txt +++ b/SYS/KERNEL.S.BIN.txt @@ -8,7 +8,7 @@ AUTO 4,1 * out : * A = hMem To loaded LIB *-------------------------------------- -K.LoadLib jsr BIN.FindLIB.YA +K.LoadLib jsr BIN.FindLIB bcs .9 jsr BIN.Load.YA Y,A = "/PATH/BIN" @@ -41,7 +41,7 @@ K.LoadLib jsr BIN.FindLIB.YA * out : *-------------------------------------- K.UnloadLib pha - jsr K.GetMemByID.A + jsr K.GetMemByID >STYA ZPPtr1 ldy #S.MEM.REFCNT lda (ZPPtr1),y Get count of those referencing this lib @@ -64,16 +64,17 @@ K.UnloadLib pha .2 jsr $ffff Self Modified, Call LIB.UNLOAD function pla jmp K.FreeMem.A -*-------------------------------------- -* K.LoadDrv -* in : -* Y,A = PTR to "NAME.DRV [PARAM]" C-String -* out : -* none -*-------------------------------------- +*/-------------------------------------- +* # LoadDrv +* ##ASM +* **In:** +* Y,A = PTR to "NAME.DRV [PARAM]" C-String +* **Out:** +* none +*\-------------------------------------- K.LoadDrv >STYA .2+1 Save "BIN\0ARGS\0\0" - jsr BIN.FindDRV.YA + jsr BIN.FindDRV bcs .9 jsr BIN.Load.YA Y,A = "/PATH/BIN" @@ -178,7 +179,7 @@ K.FileSearch >PULLW .4+1 DstStat K.FileSearch.I >PULLW .4+1 Filename >PULLYA Get Search list - jsr K.ExpandStr.YA Expand it + jsr K.ExpandStr Expand it bcs .99 stx .98+1 @@ -228,7 +229,7 @@ K.FileSearch.I >PULLW .4+1 Filename .99 rts .98 lda #$ff SELF MODIFIED : Discard Expanded hSrch list - jsr K.FreeMem.A + jsr K.FreeMem lda #MLI.E.FNOTFND sec rts @@ -261,7 +262,7 @@ BIN.Load.YA >STYA BIN.CmdLine lda (ZPPtr1),y beq .6 - jsr K.GetMemPtr.A get pathname + jsr K.GetMemPtr get pathname >STYA .3+1 ldy #0 @@ -279,7 +280,7 @@ BIN.Load.YA >STYA BIN.CmdLine sta (ZPPtr1),y txa - jmp K.GetMemPtr.A X=hMem from K.GetMemByNameA + jmp K.GetMemPtr X=hMem from K.GetMemByNameA .6 lda ZPPtr1 clc @@ -321,23 +322,23 @@ BIN.Load.YA.1 >PUSHWI K.S.STAT sta BIN.R.End+1 txa - jsr K.GetMemPtr.A - >STYA ZPPtr1 set ZPPtr1 -> Code start + jsr K.GetMemPtr + >STYA ZPPtr1 set ZPPtr1 -> Code start - pha YA = actual load address + pha YA = actual load address tya sec sbc BIN.R.Start - sta BIN.R.Offset Offset=ZPPtr1-AUXTYPE + sta BIN.R.Offset Offset=ZPPtr1-AUXTYPE pla sbc BIN.R.Start+1 sta BIN.R.Offset+1 - ldy #H.BIN.CODE.LEN get Code Len + ldy #H.BIN.CODE.LEN get Code Len lda (ZPPtr1),y clc adc ZPPtr1 - sta ZPPtr2 Make ZPPtr2 = ZPPtr1 + CodeLen + sta ZPPtr2 Make ZPPtr2 = ZPPtr1 + CodeLen iny lda (ZPPtr1),y adc ZPPtr1+1 @@ -345,12 +346,12 @@ BIN.Load.YA.1 >PUSHWI K.S.STAT jsr BIN.RelExe - >LDYA BIN.CmdLine get back bin path - jsr K.NewStr.YA make a copy of this string + >LDYA BIN.CmdLine get back bin path + jsr K.NewStr make a copy of this string bcs .98 - lda BIN.hMem Keep X=hMem - jsr K.GetMemByID.A X unmodified + lda BIN.hMem Keep X=hMem + jsr K.GetMemByID X unmodified >STYA ZPPtr1 lda (ZPPtr1) @@ -363,11 +364,11 @@ BIN.Load.YA.1 >PUSHWI K.S.STAT lda BIN.hMem tax return hMEM to Caller... - jmp K.GetMemPtr.A ...and Y,A=PTR to CS + jmp K.GetMemPtr ...and Y,A=PTR to CS .98 pha lda BIN.hMem - jsr K.FreeMem.A Discard Loaded Code + jsr K.FreeMem Discard Loaded Code pla sec @@ -387,7 +388,7 @@ BIN.hMem .BS 1 BIN.InsDrv ldy #H.BIN.DRV.CODE.O lda (pDrv),y clc - adc BIN.R.Start Advance start From AUXTYPE to AUXTYPE+DRV code offset + adc BIN.R.Start Advance start From AUXTYPE to AUXTYPE+DRV code offset sta BIN.R.Start iny @@ -395,7 +396,7 @@ BIN.InsDrv ldy #H.BIN.DRV.CODE.O adc BIN.R.Start+1 sta BIN.R.Start+1 - lda DevMgr.Free Offset = Target DRV address-(AUXTYPE+DRV OFFSET) + lda DevMgr.Free Offset = Target DRV address-(AUXTYPE+DRV OFFSET) sec sbc BIN.R.Start sta BIN.R.Offset @@ -417,9 +418,9 @@ BIN.InsDrv ldy #H.BIN.DRV.CODE.O clc adc BIN.InsDrv.Len sta BIN.InsDrv.End - tay Save DRVEnd LO + tay Save DRVEnd LO lda DevMgr.Free+1 - adc BIN.InsDrv.Len+1 A = DRVEnd HI + adc BIN.InsDrv.Len+1 A = DRVEnd HI sta BIN.InsDrv.End+1 bcs .9 we crossed $FFFF, out of mem @@ -443,7 +444,7 @@ BIN.InsDrv ldy #H.BIN.DRV.CODE.O .10 inc DevMgr.Count >SYSCALL GetDevByID.A - >STYA ZPPtr2 setup Ptr2 to dest HEADER + >STYA ZPPtr2 setup Ptr2 to dest HEADER ldy #H.BIN.DRV.HEADER.O lda (pDrv),y @@ -453,11 +454,11 @@ BIN.InsDrv ldy #H.BIN.DRV.CODE.O iny lda (pDrv),y adc pDrv+1 - sta ZPPtr1+1 set Ptr1 to Src HEADER + sta ZPPtr1+1 set Ptr1 to Src HEADER ldy #S.DEV-1 -.1 lda (ZPPtr1),y copy header to Dev.Table +.1 lda (ZPPtr1),y copy header to Dev.Table sta (ZPPtr2),y dey bpl .1 @@ -471,7 +472,7 @@ BIN.InsDrv ldy #H.BIN.DRV.CODE.O lda DevMgr.Free sta (ZPPtr2),y - sta ZPPtr2 set Ptr2 to Dest CODE + sta ZPPtr2 set Ptr2 to Dest CODE stx ZPPtr2+1 ldy #H.BIN.DRV.CODE.O @@ -482,7 +483,7 @@ BIN.InsDrv ldy #H.BIN.DRV.CODE.O iny lda (pDrv),y adc pDrv+1 - sta ZPPtr1+1 set Ptr1 to Src CODE + sta ZPPtr1+1 set Ptr1 to Src CODE lda BIN.InsDrv.Len+1 eor #$ff @@ -509,7 +510,7 @@ BIN.InsDrv ldy #H.BIN.DRV.CODE.O bra .2 .4 ldy #H.BIN.DRV.CODE.LEN - lda DevMgr.Free Make Ptr1 = code start + lda DevMgr.Free Make Ptr1 = code start sta ZPPtr1 clc adc (pDrv),y diff --git a/SYS/KERNEL.S.CORE.txt b/SYS/KERNEL.S.CORE.txt index 9a2edba6..0574c470 100644 --- a/SYS/KERNEL.S.CORE.txt +++ b/SYS/KERNEL.S.CORE.txt @@ -11,7 +11,7 @@ CORE.Run lda CORE.PSCount lda PS.Table.hMem-1,x beq .8 - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA pPs lda (pPs) get S.PS.F @@ -40,7 +40,7 @@ CORE.Run lda CORE.PSCount lda (pPs),y beq .6 no parent process - jsr CORE.GetPSByID.A X unmodified + jsr CORE.GetPSByID X unmodified bcs .6 parent is dead.....skipping... >STYA ZPPtr1 @@ -227,7 +227,7 @@ CORE.Dispatch lda CORE.EvtCount lda PS.Table.hMem-1,x beq .5 - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA pPS lda (pPs) get S.PS.F @@ -348,7 +348,7 @@ CORE.GetPSByID.A bcs .9 lda PS.TABLE.hMem-1,y beq * - jmp K.GetMemPtr.A + jmp K.GetMemPtr .9 rts *-------------------------------------- CORE.GetPS.A ldy CORE.PSCount @@ -373,7 +373,7 @@ CORE.GetPS.A ldy CORE.PSCount * bpl .1 * >LDYAI .2 -* jmp K.PrintF.YA +* jmp K.printf *.2 .AZ "!Evt:F=%b,Dev=$%h,LO=$%h,HI=$%h,W1=$%H,W2=$%H\n" *-------------------------------------- @@ -386,7 +386,7 @@ CORE.ScrSel and #$0F lda A2osX.SCRNDEVS-1,x beq .8 No device claimed this screen - jsr K.GetDevByID.A x unmodified..... + jsr K.GetDevByID x unmodified..... bcs .8 ??? stx A2osX.ASCREEN @@ -408,7 +408,7 @@ CORE.DestroyEvent pha ldy #S.EVT.B1 lda (pEvent),y - jsr K.FreeMem.A + jsr K.FreeMem pla .1 bit #S.EVT.F.hMEM2 @@ -416,7 +416,7 @@ CORE.DestroyEvent ldy #S.EVT.B2 lda (pEvent),y - jsr K.FreeMem.A + jsr K.FreeMem .2 lda #0 sta (pEvent) diff --git a/SYS/KERNEL.S.DEV.txt b/SYS/KERNEL.S.DEV.txt index 110d53ff..3081b24c 100644 --- a/SYS/KERNEL.S.DEV.txt +++ b/SYS/KERNEL.S.DEV.txt @@ -2,7 +2,7 @@ NEW PREFIX /A2OSX.BUILD AUTO 4,1 */-------------------------------------- -* # GetDevByID.A +* # GetDevByID * **In:** * A = DevID * **Out:** @@ -10,7 +10,7 @@ AUTO 4,1 * Y,A = DEVSLOT * note: X Unmodified *\-------------------------------------- -K.GetDevByID.A cmp DevMgr.Count +K.GetDevByID cmp DevMgr.Count bcs K.GetDevDNF asl @@ -23,7 +23,7 @@ K.GetDevByID.A cmp DevMgr.Count adc #0 rts CC */-------------------------------------- -* # GetDevByName.YA +* # GetDevByName * **In:** * Y,A = Ptr to device name (C-String) * **Out:** @@ -31,8 +31,7 @@ K.GetDevByID.A cmp DevMgr.Count * X = DEVID * Y,A = DEVSLOT *\-------------------------------------- -K.GetDevByName.YA - >STYA ZPPtr1 +K.GetDevByName >STYA ZPPtr1 >LDYAI Dev.Table+S.DEV.NAME >STYA ZPPtr2 @@ -70,16 +69,15 @@ K.GetDevByName.YA K.GetDevDNF lda #MLI.E.NODEV CS from cpx/beq rts */-------------------------------------- -* # GetDevStatus.A +* # GetDevStatus * **In:** * A = DevID * **Out:** * Y,A = S.DSTAT *\-------------------------------------- -K.DevClose.A ldx #DEVMGR.CLOSE +K.DevClose ldx #DEVMGR.CLOSE .HS 2C BIT ABS -K.GetDevStatus.A - ldx #DEVMGR.STATUS +K.GetDevStatus ldx #DEVMGR.STATUS jsr K.GetDevByID.A bcs K.IOCTL.9 diff --git a/SYS/KERNEL.S.DIRENT.txt b/SYS/KERNEL.S.DIRENT.txt index 0cd8fea4..108b3ffc 100644 --- a/SYS/KERNEL.S.DIRENT.txt +++ b/SYS/KERNEL.S.DIRENT.txt @@ -2,7 +2,7 @@ NEW PREFIX /A2OSX.BUILD AUTO 4,1 */-------------------------------------- -* # OpenDir.YA +* # OpenDir * **In:** * Y,A = PATH (C-String) * **Out:** @@ -11,12 +11,12 @@ AUTO 4,1 * CS : error * A = EC *\-------------------------------------- -K.OpenDir.YA jsr PFT.CheckPathYA +K.OpenDir jsr PFT.CheckPathYA >STYA ZPPtr2 jsr STDIO.SetMLIPathYA For GETFILEINFO,MLIOPEN >LDYAI S.NODE.DIR - jsr K.GetMem0.YA + jsr K.GetMem0 bcs .99 >STYA ZPPtr1 @@ -53,12 +53,12 @@ K.OpenDir.YA jsr PFT.CheckPathYA .98 pha save MLI error lda .8+1 - jsr K.CloseDir.A + jsr K.CloseDir pla get back MLI error sec .99 rts */-------------------------------------- -* # ReadDir.A +* # ReadDir * **In:** * A = hDIR * **Out:** @@ -69,34 +69,34 @@ K.OpenDir.YA jsr PFT.CheckPathYA * A = EC * note : A = 0 means no more entry *\-------------------------------------- -K.ReadDir.A.hDir .BS 1 -K.ReadDir.A.hMem .BS 1 -K.ReadDir.A.BufSize .BS 2 -K.ReadDir.A.ECIB .BS 1 +K.ReadDir.hDir .BS 1 +K.ReadDir.hMem .BS 1 +K.ReadDir.BufSize .BS 2 +K.ReadDir.ECIB .BS 1 *--S.DIR Cache ------------------------ -K.ReadDir.A.EL .BS 1 -K.ReadDir.A.EPB .BS 1 -K.ReadDir.A.EC .BS 2 +K.ReadDir.EL .BS 1 +K.ReadDir.EPB .BS 1 +K.ReadDir.EC .BS 2 *-------------------------------------- K.ReadDir.A jsr PFT.CheckNodeA - sta K.ReadDir.A.hDir - jsr K.GetMemPtr.A + sta K.ReadDir.hDir + jsr K.GetMemPtr >STYA ZPPtr1 ldy #S.NODE.DIR.REF lda (ZPPtr1),y - beq K.ReadDir.A.ROOT - jmp K.ReadDir.A.DIR + beq K.ReadDir.ROOT + jmp K.ReadDir.DIR -K.ReadDir.A.NoMore +K.ReadDir.NoMore lda #0 sec CS,A=0 no more entry rts *-------------------------------------- -K.ReadDir.A.ROOT +K.ReadDir.ROOT ldy #S.NODE.DIR.FC did we already returned something ? lda (ZPPtr1),y - bne K.ReadDir.A.NoMore + bne K.ReadDir.NoMore stz K.MLI.PARAMS+1 All Volumes @@ -110,10 +110,10 @@ K.ReadDir.A.ROOT .99 rts * pass #1 compute BufSize..... .10 lda #1 +1 for Ending 0 - sta K.ReadDir.A.BufSize - stz K.ReadDir.A.BufSize+1 + sta K.ReadDir.BufSize + stz K.ReadDir.BufSize+1 - stz K.ReadDir.A.EC + stz K.ReadDir.EC ldy #0 @@ -121,14 +121,14 @@ K.ReadDir.A.ROOT and #$0F beq .2 - inc K.ReadDir.A.EC increase entry count + inc K.ReadDir.EC increase entry count sec Add Filelen +1 adc #S.STAT will ends with CC - adc K.ReadDir.A.BufSize - sta K.ReadDir.A.BufSize + adc K.ReadDir.BufSize + sta K.ReadDir.BufSize bcc .2 - inc K.ReadDir.A.BufSize+1 + inc K.ReadDir.BufSize+1 .2 tya clc @@ -137,7 +137,7 @@ K.ReadDir.A.ROOT bcc .1 loop until 256 bytes scanned * pass #2 Fill Buffer... - jsr K.ReadDir.A.GetBuf + jsr K.ReadDir.GetBuf bcs .99 .3 lda (ZPPtr2) @@ -153,15 +153,15 @@ K.ReadDir.A.ROOT .4 lda (ZPPtr2),y sta K.MLI.PATH+1,y - jsr K.ReadDir.A.AddToBuf + jsr K.ReadDir.AddToBuf iny dex bne .4 txa Add ending 0 for C String - jsr K.ReadDir.A.AddToBuf + jsr K.ReadDir.AddToBuf - jsr K.ReadDir.A.ClrStat + jsr K.ReadDir.ClrStat lda (ZPPtr2) @@ -191,9 +191,9 @@ K.ReadDir.A.ROOT >LDYA K.MLI.PARAMS+8 >STYA K.S.STAT+S.STAT.BLOCKS -.80 jsr K.ReadDir.A.ADDSTAT +.80 jsr K.ReadDir.ADDSTAT - dec K.ReadDir.A.EC + dec K.ReadDir.EC beq .5 .88 lda ZPPtr2 @@ -211,14 +211,14 @@ K.ReadDir.A.ROOT lda #16 sta (ZPPtr1),y Flag that we returned somthing for next time - jmp K.ReadDir.A.EXIT + jmp K.ReadDir.EXIT *-------------------------------------- -K.ReadDir.A.DIR sta K.MLI.PARAMS+1 A=#S.DIR.PRODOS.REF +K.ReadDir.DIR sta K.MLI.PARAMS+1 A=#S.DIR.PRODOS.REF >LDYAI 512 Get a 512 bytes buffer for reading dir... - jsr K.GetMem.YA + jsr K.GetMem bcs .99 - stx K.ReadDir.A.hMem + stx K.ReadDir.hMem >STYA K.MLI.PARAMS+2 For reading @@ -246,18 +246,18 @@ K.ReadDir.A.DIR sta K.MLI.PARAMS+1 A=#S.DIR.PRODOS.REF ldy #$1f+3 ldx #3 -.1 lda (ZPPtr2),y Get K.ReadDir.A.EL.... From Block - sta K.ReadDir.A.EL,x +.1 lda (ZPPtr2),y Get K.ReadDir.EL.... From Block + sta K.ReadDir.EL,x dey dex bpl .1 - inc K.ReadDir.A.EC Add one to EC because we include VOL/DIR Header + inc K.ReadDir.EC Add one to EC because we include VOL/DIR Header bne .4 - inc K.ReadDir.A.EC+1 ...and ProDOS does NOT include header entry in EC + inc K.ReadDir.EC+1 ...and ProDOS does NOT include header entry in EC bra .4 -.98 jsr K.ReadDir.A.CLN +.98 jsr K.ReadDir.CLN sec .99 rts @@ -265,16 +265,16 @@ K.ReadDir.A.DIR sta K.MLI.PARAMS+1 A=#S.DIR.PRODOS.REF ldx #3 .3 lda (ZPPtr1),y get this session parameters from S.DIR - sta K.ReadDir.A.EL,x + sta K.ReadDir.EL,x dey dex bpl .3 -.4 lda K.ReadDir.A.EC +.4 lda K.ReadDir.EC eor #$ff tax - lda K.ReadDir.A.EC+1 + lda K.ReadDir.EC+1 eor #$ff tay @@ -284,14 +284,14 @@ K.ReadDir.A.DIR sta K.MLI.PARAMS+1 A=#S.DIR.PRODOS.REF beq .98 no...exit * pass #1 compute BufSize... -.5 lda K.ReadDir.A.EPB - sta K.ReadDir.A.ECIB +.5 lda K.ReadDir.EPB + sta K.ReadDir.ECIB lda #1 For Ending 0 - sta K.ReadDir.A.BufSize - stz K.ReadDir.A.BufSize+1 + sta K.ReadDir.BufSize + stz K.ReadDir.BufSize+1 -K.ReadDir.A.DIR1 lda (ZPPtr2) X = EntryCount In This Block +K.ReadDir.DIR1 lda (ZPPtr2) X = EntryCount In This Block beq .7 Free slot....goto next and #$F0 get storage_type @@ -315,32 +315,32 @@ K.ReadDir.A.DIR1 lda (ZPPtr2) X = EntryCount In This Block .2 lda #2+S.STAT+3+S.STAT add "1." + S.STAT + "2.." + S.STAT... clc - adc K.ReadDir.A.BufSize - sta K.ReadDir.A.BufSize + adc K.ReadDir.BufSize + sta K.ReadDir.BufSize bcc .3 - inc K.ReadDir.A.BufSize+1 + inc K.ReadDir.BufSize+1 .3 inx bne .7 iny - bra K.ReadDir.A.DIR2 we reached last entry in whole DIR + bra K.ReadDir.DIR2 we reached last entry in whole DIR .7 lda ZPPtr2 clc - adc K.ReadDir.A.EL + adc K.ReadDir.EL sta ZPPtr2 bcc .8 inc ZPPtr2+1 -.8 dec K.ReadDir.A.ECIB - bne K.ReadDir.A.DIR1 +.8 dec K.ReadDir.ECIB + bne K.ReadDir.DIR1 * pass #2 Fill Buffer...(ZPPtr1 & Ptr2 can now be trashed) -K.ReadDir.A.DIR2 jsr K.ReadDir.A.GetBuf +K.ReadDir.DIR2 jsr K.ReadDir.GetBuf bcs .9 - lda K.ReadDir.A.EPB - sta K.ReadDir.A.ECIB + lda K.ReadDir.EPB + sta K.ReadDir.ECIB .1 lda (ZPPtr3) beq .7 Empty slot, skip @@ -348,50 +348,50 @@ K.ReadDir.A.DIR2 jsr K.ReadDir.A.GetBuf and #$F0 cmp #$F0 Vol Header ? bne .2 - jsr K.ReadDir.A.ADD. + jsr K.ReadDir.ADD. bra .6 .2 cmp #$E0 Dir Header ? bne .3 - jsr K.ReadDir.A.ADD. - jsr K.ReadDir.A.ADD.. + jsr K.ReadDir.ADD. + jsr K.ReadDir.ADD.. bra .6 -.3 jsr K.ReadDir.A.AddFNToBuf - jsr K.ReadDir.A.ClrStat +.3 jsr K.ReadDir.AddFNToBuf + jsr K.ReadDir.ClrStat lda (ZPPtr3) and #$F0 cmp #$D0 Directory ? bne .5 - jsr K.ReadDir.A.ADDD + jsr K.ReadDir.ADDD bra .6 -.5 jsr K.ReadDir.A.ADDF +.5 jsr K.ReadDir.ADDF -.6 lda K.ReadDir.A.EC decrease global counter... +.6 lda K.ReadDir.EC decrease global counter... sec sbc #1 - sta K.ReadDir.A.EC + sta K.ReadDir.EC - lda K.ReadDir.A.EC+1 + lda K.ReadDir.EC+1 sbc #0 - sta K.ReadDir.A.EC+1 - ora K.ReadDir.A.EC + sta K.ReadDir.EC+1 + ora K.ReadDir.EC beq .8 0! no more files in DIR -.7 dec K.ReadDir.A.ECIB 0! no more file in block +.7 dec K.ReadDir.ECIB 0! no more file in block beq .8 lda ZPPtr3 clc - adc K.ReadDir.A.EL + adc K.ReadDir.EL sta ZPPtr3 bcc .1 inc ZPPtr3+1 bra .1 -.9 jsr K.ReadDir.A.CLN +.9 jsr K.ReadDir.CLN sec rts @@ -399,53 +399,53 @@ K.ReadDir.A.DIR2 jsr K.ReadDir.A.GetBuf * lda #0 S.MEM.F.INIT0 already did this * sta (ZPPtr4) Ending 0 - lda K.ReadDir.A.hDir Restore ZPPtr1 trashed by STR API calls - jsr K.GetMemPtr.A + lda K.ReadDir.hDir Restore ZPPtr1 trashed by STR API calls + jsr K.GetMemPtr >STYA ZPPtr1 ldx #3 ldy #S.NODE.DIR.EL+3 -.81 lda K.ReadDir.A.EL,x Store back this session prameters to S.DIR +.81 lda K.ReadDir.EL,x Store back this session prameters to S.DIR sta (ZPPtr1),y dey dex bpl .81 - jsr K.ReadDir.A.CLN Discard READBUFFER + jsr K.ReadDir.CLN Discard READBUFFER -K.ReadDir.A.EXIT +K.ReadDir.EXIT ldx #$ff Self Modified : hDIRENT txa - jmp K.GetMemPtr.A + jmp K.GetMemPtr *-------------------------------------- -K.ReadDir.A.CLN pha - lda K.ReadDir.A.hMem +K.ReadDir.CLN pha + lda K.ReadDir.hMem jsr K.FreeMem.A pla rts *-------------------------------------- -K.ReadDir.A.GetBuf - >LDYA K.ReadDir.A.BufSize Get a BufSize bytes buffer for storing results - jsr K.GetMem0.YA make sure 0 filled +K.ReadDir.GetBuf + >LDYA K.ReadDir.BufSize Get a BufSize bytes buffer for storing results + jsr K.GetMem0 make sure 0 filled bcs .9 - stx K.ReadDir.A.EXIT+1 + stx K.ReadDir.EXIT+1 >STYA ZPPtr4 .9 rts *-------------------------------------- -K.ReadDir.A.ADD. ldx #1 filename="1." +K.ReadDir.ADD. ldx #1 filename="1." .HS 2C bit abs -K.ReadDir.A.ADD.. +K.ReadDir.ADD.. ldx #2 filename="2.." lda #'.' -.1 jsr K.ReadDir.A.AddToBuf Add X dot(s) +.1 jsr K.ReadDir.AddToBuf Add X dot(s) dex bne .1 txa - jsr K.ReadDir.A.AddToBuf Add Ending 0 + jsr K.ReadDir.AddToBuf Add Ending 0 - jsr K.ReadDir.A.ClrStat + jsr K.ReadDir.ClrStat * ldy #$25 total_blocks * lda (ZPPtr3),y @@ -454,15 +454,15 @@ K.ReadDir.A.ADD.. * lda (ZPPtr3),y * sta K.S.STAT+S.STAT.BLOCKS+1 *-------------------------------------- -K.ReadDir.A.ADDD +K.ReadDir.ADDD lda #$0F sta K.S.STAT+S.STAT.P.TYPE lda /S.STAT.MODE.DIR sta K.S.STAT+S.STAT.MODE+1 - bra K.ReadDir.A.AddAccess + bra K.ReadDir.AddAccess *-------------------------------------- -K.ReadDir.A.ADDF +K.ReadDir.ADDF lda /S.STAT.MODE.REG sta K.S.STAT+S.STAT.MODE+1 @@ -475,7 +475,7 @@ K.ReadDir.A.ADDF dex bne .1 *-------------------------------------- -K.ReadDir.A.AddAccess +K.ReadDir.AddAccess ldy #$1E ProDOS Access lda (ZPPtr3),y @@ -493,16 +493,16 @@ K.ReadDir.A.AddAccess .3 txa sta K.S.STAT+S.STAT.MODE *-------------------------------------- -K.ReadDir.A.AddTime +K.ReadDir.AddTime >PUSHWI K.S.STAT+S.STAT.CTIME lda #$18 creation Date/time - jsr K.ReadDir.A.ConvertTime + jsr K.ReadDir.ConvertTime >PUSHWI K.S.STAT+S.STAT.MTIME lda #$21 mod Date/time - jsr K.ReadDir.A.ConvertTime + jsr K.ReadDir.ConvertTime *-------------------------------------- -K.ReadDir.A.AddStat +K.ReadDir.AddStat ldy #S.STAT-1 .1 lda K.S.STAT,y @@ -523,7 +523,7 @@ ADDF.DST .DA #S.STAT.P.TYPE,#S.STAT.BLOCKS,#S.STAT.BLOCKS+1 .DA #S.STAT.SIZE,#S.STAT.SIZE+1,#S.STAT.SIZE+2 .DA #S.STAT.P.AUXTYPE,#S.STAT.P.AUXTYPE+1 *-------------------------------------- -K.ReadDir.A.ClrStat +K.ReadDir.ClrStat ldx #S.STAT-1 .1 stz K.S.STAT,x @@ -531,7 +531,7 @@ K.ReadDir.A.ClrStat bpl .1 rts *-------------------------------------- -K.ReadDir.A.AddFNToBuf +K.ReadDir.AddFNToBuf ldy #$1C version/min_version for lowercase bitmap lda (ZPPtr3),y check bxxxxxxx.xxxxxxxx... bpl .7 not set, no lowercase bitmap present @@ -571,24 +571,24 @@ K.ReadDir.A.AddFNToBuf ldy #1 .8 lda (ZPPtr3),y - jsr K.ReadDir.A.AddToBuf + jsr K.ReadDir.AddToBuf iny dex bne .8 txa - jsr K.ReadDir.A.AddToBuf + jsr K.ReadDir.AddToBuf rts *-------------------------------------- -K.ReadDir.A.AddToBuf +K.ReadDir.AddToBuf sta (ZPPtr4) inc ZPPtr4 bne .8 inc ZPPtr4+1 .8 rts *-------------------------------------- -K.ReadDir.A.ConvertTime +K.ReadDir.ConvertTime clc adc ZPPtr3 tay diff --git a/SYS/KERNEL.S.DRV.txt b/SYS/KERNEL.S.DRV.txt index fbe073b3..0286777b 100644 --- a/SYS/KERNEL.S.DRV.txt +++ b/SYS/KERNEL.S.DRV.txt @@ -283,7 +283,7 @@ DRV.SmartPort.Cnt *-------------------------------------- * NULL DEVICE *-------------------------------------- -DRV.NULL.Code cld +DRV.NULL cld jmp (.1,x) *-------------------------------------- .1 .DA .2 STATUS @@ -311,7 +311,7 @@ DRV.NULL.Code cld *-------------------------------------- * SYS DEVICE *-------------------------------------- -DRV.SYS.Code cld +DRV.SYS cld jmp (.1,x) .1 .DA .2 STATUS .DA A2osX.BADCALL READBLOCK diff --git a/SYS/KERNEL.S.ENV.txt b/SYS/KERNEL.S.ENV.txt index a0014bd4..5159881c 100644 --- a/SYS/KERNEL.S.ENV.txt +++ b/SYS/KERNEL.S.ENV.txt @@ -122,12 +122,12 @@ K.ExpandStr stz .88+1 Reset Intermediate string... .9 rts */-------------------------------------- -* # PutEnv.YA +* # PutEnv * **In:** * Y,A = PTR to String NAME=VALUE (C-String) * **Out:** *\-------------------------------------- -K.PutEnv.YA >STYA ZPPtr1 NAME=VALUE +K.PutEnv >STYA ZPPtr1 NAME=VALUE ldy #0 @@ -263,14 +263,14 @@ K.SetEnv.I jsr K.UnsetEnv.I * sec rts */-------------------------------------- -* # GetEnv.YA +* # GetEnv * **In:** * Y,A = PTR to NAME (PSTR) * **Out:** * CC : Y,A = PTR to VALUE (PSTR) * CS : not found *\-------------------------------------- -K.GetEnv.YA >STYA ZPPtr1 +K.GetEnv >STYA ZPPtr1 jsr ENV.FindVarP1 bcs .9 @@ -280,12 +280,12 @@ K.GetEnv.YA >STYA ZPPtr1 .9 >LDYA ZPPtr3 rts */-------------------------------------- -* # UnsetEnv.YA +* # UnsetEnv * **In:** * Y,A = PTR To Name (PSTR) * **Out:** *\-------------------------------------- -K.UnsetEnv.YA >STYA ZPPtr1 Store VAR Name +K.UnsetEnv >STYA ZPPtr1 Store VAR Name K.UnsetEnv.I jsr ENV.FindVarP1 bcs K.UnsetEnv.I.8 not found, quit @@ -519,7 +519,7 @@ ENV.DelVarP3 >LDYA ZPPtr3 save actual Ptr *-------------------------------------- ENV.InitEnvP3 ldy #S.PS.hENV lda (pPs),y - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA ZPPtr3 Store ENV rts *-------------------------------------- diff --git a/SYS/KERNEL.S.FIO.txt b/SYS/KERNEL.S.FIO.txt index 649ca2f0..745be2b3 100644 --- a/SYS/KERNEL.S.FIO.txt +++ b/SYS/KERNEL.S.FIO.txt @@ -2,7 +2,7 @@ NEW PREFIX /A2OSX.BUILD AUTO 4,1 */-------------------------------------- -* # LoadTxtFile.YA +* # LoadTxtFile * Load TXT a file in memory (with ending 0) * **In:** * Y,A = File Path @@ -10,8 +10,7 @@ AUTO 4,1 * Y,A = File Length (without ending 0) * X = hMem of Loaded File *\-------------------------------------- -K.LoadTxtFile.YA - pha +K.LoadTxtFile pha >PUSHWI 0 Aux type >PUSHBI 4 S.FI.T.TXT >PUSHBI SYS.FOpen.R @@ -52,7 +51,7 @@ K.LoadFile clc lda #K.E.FTB bra .99 -.1 jsr K.GetMem.YA +.1 jsr K.GetMem bcs .99 >STYA FIO.Mem stx .8+1 diff --git a/SYS/KERNEL.S.GP.txt b/SYS/KERNEL.S.GP.txt index 58b483a5..2473fe3b 100644 --- a/SYS/KERNEL.S.GP.txt +++ b/SYS/KERNEL.S.GP.txt @@ -154,9 +154,9 @@ GP.SysCall dec IRQ.InKernel *-------------------------------------- GP.LibCall dec IRQ.InKernel - pha No need to save X, K.GetMemPtr.A will leave it unmodified + pha No need to save X, K.GetMemPtr will leave it unmodified tya Get LIB hMem in A - jsr K.GetMemPtr.A Get LIB Code Segment (MemMgr in $E000, no BNK change) + jsr K.GetMemPtr Get LIB Code Segment (MemMgr in $E000, no BNK change) >STYA .1+1 pla .1 jsr * SELF MODIFIED diff --git a/SYS/KERNEL.S.INIT.txt b/SYS/KERNEL.S.INIT.txt index d0ee5f3b..5ca5e98f 100644 --- a/SYS/KERNEL.S.INIT.txt +++ b/SYS/KERNEL.S.INIT.txt @@ -149,7 +149,7 @@ Kernel.Init3 sta SETALTZP jsr PS0Init bcs * >LDYAI MSG.Init3 - >SYSCALL PrintF.YA + >SYSCALL PrintF jsr DevMgrInit bcs * @@ -168,28 +168,28 @@ Kernel.Init3 sta SETALTZP ldy #S.PS.hPREFIX lda (pPs),y - >SYSCALL GetMemPtr.A + >SYSCALL GetMemPtr >PUSHYA >LDYAI MSG.Prefix - >SYSCALL PrintF.YA + >SYSCALL PrintF >PUSHWI STARTUP.CMDLINE >LDYAI MSG.Startup - >SYSCALL PrintF.YA + >SYSCALL PrintF >LDYAI STARTUP.CMDLINE - >SYSCALL ExpandStr.YA + >SYSCALL ExpandStr phx Save Expanded CMDLINE for discard - >SYSCALL CreatePS.YA + >SYSCALL CreatePS bcs .9 pla - >SYSCALL FreeMem.A ...discard... + >SYSCALL FreeMem ...discard... >LDYAI MSG.Init3.OK - >SYSCALL PrintF.YA + >SYSCALL PrintF >DEBUGOA @@ -197,7 +197,7 @@ Kernel.Init3 sta SETALTZP .9 >PUSHA >LDYAI MSG.StartupErr - >SYSCALL PrintF.YA + >SYSCALL PrintF bra * No need to discard Expanded CMDLINE *-------------------------------------- * Modified CHARGET/CHARGOT for ROM CALL @@ -461,18 +461,10 @@ MemMgrInit >LDYAI Mem.MHiMem rts *-------------------------------------- -PS0Init ldx #S.DEV*2 NUL,SYS - -.1 lda DevMgr.NUL-1,x - sta Dev.Table-1,x - dex - bne .1 - +PS0Init sta SET80STORE ldx #0 - sta SET80STORE - ldy #0 .2 lda DevMgr.SYS.TITLE,y @@ -533,7 +525,7 @@ PS0Init ldx #S.DEV*2 NUL,SYS >STYA pStack >LDYAI DEV.SYS - >SYSCALL MkNod.YA Will open SYS + >SYSCALL MkNod Will open SYS bcs .9 ldy #S.PS.hStdIn @@ -551,25 +543,29 @@ PS0Init ldx #S.DEV*2 NUL,SYS *-------------------------------------- DevMgr.SYS.TITLE .AZ "A2osX System Screen" *-------------------------------------- -DevMgr.NUL cld - jmp (DevMgr.NUL.Code,x) - .DA #S.DEV.S.WRITE+S.DEV.S.READ+S.DEV.S.OPENED - .BS 6 - .AZ "NUL" NAME - .HS 00 NAME must Be 4 bytes long +IOCTL.NULL .DA #S.NODE.T.CDEV + .DA #0 HANDLER + .DA #0 BUSID + .DA #0 DEVID + .DA DRV.NULL + .DA 0 ROMPTR + .AZ "NULL" NAME + .HS 000000 *-------------------------------------- -DevMgr.SYS cld - jmp (DevMgr.SYS.Code,x) - .DA #S.DEV.S.WRITE+S.DEV.S.READ - .BS 6 +IOCTL.SYS .DA #S.NODE.T.CDEV + .DA #0 HANDLER + .DA #0 BUSID + .DA #1 DEVID + .DA DRV.SYS + .DA 0 ROMPTR .AZ "SYS" NAME - .HS 00 NAME must Be 4 bytes long + .HS 00000000 *-------------------------------------- * Setup AuxLC $FFFE->Kernel IRQ Handler * if irq not handled, jmp (S.IrqMgrOldFFFE) *-------------------------------------- IrqMgrInit >LDYAI MSG.IRQ - >SYSCALL PrintF.YA + >SYSCALL PrintF php sei @@ -600,7 +596,7 @@ IrqMgrInit >LDYAI MSG.IRQ >STYA GP.IrqH.JSR+1 >LDYAI MSG.IRQ.CLOCK - >SYSCALL PrintF.YA + >SYSCALL PrintF clc rts @@ -616,7 +612,7 @@ IrqMgrInit >LDYAI MSG.IRQ >STYA GP.IrqH.JSR+1 >LDYAI MSG.IRQ.VBL - >SYSCALL PrintF.YA + >SYSCALL PrintF clc rts @@ -627,7 +623,7 @@ IrqMgrInit >LDYAI MSG.IRQ sta SYS.BASL0+38 >LDYAI MSG.IRQ.POLL - >SYSCALL PrintF.YA + >SYSCALL PrintF clc rts @@ -795,7 +791,7 @@ IrqMgrInit.HZ2Tick rts *-------------------------------------- DevMgrInit >LDYAI MSG.DEV - >SYSCALL PrintF.YA + >SYSCALL PrintF lda DEVCNT sta DevMgrInit.DEVCNT @@ -914,11 +910,11 @@ DevMgrInit.SP ldy #$ff clc adc #3 Compute smartport entry point sta .1+1 - sta DEV.HEADER+S.DEV.ROM.JMP + sta IOCTL.BDEV+S.NODE.DEV.ROMPTR lda ZPPtr1+1 sta .1+2 - lda DEV.HEADER+S.DEV.DEVID + lda IOCTL.BDEV+S.DEV.DEVID sta SP.DEV.STATUS.DEVID .1 jsr $ffff Self Modified @@ -926,38 +922,23 @@ DevMgrInit.SP ldy #$ff .DA SP.DEV.STATUS bcs .9 - lda SP.DEV.STATUS.DATA+S.DSTAT.S - sta DEV.HEADER+S.DEV.S - >LDYAI A2osX.PrtDrv jsr DevMgrInit.AddDev .9 rts *-------------------------------------- DevMgrInit.AddDev - >STYA DEV.HEADER+S.DEV.DRV.JMP - lda DevMgr.Count - cmp #K.DEV.MAX - beq .9 + >STYA IOCTL.BDEV+S.NODE.DEV.DRVPTR - inc DevMgr.Count - >SYSCALL GetDevByID.A - >STYA ZPPtr2 - - lda DEV.HEADER+S.DEV.BUSID + lda IOCTL.BDEV+S.NODE.DEV.BUSID ora #$30 - sta DEV.HEADER+S.DEV.NAME+1 SnDy + sta IOCTL.BDEV+S.NODE.DEV.NAME+1 SnDy - lda DEV.HEADER+S.DEV.DEVID + lda IOCTL.BDEV+S.NODE.DEV.DEVID ora #$30 - sta DEV.HEADER+S.DEV.NAME+3 SxDn + sta IOCTL.BDEV+S.NODE.DEV.NAME+3 SxDn - ldy #S.DEV-1 - -.1 lda DEV.HEADER,y - sta (ZPPtr2),y - dey - bpl .1 + >LDYAI IOCTL.BDEV clc rts @@ -966,15 +947,14 @@ DevMgrInit.AddDev sec rts *-------------------------------------- -DEV.HEADER cld - jmp ($ffff,x) - .DA #S.DEV.S.BLOCK S - .BS 1 F - .BS 1 BUS.ID - .BS 1 DEV.ID - .BS 2 ROM.JMP - .BS 1 - .AZ "S1D1" 5 bytes +IOCTL.BDEV .DA #S.NODE.T.BDEV + .DA #0 HANDLER + .DA #0 BUSID + .DA #0 DEVID + .BS 2 DRVPTR + .BS 2 ROMPTR + .AZ "S1D1" NAME + .HS 000000 *-------------------------------------- SmartPort.OFS .HS 010305 SmartPort.SIG .HS 200003 @@ -988,7 +968,7 @@ SP.DEV.STATUS.DATA .BS S.DSTAT *-------------------------------------- EvtMgrInit >LDYAI MSG.EVT - >SYSCALL PrintF.YA + >SYSCALL printf lda #$A5 sta A2osX.TIMER16 lda #$9B @@ -1000,13 +980,13 @@ EvtMgrInit >LDYAI MSG.EVT rts *-------------------------------------- FltMgrInit >LDYAI MSG.FLT - >SYSCALL PrintF.YA + >SYSCALL printf stz Flt.Table clc rts *-------------------------------------- TskMgrInit >LDYAI MSG.TSK - >SYSCALL PrintF.YA + >SYSCALL printf jsr CORE.PSSelect0 diff --git a/SYS/KERNEL.S.IO.txt b/SYS/KERNEL.S.IO.txt index d395c5f7..4ee31a79 100644 --- a/SYS/KERNEL.S.IO.txt +++ b/SYS/KERNEL.S.IO.txt @@ -2,7 +2,7 @@ NEW PREFIX /A2OSX.BUILD AUTO 4,1 *-------------------------------------- -IO.SELECT jsr K.GetMemPtr.A +IO.SELECT jsr K.GetMemPtr >STYA pNode rts *-------------------------------------- @@ -40,7 +40,7 @@ IO.WRITE.CDEV ldy #S.NODE.DEV.JMP .1 jmp $ffff *-------------------------------------- IO.WRITE.SSOCK lda (pNode) #S.NODE.HANDLER - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA .1 ldy #S.NODE.SSOCK.HSKT @@ -60,11 +60,11 @@ IO.WRITE.FIFO ldy #S.NODE.FIFO.S ldy #S.NODE.FIFO.hMem lda (pNode),y - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA .1+2 ldy #S.NODE.FIFO.Head - lda (pNode),y + lda (pNodae),y inc dey #S.NODE.FIFO.Tail cmp (pNode),y diff --git a/SYS/KERNEL.S.JMP.txt b/SYS/KERNEL.S.JMP.txt index 858b3460..ab9b2766 100644 --- a/SYS/KERNEL.S.JMP.txt +++ b/SYS/KERNEL.S.JMP.txt @@ -136,7 +136,7 @@ K.SYSCALL.JMP .DA 0 $00 *-------------------------------------- * $E000 *-------------------------------------- - .DA K.GetStkObjProperty $E0 + .DA K.GetStkObjProp $E0 .DA K.FreeMem .DA K.GetMemPtr .DA K.GetMemByID diff --git a/SYS/KERNEL.S.MEM.txt b/SYS/KERNEL.S.MEM.txt index 74f77cb1..c6c4eae8 100644 --- a/SYS/KERNEL.S.MEM.txt +++ b/SYS/KERNEL.S.MEM.txt @@ -240,7 +240,7 @@ K.FreeMem phy beq * Slot=0, reserved by Kernel - jsr K.GetMemByID.A X unmodified + jsr K.GetMemByID X unmodified lda (ZPMemMgrSPtr) bpl .9 In use ? @@ -257,7 +257,7 @@ K.FreeMem phy lda (ZPMemMgrSPtr),y Any BINPATH to discard ? beq .1 - jsr K.GetMemByID.A X unmodified + jsr K.GetMemByID X unmodified lda (ZPMemMgrSPtr) bpl * ***MUST BE ALLOCATED*** @@ -267,7 +267,7 @@ K.FreeMem phy .1 lda Mem.LastSlot beq .8 - jsr K.GetMemByID.A X unmodified + jsr K.GetMemByID X unmodified lda (ZPMemMgrSPtr) bmi .8 used, exit @@ -275,7 +275,7 @@ K.FreeMem phy beq .3 empty list: go set Mem.Free=Mem.HiMem lda Mem.LastSlot - jsr K.GetMemByID.A X unmodified + jsr K.GetMemByID X unmodified lda (ZPMemMgrSPtr) bpl .2 free again! loop @@ -315,7 +315,7 @@ K.FreeMem phy >PUSHYA >LDYAI K.FreeMem.ERR - >SYSCALL PrintF.YA + >SYSCALL printf .91 ldx #$ff bit $C000,x @@ -331,7 +331,7 @@ K.FreeMem.ERR .AZ "FreeMem:%H:hMem already freed." * Y,A = PTR to MemBlock * (X unmodified) *\-------------------------------------- -K.GetMemPtr jsr K.GetMemByID.A +K.GetMemPtr jsr K.GetMemByID ldy #S.MEM.PTR lda (ZPMemMgrSPtr),y pha @@ -419,7 +419,7 @@ K.NewStr >STYA .1+1 bne .3 inc -.3 jsr K.GetMem.YA +.3 jsr K.GetMem bcs .9 >STYA .5+1 @@ -524,7 +524,7 @@ K.SListFree *\-------------------------------------- K.GetStkObjProp phy sta SETREADAUX - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA ZPMemMgrTmp1 ply @@ -592,7 +592,7 @@ K.LoadStkObj >SYSCALL LoadFile >STYA A4L Save Destination Address in AUX lda .8+1 - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA A1L Save MAIN base Ptr diff --git a/SYS/KERNEL.S.OSD.txt b/SYS/KERNEL.S.OSD.txt index fab61c30..b5e33aea 100644 --- a/SYS/KERNEL.S.OSD.txt +++ b/SYS/KERNEL.S.OSD.txt @@ -35,7 +35,7 @@ X.GUIOSD >STYA ZPCmdPtr txa beq .3 - jsr GO.GetMemPtr.A + jsr GO.GetMemPtr >STYA ZPDstBMPtr @@ -150,7 +150,7 @@ BITBLT >LDYA CB.CACHE+S.CB.SrcPtr bne BITBLT.1 tya - jsr GO.GetMemPtr.A + jsr GO.GetMemPtr BITBLT.1 >STYA ZPSrcBMPtr @@ -190,7 +190,7 @@ GETTEXTSIZE clc php lda CB.Cache+S.CB.hFONT - jsr GO.GetMemPtr.A + jsr GO.GetMemPtr >STYA ZPFontPtr ldy #S.FON-1 @@ -566,7 +566,7 @@ BM.Create lda DstBM.Cache+S.BM.W tay pla adc /S.BM - jsr GO.GetMem.YA + jsr GO.GetMem bcs .9 >STYA ZPDstBMPtr @@ -652,9 +652,9 @@ CB.Update >LDYA ZPCmdPtr clc Aux To Main jmp AuxMove *-------------------------------------- -GO.GetMem.YA ldx #SYS.GetMem.YA +GO.GetMem ldx #SYS.GetMem .HS 2C BIT ABS -GO.GetMemPtr.A ldx #SYS.GetMemPtr.A +GO.GetMemPtr ldx #SYS.GetMemPtr jmp (K.SYSCALL.JMP,x) *-------------------------------------- CB.Cache .BS S.CB diff --git a/SYS/KERNEL.S.PFT.txt b/SYS/KERNEL.S.PFT.txt index 87c8b1e8..5ac5eaea 100644 --- a/SYS/KERNEL.S.PFT.txt +++ b/SYS/KERNEL.S.PFT.txt @@ -56,7 +56,7 @@ PFT.CheckPathYA ldy #S.PFT.HANDLER lda (ZPPtr2),y get hLib - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA .7+1 pla discard JSR return @ @@ -85,12 +85,12 @@ PFT.CheckNodeSTK lda (pStack) read hFILE on top of stack PFT.CheckNodeA sta .9+1 save hFILE - jsr K.GetMemPtr.A X = unmodified + jsr K.GetMemPtr X = unmodified >STYA ZPPtr1 lda (ZPPtr1) beq .9 Handler is 0, back to kernel.... - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA .1+1 pla discard JSR return @ diff --git a/SYS/KERNEL.S.PS.txt b/SYS/KERNEL.S.PS.txt index bd83bcd6..dccd1f3f 100644 --- a/SYS/KERNEL.S.PS.txt +++ b/SYS/KERNEL.S.PS.txt @@ -2,26 +2,23 @@ NEW PREFIX /A2OSX.BUILD AUTO 4,1 */-------------------------------------- -* # ExecPSNewEnv.YA -* # ExecPS.YA (Blocking Parent PID) -* # CreatePSNewEnv.YA -* # CreatePS.YA (Non Blocking) +* # ExecPSNewEnv. +* # ExecPS (Blocking Parent PID) +* # CreatePSNewEnv +* # CreatePS (Non Blocking) * **In:** * Y,A = PTR To Cmd Line * **Out:** * A = Child PSID *\-------------------------------------- -K.ExecPSNewEnv.YA - ldx #S.PS.F.DUPENV+S.PS.F.HOLD +K.ExecPSNewEnv ldx #S.PS.F.DUPENV+S.PS.F.HOLD .HS 2C bit abs -K.ExecPS.YA - ldx #S.PS.F.HOLD +K.ExecPS ldx #S.PS.F.HOLD .HS 2C bit abs -K.CreatePSNewEnv.YA +K.CreatePSNewEnv ldx #S.PS.F.DUPENV .HS 2C bit abs -K.CreatePS.YA - ldx #0 +K.CreatePS ldx #0 stx PS.Flags >STYA PS.CL @@ -93,7 +90,7 @@ PS.CreateChild ldx #0 phx >LDYAI S.PS - jsr K.GetMem0.YA Blank Everything in this S.PS + jsr K.GetMem0 Blank Everything in this S.PS bcs .99 >STYA ZPPtr3 @@ -101,7 +98,7 @@ PS.CreateChild ldx #0 plx sta PS.Table.hMem,x - jsr PS.SetMemOwner Set Ownership + jsr PS.SetMemOwner Set Ownership ldy #S.PS.PID lda CORE.LastPSID @@ -115,7 +112,7 @@ PS.CreateChild ldx #0 ldy #S.PS.hPREFIX copy hPREFIX... lda (pPs),y - jsr K.GetMemPtr.A + jsr K.GetMemPtr jsr K.NewStr.YA bcs .9 @@ -191,7 +188,7 @@ PS.CmdLine2Args >STYA ZPPtr1 bcc .3 inc -.3 jsr K.GetMem.YA +.3 jsr K.GetMem bcs .9 phy save PTR.LO @@ -271,7 +268,7 @@ PS.Init jsr BIN.Load.YA Y,A=filename full path ldy #S.PS.hCS sta (ZPPtr3),y save CS hMem in S.PS - jsr K.GetMemByID.A + jsr K.GetMemByID jsr PS.SetMemOwner Set Ownership ldy #H.BIN.EXE.DS.SIZE+1 @@ -285,7 +282,7 @@ PS.Init jsr BIN.Load.YA Y,A=filename full path lda (ZPPtr4),y tay txa Y,A = DS.SIZE - jsr K.GetMem0.YA + jsr K.GetMem0 bcs .9 phy @@ -337,17 +334,17 @@ PS.Init jsr BIN.Load.YA Y,A=filename full path clc .9 rts *-------------------------------------- -* PS.DupEnv.A +* PS.DupEnv * In: * A = ENV hMem To Duplicate * Out: * A = hMem to new ENV *-------------------------------------- -PS.DupEnv.A jsr K.GetMemPtr.A +PS.DupEnv jsr K.GetMemPtr >STYA ZPPtr1 >LDYAI K.ENV.SIZE - jsr K.GetMem.YA + jsr K.GetMem bcs .9 >STYA ZPPtr2 @@ -385,13 +382,13 @@ PS.SetMemOwner lda CORE.LastPSID sta (ZPMEMMGR),y rts */-------------------------------------- -* # GetMemStat.YA +* # GetMemStat * **In:** * Y,A = Ptr to 24 bytes buffer * **Out:** * Buffer filled with memory stats *\-------------------------------------- -K.GetMemStat.YA >STYA ZPMemMgrTmp1 +K.GetMemStat >STYA ZPMemMgrTmp1 ldy #22 ldx #6 @@ -420,25 +417,25 @@ K.GetMemStat.YA >STYA ZPMemMgrTmp1 bpl .3 rts */-------------------------------------- -* # GetPSStatus.A +* # GetPSStatus * **In:** * A = PID * **Out:** * A = Status Byte *\-------------------------------------- -K.GetPSStatus.A jsr CORE.GetPSByID.A +K.GetPSStatus jsr CORE.GetPSByID bcs .9 >STYA ZPPtr1 lda (ZPPtr1) .9 rts */-------------------------------------- -* # GetPSStat.YA +* # GetPSStat * **In:** * Y,A = Ptr to 24 bytes buffer * **Out:** * Buffer filled with PS stats *\-------------------------------------- -K.GetPSStat.YA >STYA ZPPtr1 +K.GetPSStat >STYA ZPPtr1 ldx #0 diff --git a/SYS/KERNEL.S.SLIST.txt b/SYS/KERNEL.S.SLIST.txt index e1d08dcd..b713fc6e 100644 --- a/SYS/KERNEL.S.SLIST.txt +++ b/SYS/KERNEL.S.SLIST.txt @@ -8,7 +8,7 @@ X.SLIST jmp (.1-SYS.SListAdd,x) .DA SLIST.GetByID .DA SLIST.UpdateByID .DA SLIST.New - .DA SLIST.Free.A + .DA SLIST.Free *-------------------------------------- SLIST.Add jsr SLIST.Search bcc .99 Lookup succeeded...DUP @@ -146,13 +146,13 @@ SLIST.UpdateByID rts *-------------------------------------- SLIST.New >LDYAI 160 40k Max before out of memory!!! - jsr K.GetMem0.YA + jsr K.GetMem0 bcs .9 >STYA ZPSListIBlkPtr stx .8+1 >LDYAI 256 - jsr K.GetMem0.YA + jsr K.GetMem0 bcs .9 txa sta (ZPSListIBlkPtr) @@ -161,44 +161,44 @@ SLIST.New >LDYAI 160 40k Max before out of memory!!! .9 rts *-------------------------------------- -SLIST.Free.A sta .8+1 +SLIST.Free sta .8+1 - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA .1+1 ldx #0 .1 lda $ffff,x SELF MODIFIED beq .8 - jsr K.FreeMem.A + jsr K.FreeMem inx bra .1 .8 lda #$ff SELF MODIFIED - jmp K.FreeMem.A + jmp K.FreeMem *-------------------------------------- -SLIST.Select jsr K.GetMemPtr.A +SLIST.Select jsr K.GetMemPtr >STYA ZPSListIBlkPtr ldy ZPSListID+1 sty SLIST.IndexOfs lda (ZPSListIBlkPtr),y - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA ZPSListDBlkPtr lda ZPSListID sta SLIST.BlockOfs rts *-------------------------------------- -SLIST.Search jsr K.GetMemPtr.A +SLIST.Search jsr K.GetMemPtr >STYA ZPSListIBlkPtr stz SLIST.IndexOfs stz ZPSListID+1 lda (ZPSListIBlkPtr) - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA ZPSListDBlkPtr stz SLIST.BlockOfs @@ -276,7 +276,7 @@ SLIST.GetNextBlockByte sty SLIST.IndexOfs - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA ZPSListDBlkPtr stz SLIST.BlockOfs @@ -300,7 +300,7 @@ SLIST.AddBlockByte phx >LDYAI 256 - jsr K.GetMem0.YA + jsr K.GetMem0 bcs .9 >STYA ZPSListDBlkPtr txa @@ -334,7 +334,7 @@ SLIST.SetBlockByte ldy SLIST.IndexOfs lda (ZPSListIBlkPtr),y beq * - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA ZPSListDBlkPtr * stz SLIST.BlockOfs diff --git a/SYS/KERNEL.S.STAT.txt b/SYS/KERNEL.S.STAT.txt index 26b882fb..e52a0a99 100644 --- a/SYS/KERNEL.S.STAT.txt +++ b/SYS/KERNEL.S.STAT.txt @@ -84,7 +84,7 @@ K.Stat.DST .DA #S.STAT.P.TYPE .DA #S.STAT.P.AUXTYPE,#S.STAT.P.AUXTYPE+1 .DA #S.STAT.BLOCKS,#S.STAT.BLOCKS+1 */------------------------------------- -* # MKDir.YA +* # MKDir * **In:** * Y,A = DIR name * **Out:** @@ -92,7 +92,7 @@ K.Stat.DST .DA #S.STAT.P.TYPE * CS : error * A = EC *\------------------------------------- -K.MKDir.YA jsr PFT.CheckPathYA +K.MKDir jsr PFT.CheckPathYA jsr STDIO.SetMLIPathYA lda #S.FI.A.FULL sta K.MLI.PARAMS+S.FI.A @@ -112,7 +112,7 @@ K.MKDir.YA jsr PFT.CheckPathYA >MLICALL MLICREATE rts */-------------------------------------- -* # MkNod.YA +* # MkNod * return a hFile for a given Device Name * **In:** * Y,A=DevName @@ -120,7 +120,7 @@ K.MKDir.YA jsr PFT.CheckPathYA * CC = OK, CS = ERROR * A = hFILE *\-------------------------------------- -K.MkNod.YA jsr K.GetDevByName.YA Ptr1=NAME +K.MkNod jsr K.GetDevByName.YA Ptr1=NAME bcs .9 >STYA .1+1 stx .2+1 @@ -136,7 +136,7 @@ K.MkNod.YA jsr K.GetDevByName.YA Ptr1=NAME bcs .9 >LDYAI S.NODE.DEV - jsr K.GetMem0.YA + jsr K.GetMem0 bcs .9 >STYA ZPPtr3 Ptr3=S.NODE @@ -173,13 +173,13 @@ K.MkNod.YA jsr K.GetDevByName.YA Ptr1=NAME * A = hFILE *\-------------------------------------- K.MKFIFO >LDYAI 256 - jsr K.GetMem.YA + jsr K.GetMem bcs .99 stx .1+1 save FIFO buffer >LDYAI S.NODE.FIFO - jsr K.GetMem0.YA + jsr K.GetMem0 bcs .9 diff --git a/SYS/KERNEL.S.STDIO.txt b/SYS/KERNEL.S.STDIO.txt index 4555f841..075ece9d 100644 --- a/SYS/KERNEL.S.STDIO.txt +++ b/SYS/KERNEL.S.STDIO.txt @@ -593,7 +593,7 @@ K.GetChar ldy #S.PS.hStdIn * CC = success * A = char *\-------------------------------------- -K.GetC.A jsr K.GetMemPtr.A +K.GetC.A jsr K.GetMemPtr >STYA pDev ldy #S.NODE.T @@ -631,7 +631,7 @@ K.GetC.CDEV ldx #DEVMGR.READ .1 jmp $ffff *-------------------------------------- K.GetC.SSOCK lda (pDev) #S.NODE.HANDLER -* jsr K.GetMemPtr.A +* jsr K.GetMemPtr * >STYA .1+1 * ldy #S.NODE.SSOCK.READ @@ -841,7 +841,7 @@ K.FOpen jsr PFT.CheckPathSTK K.FOpen.9 rts K.FOpen.10 >LDYAI S.NODE.REG - jsr K.GetMem0.YA + jsr K.GetMem0 bcs K.FOpen.9 >STYA ZPPtr1 @@ -916,7 +916,7 @@ K.FOpen.AUXTYPE .BS 2 K.FClose.A jsr PFT.CheckNodeA sta K.FClose.A.8+1 - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA ZPPtr1 ldy #S.NODE.T @@ -1201,7 +1201,7 @@ STDIO.SetIOBUF >LDYAI 1024 get a ProDOS IOBUF sta (ZPPtr1),y .9 rts *-------------------------------------- -STDIO.GetRefNum jsr K.GetMemPtr.A +STDIO.GetRefNum jsr K.GetMemPtr >STYA ZPPtr1 ldy #S.NODE.REG.REF lda (ZPPtr1),y diff --git a/SYS/KERNEL.S.STDLIB.txt b/SYS/KERNEL.S.STDLIB.txt index dbac32fb..47c57c62 100644 --- a/SYS/KERNEL.S.STDLIB.txt +++ b/SYS/KERNEL.S.STDLIB.txt @@ -303,7 +303,7 @@ K.realpath >STYA ZPPtr1 .1 ldy #S.PS.hPREFIX lda (pPs),y - jsr K.GetMemPtr.A + jsr K.GetMemPtr >STYA ZPPtr2 ldy #$ff diff --git a/TEST.S.txt b/TEST.S.txt index 65a9db7f..1dd367cc 100644 --- a/TEST.S.txt +++ b/TEST.S.txt @@ -123,7 +123,7 @@ CS.RUN.Pak >PUSHWI 0 Aux type >PUSHW.G PAK.FileSize >LDYA L.MSG6 - >SYSCALL PrintF.YA + >SYSCALL printf *-------------------------------------- CS.RUN.Unpak lda ZPPakHdrPtr clc @@ -251,7 +251,7 @@ CS.RUN.Unpak lda ZPPakHdrPtr .9 >PUSHW UNPAK.Ofs >LDYA L.MSG.UnpakErr - >SYSCALL PrintF.YA + >SYSCALL printf lda #0 sec @@ -316,7 +316,7 @@ DEBUG.S3 pha phy >PUSHA >LDYA L.MSG.DEBUG.S3 - >SYSCALL PrintF.YA + >SYSCALL printf ply plx pla @@ -341,7 +341,7 @@ CS.RUN.Math >PUSHEA.G ENDPTR >PUSHW L.FLOAT1 >LDYA L.MSG1 - >SYSCALL PrintF.YA + >SYSCALL printf *-------------------------------------- >PUSHEA.G MYFLOAT1 >PUSHEA.G MYFLOAT2 @@ -350,7 +350,7 @@ CS.RUN.Math >PUSHEA.G ENDPTR >PUSHEA.G MYFLOAT3 >LDYA L.MSG2 - >SYSCALL PrintF.YA + >SYSCALL printf *-------------------------------------- >PUSHEA.G MYFLOAT3 >LEA.G MYFLOAT3 @@ -358,7 +358,7 @@ CS.RUN.Math >PUSHEA.G ENDPTR >PUSHEA.G MYFLOAT3 >LDYA L.MSG3 - >SYSCALL PrintF.YA + >SYSCALL printf *-------------------------------------- >PUSHW L.FLOAT1 >LEA.G MYLONG @@ -366,7 +366,7 @@ CS.RUN.Math >PUSHEA.G ENDPTR >PUSHEA.G MYLONG >LDYA L.MSG4 - >SYSCALL PrintF.YA + >SYSCALL printf *-------------------------------------- >PUSHW L.LONG1 >LEA.G MYFLOAT1 @@ -374,7 +374,7 @@ CS.RUN.Math >PUSHEA.G ENDPTR >PUSHEA.G MYFLOAT1 >LDYA L.MSG5 - >SYSCALL PrintF.YA + >SYSCALL printf lda #0 sec rts