Kernel 0.94

This commit is contained in:
Rémy GIBERT 2020-02-28 08:21:46 +01:00
parent 1969e7e8ba
commit cd258586b4
104 changed files with 647 additions and 671 deletions

View File

@ -54,7 +54,7 @@ CS.INIT clc
CS.RUN CS.RUN
* Put your code here * Put your code here
>LDYA L.MSG.HELLO >LDYA L.MSG.HELLO
>SYSCALL puts >SYSCALL PutS
.8 lda #0 Exit Code = Succes .8 lda #0 Exit Code = Succes
sec QUIT Process sec QUIT Process
rts rts

View File

@ -54,7 +54,7 @@ CS.INIT clc
CS.RUN CS.RUN
* Put your code here * Put your code here
* >LDYA L.MSG.Test Load EFFECTIVE address * >LDYA L.MSG.Test Load EFFECTIVE address
* >SYSCALL puts Call API to print a string * >SYSCALL PutS Call API to print a string
.8 lda #0 Exit Code = Succes .8 lda #0 Exit Code = Succes
sec QUIT Process sec QUIT Process
rts rts

Binary file not shown.

View File

@ -57,7 +57,7 @@ CS.RUN >LIBCALL hLIBETALK,LIBETALK.GETCFG
* jmp CS.RUN.ERR * jmp CS.RUN.ERR
.1 ldy #S.PS.ARGC .1 ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
cmp #1 cmp #1
bcs .2 bcs .2
jmp CS.RUN.DUMP jmp CS.RUN.DUMP
@ -71,7 +71,7 @@ CS.RUN >LIBCALL hLIBETALK,LIBETALK.GETCFG
>SYSCALL sscanf >SYSCALL sscanf
bcs CS.RUN.ERR bcs CS.RUN.ERR
ldy #S.PS.ARGC ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
cmp #1 cmp #1
beq CS.RUN.QUERY beq CS.RUN.QUERY
cmp #3 cmp #3
@ -80,7 +80,7 @@ CS.RUN >LIBCALL hLIBETALK,LIBETALK.GETCFG
CS.RUN.ERR >PUSHBI 0 CS.RUN.ERR >PUSHBI 0
>LDYA L.MSG.Usage >LDYA L.MSG.Usage
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -113,7 +113,7 @@ CS.RUN.QUERY jsr Init.Timeout
bne .4 bne .4
>PUSHBI 8 >PUSHBI 8
>LDYA L.MSG2 >LDYA L.MSG2
>SYSCALL printf >SYSCALL PrintF
.8 lda #0 .8 lda #0
.9 sec .9 sec
rts rts
@ -141,7 +141,7 @@ CS.RUN.ADD >PUSHEA.G DST.MAC+5
CS.RUN.DUMP >LIBCALL hLIBETALK,LIBETALK.AARP.GETCACHE CS.RUN.DUMP >LIBCALL hLIBETALK,LIBETALK.AARP.GETCACHE
>STYA ZPPTR1 >STYA ZPPTR1
>LDYA L.MSG0 >LDYA L.MSG0
>SYSCALL puts >SYSCALL PutS
ldx #K.AARPCACHE.SIZE ldx #K.AARPCACHE.SIZE
.1 lda (ZPPTR1) .1 lda (ZPPTR1)
@ -166,7 +166,7 @@ CS.RUN.DUMP >LIBCALL hLIBETALK,LIBETALK.AARP.GETCACHE
>PUSHBI 12 >PUSHBI 12
>LDYA L.MSG1 >LDYA L.MSG1
phx phx
>SYSCALL printf >SYSCALL PrintF
plx plx
.4 lda ZPPTR1 .4 lda ZPPTR1
clc clc

View File

@ -75,7 +75,7 @@ CS.RUN >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG is TCPIP loaded ?
lda (ZPIPCfgPtr) Configured ? lda (ZPIPCfgPtr) Configured ?
bmi CS.RUN.IPOK bmi CS.RUN.IPOK
>LDYA L.MSG.IPKO >LDYA L.MSG.IPKO
>SYSCALL puts >SYSCALL PutS
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -104,11 +104,11 @@ CS.RUN.IPOK ldy #S.IPCFG.IP+3
>PUSHW ZPHostPtr >PUSHW ZPHostPtr
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.UNKNOWN >LDYA L.MSG.UNKNOWN
>SYSCALL printf >SYSCALL PrintF
bra CS.RUN.ESYN bra CS.RUN.ESYN
.9 >PUSHBI 0 .9 >PUSHBI 0
>LDYA L.MSG.USAGE >LDYA L.MSG.USAGE
>SYSCALL printf >SYSCALL PrintF
CS.RUN.ESYN lda #E.SYN CS.RUN.ESYN lda #E.SYN
secCS.RUN.RTS secCS.RUN.RTS
@ -159,7 +159,7 @@ CS.RUN.PORTOK >PUSHW ZPHostPtr
bpl .1 bpl .1
>PUSHBI 8 >PUSHBI 8
>LDYA L.MSG.HOSTOK >LDYA L.MSG.HOSTOK
>SYSCALL printf >SYSCALL PrintF
CS.RUN.OPENSKT >PUSHBI 0 no protocol CS.RUN.OPENSKT >PUSHBI 0 no protocol
lda #S.SOCKET.T.DGRAM lda #S.SOCKET.T.DGRAM
@ -173,7 +173,7 @@ CS.RUN.OPENSKT >PUSHBI 0 no protocol
>LIBCALL hLIBTCPIP,LIBTCPIP.Bind >LIBCALL hLIBTCPIP,LIBTCPIP.Bind
bcc .2 bcc .2
.9 >LDYA L.MSG.SKTKO .9 >LDYA L.MSG.SKTKO
>SYSCALL puts >SYSCALL PutS
lda #E.SYN lda #E.SYN
sec sec
c rts c rts
@ -182,9 +182,9 @@ c rts
>LIBCALL hLIBTCPIP,LIBTCPIP.Connect >LIBCALL hLIBTCPIP,LIBTCPIP.Connect
bcs .9 bcs .9
>LDYA L.MSG.SKTOK >LDYA L.MSG.SKTOK
>SYSCALL puts >SYSCALL PutS
>LDYAI RESP.BUFSIZE >LDYAI RESP.BUFSIZE
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPRespBufPtr >STYA ZPRespBufPtr
txa txa
@ -203,7 +203,7 @@ CS.RUN.SKTERR pha
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>LDYA L.MSG.SKTERR >LDYA L.MSG.SKTERR
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
rts rts
@ -212,7 +212,7 @@ CS.RUN.IOERR pha
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>LDYA L.MSG.IOERR >LDYA L.MSG.IOERR
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
rts rts
@ -275,7 +275,7 @@ CS.RUN.DIRDECODE
>PUSHW ZPPayloadLen >PUSHW ZPPayloadLen
>PUSHW ZPPayloadPtr >PUSHW ZPPayloadPtr
ldy #S.PS.hStdOut ldy #S.PS.hStdOut
lda (pPs),y lda (pPS),y
>SYSCALL fwrite >SYSCALL fwrite
>INC.G bResponse >INC.G bResponse
bra .1 bra .1
@ -291,7 +291,7 @@ CS.RUN.DIRDECODE
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN.UNRLE >LDYA ZPPayloadLen CS.RUN.UNRLE >LDYA ZPPayloadLen
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPPayloadPtr >STYA ZPPayloadPtr
>STYA ZPPtr >STYA ZPPtr

View File

@ -63,7 +63,7 @@ CS.RUN >LIBCALL hLIBTCPIP,LIBTCPIP.GETCFG
jmp CS.RUN.ERR jmp CS.RUN.ERR
.1 ldy #S.PS.ARGC .1 ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
cmp #1 cmp #1
bcs .2 bcs .2
jmp CS.RUN.DUMP jmp CS.RUN.DUMP
@ -81,7 +81,7 @@ CS.RUN >LIBCALL hLIBTCPIP,LIBTCPIP.GETCFG
bcs CS.RUN.ERR bcs CS.RUN.ERR
ldy #S.PS.ARGC ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
cmp #1 cmp #1
beq CS.RUN.QUERY beq CS.RUN.QUERY
cmp #3 cmp #3
@ -90,7 +90,7 @@ CS.RUN >LIBCALL hLIBTCPIP,LIBTCPIP.GETCFG
CS.RUN.ERR >PUSHW L.MSG.Usage CS.RUN.ERR >PUSHW L.MSG.Usage
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -129,7 +129,7 @@ CS.RUN.QUERY jsr Init.Timeout
bne .3 bne .3
>PUSHBI 10 >PUSHBI 10
>SYSCALL printf >SYSCALL PrintF
.8 lda #0 .8 lda #0
.9 sec .9 sec
rts rts
@ -158,7 +158,7 @@ CS.RUN.ADD lda #2
CS.RUN.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.ARP.GETCACHE CS.RUN.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.ARP.GETCACHE
>STYA ZPPTR1 >STYA ZPPTR1
>LDYA L.MSG0 >LDYA L.MSG0
>SYSCALL puts >SYSCALL PutS
lda #K.ARPCACHE.SIZE lda #K.ARPCACHE.SIZE
sta EntryCount sta EntryCount
@ -190,7 +190,7 @@ CS.RUN.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.ARP.GETCACHE
bne .2 bne .2
>PUSHBI 13 >PUSHBI 13
>SYSCALL printf >SYSCALL PrintF
.4 lda ZPPTR1 .4 lda ZPPTR1
clc clc

View File

@ -337,7 +337,7 @@ DIR.HS jsr SRC.GetNextCharNB
bcs .99 bcs .99
jsr SRC.IsDigit16 jsr SRC.IsDigit16
bcs .99 bcs .99
.1 >STA.G DIR.Byte .1 sta DIR.Byte
jsr SRC.GetNextChar jsr SRC.GetNextChar
bcc .2 bcc .2
@ -350,19 +350,19 @@ DIR.HS jsr SRC.GetNextCharNB
cmp #'.' cmp #'.'
bne .99 bne .99
.22 >LDA.G DIR.Byte .22 sta DIR.Byte
jsr OUT.EmitByte jsr OUT.EmitByte
bcc .5 bcc .5
rts rts
.3 pha .3 pha
>LDA.G DIR.Byte sta DIR.Byte
asl asl
asl asl
asl asl
asl asl
>STA.G DIR.Byte sta DIR.Byte
pla pla
>ORA.G DIR.Byte ora DIR.Byte
.4 jsr OUT.EmitByte .4 jsr OUT.EmitByte
bcs .9 bcs .9
jsr SRC.GetNextChar jsr SRC.GetNextChar
@ -605,7 +605,7 @@ DIR.TF >LDA.G ASM.PASS If Pass#1, ignore
txa txa
>STA.G DST.hFILENAME >STA.G DST.hFILENAME
>SYSCALL getmemptr >SYSCALL GetMemptr
>PUSHYA >PUSHYA
>PUSHBI O.WRONLY+O.CREATE >PUSHBI O.WRONLY+O.CREATE
>PUSHB ZPPtr2+1 Type >PUSHB ZPPtr2+1 Type
@ -620,7 +620,7 @@ DIR.TF >LDA.G ASM.PASS If Pass#1, ignore
.9 php .9 php
pha pha
lda ZPPtr2 lda ZPPtr2
>SYSCALL freemem >SYSCALL FreeMem
pla pla
plp plp

View File

@ -67,14 +67,7 @@ EXP.Eval.Next stz SRC.ACC.F
.14 cmp #'*' .14 cmp #'*'
bne .10 bne .10
ldy #ASM.PC+3 jsr SYM.PC2Acc
ldx #3
.11 lda (pData),y
sta SRC.ACC,x
dey
dex
bpl .11
jsr SRC.GetNextChar jsr SRC.GetNextChar
jmp EXP.EvalOperator jmp EXP.EvalOperator

View File

@ -4,14 +4,14 @@ NEW
FIO.Init.RTS rts FIO.Init.RTS rts
FIO.Init >LDYAI 256 FIO.Init >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs FIO.Init.RTS bcs FIO.Init.RTS
>STYA ZPLineBuf >STYA ZPLineBuf
txa txa
>STA.G SRC.hLineBuf >STA.G SRC.hLineBuf
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs FIO.Init.RTS bcs FIO.Init.RTS
>STYA ZPTmpBuf >STYA ZPTmpBuf
txa txa
@ -146,15 +146,16 @@ FIO.OpenFile >STYA ZPPtr1
bcs .99 bcs .99
pha pha
>LDA.G SRC.Depth >INC.G SRC.Depth
clc clc
adc #SRC.hFILES adc #SRC.hFILES-1
tay tay
pla pla
sta (pData),y sta (pData),y
>LDA.G SRC.Depth >LDA.G SRC.Depth
clc clc
adc #SRC.hFILETYPES adc #SRC.hFILETYPES-1
tay tay
phy phy
@ -163,8 +164,6 @@ FIO.OpenFile >STYA ZPPtr1
ply ply
sta (pData),y sta (pData),y
>INC.G SRC.Depth
lda #0 lda #0
>STA.G SRC.LINENUM >STA.G SRC.LINENUM
iny iny
@ -304,7 +303,7 @@ FIO.FileClose >LDA.G SRC.Depth
adc #SRC.hFILES-1 adc #SRC.hFILES-1
tay tay
lda (pData),y lda (pData),y
>SYSCALL fclose >SYSCALL FClose
.8 clc .8 clc
rts rts

View File

@ -7,14 +7,14 @@ MAC.Init >SYSCALL SListNew
>STA.G MAC.hList >STA.G MAC.hList
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
txa txa
>STA.G MAC.hBuf >STA.G MAC.hBuf
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPMacroArgBuf >STYA ZPMacroArgBuf
@ -22,7 +22,7 @@ MAC.Init >SYSCALL SListNew
>STA.G MAC.hArgBuf >STA.G MAC.hArgBuf
>LDYAI MA.MAXDEPTH*6 >LDYAI MA.MAXDEPTH*6
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPMacroStk >STYA ZPMacroStk
@ -435,7 +435,7 @@ MAC.Pop >LDA.G MAC.StkPtr
tay tay
lda (ZPMacroStk),y lda (ZPMacroStk),y
>SYSCALL freemem >SYSCALL FreeMem
>LDA.G MAC.CtxStackPtr >LDA.G MAC.CtxStackPtr
clc clc

View File

@ -62,15 +62,15 @@ OUT.PrintLineOn
rts rts
*--------------------------------------- *---------------------------------------
OUT.PrintLineErr OUT.PrintLineErr
>STA.G DIR.Byte Save Error code sta DIR.Byte Save Error code
jsr OUT.PrintLine.1 jsr OUT.PrintLine.1
bcs .9 bcs .9
.1 >PUSHW L.MSG.ERROR .1 >PUSHW L.MSG.ERROR
>PUSHB.G DIR.Byte >PUSHB DIR.Byte
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
lda ZPLinePtr lda ZPLinePtr
sec sec
@ -137,7 +137,7 @@ OUT.PrintLine.1 jsr OUT.PrintLineOutBuf
.2 >PUSHW L.MSG.LINENUM .2 >PUSHW L.MSG.LINENUM
>PUSHW.G SRC.LINENUM >PUSHW.G SRC.LINENUM
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
>LDA.G MAC.CtxStackPtr >LDA.G MAC.CtxStackPtr
@ -151,11 +151,11 @@ OUT.PrintLine.1 jsr OUT.PrintLineOutBuf
bra .3 bra .3
.4 >LDYA ZPLineBuf .4 >LDYA ZPLineBuf
>SYSCALL puts >SYSCALL PutS
jmp OUT.PrintCR1 jmp OUT.PrintCR1
*--------------------------------------- *---------------------------------------
OUT.Print >SYSCALL printf OUT.Print >SYSCALL PrintF
bcs OUT.Print.RTS bcs OUT.Print.RTS
jmp OUT.PrintCR jmp OUT.PrintCR
@ -196,7 +196,7 @@ OUT.PrintLineOutBuf
.2 inc .2 inc
inc inc
>PUSHA Byte Count+2 for PC >PUSHA Byte Count+2 for PC
>SYSCALL printf >SYSCALL PrintF
rts rts
*--------------------------------------- *---------------------------------------
@ -221,7 +221,7 @@ OUT.PrintLineEQU
lda SRC.ACC.SIZE lda SRC.ACC.SIZE
.2 >PUSHA Byte Count .2 >PUSHA Byte Count
>SYSCALL printf >SYSCALL PrintF
rts rts
*--------------------------------------- *---------------------------------------
OUT.EmitByte phy OUT.EmitByte phy
@ -284,7 +284,7 @@ OUT.EmitByte phy
*--------------------------------------- *---------------------------------------
OUT.PrintCR >PUSHW L.MSG.CRLF OUT.PrintCR >PUSHW L.MSG.CRLF
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
OUT.PrintCR1 >DEC.G OUT.LineCnt OUT.PrintCR1 >DEC.G OUT.LineCnt
bne .8 bne .8

View File

@ -56,11 +56,9 @@ SRC.ParseLine.LABEL
beq SRC.ParseLine.InvLbl illegal OUTSIDE macro beq SRC.ParseLine.InvLbl illegal OUTSIDE macro
.2 >LDA.G SYM.bInGlobal Not relative to Global label... .2 >LDA.G SYM.bInGlobal Not relative to Global label...
bmi .3 bpl SRC.ParseLine.InvLbl
>DEBUG
bra SRC.ParseLine.InvLbl
.3 jsr SRC.GetNextChar jsr SRC.GetNextChar
bcs SRC.ParseLine.InvLbl bcs SRC.ParseLine.InvLbl
jsr SRC.GetDecimal jsr SRC.GetDecimal
@ -80,7 +78,7 @@ SRC.ParseLine.LABEL
.8 jsr SYM.NewOrGetGlobal .8 jsr SYM.NewOrGetGlobal
bcs SRC.ParseLine.RTS bcs SRC.ParseLine.RTS
*--------------------------------------- *---------------------------------------
SRC.ParseLine.DirOp SRC.ParseLine.DirOp
jsr SRC.GetNextCharNB Scan for an Opcode... jsr SRC.GetNextCharNB Scan for an Opcode...
bcs SRC.ParseLine.Ok bcs SRC.ParseLine.Ok
cmp #'.' cmp #'.'
@ -101,6 +99,7 @@ SRC.ParseLine.DirOp
beq .1 beq .1
cpx #30 .FIN? cpx #30 .FIN?
bne SRC.ParseLine.Ok bne SRC.ParseLine.Ok
.1 jmp (J.DIRECTIVES,x) .1 jmp (J.DIRECTIVES,x)
.5 pha .5 pha
@ -126,9 +125,6 @@ SRC.ParseLine.InvDir
sec sec
rts rts
*--------------------------------------- *---------------------------------------
SRC.ParseLine.DirJmp
jmp (J.DIRECTIVES,x)
*---------------------------------------
SRC.ParseLine.OpCode SRC.ParseLine.OpCode
>LDYA ZPOpsPtr >LDYA ZPOpsPtr
>STYA ZPOpDefPtr >STYA ZPOpDefPtr
@ -261,38 +257,26 @@ SRC.ParseLine.AM
.88 jmp SRC.ParseLine.Emit .88 jmp SRC.ParseLine.Emit
*--------------------------------------- *---------------------------------------
SRC.ParseLine.AMCheck SRC.ParseLine.AMCheck
* ldx #5
*.10 lda SRC.ACC.F,x
* >PUSHA
* dex
* bpl .10
* >PUSHBI 6
* >LDYA L.MSG.ACC
* >SYSCALL printf
* >LDYA L.SRC.AM.StrBuf
* jsr DEBUG.PSTR
>LDYA ZPAMPtr Check if AM is valid for CPU >LDYA ZPAMPtr Check if AM is valid for CPU
>STYA ZPPtr1 >STYA ZPPtr1
ldx #0 ldx #0
.1 inx .1 inx
* phx
* lda #'?'
* >SYSCALL putchar
* >LDYA ZPPtr1
* jsr DEBUG.PSTR
* plx
lda (ZPPtr1) lda (ZPPtr1)
beq .9 beq .9
cmp SRC.AM.StrBuf cmp SRC.AM.StrBuf
bne .7 bne .7
tay tay
.2 lda (ZPPtr1),y .2 lda (ZPPtr1),y
cmp SRC.AM.StrBuf,y cmp SRC.AM.StrBuf,y
bne .6 bne .6
dey dey
bne .2 bne .2
txa txa
>STA.G SRC.AMID >STA.G SRC.AMID
@ -858,7 +842,7 @@ SRC.IsDigit8 cmp #'0'
SRC.GetNextCharNB SRC.GetNextCharNB
jsr SRC.GetNextChar jsr SRC.GetNextChar
bcs .9 bcs .9
cmp #' ' cmp #C.SPACE
beq SRC.GetNextCharNB beq SRC.GetNextCharNB
clc clc
.9 rts .9 rts

View File

@ -20,7 +20,7 @@ SYM.Init >SYSCALL SListNew
>STA.G SYM.hList >STA.G SYM.hList
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPSymbolBuf >STYA ZPSymbolBuf
txa txa
@ -351,7 +351,7 @@ SYM.Dump >LDA.G bListAll
bpl SYM.Dump.8 bpl SYM.Dump.8
.10 >LDYA L.MSG.SYMBOLS .10 >LDYA L.MSG.SYMBOLS
>SYSCALL puts >SYSCALL PutS
stz ZPPtr2 stz ZPPtr2
stz ZPPtr2+1 stz ZPPtr2+1
@ -404,11 +404,11 @@ SYM.Dump >LDA.G bListAll
.3 >PUSHA .3 >PUSHA
>SYSCALL printf >SYSCALL PrintF
>PUSHW ZPTmpBuf Label >PUSHW ZPTmpBuf Label
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda (ZPSymbolBuf) lda (ZPSymbolBuf)
@ -454,7 +454,7 @@ SYM.Dump.LP ldy #SYMG
.5 >PUSHA .5 >PUSHA
>SYSCALL printf >SYSCALL PrintF
pla pla
clc clc

View File

@ -230,13 +230,13 @@ CS.INIT jsr CS.RUN.ARGS
.99 pha .99 pha
>PUSHW L.MSG.HELP >PUSHW L.MSG.HELP
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CS.RUN.ARGS ldy #S.PS.ARGC CS.RUN.ARGS ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
beq .90 beq .90
.1 inc ZPPtr1 .1 inc ZPPtr1
@ -291,7 +291,7 @@ CS.RUN.ARGS ldy #S.PS.ARGC
*-------------------------------------- *--------------------------------------
CS.RUN ldy #S.PS.hStdIn CS.RUN ldy #S.PS.hStdIn
lda (pPS),y lda (pPS),y
>SYSCALL feof >SYSCALL FEOF
bcs .99 bcs .99
tay tay
bne .13 bne .13
@ -381,7 +381,7 @@ CS.RUN ldy #S.PS.hStdIn
.1 jsr SYM.Dump .1 jsr SYM.Dump
>LDYA L.MSG.END >LDYA L.MSG.END
>SYSCALL puts >SYSCALL PutS
lda #0 End of assembly, exit with no error lda #0 End of assembly, exit with no error
sec sec
rts rts
@ -411,7 +411,7 @@ CS.QUIT jsr FIO.FileClose
>LDA.G DST.hREFNUM >LDA.G DST.hREFNUM
beq .1 beq .1
>SYSCALL fclose >SYSCALL FClose
.1 jsr MAC.Quit .1 jsr MAC.Quit

View File

@ -55,7 +55,7 @@ CS.RUN >STZ.G P.GetInfo Sync
pha pha
>LDYA L.MSG.NOATK >LDYA L.MSG.NOATK
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
rts rts
@ -64,7 +64,7 @@ CS.RUN.ATKOK >LDA.G P.GetInfo+$E NODE
>PUSHA >PUSHA
>PUSHW.G P.GetInfo+$8 NET >PUSHW.G P.GetInfo+$8 NET
>LDYA L.MSG.NETNODE >LDYA L.MSG.NETNODE
>SYSCALL printf >SYSCALL PrintF
>STZ.G P.LookupName Sync >STZ.G P.LookupName Sync
lda #ATLookupName lda #ATLookupName
@ -77,7 +77,7 @@ CS.RUN.ATKOK >LDA.G P.GetInfo+$E NODE
>STA.G P.LookupName+$D RetCnt >STA.G P.LookupName+$D RetCnt
>LDYAI 1024 >LDYAI 1024
>STYA.G P.LookupName+$10 BufLen >STYA.G P.LookupName+$10 BufLen
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA.G P.LookupName+$12 BufPtr >STYA.G P.LookupName+$12 BufPtr
@ -96,7 +96,7 @@ CS.RUN.ATKOK >LDA.G P.GetInfo+$E NODE
beq .8 beq .8
>LDYA L.MSG.DUMP0 >LDYA L.MSG.DUMP0
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
.1 lda ZPPTR1 .1 lda ZPPTR1
@ -115,7 +115,7 @@ CS.RUN.ATKOK >LDA.G P.GetInfo+$E NODE
bpl .2 bpl .2
>LDYA L.MSG.DUMP >LDYA L.MSG.DUMP
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
lda ZPPTR2 lda ZPPTR2

View File

@ -45,7 +45,7 @@ CS.RUN stz K.MLI.PARAMS Sync
bcc .10 bcc .10
pha pha
>LDYA L.MSG.NOATK >LDYA L.MSG.NOATK
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
.99 rts .99 rts

View File

@ -96,7 +96,7 @@ CS.RUN
bne .2 bne .2
.99 >PUSHBI 0 .99 >PUSHBI 0
>LDYA L.MSG.USAGE >LDYA L.MSG.USAGE
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -205,7 +205,7 @@ CS.RUN.1 lda #S.BM.F.BBP1
* bcs CS.RUN.RTS * bcs CS.RUN.RTS
* bra CS.RUN.1.LOOP * bra CS.RUN.1.LOOP
*.8 >LDYA L.MSG.DONE *.8 >LDYA L.MSG.DONE
* >SYSCALL puts * >SYSCALL PutS
* lda #0 * lda #0
* sec * sec
CS.RUN.RTS rts CS.RUN.RTS rts
@ -238,7 +238,7 @@ CS.RUN.24 lda #S.BM.F.BBP4
.1 sta ZPInputRowBytes .1 sta ZPInputRowBytes
stx ZPInputRowBytes+1 stx ZPInputRowBytes+1
>LDYA ZPInputRowBytes >LDYA ZPInputRowBytes
>SYSCALL getmem >SYSCALL GetMem
bcs CS.RUN.RTS bcs CS.RUN.RTS
>STYA ZPInputBuf >STYA ZPInputBuf
txa txa
@ -450,10 +450,10 @@ CS.RUN.OpenInput
>PUSHA >PUSHA
>PUSHBI 5 >PUSHBI 5
>LDYA L.MSG.HEADER.OK >LDYA L.MSG.HEADER.OK
>SYSCALL printf >SYSCALL PrintF
.9 rts .9 rts
.99 >LDYA L.MSG.HEADER.KO .99 >LDYA L.MSG.HEADER.KO
>SYSCALL puts >SYSCALL PutS
lda #E.IBIN lda #E.IBIN
sec sec
rts rts
@ -502,7 +502,7 @@ CS.RUN.GetOutputBuf
sta ZPPtr1+1 sta ZPPtr1+1
bra .1 bra .1
.8 >LDYA ZPPtr1 .8 >LDYA ZPPtr1
>SYSCALL Getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPOutputBuf >STYA ZPOutputBuf
@ -547,11 +547,11 @@ CS.QUIT >LDA.G hOutputBuf
.2 >LDA.G hOutputFile .2 >LDA.G hOutputFile
beq .3 beq .3
>SYSCALL fclose >SYSCALL FClose
.3 >LDA.G hInputFile .3 >LDA.G hInputFile
beq .8 beq .8
>SYSCALL fclose >SYSCALL FClose
.8 clc .8 clc
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -82,7 +82,7 @@ CS.RUN
.99 >PUSHW L.MSG.USAGE .99 >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
.9 rts .9 rts
@ -194,7 +194,7 @@ CS.RUN.PRINT inc LineNum
bra .20 bra .20
.21 >LDYA ZPBufPtr .21 >LDYA ZPBufPtr
>SYSCALL puts >SYSCALL PutS
rts rts
.3 stz ByteIndex .3 stz ByteIndex
@ -226,14 +226,14 @@ CS.RUN.PRINT inc LineNum
.61 >PUSHW L.MSG.CTRLCHAR .61 >PUSHW L.MSG.CTRLCHAR
>PUSHW ZPPtr1 >PUSHW ZPPtr1
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
.62 inc ByteIndex .62 inc ByteIndex
bne .4 bne .4
.7 >PUSHW L.MSG.CRLF .7 >PUSHW L.MSG.CRLF
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
@ -244,7 +244,7 @@ CS.RUN.PRINTNUM clc
>PUSHW L.MSG.LINENUM >PUSHW L.MSG.LINENUM
>PUSHW LineNum >PUSHW LineNum
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
.8 rts .8 rts
*-------------------------------------- *--------------------------------------
CS.QUIT lda hBuf CS.QUIT lda hBuf

View File

@ -75,7 +75,7 @@ CS.RUN >INC.G ArgIndex
.9 >PUSHW L.MSG.USAGE .9 >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
.99 rts .99 rts
@ -105,7 +105,7 @@ CS.RUN >INC.G ArgIndex
>LDA.G hSrcBasePath >LDA.G hSrcBasePath
beq .9 beq .9
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPFullPath >STYA ZPFullPath
txa txa
@ -173,7 +173,7 @@ CS.RUN.DIR >LDA.G bRecurse
>PUSHW L.MSG.DIR >PUSHW L.MSG.DIR
>PUSHW ZPFullPath >PUSHW ZPFullPath
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
>PUSHW ZPMode >PUSHW ZPMode
@ -195,7 +195,7 @@ CS.RUN.FILE jsr FilterMatch
>PUSHW L.MSG.FILE >PUSHW L.MSG.FILE
>PUSHW ZPFullPath >PUSHW ZPFullPath
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
>PUSHW ZPMode >PUSHW ZPMode
@ -243,7 +243,7 @@ CS.RUN.Str2Mode >SYSCALL ArgV
*-------------------------------------- *--------------------------------------
CS.RUN.CheckErr bcs .1 CS.RUN.CheckErr bcs .1
>LDYA L.MSG.OK >LDYA L.MSG.OK
>SYSCALL puts >SYSCALL PutS
rts rts
.1 pha .1 pha
>PUSHW L.MSG.ERR >PUSHW L.MSG.ERR
@ -251,7 +251,7 @@ CS.RUN.CheckErr bcs .1
pha pha
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
>LDA.G bContinue >LDA.G bContinue
eor #$80 eor #$80
asl asl

View File

@ -66,7 +66,7 @@ CS.INIT
.99 >PUSHW L.MSG.USAGE .99 >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -98,7 +98,7 @@ CS.INIT
beq .99 we also have a TYPE beq .99 we also have a TYPE
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPFullPath >STYA ZPFullPath
txa txa
@ -159,7 +159,7 @@ CS.RUN.FILE jsr CS.RUN.GetFilePath
>PUSHW L.MSG.FILE >PUSHW L.MSG.FILE
>PUSHW ZPFullPath >PUSHW ZPFullPath
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
ldy #HexFileType ldy #HexFileType
@ -182,7 +182,7 @@ CS.RUN.FILE jsr CS.RUN.GetFilePath
*-------------------------------------- *--------------------------------------
CS.RUN.CheckErr bcs .1 CS.RUN.CheckErr bcs .1
>LDYA L.MSG.OK >LDYA L.MSG.OK
>SYSCALL puts >SYSCALL PutS
rts rts
.1 pha .1 pha
>PUSHW L.MSG.ERR >PUSHW L.MSG.ERR
@ -190,7 +190,7 @@ CS.RUN.CheckErr bcs .1
pha pha
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
>LDA.G bContinue >LDA.G bContinue
eor #$80 eor #$80
asl asl

View File

@ -78,7 +78,7 @@ CS.RUN
.99 >PUSHW L.MSG.USAGE .99 >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
.9 rts .9 rts
@ -251,7 +251,7 @@ CS.RUN.Print phy
>PUSHB (ZPBufPtr1),y >PUSHB (ZPBufPtr1),y
>PUSHB (ZPBufPtr2),y >PUSHB (ZPBufPtr2),y
>PUSHBI 5 >PUSHBI 5
>SYSCALL printf >SYSCALL PrintF
ply ply
rts rts

View File

@ -500,7 +500,7 @@ CSH.fCall ldx ZPPtr1
sta ZPPtr2 save Type sta ZPPtr2 save Type
stz ZPPtr2+1 Reset VARIADIC byte count stz ZPPtr2+1 Reset VARIADIC byte count
>LDYA L.CSH.FN >LDYA L.CSH.FN
jsr CSH.LookupFn jsr CSH.LookupFN
phx X = function index phx X = function index
bcs .10 bcs .10
@ -1048,7 +1048,7 @@ CSH.GetDefine >PUSHB.G CSH.hDefines
sta ZPFileBufPtrBak+1 sta ZPFileBufPtrBak+1
txa txa
>SYSCALL getmemptr >SYSCALL GetMemPtr
>STYA ZPFileBufPtr >STYA ZPFileBufPtr
.9 rts .9 rts
@ -1336,7 +1336,7 @@ CSH.GetChar lda (ZPFileBufPtr)
phx phx
phy phy
>SYSCALL freemem >SYSCALL FreeMem
ply ply
plx plx
@ -1411,7 +1411,7 @@ CSH.GetVarSize txa
.2 lda #2 .2 lda #2
rts rts
*-------------------------------------- *--------------------------------------
DEBUG.VAR >SYSCALL putchar DEBUG.VAR >SYSCALL PutChar
>PUSHW L.MSG.DBGVAR >PUSHW L.MSG.DBGVAR
>PUSHW ZPVarID >PUSHW ZPVarID
>PUSHW ZPVarType >PUSHW ZPVarType
@ -1422,7 +1422,7 @@ DEBUG.VAR >SYSCALL putchar
dey dey
bpl .1 bpl .1
>PUSHBI 12 >PUSHBI 12
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
MAN MAN

View File

@ -233,36 +233,36 @@ EXEC.atan >FPU ATAN
clc clc
rts rts
*-------------------------------------- *--------------------------------------
EXEC.getchar >SYSCALL getchar EXEC.getchar >SYSCALL GetChar
>PUSHA >PUSHA
rts rts
*-------------------------------------- *--------------------------------------
EXEC.puts >PULLYA EXEC.puts >PULLYA
>SYSCALL puts >SYSCALL PutS
>PUSHYA >PUSHYA
rts rts
*-------------------------------------- *--------------------------------------
EXEC.printf >SYSCALL printf EXEC.printf >SYSCALL PrintF
>PUSHYA >PUSHYA
rts rts
*-------------------------------------- *--------------------------------------
EXEC.execl >SYSCALL execl EXEC.execl >SYSCALL ExecL
>PUSHYA >PUSHYA
rts rts
*-------------------------------------- *--------------------------------------
EXEC.putenv >SYSCALL putenv EXEC.putenv >SYSCALL PutEnv
>PUSHYA >PUSHYA
rts rts
*-------------------------------------- *--------------------------------------
EXEC.setenv >SYSCALL setenv EXEC.setenv >SYSCALL SetEnv
>PUSHYA >PUSHYA
rts rts
*-------------------------------------- *--------------------------------------
EXEC.getenv >SYSCALL getenv EXEC.getenv >SYSCALL GetEnv
>PUSHYA >PUSHYA
rts rts
*-------------------------------------- *--------------------------------------
EXEC.unsetenv >SYSCALL unsetenv EXEC.unsetenv >SYSCALL UnsetEnv
>PUSHYA >PUSHYA
rts rts
*-------------------------------------- *--------------------------------------
@ -270,7 +270,7 @@ EXEC.MD5 >SYSCALL MD5
rts rts
*-------------------------------------- *--------------------------------------
EXEC.malloc >PULLYA EXEC.malloc >PULLYA
>SYSCALL getmem >SYSCALL GetMem
>PUSHYA >PUSHYA
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -86,7 +86,7 @@ CS.RUN >PUSHW L.MSG.GREETINGS
>PUSHB #K.VER >PUSHB #K.VER
>PUSHB /K.VER >PUSHB /K.VER
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs CS.INIT.RTS bcs CS.INIT.RTS
jsr CS.RUN.ARGS jsr CS.RUN.ARGS
@ -123,7 +123,7 @@ CS.RUN >PUSHW L.MSG.GREETINGS
CS.RUN.ARGS inc ArgIndex CS.RUN.ARGS inc ArgIndex
lda ArgIndex lda ArgIndex
>SYSCALL ARGV >SYSCALL ArgV
bcs .7 bcs .7
>STYA ZPPtr1 >STYA ZPPtr1
@ -174,7 +174,7 @@ CS.RUN.ARGS inc ArgIndex
.90 >PUSHW L.MSG.USAGE .90 >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec QUIT Process sec QUIT Process
@ -235,7 +235,7 @@ PrintErrMsg lda ZPhMacro
.6 >PUSHBI '-' .6 >PUSHBI '-'
ldy #S.PS.hStdErr ldy #S.PS.hStdErr
lda (pPS),y lda (pPS),y
>SYSCALL fputc >SYSCALL FPutC
inc ZPPtr3 inc ZPPtr3
bne .5 bne .5
inc ZPPtr3+1 inc ZPPtr3+1
@ -247,7 +247,7 @@ PrintErrMsg lda ZPhMacro
>PUSHW L.MSG.ERR >PUSHW L.MSG.ERR
>PUSHW ZPPtr2 Line counter >PUSHW ZPPtr2 Line counter
>PUSHBI 2 >PUSHBI 2
>SYSCALL fprintf >SYSCALL FPrintF
rts rts
*-------------------------------------- *--------------------------------------
@ -258,7 +258,7 @@ PrintDebugMsg >LDYA pStack
>PUSHW ZPPtr2 >PUSHW ZPPtr2
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
PrintTraceMsg >STYA ZPPtr3 PrintTraceMsg >STYA ZPPtr3
@ -266,7 +266,7 @@ PrintTraceMsg >STYA ZPPtr3
PrintTraceMsg.3 >PUSHBI '>' PrintTraceMsg.3 >PUSHBI '>'
ldy #S.PS.hStdErr ldy #S.PS.hStdErr
lda (pPS),y lda (pPS),y
>SYSCALL fputc >SYSCALL FPutC
ldy #$ff ldy #$ff
@ -281,7 +281,7 @@ PrintTraceMsg.3 >PUSHBI '>'
>PUSHA >PUSHA
ldy #S.PS.hStdErr ldy #S.PS.hStdErr
lda (pPS),y lda (pPS),y
>SYSCALL fputc >SYSCALL FPutC
ply ply
bra .1 bra .1
@ -291,7 +291,7 @@ PrintTraceMsg.3 >PUSHBI '>'
>PUSHW L.MSG.ECHOCRLF >PUSHW L.MSG.ECHOCRLF
>PUSHBI 0 >PUSHBI 0
>SYSCALL fprintf >SYSCALL FPrintF
rts rts
*-------------------------------------- *--------------------------------------
@ -302,7 +302,7 @@ CS.END
*-------------------------------------- *--------------------------------------
* Initialized DATA * Initialized DATA
*-------------------------------------- *--------------------------------------
MSG.Greetings .AZ "\r\nCSH-Shell %d.%d\r\n\r\n" MSG.GREETINGS .AZ "\r\nCSH-Shell %d.%d\r\n\r\n"
MSG.USAGE .AS "Usage : CSH <option> file\r\n" MSG.USAGE .AS "Usage : CSH <option> file\r\n"
.AS " -D : Debug Mode\r\n" .AS " -D : Debug Mode\r\n"
.AS " -T : Trace On" .AS " -T : Trace On"

View File

@ -110,7 +110,7 @@ CS.RUN lda #C.SPACE
.98 pha .98 pha
>PUSHW L.MSG.USAGE >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
.9 rts .9 rts
@ -208,13 +208,13 @@ CS.RUN.OUT ldx FieldNum
sta (ZPBufPtr),y sta (ZPBufPtr),y
.8 >LDYA ZPBufPtr .8 >LDYA ZPBufPtr
>SYSCALL puts >SYSCALL PutS
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN.PRINTCR >PUSHW L.MSG.CRLF CS.RUN.PRINTCR >PUSHW L.MSG.CRLF
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
@ -253,7 +253,7 @@ CS.RUN.OUT.MN ldy #0
jsr CS.RUN.AddYToBufPtr jsr CS.RUN.AddYToBufPtr
.80 >LDYA ZPBufPtr .80 >LDYA ZPBufPtr
>SYSCALL puts >SYSCALL PutS
rts rts
*-------------------------------------- *--------------------------------------
@ -277,7 +277,7 @@ CS.RUN.AddYToBufPtr
CS.QUIT lda hToClose CS.QUIT lda hToClose
beq .1 beq .1
>SYSCALL fclose Close the pipe >SYSCALL FClose Close the pipe
.1 lda hBuf .1 lda hBuf
beq .8 beq .8

View File

@ -61,13 +61,13 @@ CS.RUN >LIBCALL hLIBTCPIP,LIBTCPIP.GETCFG is TCPIP loaded ?
bmi CS.RUN.IPOK bmi CS.RUN.IPOK
>LDYA L.MSG.IPKO >LDYA L.MSG.IPKO
>SYSCALL puts >SYSCALL PutS
lda #E.SYN lda #E.SYN
sec sec
rts rts
CS.RUN.IPOK ldy #S.PS.ARGC CS.RUN.IPOK ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
bne .1 bne .1
jmp CS.RUN.DUMP jmp CS.RUN.DUMP
@ -77,7 +77,7 @@ CS.RUN.IPOK ldy #S.PS.ARGC
>PUSHW L.MSG.USAGE >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
@ -115,7 +115,7 @@ CS.RUN.ADD lda #2
CS.RUN.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.DNS.GetCache CS.RUN.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.DNS.GetCache
>STYA ZPPTR1 >STYA ZPPTR1
>LDYA L.MSG0 >LDYA L.MSG0
>SYSCALL puts >SYSCALL PutS
lda #K.DNSCACHE.SIZE lda #K.DNSCACHE.SIZE
sta EntryCount sta EntryCount
@ -160,7 +160,7 @@ CS.RUN.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.DNS.GetCache
bne .2 bne .2
>PUSHBI 14 >PUSHBI 14
>SYSCALL printf >SYSCALL PrintF
.6 lda ZPPTR1 .6 lda ZPPTR1
clc clc

View File

@ -17,7 +17,7 @@ BUF.InsertA sta TmpByte
.2 lda TmpByte .2 lda TmpByte
sta (BufPtr) sta (BufPtr)
jmp SCRN.Unsaved jmp SCRN.UnSaved
.8 clc .8 clc
.9 rts .9 rts
@ -51,7 +51,7 @@ BUF.InsertTAB >LDA.G FileX
dey dey
bpl .2 bpl .2
jmp SCRN.Unsaved jmp SCRN.UnSaved
.8 stz TmpByte .8 stz TmpByte
clc clc
@ -99,18 +99,18 @@ BUF.InsertClipboard
jsr BUF.ComputeCOffset jsr BUF.ComputeCOffset
>LDYA.G ClipboardLen >LDYA.G ClipBoardLen
jsr BUF.BufPtrSetup jsr BUF.BufPtrSetup
bcs .9 bcs .9
jsr BUF.MoveForwardTail jsr BUF.MoveForwardTail
>LDA.G ClipboardLen >LDA.G ClipBoardLen
eor #$ff eor #$ff
tax tax
iny iny
lda (pData),y ClipboardLen+1 lda (pData),y ClipBoardLen+1
eor #$ff eor #$ff
pha pha
@ -135,7 +135,7 @@ BUF.InsertClipboard
.3 jsr BUF.ResetSel .3 jsr BUF.ResetSel
jsr SCRN.UpdateStatusBar jsr SCRN.UpdateStatusBar
jmp SCRN.Unsaved jmp SCRN.UnSaved
.8 clc .8 clc
.9 rts .9 rts
@ -237,7 +237,7 @@ BUF.SelToClipboard
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
BUF.CopyClipboard BUF.CopyClipboard
>LDA.G ClipboardLen >LDA.G ClipBoardLen
eor #$ff eor #$ff
tax tax
iny iny
@ -566,7 +566,7 @@ BUF.BufPtr.Realloc
>PUSHA >PUSHA
>PUSHBI 0 >PUSHBI 0
>SYSCALL realloc >SYSCALL Realloc
bcs .9 bcs .9
>STYA.G BufBase >STYA.G BufBase

View File

@ -64,7 +64,7 @@ Ctrl.A >STZ.G bUpdateStatus
>PUSHW L.MSG.HELPLINE >PUSHW L.MSG.HELPLINE
>PUSHW ZPPTR1 >PUSHW ZPPTR1
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
inc TmpByte inc TmpByte
@ -551,7 +551,7 @@ Ctrl.FS jsr BUF.GetLine
*-------------------------------------- *--------------------------------------
Ctrl.V jsr BUF.InsertClipboard Ctrl.V jsr BUF.InsertClipboard
bcs .9 bcs .9
jsr SCRN.Unsaved jsr SCRN.UnSaved
jmp SCRN.UpdateMainAndStatus jmp SCRN.UpdateMainAndStatus
.9 rts .9 rts
@ -591,7 +591,7 @@ Ctrl.D jsr BUF.DelSel
bcs Ctrl.D.8 bcs Ctrl.D.8
jsr BUF.ResetSel jsr BUF.ResetSel
jsr SCRN.CursorAdjust jsr SCRN.CursorAdjust
jsr SCRN.Unsaved will update TopBar jsr SCRN.UnSaved will update TopBar
jmp SCRN.UpdateMainAndStatus jmp SCRN.UpdateMainAndStatus
Ctrl.D.8 clc Ctrl.D.8 clc
@ -630,7 +630,7 @@ Ctrl.Z jsr BUF.ComputeCOffset
dec dec
>PUSHA >PUSHA
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
jsr SCRN.ResetScrollRgn jsr SCRN.ResetScrollRgn
@ -645,7 +645,7 @@ Ctrl.Z jsr BUF.ComputeCOffset
.8 jsr SCRN.UpdateCurrentLine .8 jsr SCRN.UpdateCurrentLine
bcs .9 bcs .9
.80 jsr SCRN.Unsaved .80 jsr SCRN.UnSaved
jsr SCRN.GotoCurXCurY jsr SCRN.GotoCurXCurY
jmp SCRN.UpdateStatusBar jmp SCRN.UpdateStatusBar
.9 rts .9 rts

View File

@ -6,7 +6,7 @@ DLG.Open >STYA ZPPTR2
lda (ZPPTR2) lda (ZPPTR2)
tay tay
lda #0 lda #0
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPPTR1 >STYA ZPPTR1
@ -189,7 +189,7 @@ DLG.Close ldy #S.DLG.Y
bcs .9 bcs .9
>LDA.G hDLG >LDA.G hDLG
>SYSCALL freemem >SYSCALL FreeMem
>STZ.G hDLG >STZ.G hDLG
clc clc
@ -250,7 +250,7 @@ DLG.CTRL.Draw.TB
tay tay
lda (pData),y lda (pData),y
>SYSCALL getmemptr >SYSCALL GetMemptr
>STYA ZPPTR2 >STYA ZPPTR2
lda #C.SPACE lda #C.SPACE
@ -718,7 +718,7 @@ DLG.CTRL.CharIn.TB
lda (ZPPTR1),y hMem lda (ZPPTR1),y hMem
tay tay
lda (pData),y lda (pData),y
>SYSCALL getmemptr >SYSCALL GetMemptr
>STYA ZPPTR2 >STYA ZPPTR2
ply ply
@ -752,7 +752,7 @@ DLG.CTRL.CharIn.TB
lda (ZPPTR1),y hMem lda (ZPPTR1),y hMem
tay tay
lda (pData),y lda (pData),y
>SYSCALL getmemptr >SYSCALL GetMemptr
>STYA ZPPTR2 >STYA ZPPTR2
ply ply

View File

@ -76,7 +76,7 @@ FILE.Load jsr BUF.ResetSel
.8 php .8 php
pha pha
lda TmpByte lda TmpByte
>SYSCALL freemem >SYSCALL FreeMem
pla pla
plp plp
@ -386,12 +386,12 @@ FILE.Close php
pha pha
lda TmpByte lda TmpByte
beq .1 beq .1
>SYSCALL freemem >SYSCALL FreeMem
.1 lda TmpIndex .1 lda TmpIndex
beq .2 beq .2
>SYSCALL fclose >SYSCALL FClose
.2 pla .2 pla
plp plp

View File

@ -7,7 +7,7 @@ SCRN.Init >PUSHW L.SEQ.INIT
dec dec
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
bcs SCRN.Init.9 bcs SCRN.Init.9
jsr SCRN.Home jsr SCRN.Home
@ -43,7 +43,7 @@ SCRN.ResetScrollRgn
dec dec
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
SCRN.UnSaved >LDA.G bUnSaved SCRN.UnSaved >LDA.G bUnSaved
@ -263,7 +263,7 @@ SCRN.UpdateMain.1
>PUSHW L.SEQ.CEOL >PUSHW L.SEQ.CEOL
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
bcs SCRN.UpdateMain.9 bcs SCRN.UpdateMain.9
inc TmpByte inc TmpByte
@ -500,12 +500,12 @@ SCRN.GotoXY >PUSHW L.MSG.GOTOXY
>PUSHA >PUSHA
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
SCRN.scrollUp >PUSHW L.SEQ.SCROLLUP SCRN.scrollUp >PUSHW L.SEQ.SCROLLUP
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
>LDA.G ScreenY+1 >LDA.G ScreenY+1
@ -531,7 +531,7 @@ SCRN.scrollUp >PUSHW L.SEQ.SCROLLUP
*-------------------------------------- *--------------------------------------
SCRN.scrollDn >PUSHW L.SEQ.SCROLLDN SCRN.scrollDn >PUSHW L.SEQ.SCROLLDN
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
>LDA.G ScreenY+1 >LDA.G ScreenY+1
@ -622,7 +622,7 @@ SCRN.LineBufOut lda #0
>PUSHW.G LineBufBase >PUSHW.G LineBufBase
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
MAN MAN

View File

@ -145,7 +145,7 @@ CS.INIT.RTS rts
*-------------------------------------- *--------------------------------------
CS.RUN >PUSHW L.MSG.DETECT CS.RUN >PUSHW L.MSG.DETECT
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf Send Query for term W & H >SYSCALL PrintF Send Query for term W & H
bcs CS.INIT.RTS bcs CS.INIT.RTS
.1 >SYSCALL GetChar .1 >SYSCALL GetChar
@ -156,7 +156,7 @@ CS.RUN >PUSHW L.MSG.DETECT
beq .1 beq .1
>LDYAI 510+5+5+4+1 potentially 255*\\ NORM,INV,CEOL & \0 >LDYAI 510+5+5+4+1 potentially 255*\\ NORM,INV,CEOL & \0
>SYSCALL Getmem >SYSCALL GetMem
bcs CS.INIT.RTS bcs CS.INIT.RTS
>STYA.G LineBufBase >STYA.G LineBufBase
txa txa
@ -185,7 +185,7 @@ CS.RUN >PUSHW L.MSG.DETECT
bcs CS.RUN.RTS bcs CS.RUN.RTS
>LDYAI 65 >LDYAI 65
>SYSCALL getmem >SYSCALL GetMem
bcs CS.RUN.RTS bcs CS.RUN.RTS
>STYA ZPPTR1 >STYA ZPPTR1
txa txa
@ -195,7 +195,7 @@ CS.RUN >PUSHW L.MSG.DETECT
sta (ZPPTR1) sta (ZPPTR1)
>LDYAI 65 >LDYAI 65
>SYSCALL getmem >SYSCALL GetMem
bcs CS.RUN.RTS bcs CS.RUN.RTS
>STYA ZPPTR1 >STYA ZPPTR1
txa txa
@ -218,7 +218,7 @@ CS.RUN.LOOP jsr GetCh
.9 pha .9 pha
>PUSHW L.SEQ.RESET >PUSHW L.SEQ.RESET
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
CS.RUN.RTS rts CS.RUN.RTS rts
@ -264,7 +264,7 @@ CS.QUIT ldy #hLineBuf
CS.QUIT.CLCRTS clc CS.QUIT.CLCRTS clc
rts rts
*-------------------------------------- *--------------------------------------
GetCh >SYSCALL getchar GetCh >SYSCALL GetChar
bcs .9 bcs .9
cmp #C.CR cmp #C.CR
@ -272,7 +272,7 @@ GetCh >SYSCALL getchar
ldy #S.PS.hStdIn Check for any extra LF ldy #S.PS.hStdIn Check for any extra LF
lda (pPS),y lda (pPS),y
>SYSCALL feof >SYSCALL FEOF
bcs .9 bcs .9
tay tay

View File

@ -101,7 +101,7 @@ CS.RUN >LIBCALL hLIBETALK,LIBETALK.GETCFG
lda ETKCFG+S.NETCFG.DevID lda ETKCFG+S.NETCFG.DevID
bne CS.RUN.SETUP bne CS.RUN.SETUP
>LDYA L.MSG.NODEV >LDYA L.MSG.NODEV
>SYSCALL puts >SYSCALL PutS
lda #MLI.E.NODEV lda #MLI.E.NODEV
sec sec
rts rts
@ -148,7 +148,7 @@ CS.RUN.DUMPNIC ldy #DCB.NIC+S.DCB.NIC.MAC+5
>PUSHA >PUSHA
>PUSHBI 11 >PUSHBI 11
>LDYA L.MSG1.DEV >LDYA L.MSG1.DEV
>SYSCALL printf >SYSCALL PrintF
>LDA.G DCB.NIC+S.DCB.NIC.FLAGS >LDA.G DCB.NIC+S.DCB.NIC.FLAGS
and #S.DCB.NIC.FLAGS.ARPOFFLOAD and #S.DCB.NIC.FLAGS.ARPOFFLOAD
beq .2 beq .2
@ -156,7 +156,7 @@ CS.RUN.DUMPNIC ldy #DCB.NIC+S.DCB.NIC.MAC+5
.2 >PUSHA .2 >PUSHA
>PUSHBI 1 >PUSHBI 1
>LDYA L.MSG1.DEV.ARP >LDYA L.MSG1.DEV.ARP
>SYSCALL printf >SYSCALL PrintF
>LDA.G DCB.NIC+S.DCB.NIC.FLAGS >LDA.G DCB.NIC+S.DCB.NIC.FLAGS
and #S.DCB.NIC.FLAGS.IPOFFLOAD and #S.DCB.NIC.FLAGS.IPOFFLOAD
@ -167,19 +167,19 @@ CS.RUN.DUMPNIC ldy #DCB.NIC+S.DCB.NIC.MAC+5
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>LDYA L.MSG1.DEV.IP >LDYA L.MSG1.DEV.IP
>SYSCALL printf >SYSCALL PrintF
>LDA.G DCB.NIC+S.DCB.NIC.LINK >LDA.G DCB.NIC+S.DCB.NIC.LINK
and #S.DCB.NIC.LINK.OK and #S.DCB.NIC.LINK.OK
bne CS.RUN.LINK bne CS.RUN.LINK
>LDYA L.MSG1.LINK.KO >LDYA L.MSG1.LINK.KO
>SYSCALL puts >SYSCALL PutS
bra CS.RUN.DUMPNET bra CS.RUN.DUMPNET
CS.RUN.LINK >LDYA L.MSG1.LINK.OK CS.RUN.LINK >LDYA L.MSG1.LINK.OK
>SYSCALL puts >SYSCALL PutS
>PUSHBI 0 >PUSHBI 0
>LDYA L.MSG1.LINKSPEED >LDYA L.MSG1.LINKSPEED
>SYSCALL printf >SYSCALL PrintF
>LDA.G DCB.NIC+S.DCB.NIC.SPEED >LDA.G DCB.NIC+S.DCB.NIC.SPEED
and #$0F and #$0F
tax tax
@ -195,41 +195,41 @@ CS.RUN.LINK >LDYA L.MSG1.LINK.OK
>LDYA L.MSG1.DPLX.HD >LDYA L.MSG1.DPLX.HD
bra .6 bra .6
.5 >LDYA L.MSG1.DPLX.FD .5 >LDYA L.MSG1.DPLX.FD
.6 >SYSCALL puts .6 >SYSCALL PutS
CS.RUN.DUMPNET >PUSHBI 0 CS.RUN.DUMPNET >PUSHBI 0
>LDYA L.MSG2 >LDYA L.MSG2
>SYSCALL printf >SYSCALL PrintF
lda ETKCFG+S.ETKCFG.NodID lda ETKCFG+S.ETKCFG.NodID
beq .11 beq .11
>LDYA L.MSG2.C >LDYA L.MSG2.C
bra .10 bra .10
.11 >LDYA L.MSG2.U .11 >LDYA L.MSG2.U
.10 >SYSCALL puts .10 >SYSCALL PutS
>PUSHB ETKCFG+S.ETKCFG.NodID >PUSHB ETKCFG+S.ETKCFG.NodID
>PUSHW ETKCFG+S.ETKCFG.NetID >PUSHW ETKCFG+S.ETKCFG.NetID
>PUSHBI 3 >PUSHBI 3
>LDYA L.MSG2.ADDR >LDYA L.MSG2.ADDR
>SYSCALL printf >SYSCALL PrintF
>PUSHB ETKCFG+S.ETKCFG.Router >PUSHB ETKCFG+S.ETKCFG.Router
>PUSHW ETKCFG+S.ETKCFG.NetID >PUSHW ETKCFG+S.ETKCFG.NetID
>PUSHBI 3 >PUSHBI 3
>LDYA L.MSG2.ROUTER >LDYA L.MSG2.ROUTER
>SYSCALL printf >SYSCALL PrintF
>PUSHW L.ETKCFG.OBJECT >PUSHW L.ETKCFG.OBJECT
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG2.OBJECT >LDYA L.MSG2.OBJECT
>SYSCALL printf >SYSCALL PrintF
lda #0 tell TSKMGR that all done ok, but lda #0 tell TSKMGR that all done ok, but
sec we do not want to stay in memory sec we do not want to stay in memory
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN.PROBE >PUSHBI 0 CS.RUN.PROBE >PUSHBI 0
>LDYA L.MSG.PROBE >LDYA L.MSG.PROBE
>SYSCALL printf >SYSCALL PrintF
ldx #5 ldx #5
@ -285,7 +285,7 @@ CS.RUN.PROBE >PUSHBI 0
lda ETKCFG+S.NETCFG.DevID lda ETKCFG+S.NETCFG.DevID
>SYSCALL IOCTL >SYSCALL IOCTL
>LDYA L.MSG.PROBE.OK >LDYA L.MSG.PROBE.OK
>SYSCALL puts >SYSCALL PutS
clc clc
rts rts
*-------------------------------------- *--------------------------------------
@ -313,13 +313,13 @@ CFG.EtcFiles >LDYAI 256
>LIBCALL hLIBETALK,LIBETALK.SETCFG >LIBCALL hLIBETALK,LIBETALK.SETCFG
lda CFG.hBuf1 lda CFG.hBuf1
>SYSCALL freemem >SYSCALL FreeMem
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CFG.Read.PrintF >PUSHYA CFG.Read.PrintF >PUSHYA
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.CFG >LDYA L.MSG.CFG
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
CFG.Read.HOSTNAME CFG.Read.HOSTNAME
@ -352,11 +352,11 @@ CFG.Read.Result bcc .1
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>LDYA L.MSG.CFG.KO >LDYA L.MSG.CFG.KO
>SYSCALL printf >SYSCALL PrintF
sec sec
rts rts
.1 >LDYA L.MSG.CFG.OK .1 >LDYA L.MSG.CFG.OK
>SYSCALL puts >SYSCALL PutS
rts rts
*-------------------------------------- *--------------------------------------
CFG.Read.Open stz CFG.hCfgFile CFG.Read.Open stz CFG.hCfgFile
@ -376,7 +376,7 @@ CFG.Read.Close php
CFG.Read.Close2 lda CFG.hCfgFile CFG.Read.Close2 lda CFG.hCfgFile
beq .8 beq .8
>SYSCALL fclose >SYSCALL FClose
.8 pla .8 pla
plp plp
rts rts

View File

@ -66,7 +66,7 @@ CS.INIT
dex dex
bne .2 bne .2
.99 >LDYA L.MSG.USAGE .99 >LDYA L.MSG.USAGE
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -87,7 +87,7 @@ CS.INIT
.7 >LDA.G hOutputFile .7 >LDA.G hOutputFile
beq .99 beq .99
>LDYAI 8192 max 256x256 pixels >LDYAI 8192 max 256x256 pixels
>SYSCALL getmem >SYSCALL GetMem
bcs CS.INIT.RTS bcs CS.INIT.RTS
>STYA ZPCharBufPtr >STYA ZPCharBufPtr
txa txa
@ -108,7 +108,7 @@ CS.INIT.OPENINPUT
>SYSCALL GetMemPtr >SYSCALL GetMemPtr
>STYA ZPInputBufPtr >STYA ZPInputBufPtr
>LDYA L.MSG.FILE.OK >LDYA L.MSG.FILE.OK
>SYSCALL printf >SYSCALL PrintF
ldy #S.FNT.dfVersion ldy #S.FNT.dfVersion
lda (ZPInputBufPtr),y lda (ZPInputBufPtr),y
bne .99 bne .99
@ -139,11 +139,11 @@ CS.INIT.OPENINPUT
pla pla
>PUSHA >PUSHA
>LDYA L.MSG.HEADER.OK >LDYA L.MSG.HEADER.OK
>SYSCALL printf >SYSCALL PrintF
clc clc
rts rts
.99 >LDYA L.MSG.HEADER.KO .99 >LDYA L.MSG.HEADER.KO
>SYSCALL printf >SYSCALL PrintF
lda #E.IBIN lda #E.IBIN
sec sec
rts rts
@ -157,7 +157,7 @@ CS.INIT.CREATEOUTPUT
bcs .9 bcs .9
>STA.G hOutputFile >STA.G hOutputFile
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPOutPutBufPtr >STYA ZPOutPutBufPtr
txa txa
@ -185,7 +185,7 @@ CS.RUN ldy #S.FNT.dfBreakChar
>STA.G CharIndex >STA.G CharIndex
>PUSHA >PUSHA
>LDYA L.MSG.RANGE >LDYA L.MSG.RANGE
>SYSCALL printf >SYSCALL PrintF
>LDA.G FON.Header+S.FON.Last >LDA.G FON.Header+S.FON.Last
sec sec
>SBC.G FON.Header+S.FON.First >SBC.G FON.Header+S.FON.First
@ -200,7 +200,7 @@ CS.RUN ldy #S.FNT.dfBreakChar
iny iny
sta (pData),y sta (pData),y
ply ply
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPOutPutTblPtr >STYA ZPOutPutTblPtr
txa txa
@ -281,7 +281,7 @@ CS.RUN.LOOP >SLEEP
jsr CS.RUN.WriteBMAndTbl jsr CS.RUN.WriteBMAndTbl
bcs .9 bcs .9
>LDYA L.MSG.DONE >LDYA L.MSG.DONE
>SYSCALL printf >SYSCALL PrintF
lda #0 lda #0
sec sec
.9 rts .9 rts
@ -350,7 +350,7 @@ CS.RUN.DumpChar >LDA.G CharOutByteW
>PUSHA >PUSHA
>PUSHA >PUSHA
>LDYA L.MSG.DUMP >LDYA L.MSG.DUMP
>SYSCALL printf >SYSCALL PrintF
lda ZPCharBufPtr lda ZPCharBufPtr
sta ZPPTR1 sta ZPPTR1
lda ZPCharBufPtr+1 lda ZPCharBufPtr+1
@ -666,7 +666,7 @@ CS.QUIT >LDA.G hOutPutBuf
.1 >LDA.G hOutputFile .1 >LDA.G hOutputFile
beq .2 beq .2
>SYSCALL fclose >SYSCALL FClose
.2 >LDA.G hInputBuf .2 >LDA.G hInputBuf
beq .3 beq .3
>SYSCALL FreeMem >SYSCALL FreeMem

View File

@ -77,7 +77,7 @@ CS.INIT >LDYA L.LIBBLKDEV
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CS.RUN ldy #S.PS.ARGC CS.RUN ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
beq .99 beq .99
.1 inc Index .1 inc Index
@ -121,7 +121,7 @@ CS.RUN ldy #S.PS.ARGC
.99 >PUSHW L.MSG.USAGE .99 >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
.9 rts .9 rts
@ -162,7 +162,7 @@ CS.RUN.Format jsr CS.RUN.GetDevStatus
>PUSHEA.G VolName >PUSHEA.G VolName
>PUSHBI 6 >PUSHBI 6
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
bit bLL bit bLL
@ -181,7 +181,7 @@ CS.RUN.Format jsr CS.RUN.GetDevStatus
bcs .9 bcs .9
>LDYA L.MSG.OK >LDYA L.MSG.OK
>SYSCALL puts >SYSCALL PutS
lda #0 lda #0
sec sec
rts rts
@ -192,7 +192,7 @@ CS.RUN.Format jsr CS.RUN.GetDevStatus
pha pha
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
rts rts
@ -220,7 +220,7 @@ CS.RUN.GetDevStatus
rts rts
.9 >LDYA L.MSG.NOSIZE .9 >LDYA L.MSG.NOSIZE
>SYSCALL puts >SYSCALL PutS
lda #MLI.E.IO lda #MLI.E.IO
sec sec
rts rts
@ -231,7 +231,7 @@ CS.RUN.LL >LDA.G DIB+S.DIB.T
>PUSHW L.MSG.LL >PUSHW L.MSG.LL
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
>PUSHEA.G IOCTL >PUSHEA.G IOCTL
@ -244,7 +244,7 @@ CS.RUN.LL >LDA.G DIB+S.DIB.T
*-------------------------------------- *--------------------------------------
CS.RUN.LL.DISKII CS.RUN.LL.DISKII
>LDYAI 4096 >LDYAI 4096
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPPtr1 >STYA ZPPtr1
stx hMem stx hMem
@ -254,7 +254,7 @@ CS.RUN.LL.DISKII
.1 >PUSHW L.MSG.LLDISK2 .1 >PUSHW L.MSG.LLDISK2
>PUSHB Index >PUSHB Index
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
@ -267,7 +267,7 @@ CS.RUN.LL.DISKII
>PUSHW L.MSG.CRLF >PUSHW L.MSG.CRLF
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CS.RUN.InitCat lda CatSize CS.RUN.InitCat lda CatSize
@ -333,7 +333,7 @@ CS.RUN.BuildCat jsr .7
*-------------------------------------- *--------------------------------------
CS.RUN.WriteCat >PUSHW L.MSG.WRITECAT CS.RUN.WriteCat >PUSHW L.MSG.WRITECAT
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
.1 >PUSHEA.G IOCTL .1 >PUSHEA.G IOCTL
>PUSHBI IOCTL.WRITEBLOCK >PUSHBI IOCTL.WRITEBLOCK

View File

@ -100,7 +100,7 @@ CS.RUN
.98 pha .98 pha
>PUSHW L.MSG.USAGE >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
.9 rts .9 rts
@ -192,10 +192,10 @@ CS.RUN.PRINT >LDYA ZPBufPtr
>PUSHW L.MSG.NUMLINE >PUSHW L.MSG.NUMLINE
>PUSHW LineNum >PUSHW LineNum
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
.7 >LDYA ZPBufPtr .7 >LDYA ZPBufPtr
>SYSCALL puts >SYSCALL PutS
rts rts
.8 clc .8 clc

View File

@ -80,7 +80,7 @@ CS.RUN >LIBCALL hLIBTCPIP,LIBTCPIP.GETCFG is TCPIP loaded ?
lda (ZPIPCfgPtr) Configured ? lda (ZPIPCfgPtr) Configured ?
bmi CS.RUN.IPOK bmi CS.RUN.IPOK
>LDYA L.MSG.IPKO >LDYA L.MSG.IPKO
>SYSCALL puts >SYSCALL PutS
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -112,12 +112,12 @@ CS.RUN.IPOK ldy #S.IPCFG.IP+3
>PUSHW L.MSG.UNKNOWN >PUSHW L.MSG.UNKNOWN
>PUSHW ZPHostPtr >PUSHW ZPHostPtr
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bra CS.RUN.ESYN bra CS.RUN.ESYN
.9 >PUSHW L.MSG.USAGE .9 >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
CS.RUN.ESYN lda #E.SYN CS.RUN.ESYN lda #E.SYN
sec sec
@ -202,7 +202,7 @@ CS.RUN.PORTOK >PUSHW L.MSG.CONNECT
>PUSHW ZPHostPtr >PUSHW ZPHostPtr
>PUSHBI 8 >PUSHBI 8
>SYSCALL printf >SYSCALL PrintF
CS.RUN.OPENSKT >PUSHBI 0 no protocol CS.RUN.OPENSKT >PUSHBI 0 no protocol
lda #S.SOCKET.T.STREAM lda #S.SOCKET.T.STREAM
@ -218,7 +218,7 @@ CS.RUN.OPENSKT >PUSHBI 0 no protocol
.9 pha .9 pha
>LDYA L.MSG.SKTKO >LDYA L.MSG.SKTKO
>SYSCALL puts >SYSCALL PutS
pla pla
sec sec
.99 rts .99 rts
@ -241,10 +241,10 @@ CS.RUN.OPENSKT >PUSHBI 0 no protocol
bra .9 bra .9
.3 >LDYA L.MSG.CONNECTED .3 >LDYA L.MSG.CONNECTED
>SYSCALL puts >SYSCALL PutS
>LDYAI RESP.BUFSIZE >LDYAI RESP.BUFSIZE
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPRespBufPtr >STYA ZPRespBufPtr
@ -258,7 +258,7 @@ CS.RUN.GET jsr CS.RUN.ENCODE
* >PUSHW ZPEncodedBufLen * >PUSHW ZPEncodedBufLen
* >PUSHW ZPEncodedBufPtr * >PUSHW ZPEncodedBufPtr
* ldy #S.PS.hStdOut * ldy #S.PS.hStdOut
* lda (pPs),y * lda (pPS),y
* >SYSCALL fwrite * >SYSCALL fwrite
jsr CS.RUN.REQUEST jsr CS.RUN.REQUEST
@ -276,7 +276,7 @@ CS.RUN.SKTERR pha
pha pha
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
rts rts
@ -287,7 +287,7 @@ CS.RUN.IOERR pha
pha pha
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
rts rts
@ -428,7 +428,7 @@ CS.RUN.RESPONSE jsr Init.Timeout
.2 >PUSHYA len .2 >PUSHYA len
>PUSHW ZPRespBufPtr >PUSHW ZPRespBufPtr
ldy #S.PS.hStdOut ldy #S.PS.hStdOut
lda (pPs),y lda (pPS),y
>SYSCALL fwrite >SYSCALL fwrite
bcs .9 bcs .9
@ -463,13 +463,13 @@ CS.QUIT lda hSocket
>LIBCALL hLIBTCPIP,LIBTCPIP.Shutdown >LIBCALL hLIBTCPIP,LIBTCPIP.Shutdown
.1 >LDA.G hReqBuf .1 >LDA.G hReqBuf
beq .2 beq .2
>SYSCALL freemem >SYSCALL FreeMem
.2 >LDA.G hEncodedBuf .2 >LDA.G hEncodedBuf
beq .3 beq .3
>SYSCALL freemem >SYSCALL FreeMem
.3 >LDA.G hRespBuf .3 >LDA.G hRespBuf
beq .4 beq .4
>SYSCALL freemem >SYSCALL FreeMem
.4 lda hLIBTCPIP .4 lda hLIBTCPIP
beq .8 beq .8
>SYSCALL UnloadLib >SYSCALL UnloadLib

View File

@ -27,7 +27,7 @@ DHCP.INIT lda IPCFG+S.NETCFG.STATUS
.99 >LDYA L.MSG.DHCP.NA .99 >LDYA L.MSG.DHCP.NA
>SYSCALL puts >SYSCALL PutS
lda #0 lda #0
sec sec
rts rts
@ -51,7 +51,7 @@ DHCP.RUN >PUSHBI 0 no protocol
>LIBCALL hLIBTCPIP,LIBTCPIP.Connect >LIBCALL hLIBTCPIP,LIBTCPIP.Connect
bcs .9 bcs .9
>LDYA L.MSG.DHCP.CFG1 >LDYA L.MSG.DHCP.CFG1
>SYSCALL puts >SYSCALL PutS
jsr Init.Timeout jsr Init.Timeout
DHCP.RUN.SDISC >PUSHW L.SA.DEST DHCP.RUN.SDISC >PUSHW L.SA.DEST
@ -87,7 +87,7 @@ DHCP.RUN.SREQ >PUSHW L.MSG.DHCP.CFG2
cpx #4 cpx #4
bne .1 bne .1
>PUSHBI 4 >PUSHBI 4
>SYSCALL printf >SYSCALL PrintF
>PUSHW L.SA.DEST >PUSHW L.SA.DEST
>PUSHWI DHCP.REQ.LEN >PUSHWI DHCP.REQ.LEN
@ -132,7 +132,7 @@ DHCP.RUN.OK lda #S.IPCFG.STATUS.OK
bne .2 bne .2
>PUSHBI 8 >PUSHBI 8
>SYSCALL printf >SYSCALL PrintF
lda #0 Leave with NO ERROR lda #0 Leave with NO ERROR
sec sec
rts rts
@ -142,7 +142,7 @@ DHCP.RUN.KO pha
pha pha
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
rts rts

View File

@ -38,7 +38,7 @@ CFG.EtcFiles >LDYAI 256
>LIBCALL hLIBTCPIP,LIBTCPIP.SETCFG >LIBCALL hLIBTCPIP,LIBTCPIP.SETCFG
lda CFG.hBuf1 lda CFG.hBuf1
>SYSCALL freemem >SYSCALL FreeMem
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CFG.Read.PrintF pha CFG.Read.PrintF pha
@ -46,7 +46,7 @@ CFG.Read.PrintF pha
pla pla
>PUSHYA >PUSHYA
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
CFG.Read.HOSTNAME CFG.Read.HOSTNAME
@ -236,10 +236,10 @@ CFG.Read.HOSTS stz CFG.hBuf2
pha pha
lda CFG.hBuf3 lda CFG.hBuf3
beq .90 beq .90
>SYSCALL freemem >SYSCALL FreeMem
.90 lda CFG.hBuf2 .90 lda CFG.hBuf2
beq .91 beq .91
>SYSCALL freemem >SYSCALL FreeMem
.91 jmp CFG.Read.Close2 .91 jmp CFG.Read.Close2
*-------------------------------------- *--------------------------------------
@ -284,12 +284,12 @@ CFG.Read.Result bcc .1
pla pla
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
sec sec
rts rts
.1 >LDYA L.MSG.CFG.OK .1 >LDYA L.MSG.CFG.OK
>SYSCALL puts >SYSCALL PutS
rts rts
*-------------------------------------- *--------------------------------------
CFG.Read.Open stz CFG.hCfgFile CFG.Read.Open stz CFG.hCfgFile
@ -307,7 +307,7 @@ CFG.Read.Close php
pha pha
CFG.Read.Close2 lda CFG.hCfgFile CFG.Read.Close2 lda CFG.hCfgFile
beq .8 beq .8
>SYSCALL fclose >SYSCALL FClose
.8 pla .8 pla
plp plp
rts rts

View File

@ -123,7 +123,7 @@ CS.RUN >LIBCALL hLIBTCPIP,LIBTCPIP.GETCFG
lda IPCFG+S.NETCFG.DevID lda IPCFG+S.NETCFG.DevID
bne CS.RUN.SETUP bne CS.RUN.SETUP
>LDYA L.MSG.NODEV >LDYA L.MSG.NODEV
>SYSCALL puts >SYSCALL PutS
lda #MLI.E.NODEV lda #MLI.E.NODEV
sec sec
rts rts
@ -150,7 +150,7 @@ CS.RUN.SETUP
.99 >PUSHW L.MSG.USAGE .99 >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -231,7 +231,7 @@ CS.RUN.DUMPNIC >PUSHW L.MSG1.DEV
>PUSHBI 11 >PUSHBI 11
>SYSCALL printf >SYSCALL PrintF
>PUSHW L.MSG1.DEV.ARP >PUSHW L.MSG1.DEV.ARP
@ -242,7 +242,7 @@ CS.RUN.DUMPNIC >PUSHW L.MSG1.DEV
.2 >PUSHA .2 >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
>PUSHW L.MSG1.DEV.IP >PUSHW L.MSG1.DEV.IP
@ -256,21 +256,21 @@ CS.RUN.DUMPNIC >PUSHW L.MSG1.DEV
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
>LDA.G DCB.NIC+S.DCB.NIC.LINK >LDA.G DCB.NIC+S.DCB.NIC.LINK
and #S.DCB.NIC.LINK.OK and #S.DCB.NIC.LINK.OK
bne CS.RUN.LINK bne CS.RUN.LINK
>LDYA L.MSG1.LINK.KO >LDYA L.MSG1.LINK.KO
>SYSCALL puts >SYSCALL PutS
bra CS.RUN.DUMPIP bra CS.RUN.DUMPIP
CS.RUN.LINK >LDYA L.MSG1.LINK.OK CS.RUN.LINK >LDYA L.MSG1.LINK.OK
>SYSCALL puts >SYSCALL PutS
>PUSHW L.MSG1.LINKSPEED >PUSHW L.MSG1.LINKSPEED
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
>LDA.G DCB.NIC+S.DCB.NIC.SPEED >LDA.G DCB.NIC+S.DCB.NIC.SPEED
and #$0F and #$0F
@ -287,11 +287,11 @@ CS.RUN.LINK >LDYA L.MSG1.LINK.OK
>LDYA L.MSG1.DPLX.HD >LDYA L.MSG1.DPLX.HD
bra .6 bra .6
.5 >LDYA L.MSG1.DPLX.FD .5 >LDYA L.MSG1.DPLX.FD
.6 >SYSCALL puts .6 >SYSCALL PutS
CS.RUN.DUMPIP >PUSHW L.MSG2 CS.RUN.DUMPIP >PUSHW L.MSG2
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda IPCFG+S.NETCFG.STATUS lda IPCFG+S.NETCFG.STATUS
and #S.IPCFG.STATUS.OK and #S.IPCFG.STATUS.OK
@ -299,7 +299,7 @@ CS.RUN.DUMPIP >PUSHW L.MSG2
>LDYA L.MSG2.C >LDYA L.MSG2.C
bra .10 bra .10
.11 >LDYA L.MSG2.U .11 >LDYA L.MSG2.U
.10 >SYSCALL puts .10 >SYSCALL PutS
>PUSHW L.MSG2.DHCPSRVR >PUSHW L.MSG2.DHCPSRVR
@ -311,7 +311,7 @@ CS.RUN.DUMPIP >PUSHW L.MSG2
>PUSHBI 4 >PUSHBI 4
>SYSCALL printf >SYSCALL PrintF
>PUSHW L.MSG2.IPMASK >PUSHW L.MSG2.IPMASK
@ -322,7 +322,7 @@ CS.RUN.DUMPIP >PUSHW L.MSG2
bne .3 bne .3
>PUSHBI 8 >PUSHBI 8
>SYSCALL printf >SYSCALL PrintF
>PUSHW L.MSG2.GW >PUSHW L.MSG2.GW
@ -332,7 +332,7 @@ CS.RUN.DUMPIP >PUSHW L.MSG2
cpx #4 cpx #4
bne .4 bne .4
>PUSHBI 4 >PUSHBI 4
>SYSCALL printf >SYSCALL PrintF
>PUSHW L.MSG2.DNS >PUSHW L.MSG2.DNS
@ -343,14 +343,14 @@ CS.RUN.DUMPIP >PUSHW L.MSG2
bne .5 bne .5
>PUSHBI 8 >PUSHBI 8
>SYSCALL printf >SYSCALL PrintF
>PUSHW L.MSG2.HOSTNAME >PUSHW L.MSG2.HOSTNAME
>PUSHW L.IPCFG.HOSTNAME >PUSHW L.IPCFG.HOSTNAME
>PUSHW L.IPCFG.DOMAIN >PUSHW L.IPCFG.DOMAIN
>PUSHBI 4 >PUSHBI 4
>SYSCALL printf >SYSCALL PrintF
lda #0 tell TSKMGR that all done ok, but lda #0 tell TSKMGR that all done ok, but
sec we do not want to stay in memory sec we do not want to stay in memory
rts rts

View File

@ -76,7 +76,7 @@ CS.INIT clc
*-------------------------------------- *--------------------------------------
CS.RUN >PUSHW L.MSG.TOPBAR CS.RUN >PUSHW L.MSG.TOPBAR
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
jsr CS.RUN.Load jsr CS.RUN.Load
bcs .1 bcs .1
@ -87,22 +87,22 @@ CS.RUN >PUSHW L.MSG.TOPBAR
.2 >PUSHYA .2 >PUSHYA
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
>PUSHW L.MSG.KCONF >PUSHW L.MSG.KCONF
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
>LDYAI A2osX.KCONFIG >LDYAI A2osX.KCONFIG
jsr CS.RUN.DumpConfYA jsr CS.RUN.DumpConfYA
>PUSHW L.MSG.STATUSBAR >PUSHW L.MSG.STATUSBAR
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
CS.RUN.REPaint >PUSHW L.MSG.FCONF CS.RUN.REPaint >PUSHW L.MSG.FCONF
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
>LDYA ZPCfgPtr >LDYA ZPCfgPtr
jsr CS.RUN.DumpConfYA jsr CS.RUN.DumpConfYA
@ -176,7 +176,7 @@ CS.RUN.Loop >SYSCALL GetChar
.8 >PUSHW L.MSG.QUIT .8 >PUSHW L.MSG.QUIT
.80 >PUSHBI 0 .80 >PUSHBI 0
.9 >SYSCALL printf .9 >SYSCALL PrintF
lda #0 lda #0
sec sec
rts rts
@ -266,7 +266,7 @@ CS.RUN.DumpConfYA
>PUSHW L.MSG.HZ >PUSHW L.MSG.HZ
>PUSHB (ZPTmp1) >PUSHB (ZPTmp1)
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
>PUSHW L.MSG.CHROOT >PUSHW L.MSG.CHROOT
@ -280,7 +280,7 @@ CS.RUN.DumpConfYA
.10 >LDYA L.MSG.ENABLED .10 >LDYA L.MSG.ENABLED
.12 >PUSHYA .12 >PUSHYA
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
>PUSHW L.MSG.PMODE >PUSHW L.MSG.PMODE
@ -294,7 +294,7 @@ CS.RUN.DumpConfYA
.14 >PUSHYA .14 >PUSHYA
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
>PUSHW L.MSG.TTYS >PUSHW L.MSG.TTYS
@ -302,7 +302,7 @@ CS.RUN.DumpConfYA
lda (ZPTmp1),y lda (ZPTmp1),y
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
ldy #9 Slot 1 ldy #9 Slot 1
@ -328,7 +328,7 @@ CS.RUN.DumpConfYA
>PUSHW T.MSG.SLOT.DESC,x >PUSHW T.MSG.SLOT.DESC,x
>PUSHBI 3 >PUSHBI 3
>SYSCALL printf >SYSCALL PrintF
ply ply
iny iny
@ -337,7 +337,7 @@ CS.RUN.DumpConfYA
>PUSHW L.MSG.PROMPT >PUSHW L.MSG.PROMPT
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
clc clc
rts rts

View File

@ -71,7 +71,7 @@ CS.RUN ldy #S.PS.ARGC
.9 >PUSHW L.MSG.USAGE .9 >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec

View File

@ -101,7 +101,7 @@ CS.RUN
bne .8 bne .8
ldy #S.PS.hCWD ldy #S.PS.hCWD
lda (pPs),y lda (pPS),y
>SYSCALL GetMemPtr >SYSCALL GetMemPtr
jsr InitSrcDirYA jsr InitSrcDirYA
bcs .9 bcs .9
@ -110,7 +110,7 @@ CS.RUN
>SYSCALL time >SYSCALL time
>LDYAI S.PW >LDYAI S.PW
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPPW >STYA ZPPW
txa txa
@ -202,7 +202,7 @@ CS.RUN.PRINT.DEV
>PUSHBI 8 >PUSHBI 8
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
ldy #bRecurse ldy #bRecurse
@ -235,7 +235,7 @@ CS.RUN.PRINT.DIR
jsr CS.RUN.PRINT.SRCPATH jsr CS.RUN.PRINT.SRCPATH
.23 >LDYA ZPFileName .23 >LDYA ZPFileName
>SYSCALL puts >SYSCALL PutS
bcs .9 bcs .9
>LDA.G bRecurse >LDA.G bRecurse
bpl .8 bpl .8
@ -250,7 +250,7 @@ CS.RUN.PRINT.DIR
.22 >PUSHW L.MSG.DIR .22 >PUSHW L.MSG.DIR
>PUSHW ZPFileName >PUSHW ZPFileName
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
ldy #0 ldy #0
@ -282,7 +282,7 @@ CS.RUN.PRINT.DIR
jsr CS.RUN.PUSHDATES jsr CS.RUN.PUSHDATES
>PUSHW ZPFileName >PUSHW ZPFileName
>PUSHBI 12 >PUSHBI 12
>SYSCALL printf >SYSCALL PrintF
bcs .90 bcs .90
@ -313,13 +313,13 @@ CS.RUN.PRINT.FILE
jsr CS.RUN.PRINT.SRCPATH jsr CS.RUN.PRINT.SRCPATH
.23 >LDYA ZPFileName .23 >LDYA ZPFileName
>SYSCALL puts >SYSCALL PutS
rts rts
.22 >PUSHW L.MSG.FILE .22 >PUSHW L.MSG.FILE
>PUSHW ZPFileName >PUSHW ZPFileName
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
jmp CS.RUN.UpdateColCnt jmp CS.RUN.UpdateColCnt
*-------------------------------------- *--------------------------------------
@ -356,7 +356,7 @@ CS.RUN.PRINT.FILE
>PUSHW ZPFileName >PUSHW ZPFileName
>PUSHBI 20 >PUSHBI 20
>SYSCALL printf >SYSCALL PrintF
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
@ -366,7 +366,7 @@ CS.RUN.PRINT.SRCPATH
>SYSCALL GetMemPtr >SYSCALL GetMemPtr
>PUSHYA >PUSHYA
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN.PushGidUid CS.RUN.PushGidUid
@ -509,7 +509,7 @@ CS.RUN.NewLine >LDA.G ColCount
CS.RUN.NewLine.1 CS.RUN.NewLine.1
>PUSHW L.MSG.CRLF >PUSHW L.MSG.CRLF
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
rts rts
CS.RUN.NewLine.8 CS.RUN.NewLine.8
clc clc
@ -523,7 +523,7 @@ CS.RUN.ENTER.MSG
>PUSHYA >PUSHYA
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
CS.DOEVENT sec CS.DOEVENT sec

View File

@ -69,7 +69,7 @@ CS.RUN jsr DumpDev
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
DumpDev >LDYA L.MSG0 DumpDev >LDYA L.MSG0
>SYSCALL puts >SYSCALL PutS
ldx #1 ldx #1
stx Index stx Index
@ -99,7 +99,7 @@ DumpDev >LDYA L.MSG0
pla pla
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
bra .7 bra .7
@ -137,7 +137,7 @@ DumpDevFD >PUSHW L.MSG1
>PUSHBI 6 >PUSHBI 6
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
DumpDevDIB >PUSHW L.MSG2 DumpDevDIB >PUSHW L.MSG2
@ -169,7 +169,7 @@ DumpDevDIB >PUSHW L.MSG2
>PUSHBI 8 >PUSHBI 8
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
>LDA.G DEV.DIB+S.DIB.S >LDA.G DEV.DIB+S.DIB.S
@ -187,11 +187,11 @@ DumpDevDIB >PUSHW L.MSG2
.4 >PUSHW L.MSG2.C .4 >PUSHW L.MSG2.C
>PUSHBI 0 >PUSHBI 0
.8 >SYSCALL printf .8 >SYSCALL PrintF
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
DumpNod >LDYA L.MSG3 DumpNod >LDYA L.MSG3
>SYSCALL puts >SYSCALL PutS
ldx #2 ldx #2
stx Index stx Index
@ -222,7 +222,7 @@ DumpNod >LDYA L.MSG3
>PUSHYA >PUSHYA
>PUSHBI 6 >PUSHBI 6
>SYSCALL printf >SYSCALL PrintF
.7 inc index .7 inc index

View File

@ -49,7 +49,7 @@ CS.INIT clc
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN >LDYA L.MSG0 CS.RUN >LDYA L.MSG0
>SYSCALL puts >SYSCALL PutS
ldx #1 ldx #1
stx FILE.ID stx FILE.ID
@ -98,7 +98,7 @@ CS.RUN >LDYA L.MSG0
>PUSHBI 6 >PUSHBI 6
>SYSCALL printf >SYSCALL PrintF
.7 inc FILE.ID .7 inc FILE.ID
ldx FILE.ID ldx FILE.ID

View File

@ -53,7 +53,7 @@ CS.INIT clc
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN ldy #S.PS.ARGC CS.RUN ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
beq .99 beq .99
.1 inc ArgIndex .1 inc ArgIndex
@ -78,7 +78,7 @@ CS.RUN ldy #S.PS.ARGC
.99 >PUSHW L.MSG.USAGE .99 >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -109,7 +109,7 @@ CS.RUN.TEXT lda Arg
jmp CS.RUN.PRINT jmp CS.RUN.PRINT
*-------------------------------------- *--------------------------------------
CS.RUN.FILE >LDYAI FILEBUF.SIZE CS.RUN.FILE >LDYAI FILEBUF.SIZE
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPDataBufPtr >STYA ZPDataBufPtr
@ -155,7 +155,7 @@ CS.RUN.FILE >LDYAI FILEBUF.SIZE
>SYSCALL MD5Finalize >SYSCALL MD5Finalize
CS.RUN.PRINT >LEA.G MD5Buf CS.RUN.PRINT >LEA.G MD5Buf
>SYSCALL puts >SYSCALL PutS
lda #0 lda #0
* sec * sec
* rts * rts
@ -170,7 +170,7 @@ CS.QUIT lda hDataBuf
.2 lda hFile .2 lda hFile
beq .3 beq .3
>SYSCALL fclose >SYSCALL FClose
.3 clc .3 clc
rts rts

View File

@ -60,7 +60,7 @@ CS.RUN >LEA.G MemStat
>STYA ZPPTR1 >STYA ZPPTR1
>LDYA L.MSG0 >LDYA L.MSG0
>SYSCALL puts >SYSCALL PutS
>INC.G MEM.COUNT skip slot 0 >INC.G MEM.COUNT skip slot 0
CS.RUN.LOOP >LDA.G bSTOP CS.RUN.LOOP >LDA.G bSTOP
@ -100,7 +100,7 @@ CS.RUN.FOOTER >SYSCALL GetChar
>PUSHB.G USED.COUNT >PUSHB.G USED.COUNT
>PUSHB.G MEM.COUNT >PUSHB.G MEM.COUNT
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
>PUSHW L.MSG3 >PUSHW L.MSG3
>PUSHW.G MemStat+S.MSTAT.MH >PUSHW.G MemStat+S.MSTAT.MH
@ -115,7 +115,7 @@ CS.RUN.FOOTER >SYSCALL GetChar
ply ply
>PUSHYA >PUSHYA
>PUSHBI 8 >PUSHBI 8
>SYSCALL printf >SYSCALL PrintF
lda #0 lda #0
sec sec
@ -176,10 +176,10 @@ CS.RUN.PRINTMEM >PUSHW L.MSG1
>PUSHW L.MSG1.INV >PUSHW L.MSG1.INV
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
.12 >PUSHBI 9 .12 >PUSHBI 9
>SYSCALL printf >SYSCALL PrintF
lda (ZPPTR1) lda (ZPPTR1)
and #S.MEM.F.CODE and #S.MEM.F.CODE
@ -234,7 +234,7 @@ CS.RUN.PRINTMEM.BIN
>PUSHBI 2 >PUSHBI 2
CS.RUN.PRINTMEM.OUT CS.RUN.PRINTMEM.OUT
>SYSCALL printf >SYSCALL PrintF
>INC.G LINE.COUNT >INC.G LINE.COUNT
cmp #PAGELEN cmp #PAGELEN
beq .9 beq .9

View File

@ -82,7 +82,7 @@ CS.RUN
.99 >PUSHW L.MSG.USAGE .99 >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
.9 rts .9 rts
@ -124,7 +124,7 @@ CS.RUN
>PUSHW L.MSG.Init >PUSHW L.MSG.Init
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
CS.RUN.LOOP jsr CS.RUN.GETLINE CS.RUN.LOOP jsr CS.RUN.GETLINE
bcs .9 bcs .9
@ -238,23 +238,23 @@ CS.RUN.PRINT lda bLineNum
>PUSHW L.MSG.NUMLINE >PUSHW L.MSG.NUMLINE
>PUSHW LineNum >PUSHW LineNum
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
.1 lda bEscCodes .1 lda bEscCodes
bmi .2 bmi .2
>LDYA ZPBufPtr >LDYA ZPBufPtr
>SYSCALL puts >SYSCALL PutS
rts rts
.2 >PUSHW ZPBufPtr .2 >PUSHW ZPBufPtr
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
>PUSHW L.MSG.CRLF >PUSHW L.MSG.CRLF
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CS.QUIT lda hBuf CS.QUIT lda hBuf

View File

@ -73,7 +73,7 @@ CS.INIT >LDYA L.LIBTCPIP
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CS.RUN >LDYA L.MSG0 CS.RUN >LDYA L.MSG0
>SYSCALL puts >SYSCALL PutS
>LIBCALL hLIBTCPIP,LIBTCPIP.GetTable >LIBCALL hLIBTCPIP,LIBTCPIP.GetTable
>STYA ZPPTR1 >STYA ZPPTR1
ldy SocketIndex ldy SocketIndex
@ -99,7 +99,7 @@ CS.RUN >LDYA L.MSG0
jsr CS.RUN.T ..19 jsr CS.RUN.T ..19
>PUSHBI 19 >PUSHBI 19
>LDYA L.MSG1 >LDYA L.MSG1
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
.7 inc SocketIndex .7 inc SocketIndex
ldy SocketIndex ldy SocketIndex

View File

@ -51,13 +51,13 @@ CS.INIT >SYSCALL ArgVC
dey dey
dex dex
bpl .1 bpl .1
lda (pPs) lda (pPS)
ora #S.PS.F.EVENT Now accept events ora #S.PS.F.EVENT Now accept events
sta (pPs) sta (pPS)
clc clc
rts rts
.99 >LDYA L.MSG.USAGE .99 >LDYA L.MSG.USAGE
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts

View File

@ -45,7 +45,7 @@ CS.INIT clc
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN ldy #S.PS.ARGC CS.RUN ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
cmp #1 cmp #1
bcs CS.RUN.SET bcs CS.RUN.SET
@ -61,7 +61,7 @@ CS.RUN.READ jsr NSC.Init
>PUSHBI 0 >PUSHBI 0
>LDYA L.MSG.READ.KO >LDYA L.MSG.READ.KO
>SYSCALL printf >SYSCALL PrintF
lda #MLI.E.NODEV lda #MLI.E.NODEV
sec sec
rts rts
@ -70,7 +70,7 @@ CS.RUN.READ jsr NSC.Init
>PUSHBI 0 >PUSHBI 0
>LDYA L.MSG.USAGE >LDYA L.MSG.USAGE
>SYSCALL printf >SYSCALL PrintF
lda #0 tell TSKMGR that all done ok, but lda #0 tell TSKMGR that all done ok, but
sec we do not want to stay in memory sec we do not want to stay in memory
rts rts
@ -250,7 +250,7 @@ NSC.Dump ldx #1
>PUSHA >PUSHA
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.READ.OK1 >LDYA L.MSG.READ.OK1
>SYSCALL printf >SYSCALL PrintF
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.READ.OK2.24 >LDYA L.MSG.READ.OK2.24
bit DS1216E.DATA+4 bit DS1216E.DATA+4
@ -258,10 +258,10 @@ NSC.Dump ldx #1
>LDYA L.MSG.READ.OK2.12 >LDYA L.MSG.READ.OK2.12
.3 >SYSCALL printf .3 >SYSCALL PrintF
>PUSHBI 0 >PUSHBI 0
>LDYA L.MSG.READ.OK3 >LDYA L.MSG.READ.OK3
>SYSCALL printf >SYSCALL PrintF
lda DS1216E.DATA lda DS1216E.DATA
jsr PrintBCD jsr PrintBCD
@ -298,7 +298,7 @@ NSC.Dump ldx #1
>PUSHBI 0 >PUSHBI 0
>LDYA L.MSG.CRLF >LDYA L.MSG.CRLF
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
PrintBCD pha PrintBCD pha

View File

@ -87,7 +87,7 @@ CS.RUN >INC.G ArgIndex
.9 >PUSHBI 0 .9 >PUSHBI 0
>LDYA L.MSG.USAGE >LDYA L.MSG.USAGE
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
.99 rts .99 rts
@ -114,7 +114,7 @@ CS.RUN >INC.G ArgIndex
beq .9 beq .9
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPFullPath >STYA ZPFullPath
txa txa
@ -142,14 +142,14 @@ CS.RUN >INC.G ArgIndex
.98 bcs .99 .98 bcs .99
>LDYAI CHNK.SIZE >LDYAI CHNK.SIZE
>SYSCALL getmem >SYSCALL GetMem
bcs .98 bcs .98
>STYA ZPSrcBufPtr >STYA ZPSrcBufPtr
txa txa
>STA.G hSrcBuf >STA.G hSrcBuf
>LDYAI CHNK.SIZE >LDYAI CHNK.SIZE
>SYSCALL getmem >SYSCALL GetMem
bcs .98 bcs .98
>STYA ZPDstBufPtr >STYA ZPDstBufPtr
txa txa
@ -236,7 +236,7 @@ CS.RUN.DIR lda bRecurse
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.DIR >LDYA L.MSG.DIR
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
jsr CS.RUN.WriteArcHdrDir jsr CS.RUN.WriteArcHdrDir
@ -256,7 +256,7 @@ CS.RUN.FILE jsr CS.RUN.BuildFilePath
>LDA.G hArcFile >LDA.G hArcFile
tay tay
lda OF.Table.hPath-1,y lda OF.Table.hPath-1,y
>SYSCALL getmemptr >SYSCALL GetMemptr
>SYSCALL strcmp >SYSCALL strcmp
bcc .8 bcc .8
@ -264,7 +264,7 @@ CS.RUN.FILE jsr CS.RUN.BuildFilePath
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.FILE >LDYA L.MSG.FILE
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
jsr CS.RUN.WriteArcHdrFile jsr CS.RUN.WriteArcHdrFile
@ -309,7 +309,7 @@ CS.RUN.FILE jsr CS.RUN.BuildFilePath
*-------------------------------------- *--------------------------------------
CS.RUN.CheckErr bcs .1 CS.RUN.CheckErr bcs .1
>LDYA L.MSG.OK >LDYA L.MSG.OK
>SYSCALL puts >SYSCALL PutS
rts rts
.1 pha .1 pha
@ -317,7 +317,7 @@ CS.RUN.CheckErr bcs .1
>PUSHBI 1 >PUSHBI 1
>LDYA L.MSG.ERR >LDYA L.MSG.ERR
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
@ -362,7 +362,7 @@ CS.RUN.ReadFile >PUSHWI CHNK.SIZE
*-------------------------------------- *--------------------------------------
CS.RUN.CloseFile CS.RUN.CloseFile
>LDA.G hFile >LDA.G hFile
>SYSCALL fclose >SYSCALL FClose
bcs .9 bcs .9
>STZ.G hFile >STZ.G hFile
@ -446,7 +446,7 @@ CS.RUN.AppendArc
.9 rts .9 rts
.99 >LDYA L.MSG.E.IARC .99 >LDYA L.MSG.E.IARC
>SYSCALL puts >SYSCALL PutS
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -575,7 +575,7 @@ CS.QUIT jsr LeaveSubDir
.2 >LDA.G hArcFile .2 >LDA.G hArcFile
beq .3 beq .3
>SYSCALL fclose >SYSCALL FClose
.3 >LDA.G hDstBuf .3 >LDA.G hDstBuf
beq .4 beq .4

View File

@ -78,7 +78,7 @@ CS.INIT >LDYA L.LIBPAK
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CS.RUN ldy #S.PS.ARGC CS.RUN ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
cmp #2 cmp #2
bne .9 bne .9
@ -101,7 +101,7 @@ CS.RUN ldy #S.PS.ARGC
.9 >PUSHBI 0 .9 >PUSHBI 0
>LDYA L.MSG.USAGE >LDYA L.MSG.USAGE
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
.99 rts .99 rts
@ -116,7 +116,7 @@ CS.RUN.START >PUSHW ZPDstTableOfs
>PUSHBI 9 >PUSHBI 9
>LDYA L.MSG.SRCFILE >LDYA L.MSG.SRCFILE
>SYSCALL printf >SYSCALL PrintF
>LDYA ZPDstTableOfs >LDYA ZPDstTableOfs
jsr CS.RUN.GetSrcBufYA jsr CS.RUN.GetSrcBufYA
@ -184,7 +184,7 @@ CS.RUN.LOOP ldy #S.PS.hStdIn
>PUSHA >PUSHA
>PUSHBI 5 >PUSHBI 5
>LDYA L.MSG.CHUNK >LDYA L.MSG.CHUNK
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
jsr CS.RUN.Pak jsr CS.RUN.Pak
@ -389,14 +389,14 @@ CS.RUN.GetChunk lda ZPChunkIndex
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CS.RUN.GetSrcBufYA CS.RUN.GetSrcBufYA
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
stx hSrcBuf stx hSrcBuf
>STYA ZPSrcBufPtr >STYA ZPSrcBufPtr
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CS.RUN.Pak >LDYA ZPChunkLen CS.RUN.Pak >LDYA ZPChunkLen
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
stx hDstBuf stx hDstBuf
>STYA ZPDstBufPtr >STYA ZPDstBufPtr
@ -448,7 +448,7 @@ CS.RUN.WritePak lda hDstFile
>PUSHW ZPChunkPakedLen >PUSHW ZPChunkPakedLen
>PUSHBI 4 >PUSHBI 4
>LDYA L.MSG.PAKED >LDYA L.MSG.PAKED
>SYSCALL printf >SYSCALL PrintF
.9 .9
CS.RUN.WritePak.RTS CS.RUN.WritePak.RTS
@ -479,7 +479,7 @@ CS.RUN.WriteStore
>PUSHW ZPChunkLen >PUSHW ZPChunkLen
>PUSHBI 4 >PUSHBI 4
>LDYA L.MSG.STORE >LDYA L.MSG.STORE
>SYSCALL printf >SYSCALL PrintF
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
@ -516,11 +516,11 @@ CS.DOEVENT sec
*-------------------------------------- *--------------------------------------
CS.QUIT lda hDstFile CS.QUIT lda hDstFile
beq .2 beq .2
>SYSCALL fclose >SYSCALL FClose
.2 lda hSrcFile .2 lda hSrcFile
beq .3 beq .3
>SYSCALL fclose >SYSCALL FClose
.3 jsr CS.QUIT.BUF .3 jsr CS.QUIT.BUF

View File

@ -73,7 +73,7 @@ CS.RUN >LIBCALL hLIBTCPIP,LIBTCPIP.GETCFG is TCPIP loaded ?
bmi .1 bmi .1
>LDYA L.MSG.IPKO >LDYA L.MSG.IPKO
>SYSCALL puts >SYSCALL PutS
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -136,7 +136,7 @@ CS.RUN.IPOK inc ArgIndex
.9 >PUSHBI 0 .9 >PUSHBI 0
>LDYA L.MSG.USAGE >LDYA L.MSG.USAGE
.99 >SYSCALL printf .99 >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
@ -157,7 +157,7 @@ CS.RUN.ARGSOK lda ArgHostName
>PUSHBI 6 >PUSHBI 6
>LDYA L.MSG.HOSTOK >LDYA L.MSG.HOSTOK
>SYSCALL printf >SYSCALL PrintF
CS.RUN.OPENSKT ldx #3 CS.RUN.OPENSKT ldx #3
ldy #S.IPCFG.IP+3 ldy #S.IPCFG.IP+3
@ -207,7 +207,7 @@ CS.RUN.OPENSKT ldx #3
bcc CS.RUN.SEND.ECHO bcc CS.RUN.SEND.ECHO
.9 >LDYA L.MSG.SKTKO .9 >LDYA L.MSG.SKTKO
>SYSCALL puts >SYSCALL PutS
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -313,7 +313,7 @@ CS.Print.UNREACH
>PUSHBI 4 >PUSHBI 4
>LDYA L.MSG.UNREACH >LDYA L.MSG.UNREACH
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
CS.Print.REPLY lda #TIMEOUT.MAX CS.Print.REPLY lda #TIMEOUT.MAX
@ -355,7 +355,7 @@ CS.Print.REPLY lda #TIMEOUT.MAX
>PUSHBI 9 >PUSHBI 9
>LDYA L.MSG.REPLY >LDYA L.MSG.REPLY
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
CS.QUIT lda hFrame CS.QUIT lda hFrame

View File

@ -78,7 +78,7 @@ CS.RUN lda #1
.10 >PUSHW L.MSG0 .10 >PUSHW L.MSG0
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
ldx Index ldx Index
.1 lda PS.Table.hPS,x .1 lda PS.Table.hPS,x
@ -141,7 +141,7 @@ CS.RUN.DUMP >SYSCALL GetMemPtr
>PUSHBI 10 >PUSHBI 10
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
jmp CS.RUN.PrintArgs jmp CS.RUN.PrintArgs
.9 rts .9 rts
@ -175,7 +175,7 @@ CS.RUN.PrintArgs
>PUSHW L.MSG2 >PUSHW L.MSG2
>PUSHW ZPArgV >PUSHW ZPArgV
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
.2 inc ZPArgV .2 inc ZPArgV
bne .3 bne .3
@ -189,7 +189,7 @@ CS.RUN.PrintArgs
.8 >PUSHW L.MSG3 .8 >PUSHW L.MSG3
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CS.DOEVENT sec CS.DOEVENT sec

View File

@ -46,7 +46,7 @@ L.MSG.DUMP1 .DA MSG.DUMP1
.DA 0 .DA 0
*-------------------------------------- *--------------------------------------
CS.INIT ldy #S.PS.ARGC CS.INIT ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
beq .99 beq .99
>LDYA L.LIBTCPIP >LDYA L.LIBTCPIP
@ -68,7 +68,7 @@ CS.INIT ldy #S.PS.ARGC
clc clc
rts rts
.99 >LDYA L.MSG.USAGE .99 >LDYA L.MSG.USAGE
>SYSCALL puts >SYSCALL PutS
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -89,7 +89,7 @@ CS.RUN jsr Init.Timeout
>PUSHYA >PUSHYA
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.UNKNOWN >LDYA L.MSG.UNKNOWN
>SYSCALL printf >SYSCALL PrintF
sec sec
rts rts
.2 >PUSHW L.Socket .2 >PUSHW L.Socket
@ -137,7 +137,7 @@ CS.RUN jsr Init.Timeout
>PUSHYA >PUSHYA
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.TIMEOUT >LDYA L.MSG.TIMEOUT
>SYSCALL printf >SYSCALL PrintF
sec sec
rts rts
*-------------------------------------- *--------------------------------------
@ -183,7 +183,7 @@ DumpRPCFrame lda #S.UDP+24
sta ZPFrameBase+1 sta ZPFrameBase+1
>LDYA L.MSG.DUMP0 >LDYA L.MSG.DUMP0
>SYSCALL puts >SYSCALL PutS
.1 ldy #3 .1 ldy #3
lda (ZPFrameBase),y Value follows? lda (ZPFrameBase),y Value follows?
beq .9 beq .9
@ -205,7 +205,7 @@ DumpRPCFrame lda #S.UDP+24
>PUSHBI 8 >PUSHBI 8
>LDYA L.MSG.DUMP1 >LDYA L.MSG.DUMP1
>SYSCALL printf >SYSCALL PrintF
lda #20 lda #20
clc clc
adc ZPFrameBase adc ZPFrameBase

View File

@ -20,13 +20,13 @@ CL.PrintPrompt >PUSHW L.PS1
>PUSHYA >PUSHYA
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
pla pla
>SYSCALL FreeMem >SYSCALL FreeMem
.1 >PUSHW L.MSG.PROMPT .1 >PUSHW L.MSG.PROMPT
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CL.READN0A tax CL.READN0A tax
@ -294,7 +294,7 @@ CL.PrintEOL.8 clc
CL.PrintCLBuf >PUSHW ZPCLBuf CL.PrintCLBuf >PUSHW ZPCLBuf
ldy #S.PS.hStdOut ldy #S.PS.hStdOut
lda (pPs),y lda (pPS),y
>SYSCALL fputs >SYSCALL fputs
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -106,7 +106,7 @@ CMD.CD.YA >PUSHYA
lda #MLI.E.INVPATH lda #MLI.E.INVPATH
.19 pha .19 pha
lda ZPTmpW lda ZPTmpW
>SYSCALL freemem >SYSCALL FreeMem
pla pla
sec sec
rts rts
@ -127,11 +127,11 @@ CMD.CD.YA >PUSHYA
*-------------------------------------- *--------------------------------------
CMD.SetCWDA pha CMD.SetCWDA pha
ldy #S.PS.hCWD ldy #S.PS.hCWD
lda (pPs),y lda (pPS),y
>SYSCALL FreeMem >SYSCALL FreeMem
pla pla
ldy #S.PS.hCWD ldy #S.PS.hCWD
sta (pPs),y sta (pPS),y
lda #0 lda #0
* clc * clc
rts rts
@ -151,14 +151,14 @@ CMD.SET lda (ZPArgVBufPtr)
beq .8 Ending 0 ? beq .8 Ending 0 ?
>LDYA ZPPTR1 >LDYA ZPPTR1
>SYSCALL puts >SYSCALL PutS
bcs .9 bcs .9
jsr GetPtr1NextString jsr GetPtr1NextString
bra .1 bra .1
.8 lda ZPTmpW .8 lda ZPTmpW
>SYSCALL freemem >SYSCALL FreeMem
* clc * clc
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
@ -235,7 +235,7 @@ CMD.SET.GET >PUSHW ZPVarNamePtr
bcs .8 bcs .8
>LDYA ZPCLBuf >LDYA ZPCLBuf
>SYSCALL puts >SYSCALL PutS
rts rts
.8 clc .8 clc
@ -280,7 +280,7 @@ CMD.DATE >PUSHEA.G TimeBuf
>SYSCALL StrFTime >SYSCALL StrFTime
CMD.DATE.PRINT >LDYA ZPCLBuf CMD.DATE.PRINT >LDYA ZPCLBuf
>SYSCALL puts >SYSCALL PutS
rts rts
*-------------------------------------- *--------------------------------------
CMD.ECHO stz ZPPtr1 echo -N CMD.ECHO stz ZPPtr1 echo -N
@ -316,7 +316,7 @@ CMD.ECHO stz ZPPtr1 echo -N
>PUSHW L.MSG.ECHOCRLF >PUSHW L.MSG.ECHOCRLF
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
.9 rts .9 rts
.8 clc .8 clc
@ -418,7 +418,7 @@ CMD.MD lda (ZPArgVBufPtr)
*-------------------------------------- *--------------------------------------
CMD.PWD jsr GetCWD CMD.PWD jsr GetCWD
>SYSCALL puts >SYSCALL PutS
rts rts
*-------------------------------------- *--------------------------------------
CMD.RD lda (ZPArgVBufPtr) CMD.RD lda (ZPArgVBufPtr)
@ -474,7 +474,7 @@ CMD.REN lda (ZPArgVBufPtr)
tay tay
lda #0 lda #0
>SYSCALL getmem >SYSCALL GetMem
bcs .90 bcs .90
>STYA ZPPtr2 >STYA ZPPtr2
stx ZPTmpW+1 stx ZPTmpW+1
@ -503,7 +503,7 @@ CMD.REN lda (ZPArgVBufPtr)
>SYSCALL strcat >SYSCALL strcat
lda ZPTmpW lda ZPTmpW
>SYSCALL freemem >SYSCALL FreeMem
lda ZPTmpW+1 lda ZPTmpW+1
sta ZPTmpW sta ZPTmpW
@ -514,7 +514,7 @@ CMD.REN lda (ZPArgVBufPtr)
.90 php .90 php
pha pha
lda ZPTmpW lda ZPTmpW
>SYSCALL freemem >SYSCALL FreeMem
pla pla
plp plp
rts rts
@ -636,7 +636,7 @@ CMD.EXIT lda (ZPArgVBufPtr)
bcs .9 bcs .9
.1 ldy #S.PS.RC .1 ldy #S.PS.RC
sta (pPs),y sta (pPS),y
.2 jsr CORE.StkPull Pull everything until CALL . CL... .2 jsr CORE.StkPull Pull everything until CALL . CL...
bcs .9 bcs .9
@ -664,7 +664,7 @@ CMD.EXIT.FILE jsr CORE.StkPullFree Code buffer
ldy #S.PS.hARGV ldy #S.PS.hARGV
lda (pPS),y lda (pPS),y
>SYSCALL freemem ArgV buffer >SYSCALL FreeMem ArgV buffer
jsr CORE.StkPull jsr CORE.StkPull
ldy #S.PS.hARGV ldy #S.PS.hARGV
@ -682,7 +682,7 @@ CMD.EXIT.FILE jsr CORE.StkPullFree Code buffer
sta ZPInputBuf sta ZPInputBuf
ldy #S.PS.RC ldy #S.PS.RC
lda (pPs),y lda (pPS),y
clc clc
rts rts
@ -954,9 +954,9 @@ CMD.NEXT.LIST lda (pData),y Y = StkPtr
pha pha
dey dey
lda (pData),y hLIST lda (pData),y hLIST
>SYSCALL freemem >SYSCALL FreeMem
pla pla
>SYSCALL freemem >SYSCALL FreeMem
* clc * clc
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
@ -1054,9 +1054,9 @@ CMD.NEXT.FILEEXEC.POP
pha pha
dey dey
lda (pData),y hFILE/hPIPE lda (pData),y hFILE/hPIPE
>SYSCALL fclose >SYSCALL FClose
pla pla
>SYSCALL freemem >SYSCALL FreeMem
* clc * clc
rts rts
*-------------------------------------- *--------------------------------------
@ -1200,7 +1200,7 @@ CMD.IsSwitch lda (ZPArgVBufPtr)
CMD.PrintArgVBufPtr CMD.PrintArgVBufPtr
>PUSHW ZPArgVBufPtr >PUSHW ZPArgVBufPtr
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
MAN MAN

View File

@ -271,7 +271,7 @@ CORE.Run.Exit php
pha pha
>LDA.G CORE.hArgVBuf >LDA.G CORE.hArgVBuf
beq .1 beq .1
>SYSCALL freemem >SYSCALL FreeMem
>STZ.G CORE.hArgVBuf >STZ.G CORE.hArgVBuf
@ -319,7 +319,7 @@ CORE.ExecExtCmd >PUSHW ZPArgVBuf
.4 >SLEEP Suspend this PID .4 >SLEEP Suspend this PID
sec sec
ldy #S.PS.RC CPID will update S.PS.RC ldy #S.PS.RC CPID will update S.PS.RC
lda (pPs),y lda (pPS),y
bne .9 bne .9
.8 clc .8 clc
@ -483,7 +483,7 @@ CORE.ArgV.Add lda #C.SPACE
inc ZPArgVBufPtr+1 inc ZPArgVBufPtr+1
.8 pla .8 pla
>SYSCALL freemem >SYSCALL FreeMem
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CORE.ArgV.Next lda (ZPArgVBufPtr) CORE.ArgV.Next lda (ZPArgVBufPtr)
@ -758,12 +758,12 @@ CORE.StkPullInputBufPtr
*-------------------------------------- *--------------------------------------
CORE.StkPullFClose CORE.StkPullFClose
jsr CORE.StkPull jsr CORE.StkPull
>SYSCALL fclose >SYSCALL FClose
rts rts
*-------------------------------------- *--------------------------------------
CORE.StkPullFree CORE.StkPullFree
jsr CORE.StkPull jsr CORE.StkPull
>SYSCALL freemem >SYSCALL FreeMem
rts rts
*-------------------------------------- *--------------------------------------
CORE.StkPull jsr CORE.StkGet CORE.StkPull jsr CORE.StkGet

View File

@ -41,7 +41,7 @@ EXP.GET jsr CORE.ArgV.Next
EXP.FPU.EXEC ldy CORE.Operator EXP.FPU.EXEC ldy CORE.Operator
ldx EXP.OP.MATH.FPU,y ldx EXP.OP.MATH.FPU,y
jmp A2osX.FpuCall jmp A2osX.FPUCALL
*-------------------------------------- *--------------------------------------
EXP.TEST lda (ZPArgVBufPtr) EXP.TEST lda (ZPArgVBufPtr)
beq .9 beq .9

View File

@ -127,7 +127,7 @@ IO.Reset.Err >LDA.G IO.hErr
*-------------------------------------- *--------------------------------------
IO.Close.Y pha IO.Close.Y pha
lda (pPS),y lda (pPS),y
>SYSCALL fclose >SYSCALL FClose
pla pla
rts rts
*-------------------------------------- *--------------------------------------
@ -161,7 +161,7 @@ IO.PrintBatchErrMsg
>LDYA ZPInputBuf >LDYA ZPInputBuf
>STYA ZPPtr1 >STYA ZPPtr1
ldy #S.PS.RC ldy #S.PS.RC
lda (pPs),y lda (pPS),y
cmp #E.SYN cmp #E.SYN
beq .10 beq .10
@ -254,7 +254,7 @@ IO.PrintErrMsg ldx L.ERR.Codes
stx ZPPTR1+1 stx ZPPTR1+1
ldy #S.PS.RC ldy #S.PS.RC
lda (pPs),y lda (pPS),y
ldy #0 ldy #0
@ -281,7 +281,7 @@ IO.PrintErrMsg ldx L.ERR.Codes
>PUSHW L.MSG.ERROR >PUSHW L.MSG.ERROR
ldy #S.PS.RC ldy #S.PS.RC
lda (pPs),y lda (pPS),y
>PUSHA >PUSHA
>PUSHW ZPPTR1 >PUSHW ZPPTR1

View File

@ -226,7 +226,7 @@ CS.RUN jsr CL.Init
>PUSHB #K.VER >PUSHB #K.VER
>PUSHB /K.VER >PUSHB /K.VER
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs CS.INIT.RTS bcs CS.INIT.RTS
>LDYA L.HOME.PROFILE >LDYA L.HOME.PROFILE
@ -324,7 +324,7 @@ CS.RUN.INTERACTIVE
>PUSHW L.MSG.PROMPTCRLF >PUSHW L.MSG.PROMPTCRLF
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
lda (ZPCLBuf) lda (ZPCLBuf)
beq .8 Empty line beq .8 Empty line
@ -366,13 +366,13 @@ CS.RUN.BATCH >LDA.G bSET.X
.4 >PUSHW L.MSG.TRACE .4 >PUSHW L.MSG.TRACE
>PUSHW ZPCLBuf >PUSHW ZPCLBuf
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs CS.RUN.LOOP.RTS bcs CS.RUN.LOOP.RTS
.5 jsr CORE.Run .5 jsr CORE.Run
CS.RUN.LOOP.END ldy #S.PS.RC CS.RUN.LOOP.END ldy #S.PS.RC
sta (pPs),y sta (pPS),y
bcc CS.RUN.LOOP.80 bcc CS.RUN.LOOP.80
tay tay
beq CS.RUN.LOOP.80 0 = EOF beq CS.RUN.LOOP.80 0 = EOF
@ -411,7 +411,7 @@ CS.RUN.LOOP.80 lda (pData) something on stack ?
CS.RUN.LOOP.88 jmp CS.RUN.LOOP CS.RUN.LOOP.88 jmp CS.RUN.LOOP
CS.RUN.LOOP.EXIT CS.RUN.LOOP.EXIT
ldy #S.PS.RC ldy #S.PS.RC
lda (pPs),y lda (pPS),y
sec sec
CS.RUN.LOOP.RTS rts CS.RUN.LOOP.RTS rts
*-------------------------------------- *--------------------------------------

View File

@ -68,7 +68,7 @@ CS.RUN
.99 >PUSHW L.MSG.USAGE .99 >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -109,15 +109,15 @@ CS.RUN.DUMP lda ArgFile
>PUSHW L.MSG.Filename >PUSHW L.MSG.Filename
>PUSHW ZPPtr1 >PUSHW ZPPtr1
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
pla pla
>SYSCALL freemem >SYSCALL FreeMem
jsr Mod2CSTR jsr Mod2CSTR
>PUSHW L.MSG.Mode >PUSHW L.MSG.Mode
>PUSHEA.G MOD >PUSHEA.G MOD
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
>PUSHW L.MSG.UIDGIDSIZE >PUSHW L.MSG.UIDGIDSIZE
>PUSHW.G StatBuf+S.STAT.UID >PUSHW.G StatBuf+S.STAT.UID
@ -125,7 +125,7 @@ CS.RUN.DUMP lda ArgFile
>PUSHL.G StatBuf+S.STAT.SIZE >PUSHL.G StatBuf+S.STAT.SIZE
>PUSHL.G StatBuf+S.STAT.BLOCKS >PUSHL.G StatBuf+S.STAT.BLOCKS
>PUSHBI 12 >PUSHBI 12
>SYSCALL printf >SYSCALL PrintF
jsr CS.RUN.PrintAMCTime jsr CS.RUN.PrintAMCTime
@ -211,7 +211,7 @@ CS.RUN.PrintAMCTime
>PUSHEA.G TIME.Mod >PUSHEA.G TIME.Mod
>PUSHEA.G TIME.Access >PUSHEA.G TIME.Access
>PUSHBI 6 >PUSHBI 6
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN.PrintAMCTime.NODATE CS.RUN.PrintAMCTime.NODATE

View File

@ -72,13 +72,13 @@ CS.RUN >LIBCALL hLIBTCPIP,LIBTCPIP.GETCFG is TCPIP loaded ?
bmi CS.RUN.IPOK bmi CS.RUN.IPOK
>LDYA L.MSG.IPKO >LDYA L.MSG.IPKO
>SYSCALL puts >SYSCALL PutS
lda #E.SYN lda #E.SYN
sec sec
rts rts
CS.RUN.IPOK ldy #S.PS.ARGC CS.RUN.IPOK ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
cmp #1 cmp #1
bcc .9 bcc .9
ldy #S.IPCFG.IP+3 ldy #S.IPCFG.IP+3
@ -108,11 +108,11 @@ CS.RUN.IPOK ldy #S.PS.ARGC
>PUSHYA >PUSHYA
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.UNKNOWN >LDYA L.MSG.UNKNOWN
>SYSCALL printf >SYSCALL PrintF
bra .99 bra .99
.9 >LDYA L.MSG.USAGE .9 >LDYA L.MSG.USAGE
>SYSCALL puts >SYSCALL PutS
.99 lda #E.SYN .99 lda #E.SYN
sec sec
@ -137,7 +137,7 @@ CS.RUN.PORTOK lda #1
>PUSHBI 8 >PUSHBI 8
>LDYA L.MSG.HOSTOK >LDYA L.MSG.HOSTOK
>SYSCALL printf >SYSCALL PrintF
CS.RUN.OPENSKT >PUSHBI 0 no protocol CS.RUN.OPENSKT >PUSHBI 0 no protocol
lda #S.SOCKET.T.STREAM lda #S.SOCKET.T.STREAM
@ -153,7 +153,7 @@ CS.RUN.OPENSKT >PUSHBI 0 no protocol
.9 pha .9 pha
>LDYA L.MSG.SKTKO >LDYA L.MSG.SKTKO
>SYSCALL puts >SYSCALL PutS
pla pla
sec sec
.99 rts .99 rts
@ -179,9 +179,9 @@ CS.RUN.OPENSKT >PUSHBI 0 no protocol
.4 >PUSHBI 0 .4 >PUSHBI 0
>LDYA L.MSG.SKTOK >LDYA L.MSG.SKTOK
>SYSCALL printf >SYSCALL PrintF
>LDYAI BUFSIZE >LDYAI BUFSIZE
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPBufPtr >STYA ZPBufPtr
@ -204,12 +204,12 @@ CS.RUN.LOOP >SLEEP
>PUSHYA len >PUSHYA len
>PUSHW ZPBufPtr >PUSHW ZPBufPtr
ldy #S.PS.hStdOut ldy #S.PS.hStdOut
lda (pPs),y lda (pPS),y
>SYSCALL fwrite >SYSCALL fwrite
bcs .11 bcs .11
.2 ldy #S.PS.hStdIn .2 ldy #S.PS.hStdIn
lda (pPs),y lda (pPS),y
>SYSCALL feof >SYSCALL feof
bcs .11 CS.RUN.IOERR bcs .11 CS.RUN.IOERR
@ -219,7 +219,7 @@ CS.RUN.LOOP >SLEEP
>PUSHWI BUFSIZE >PUSHWI BUFSIZE
>PUSHW ZPBufPtr >PUSHW ZPBufPtr
ldy #S.PS.hStdIn ldy #S.PS.hStdIn
lda (pPs),y lda (pPS),y
>SYSCALL fread >SYSCALL fread
.11 bcs CS.RUN.IOERR .11 bcs CS.RUN.IOERR
@ -240,7 +240,7 @@ CS.RUN.SKTERR pha
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>LDYA L.MSG.SKTERR >LDYA L.MSG.SKTERR
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
rts rts
@ -249,13 +249,13 @@ CS.RUN.IOERR pha
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>LDYA L.MSG.IOERR >LDYA L.MSG.IOERR
>SYSCALL printf >SYSCALL PrintF
pla pla
sec sec
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN.USER >LDYA L.MSG.USER CS.RUN.USER >LDYA L.MSG.USER
>SYSCALL puts >SYSCALL PutS
lda #0 lda #0
sec sec
rts rts
@ -276,7 +276,7 @@ CS.QUIT lda hSocket
.1 lda hBuf .1 lda hBuf
beq .2 beq .2
>SYSCALL freemem >SYSCALL FreeMem
.2 lda hLIBTCPIP .2 lda hLIBTCPIP
beq .8 beq .8

View File

@ -63,10 +63,10 @@ CS.RUN lda #1
stx hDev stx hDev
>LDYA L.MSG.DEVOK >LDYA L.MSG.DEVOK
>SYSCALL puts >SYSCALL PutS
>LDYAI BUFSIZE >LDYAI BUFSIZE
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPBufPtr >STYA ZPBufPtr
@ -75,7 +75,7 @@ CS.RUN lda #1
bra CS.RUN.LOOP bra CS.RUN.LOOP
.9 >LDYA L.MSG.USAGE .9 >LDYA L.MSG.USAGE
>SYSCALL puts >SYSCALL PutS
lda #E.SYN lda #E.SYN
sec sec
@ -99,12 +99,12 @@ CS.RUN.LOOP >SLEEP
.1 >PUSHYA len .1 >PUSHYA len
>PUSHW ZPBufPtr >PUSHW ZPBufPtr
ldy #S.PS.hStdOut ldy #S.PS.hStdOut
lda (pPs),y lda (pPS),y
>SYSCALL fwrite >SYSCALL fwrite
bcs .9 bcs .9
.2 ldy #S.PS.hStdIn .2 ldy #S.PS.hStdIn
lda (pPs),y lda (pPS),y
>SYSCALL feof >SYSCALL feof
bcs .9 bcs .9
@ -114,7 +114,7 @@ CS.RUN.LOOP >SLEEP
>PUSHWI BUFSIZE >PUSHWI BUFSIZE
>PUSHW ZPBufPtr >PUSHW ZPBufPtr
ldy #S.PS.hStdIn ldy #S.PS.hStdIn
lda (pPs),y lda (pPS),y
>SYSCALL fread >SYSCALL fread
.3 bcs .9 .3 bcs .9
@ -144,12 +144,12 @@ CS.DOEVENT lda (pEvent)
CS.QUIT lda hDev CS.QUIT lda hDev
beq .1 beq .1
>SYSCALL fclose >SYSCALL FClose
.1 lda hBuf .1 lda hBuf
beq .2 beq .2
>SYSCALL freemem >SYSCALL FreeMem
.2 clc .2 clc
rts rts

View File

@ -63,7 +63,7 @@ CS.INIT clc
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN >LDYAI CHNK.SIZE CS.RUN >LDYAI CHNK.SIZE
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPInBufPtr >STYA ZPInBufPtr
txa txa
@ -77,7 +77,7 @@ CS.RUN >LDYAI CHNK.SIZE
bcs .9 bcs .9
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPFullPathPtr >STYA ZPFullPathPtr
@ -90,12 +90,12 @@ CS.RUN >LDYAI CHNK.SIZE
ldy #S.PS.hCWD ldy #S.PS.hCWD
lda (pPS),y lda (pPS),y
>SYSCALL getmemptr >SYSCALL GetMemptr
.1 jsr CS.RUN.SetupPath .1 jsr CS.RUN.SetupPath
>LDYAI CHNK.SIZE >LDYAI CHNK.SIZE
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
txa txa
@ -110,7 +110,7 @@ CS.RUN >LDYAI CHNK.SIZE
.99 >PUSHBI 0 .99 >PUSHBI 0
>LDYA L.MSG.USAGE >LDYA L.MSG.USAGE
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -153,7 +153,7 @@ CS.RUN.LOOP jsr CS.RUN.GetByte
jsr CS.RUN.CheckDir jsr CS.RUN.CheckDir
bcs .99 bcs .99
>LDYA L.MSG.OK >LDYA L.MSG.OK
>SYSCALL puts >SYSCALL PutS
bra CS.RUN.LOOP bra CS.RUN.LOOP
clc clc
.99 rts .99 rts
@ -202,7 +202,7 @@ CS.RUN.LOOP jsr CS.RUN.GetByte
sta ZPOutBufLen+1 sta ZPOutBufLen+1
>LDA.G hOutBuf >LDA.G hOutBuf
>SYSCALL getmemptr >SYSCALL GetMemptr
>STYA ZPOutBufPtr >STYA ZPOutBufPtr
jsr X.Unpak jsr X.Unpak
@ -223,15 +223,15 @@ CS.RUN.LOOP jsr CS.RUN.GetByte
jmp .10 jmp .10
.8 >LDA.G hFile .8 >LDA.G hFile
>SYSCALL fclose >SYSCALL FClose
>LDYA L.MSG.OK >LDYA L.MSG.OK
>SYSCALL puts >SYSCALL PutS
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN.PrintFN >PUSHW ZPFullPathPtr CS.RUN.PrintFN >PUSHW ZPFullPathPtr
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.DIR,x >LDYA L.MSG.DIR,x
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN.OpenArc pha CS.RUN.OpenArc pha
@ -262,7 +262,7 @@ CS.RUN.OpenArc pha
.99 .99
CS.RUN.E.IARC >PUSHBI 0 CS.RUN.E.IARC >PUSHBI 0
>LDYA L.MSG.E.IARC >LDYA L.MSG.E.IARC
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -294,7 +294,7 @@ CS.RUN.GetFileName
*-------------------------------------- *--------------------------------------
CS.RUN.ReadData >PUSHW ZPInBufLen CS.RUN.ReadData >PUSHW ZPInBufLen
>LDA.G hInBuf >LDA.G hInBuf
>SYSCALL getmemptr >SYSCALL GetMemptr
>STYA ZPInBufPtr >STYA ZPInBufPtr
>PUSHYA >PUSHYA
>LDA.G hArcFile >LDA.G hArcFile
@ -338,7 +338,7 @@ CS.RUN.OpenFile >PUSHW.G FileAuxType
CS.RUN.WriteFile CS.RUN.WriteFile
>PUSHW ZPOutBufLen >PUSHW ZPOutBufLen
>LDA.G hOutBuf >LDA.G hOutBuf
>SYSCALL getmemptr >SYSCALL GetMemptr
>PUSHYA >PUSHYA
>LDA.G hFile >LDA.G hFile
>SYSCALL fwrite >SYSCALL fwrite
@ -349,7 +349,7 @@ CS.DOEVENT sec
*-------------------------------------- *--------------------------------------
CS.QUIT >LDA.G hFile CS.QUIT >LDA.G hFile
beq .1 beq .1
>SYSCALL fclose >SYSCALL FClose
.1 >LDA.G hFullPath .1 >LDA.G hFullPath
beq .2 beq .2
@ -366,7 +366,7 @@ CS.QUIT >LDA.G hFile
.4 >LDA.G hArcFile .4 >LDA.G hArcFile
beq .8 beq .8
>SYSCALL fclose >SYSCALL FClose
.8 clc .8 clc
rts rts

View File

@ -72,14 +72,14 @@ CS.INIT clc
* if RUN exits with CC, RN entered again * if RUN exits with CC, RN entered again
*-------------------------------------- *--------------------------------------
CS.RUN >LDYAI S.PW CS.RUN >LDYAI S.PW
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPPWPtr >STYA ZPPWPtr
stx ZPhPW stx ZPhPW
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPStrPtr >STYA ZPStrPtr
@ -116,7 +116,7 @@ CS.RUN >LDYAI S.PW
.9 >PUSHBI 0 .9 >PUSHBI 0
>LDYA L.MSG.USAGE >LDYA L.MSG.USAGE
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
.99 rts .99 rts
@ -136,7 +136,7 @@ CS.RUN.ROOT ldy #0
>PUSHBI 0 >PUSHBI 0
>LDYA L.MSG.ROOTPWD1 >LDYA L.MSG.ROOTPWD1
>SYSCALL printf >SYSCALL PrintF
bcs .90 bcs .90
jsr CS.RUN.GetStr jsr CS.RUN.GetStr
bcs .90 bcs .90
@ -146,7 +146,7 @@ CS.RUN.ROOT ldy #0
>SYSCALL MD5 >SYSCALL MD5
>PUSHBI 0 >PUSHBI 0
>LDYA L.MSG.ROOTPWD2 >LDYA L.MSG.ROOTPWD2
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
jsr CS.RUN.GetStr jsr CS.RUN.GetStr
.90 bcs .9 .90 bcs .9
@ -168,7 +168,7 @@ CS.RUN.ROOT ldy #0
.9 rts .9 rts
.99 >PUSHBI 0 .99 >PUSHBI 0
>LDYA L.MSG.MISMATCH >LDYA L.MSG.MISMATCH
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -204,14 +204,14 @@ CS.RUN.GetStr stz ZPStrLen
bmi .1 bmi .1
>PUSHBI 0 >PUSHBI 0
>LDYA L.MSG.BS >LDYA L.MSG.BS
>SYSCALL printf >SYSCALL PrintF
bra .1 bra .1
.8 ldy ZPStrLen .8 ldy ZPStrLen
lda #0 lda #0
sta (ZPStrPtr),y sta (ZPStrPtr),y
>PUSHBI 0 >PUSHBI 0
>LDYA L.MSG.CRLF >LDYA L.MSG.CRLF
>SYSCALL printf >SYSCALL PrintF
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CS.RUN.CheckArg inc ArgIndex CS.RUN.CheckArg inc ArgIndex
@ -277,7 +277,7 @@ CS.RUN.CheckArg inc ArgIndex
rts rts
.9 >PUSHBI 0 .9 >PUSHBI 0
>LDYA L.MSG.DUP >LDYA L.MSG.DUP
>SYSCALL printf >SYSCALL PrintF
CS.RUN.CheckArg.9 CS.RUN.CheckArg.9
lda #E.SYN lda #E.SYN
sec sec
@ -351,10 +351,10 @@ CS.DOEVENT sec
*-------------------------------------- *--------------------------------------
CS.QUIT lda ZPhStr CS.QUIT lda ZPhStr
beq .1 beq .1
>SYSCALL freemem >SYSCALL FreeMem
.1 lda ZPhPW .1 lda ZPhPW
beq .2 beq .2
>SYSCALL freemem >SYSCALL FreeMem
.2 clc .2 clc
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -57,12 +57,12 @@ CS.INIT clc
* if RUN exits with CC, RN entered again * if RUN exits with CC, RN entered again
*-------------------------------------- *--------------------------------------
CS.RUN >LDYAI S.PW CS.RUN >LDYAI S.PW
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPPWPtr >STYA ZPPWPtr
stx ZPhPW stx ZPhPW
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPStrPtr >STYA ZPStrPtr
stx ZPhStr stx ZPhStr
@ -89,7 +89,7 @@ CS.RUN >LDYAI S.PW
.9 >PUSHBI 0 .9 >PUSHBI 0
>LDYA L.MSG.INV >LDYA L.MSG.INV
>SYSCALL printf >SYSCALL PrintF
lda #E.IUSR lda #E.IUSR
sec sec
rts rts
@ -120,7 +120,7 @@ CS.RUN.CheckArg inc ArgIndex
.9 >PUSHBI 0 .9 >PUSHBI 0
>LDYA L.MSG.USAGE >LDYA L.MSG.USAGE
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -183,10 +183,10 @@ CS.DOEVENT sec
*-------------------------------------- *--------------------------------------
CS.QUIT lda ZPhStr CS.QUIT lda ZPhStr
beq .8 beq .8
>SYSCALL freemem >SYSCALL FreeMem
.1 lda ZPhPW .1 lda ZPhPW
beq .8 beq .8
>SYSCALL freemem >SYSCALL FreeMem
.8 clc .8 clc
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -84,7 +84,7 @@ CS.RUN >INC.G ArgIndex
.9 >PUSHBI 0 .9 >PUSHBI 0
>LDYA L.MSG.USAGE >LDYA L.MSG.USAGE
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -112,7 +112,7 @@ CS.RUN >INC.G ArgIndex
jmp CS.RUN.PIPE jmp CS.RUN.PIPE
.6 >LDYAI 256 .6 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPFullPath >STYA ZPFullPath
txa txa
@ -137,7 +137,7 @@ CS.RUN >INC.G ArgIndex
sta ZPRelPath+1 sta ZPRelPath+1
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPLineBuf >STYA ZPLineBuf
txa txa
@ -196,7 +196,7 @@ CS.RUN.LOOP ldy #S.PS.hStdIn
.99 rts .99 rts
*-------------------------------------- *--------------------------------------
CS.RUN.PIPE >LDYAI 256 CS.RUN.PIPE >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPLineBuf >STYA ZPLineBuf
txa txa
@ -319,7 +319,7 @@ CS.RUN.CheckErr bcc .9
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>LDYA L.MSG.ERR >LDYA L.MSG.ERR
>SYSCALL printf >SYSCALL PrintF
lda bContinue lda bContinue
eor #$80 eor #$80
asl asl
@ -357,7 +357,7 @@ CS.RUN.OpenFile ldx #12
*-------------------------------------- *--------------------------------------
CS.RUN.CloseFile CS.RUN.CloseFile
>LDA.G hFile >LDA.G hFile
>SYSCALL fclose >SYSCALL FClose
bcs .9 bcs .9
>STZ.G hFile >STZ.G hFile
.9 rts .9 rts
@ -431,7 +431,7 @@ CS.RUN.PrintFstat
adc #2 adc #2
>PUSHA >PUSHA
>LDYA L.MSG.FILE1-2,x >LDYA L.MSG.FILE1-2,x
>SYSCALL printf >SYSCALL PrintF
rts rts
.4 >PUSHL.G fWordCount .4 >PUSHL.G fWordCount
@ -439,7 +439,7 @@ CS.RUN.PrintFstat
>PUSHL.G fCharCount >PUSHL.G fCharCount
>PUSHBI 14 >PUSHBI 14
>LDYA L.MSG.FILE3 >LDYA L.MSG.FILE3
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN.PrintTstat CS.RUN.PrintTstat
@ -474,7 +474,7 @@ CS.RUN.PrintTstat
asl asl
>PUSHA >PUSHA
>LDYA L.MSG.TOTAL1-2,x >LDYA L.MSG.TOTAL1-2,x
>SYSCALL printf >SYSCALL PrintF
.8 rts .8 rts
.4 >PUSHL.G tWordCount .4 >PUSHL.G tWordCount
@ -482,7 +482,7 @@ CS.RUN.PrintTstat
>PUSHL.G tCharCount >PUSHL.G tCharCount
>PUSHBI 12 >PUSHBI 12
>LDYA L.MSG.TOTAL3 >LDYA L.MSG.TOTAL3
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
CS.DOEVENT sec CS.DOEVENT sec

View File

@ -45,7 +45,7 @@ CS.INIT clc
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN >LDYA L.MSG0 CS.RUN >LDYA L.MSG0
>SYSCALL puts >SYSCALL PutS
ldx #1 ldx #1
stx SessionID stx SessionID
@ -87,7 +87,7 @@ CS.RUN >LDYA L.MSG0
>PUSHBI 9 total = 9 ... bytes >PUSHBI 9 total = 9 ... bytes
>SYSCALL printf >SYSCALL PrintF
bcs .9 bcs .9
.7 inc SessionID .7 inc SessionID

View File

@ -66,7 +66,7 @@ CS.INIT
.99 >PUSHW L.MSG.USAGE .99 >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -105,21 +105,21 @@ CS.INIT
>LDA.G hDstBasePath >LDA.G hDstBasePath
bne .8 we also have a Dst folder bne .8 we also have a Dst folder
ldy #S.PS.hCWD no dst folder, use actual prefix ldy #S.PS.hCWD no dst folder, use actual prefix
lda (pPs),y lda (pPS),y
>SYSCALL GetMemPtr >SYSCALL GetMemPtr
jsr InitDstDirYA jsr InitDstDirYA
bcs .99 bcs .99
.FIN .FIN
.8 >LDYAI 256 .8 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
txa txa
>STA.G hSrcFullPath >STA.G hSrcFullPath
.DO X.COPY.TO.DEST=1 .DO X.COPY.TO.DEST=1
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
txa txa
>STA.G hDstFullPath >STA.G hDstFullPath
@ -130,7 +130,7 @@ CS.INIT.RTS rts
*-------------------------------------- *--------------------------------------
CS.RUN ldy #S.PS.hStdIn CS.RUN ldy #S.PS.hStdIn
lda (pPS),y lda (pPS),y
>SYSCALL feof >SYSCALL FEOF
bcs CS.INIT.RTS I/O error bcs CS.INIT.RTS I/O error
tay tay
bne .15 bne .15
@ -200,7 +200,7 @@ CS.RUN ldy #S.PS.hStdIn
ldy #hSrcFullPath ldy #hSrcFullPath
jsr CS.RUN.GetPathY jsr CS.RUN.GetPathY
>PUSHYA >PUSHYA
>SYSCALL remove >SYSCALL Remove
bcs .22 bcs .22
jsr CS.RUN.CheckErr Success!!! jsr CS.RUN.CheckErr Success!!!
jsr CS.RUN.IncCount jsr CS.RUN.IncCount
@ -257,7 +257,7 @@ CS.RUN.LEAVE jsr LeaveSubDir exit this sub dir....
ldy #hSrcFullPath ldy #hSrcFullPath
jsr CS.RUN.GetPathY jsr CS.RUN.GetPathY
>SYSCALL remove >SYSCALL Remove
jsr CS.RUN.CheckErr jsr CS.RUN.CheckErr
bcs .99 bcs .99
* .FIN * .FIN
@ -276,7 +276,7 @@ CS.RUN.LEAVE jsr LeaveSubDir exit this sub dir....
>PUSHB (pData),y >PUSHB (pData),y
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
.91 ldy #RC .91 ldy #RC
lda (pData),y get global RC in case of bContinue lda (pData),y get global RC in case of bContinue
@ -325,7 +325,7 @@ CS.RUN.DIR .DO X.COPY.TO.DEST=1
bra .4 bra .4
.3 ldy #hDstFullPath .3 ldy #hDstFullPath
jsr CS.RUN.GetPathY jsr CS.RUN.GetPathY
>SYSCALL mkdir >SYSCALL MKDir
.4 jsr CS.RUN.CheckErr .4 jsr CS.RUN.CheckErr
bcs CS.RUN.DIR.RTS bcs CS.RUN.DIR.RTS
jsr CS.RUN.IncCount jsr CS.RUN.IncCount
@ -443,7 +443,7 @@ CS.RUN.FILE.MSG clc
.FIN .FIN
>SYSCALL printf >SYSCALL PrintF
rts rts
.8 clc .8 clc
@ -460,13 +460,13 @@ CS.RUN.OVERWRITE.MSG
jsr CS.RUN.GetPathY jsr CS.RUN.GetPathY
>PUSHYA >PUSHYA
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
rts rts
.FIN .FIN
*-------------------------------------- *--------------------------------------
CS.RUN.CR >PUSHW L.MSG.CRLF CS.RUN.CR >PUSHW L.MSG.CRLF
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
.DO X.COPY.TO.DEST=1 .DO X.COPY.TO.DEST=1
@ -509,7 +509,7 @@ CS.RUN.CopyStart
.9 pha .9 pha
>LDA.G hSrcFile >LDA.G hSrcFile
>SYSCALL fclose >SYSCALL FClose
pla pla
sec sec
@ -536,7 +536,7 @@ CS.RUN.Open pha Save open mode
*-------------------------------------- *--------------------------------------
CS.RUN.Copy >STZ.G hCopyBuf CS.RUN.Copy >STZ.G hCopyBuf
>LDYAI X.COPY.BUF.SIZE >LDYAI X.COPY.BUF.SIZE
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPPtr1 >STYA ZPPtr1
@ -575,10 +575,10 @@ CS.RUN.Copy >STZ.G hCopyBuf
>SYSCALL FreeMem >SYSCALL FreeMem
*-------------------------------------- *--------------------------------------
CS.RUN.CopyEnd >LDA.G hSrcFile CS.RUN.CopyEnd >LDA.G hSrcFile
>SYSCALL fclose >SYSCALL FClose
>LDA.G hDstFile >LDA.G hDstFile
>SYSCALL fclose >SYSCALL FClose
>STZ.G bCopy >STZ.G bCopy
clc clc
@ -591,7 +591,7 @@ CS.RUN.CheckErr bcs .1
bmi .8 bmi .8
>LDYA L.MSG.OK >LDYA L.MSG.OK
>SYSCALL puts >SYSCALL PutS
.8 rts .8 rts
.1 pha .1 pha
@ -600,7 +600,7 @@ CS.RUN.CheckErr bcs .1
pha pha
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
>LDA.G bContinue >LDA.G bContinue
eor #$80 eor #$80
@ -669,10 +669,10 @@ CS.QUIT jsr LeaveSubDir
bpl .1 bpl .1
>LDA.G hSrcFile >LDA.G hSrcFile
>SYSCALL fclose >SYSCALL FClose
>LDA.G hDstFile >LDA.G hDstFile
>SYSCALL fclose >SYSCALL FClose
.1 ldy #hDstFullPath .1 ldy #hDstFullPath
jsr .7 jsr .7

View File

@ -2,7 +2,7 @@ NEW
AUTO 3,1 AUTO 3,1
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
Index .BS 1 index .BS 1
hDIRs .BS X.MAX.RECURSE+1 hDIRs .BS X.MAX.RECURSE+1
hDIRENTs .BS X.MAX.RECURSE+1 hDIRENTs .BS X.MAX.RECURSE+1
oDIRENTs .BS X.MAX.RECURSE*2 oDIRENTs .BS X.MAX.RECURSE*2

View File

@ -39,7 +39,7 @@ L.FD.DEV.NAME .DA FD.DEV.NAME
.DA 0 End Of Reloc Table .DA 0 End Of Reloc Table
*-------------------------------------- *--------------------------------------
Dev.Detect >LDYA L.MSG.DETECT Dev.Detect >LDYA L.MSG.DETECT
>SYSCALL puts >SYSCALL PutS
lda MACHID lda MACHID
and #MACHID.T and #MACHID.T
cmp #MACHID.T.IIc cmp #MACHID.T.IIc
@ -76,7 +76,7 @@ Dev.Detect >LDYA L.MSG.DETECT
bit DCB+S.DCB.GFX.S bit DCB+S.DCB.GFX.S
bmi .3 bmi .3
>LDYA L.MSG.DETECT.80C >LDYA L.MSG.DETECT.80C
.3 >SYSCALL puts .3 >SYSCALL PutS
>PUSHWI DRV.END >PUSHWI DRV.END
>PUSHWI DRV.CS.END-DRV.CS.START >PUSHWI DRV.CS.END-DRV.CS.START

View File

@ -47,7 +47,7 @@ L.MAC5 .DA DCB+S.DCB.NIC.MAC+5
Dev.Detect >STYA ARGS Dev.Detect >STYA ARGS
>LDYA L.MSG.DETECT >LDYA L.MSG.DETECT
>SYSCALL puts >SYSCALL PutS
ldx #$70 ldx #$70
ldy #7 ldy #7
@ -67,7 +67,7 @@ Dev.Detect >STYA ARGS
bne .1 bne .1
>LDYA L.MSG.DETECT.KO >LDYA L.MSG.DETECT.KO
>SYSCALL puts >SYSCALL PutS
lda #MLI.E.NODEV lda #MLI.E.NODEV
sec sec
@ -82,7 +82,7 @@ Dev.Detect >STYA ARGS
.8 >PUSHW L.MSG.DETECT.OK .8 >PUSHW L.MSG.DETECT.OK
>PUSHW L.FD.DEV.NAME >PUSHW L.FD.DEV.NAME
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
>PUSHWI DRV.END >PUSHWI DRV.END
>PUSHWI DRV.CS.END-DRV.CS.START >PUSHWI DRV.CS.END-DRV.CS.START

View File

@ -60,7 +60,7 @@ Dev.Detect >STYA ARGS
bne .1 bne .1
>LDYA L.MSG.DETECT.KO >LDYA L.MSG.DETECT.KO
>SYSCALL puts >SYSCALL PutS
lda #MLI.E.NODEV Not Found in any slot, exiting lda #MLI.E.NODEV Not Found in any slot, exiting
sec sec
@ -86,7 +86,7 @@ Dev.Detect >STYA ARGS
.8 >PUSHW L.MSG.DETECT.OK .8 >PUSHW L.MSG.DETECT.OK
>PUSHW L.FD.DEV.NAME >PUSHW L.FD.DEV.NAME
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
>PUSHWI DRV.END >PUSHWI DRV.END
>PUSHWI DRV.CS.END-DRV.CS.START >PUSHWI DRV.CS.END-DRV.CS.START

View File

@ -38,7 +38,7 @@ L.FD.DEV.NAME .DA FD.DEV.NAME
.DA 0 End Of Reloc Table .DA 0 End Of Reloc Table
*-------------------------------------- *--------------------------------------
Dev.Detect >LDYA L.MSG.DETECT Dev.Detect >LDYA L.MSG.DETECT
>SYSCALL printf >SYSCALL PrintF
stz ZPSlotPtr stz ZPSlotPtr
lda #$C1 lda #$C1
@ -57,7 +57,7 @@ Dev.Detect >LDYA L.MSG.DETECT
cmp #$C8 cmp #$C8
bne .1 bne .1
>LDYA L.MSG.DETECT.KO >LDYA L.MSG.DETECT.KO
>SYSCALL printf >SYSCALL PrintF
.9 lda #MLI.E.NODEV .9 lda #MLI.E.NODEV
sec sec
@ -78,7 +78,7 @@ Dev.Detect >LDYA L.MSG.DETECT
>PUSHW L.FD.DEV.NAME >PUSHW L.FD.DEV.NAME
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.DETECT.OK >LDYA L.MSG.DETECT.OK
>SYSCALL printf >SYSCALL PrintF
>PUSHWI DRV.END >PUSHWI DRV.END
>PUSHWI DRV.CS.END-DRV.CS.START >PUSHWI DRV.CS.END-DRV.CS.START

View File

@ -34,7 +34,7 @@ L.DEV.HEADER.NAME .DA DEV.HEADER.NAME
*-------------------------------------- *--------------------------------------
Dev.Detect >STYA ARGS Dev.Detect >STYA ARGS
>LDYA L.MSG.DETECT >LDYA L.MSG.DETECT
>SYSCALL printf >SYSCALL PrintF
stz ZPTmpPtr1 stz ZPTmpPtr1
lda #$C1 lda #$C1
sta ZPTmpPtr1+1 sta ZPTmpPtr1+1
@ -57,7 +57,7 @@ Dev.Detect >STYA ARGS
cmp #$C8 cmp #$C8
bne .1 bne .1
>LDYA L.MSG.DETECT.KO >LDYA L.MSG.DETECT.KO
>SYSCALL printf >SYSCALL PrintF
lda #MLI.E.NODEV Not Found in any slot, exiting lda #MLI.E.NODEV Not Found in any slot, exiting
sec sec
@ -80,7 +80,7 @@ Dev.Detect >STYA ARGS
>PUSHW L.DEV.HEADER.NAME >PUSHW L.DEV.HEADER.NAME
>LDYA L.MSG.DETECT.OK >LDYA L.MSG.DETECT.OK
>SYSCALL printf >SYSCALL PrintF
clc clc
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -46,7 +46,7 @@ L.MAC5 .DA DCB+S.DCB.NIC.MAC+5
*-------------------------------------- *--------------------------------------
Dev.Detect >STYA ARGS Dev.Detect >STYA ARGS
>LDYA L.MSG.DETECT >LDYA L.MSG.DETECT
>SYSCALL puts >SYSCALL PutS
ldx #$70 ldx #$70
ldy #7 ldy #7
@ -71,7 +71,7 @@ Dev.Detect >STYA ARGS
dey dey
bne .1 bne .1
>LDYA L.MSG.DETECT.KO >LDYA L.MSG.DETECT.KO
>SYSCALL puts >SYSCALL PutS
lda #MLI.E.NODEV lda #MLI.E.NODEV
sec sec
@ -92,7 +92,7 @@ Dev.Detect >STYA ARGS
.8 >PUSHW L.MSG.DETECT.OK .8 >PUSHW L.MSG.DETECT.OK
>PUSHW L.FD.DEV.NAME >PUSHW L.FD.DEV.NAME
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
>PUSHWI DRV.END >PUSHWI DRV.END
>PUSHWI DRV.CS.END-DRV.CS.START >PUSHWI DRV.CS.END-DRV.CS.START

View File

@ -50,7 +50,7 @@ L.DCB.STOP .DA DCB+S.DCB.COM.STOP
Dev.Detect >STYA ARGS Dev.Detect >STYA ARGS
>LDYA L.MSG.DETECT >LDYA L.MSG.DETECT
>SYSCALL puts >SYSCALL PutS
stz ZPArgPtr stz ZPArgPtr
lda #$C1 lda #$C1
sta ZPArgPtr+1 sta ZPArgPtr+1
@ -74,7 +74,7 @@ Dev.Detect >STYA ARGS
cmp #$C8 cmp #$C8
bne .1 bne .1
>LDYA L.MSG.DETECT.KO >LDYA L.MSG.DETECT.KO
>SYSCALL puts >SYSCALL PutS
lda #MLI.E.NODEV Not Found in any slot, exiting lda #MLI.E.NODEV Not Found in any slot, exiting
sec sec
@ -100,7 +100,7 @@ Dev.Detect >STYA ARGS
.8 >PUSHW L.MSG.DETECT.OK .8 >PUSHW L.MSG.DETECT.OK
>PUSHW L.FD.DEV.NAME >PUSHW L.FD.DEV.NAME
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
>PUSHWI DRV.END >PUSHWI DRV.END
>PUSHWI DRV.CS.END-DRV.CS.START >PUSHWI DRV.CS.END-DRV.CS.START
@ -124,12 +124,12 @@ Dev.ParseArgs >LDYA ARGS
.1 stz ZPhParity .1 stz ZPhParity
stz ZPhControl stz ZPhControl
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .2 bcs .2
>STYA ZPParityPtr >STYA ZPParityPtr
stx ZPhParity stx ZPhParity
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
.2 bcs .90 .2 bcs .90
>STYA ZPControlPtr >STYA ZPControlPtr
stx ZPhControl stx ZPhControl
@ -148,11 +148,11 @@ Dev.ParseArgs >LDYA ARGS
bcs .90 bcs .90
.90 lda ZPhControl .90 lda ZPhControl
beq .91 beq .91
>SYSCALL freemem >SYSCALL FreeMem
.91 lda ZPhParity .91 lda ZPhParity
beq .92 beq .92
>SYSCALL freemem >SYSCALL FreeMem
.92 lda #E.SYN .92 lda #E.SYN
sec sec

View File

@ -44,7 +44,7 @@ L.MAC5 .DA DCB+S.DCB.NIC.MAC+5
Dev.Detect >STYA ARGS Dev.Detect >STYA ARGS
>LDYA L.MSG.DETECT >LDYA L.MSG.DETECT
>SYSCALL puts >SYSCALL PutS
ldx #$70+$88 ldx #$70+$88
ldy #7 ldy #7
@ -88,7 +88,7 @@ Dev.Detect >STYA ARGS
bne .1 bne .1
>LDYA L.MSG.DETECT.KO >LDYA L.MSG.DETECT.KO
>SYSCALL puts >SYSCALL PutS
lda #MLI.E.NODEV lda #MLI.E.NODEV
sec sec
@ -106,7 +106,7 @@ Dev.Detect >STYA ARGS
>PUSHW L.MSG.DETECT.OK >PUSHW L.MSG.DETECT.OK
>PUSHW L.FD.DEV.NAME >PUSHW L.FD.DEV.NAME
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
>PUSHWI DRV.END >PUSHWI DRV.END
>PUSHWI DRV.CS.END-DRV.CS.START >PUSHWI DRV.CS.END-DRV.CS.START

View File

@ -26,7 +26,7 @@ ZPLIB .EQ $40 32 bytes
CORE.PSIndex .EQ $D0 CORE.PSIndex .EQ $D0
CORE.PSCount .EQ $D1 CORE.PSCount .EQ $D1
pPs .EQ $D2 pPS .EQ $D2
pEvent .EQ $D4 pEvent .EQ $D4
* .EQ $D6 * .EQ $D6
*-------------------------------------- *--------------------------------------

View File

@ -158,7 +158,7 @@ FPU.FOUT .EQ 58 PrintF
*-------------------------------------- *--------------------------------------
.MA FPU .MA FPU
ldx #FPU.]1 ldx #FPU.]1
jsr A2osX.FpuCall jsr A2osX.FPUCALL
.EM .EM
*-------------------------------------- *--------------------------------------
* Global DATA Segment Access * Global DATA Segment Access

View File

@ -635,7 +635,7 @@ Pak.PrintStats lda Pak.BL.OfsBitsL
>PUSHBI 23 >PUSHBI 23
>LDYA L.MSG.Stats >LDYA L.MSG.Stats
>SYSCALL printf >SYSCALL PrintF
ldx #TOP.MAX-1 ldx #TOP.MAX-1
@ -647,7 +647,7 @@ Pak.PrintStats lda Pak.BL.OfsBitsL
>PUSHBI TOP.MAX+1 >PUSHBI TOP.MAX+1
>LDYA L.MSG.TopBytes >LDYA L.MSG.TopBytes
>SYSCALL printf >SYSCALL PrintF
bit Pak.bPass2 bit Pak.bPass2
bpl .9 bpl .9

View File

@ -579,7 +579,7 @@ DEBUG.IPID ldy #S.IP.IDENTIFICATION
>PUSHA >PUSHA
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.IPID >LDYA L.MSG.IPID
>SYSCALL printf >SYSCALL PrintF
rts rts
.FIN .FIN
*-------------------------------------- *--------------------------------------

View File

@ -82,14 +82,14 @@ CS.RUN jsr CS.RUN.CheckArgs
sec sec
.9 rts .9 rts
.90 >LDYA L.MSG.USAGE .90 >LDYA L.MSG.USAGE
>SYSCALL puts >SYSCALL PutS
lda #E.SYN lda #E.SYN
sec sec
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN.CheckArgs CS.RUN.CheckArgs
ldy #S.PS.ARGC ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
cmp #3 cmp #3
bcc .9 bcc .9
@ -109,7 +109,7 @@ CS.RUN.CheckArgs
>PUSHYA >PUSHYA
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.UNKNOWN >LDYA L.MSG.UNKNOWN
>SYSCALL printf >SYSCALL PrintF
sec sec
.9 rts .9 rts
.2 lda #AF.INET .2 lda #AF.INET

View File

@ -61,7 +61,7 @@ CS.INIT clc
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN ldy #S.PS.ARGC CS.RUN ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
cmp #2 cmp #2
bcc .9 bcc .9
@ -93,7 +93,7 @@ CS.RUN ldy #S.PS.ARGC
.9 >PUSHW L.MSG.USAGE .9 >PUSHW L.MSG.USAGE
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
.99 rts .99 rts
@ -105,7 +105,7 @@ CS.RUN ldy #S.PS.ARGC
beq .9 beq .9
ldy #S.PS.hStdErr ldy #S.PS.hStdErr
lda (pPs),y lda (pPS),y
sta hErr sta hErr
lda ArgDev lda ArgDev
@ -119,11 +119,11 @@ CS.RUN ldy #S.PS.ARGC
bcs .99 bcs .99
ldy #S.PS.hStdIn ldy #S.PS.hStdIn
sta (pPs),y sta (pPS),y
iny #S.PS.hStdOut iny #S.PS.hStdOut
sta (pPs),y sta (pPS),y
iny #S.PS.hStdErr iny #S.PS.hStdErr
sta (pPs),y sta (pPS),y
sta hFILE sta hFILE
CS.RUN.LOOP0 >SLEEP CS.RUN.LOOP0 >SLEEP
@ -134,7 +134,7 @@ CS.RUN.LOOP0 >SLEEP
.1 >PUSHWI TELNETOPTS.LEN .1 >PUSHWI TELNETOPTS.LEN
>PUSHW L.TELNETOPTS >PUSHW L.TELNETOPTS
ldy #S.PS.hStdOut ldy #S.PS.hStdOut
lda (pPs),y lda (pPS),y
>SYSCALL fwrite >SYSCALL fwrite
bcs CS.RUN.EXIT I/O error bcs CS.RUN.EXIT I/O error
@ -212,7 +212,7 @@ CS.RUN.IAC.CMD cmp #WILL
>PUSHW L.TELNETOPT.LMODE >PUSHW L.TELNETOPT.LMODE
.7 ldy #S.PS.hStdOut .7 ldy #S.PS.hStdOut
lda (pPs),y lda (pPS),y
>SYSCALL fwrite >SYSCALL fwrite
.8 jmp CS.RUN.LOOP1 .8 jmp CS.RUN.LOOP1
*-------------------------------------- *--------------------------------------
@ -260,7 +260,7 @@ CS.RUN.GREETINGS
>SYSCALL ArgV >SYSCALL ArgV
>PUSHYA >PUSHYA
>PUSHBI 4 >PUSHBI 4
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
CS.DOEVENT lda (pEvent) CS.DOEVENT lda (pEvent)
@ -275,7 +275,7 @@ CS.DOEVENT lda (pEvent)
CS.QUIT lda hFILE CS.QUIT lda hFILE
beq .8 beq .8
>SYSCALL fclose >SYSCALL FClose
.8 clc .8 clc
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -75,7 +75,7 @@ CS.INIT >LDYA L.LIBTCPIP
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CS.RUN >LDYA L.MSG.TCPWAIT CS.RUN >LDYA L.MSG.TCPWAIT
>SYSCALL puts >SYSCALL PutS
lda #TIMEOUT.MAX lda #TIMEOUT.MAX
sta TimeOut sta TimeOut
@ -92,7 +92,7 @@ CS.RUN >LDYA L.MSG.TCPWAIT
bcs .99 bcs .99
ldy #S.PS.hStdIn ldy #S.PS.hStdIn
lda (pPs),y lda (pPS),y
>SYSCALL feof >SYSCALL feof
bcs CS.RUN.RTS I/O err bcs CS.RUN.RTS I/O err
tay tay
@ -108,7 +108,7 @@ CS.RUN >LDYA L.MSG.TCPWAIT
rts rts
.99 >LDYA L.MSG.TCPIPERR .99 >LDYA L.MSG.TCPIPERR
>SYSCALL puts >SYSCALL PutS
CS.RUN.SYN CS.RUN.SYN
lda #E.SYN lda #E.SYN
sec sec
@ -162,7 +162,7 @@ CS.RUN.ARGSOK >PUSHBI 0 no protocol
bcs CS.RUN.ERR bcs CS.RUN.ERR
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs CS.RUN.ERR bcs CS.RUN.ERR
>STYA ZPStrPtr >STYA ZPStrPtr
@ -173,7 +173,7 @@ CS.RUN.ARGSOK >PUSHBI 0 no protocol
>PUSHW ZPRootDirPtr >PUSHW ZPRootDirPtr
>PUSHBI 4 >PUSHBI 4
>SYSCALL printf >SYSCALL PrintF
CS.RUN.LOOP >SLEEP CS.RUN.LOOP >SLEEP
jsr CS.RUN.SERVER jsr CS.RUN.SERVER
@ -181,7 +181,7 @@ CS.RUN.LOOP >SLEEP
bra CS.RUN.LOOP bra CS.RUN.LOOP
.9 >LDYA L.MSG.SKTERR .9 >LDYA L.MSG.SKTERR
>SYSCALL puts >SYSCALL PutS
lda #E.SYN lda #E.SYN
sec sec
CS.RUN.ERR rts CS.RUN.ERR rts
@ -207,7 +207,7 @@ CS.RUN.SERVER lda hSrvSocket
bpl .1 bpl .1
>PUSHBI 5 >PUSHBI 5
>SYSCALL printf >SYSCALL PrintF
jsr CS.RUN.CLIENT jsr CS.RUN.CLIENT
.8 clc .8 clc
@ -237,7 +237,7 @@ CS.RUN.CLIENT
bra .3 bra .3
lda hMsg lda hMsg
>SYSCALL freemem >SYSCALL FreeMem
.7 >PUSHWI HTTP.200OK.len .7 >PUSHWI HTTP.200OK.len
>PUSHW L.HTTP.200OK >PUSHW L.HTTP.200OK
@ -251,7 +251,7 @@ CS.RUN.CLIENT
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN.MSG.INIT sta hMsg CS.RUN.MSG.INIT sta hMsg
>SYSCALL getmemptr >SYSCALL GetMemptr
>STYA ZPMsgPtr >STYA ZPMsgPtr
pha pha
tya tya

View File

@ -70,7 +70,7 @@ CS.RUN ldy #S.PS.PID
bne .1 bne .1
>LDYA L.MSG.CTRLR >LDYA L.MSG.CTRLR
>SYSCALL puts >SYSCALL PutS
>LDYA L.BINSH >LDYA L.BINSH
jsr CS.RUN.EXEC.YA jsr CS.RUN.EXEC.YA
@ -109,7 +109,7 @@ CS.RUN ldy #S.PS.PID
.99 rts .99 rts
*-------------------------------------- *--------------------------------------
CS.RUN.ETCINIT >LDYAI 256 CS.RUN.ETCINIT >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
>STYA BufPtr >STYA BufPtr
stx hBuf stx hBuf
@ -143,10 +143,10 @@ CS.RUN.ETCINIT >LDYAI 256
rts rts
.80 lda hFile .80 lda hFile
>SYSCALL fclose >SYSCALL FClose
.81 lda hBuf .81 lda hBuf
>SYSCALL freemem >SYSCALL FreeMem
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -37,7 +37,7 @@ L.MSG.LOAD .DA MSG.LOAD
.DA 0 .DA 0
*-------------------------------------- *--------------------------------------
CS.RUN ldy #S.PS.ARGC CS.RUN ldy #S.PS.ARGC
lda (pPs),y lda (pPS),y
cmp #1 cmp #1
bcc .9 bcc .9
@ -48,7 +48,7 @@ CS.RUN ldy #S.PS.ARGC
>PUSHYA >PUSHYA
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
bcs .99 bcs .99
lda #1 get PTR to ARG[1] (Driver name) lda #1 get PTR to ARG[1] (Driver name)
@ -62,7 +62,7 @@ CS.RUN ldy #S.PS.ARGC
rts rts
.9 >LDYA L.MSG.USAGE .9 >LDYA L.MSG.USAGE
>SYSCALL puts >SYSCALL PutS
lda #E.SYN tell TSKMGR that all done ok, but lda #E.SYN tell TSKMGR that all done ok, but
sec we do not want to stay in memory sec we do not want to stay in memory
.99 rts .99 rts

View File

@ -74,7 +74,7 @@ CS.INIT clc
CS.INIT.RTS rts CS.INIT.RTS rts
*-------------------------------------- *--------------------------------------
CS.RUN >LDYAI 33 Enough for HASH CS.RUN >LDYAI 33 Enough for HASH
>SYSCALL getmem >SYSCALL GetMem
bcs CS.INIT.RTS bcs CS.INIT.RTS
>STYA ZPGetLinePtr >STYA ZPGetLinePtr
@ -141,7 +141,7 @@ CS.RUN.AUTH lda #3
jmp CS.RUN.EXEC jmp CS.RUN.EXEC
.8 >LDYA L.MSG.BAD .8 >LDYA L.MSG.BAD
>SYSCALL puts >SYSCALL PutS
bcs .9 bcs .9
dec ZPRetryCnt dec ZPRetryCnt
@ -171,7 +171,7 @@ CS.RUN.SetUserSession
txa txa
tay tay
lda #0 lda #0
>SYSCALL getmem >SYSCALL GetMem
bcs .9 bcs .9
>STYA ZPStrPtr >STYA ZPStrPtr
@ -213,7 +213,7 @@ CS.RUN.CHECKPWD rol ZPbValidUser
bcs CS.RUN.CHECK.9 bcs CS.RUN.CHECK.9
>LDYAI S.PW >LDYAI S.PW
>SYSCALL getmem >SYSCALL GetMem
bcs CS.RUN.CHECK.9 bcs CS.RUN.CHECK.9
>STYA ZPPWPtr >STYA ZPPWPtr
@ -290,7 +290,7 @@ CS.RUN.EXEC ldx #1
lda S.Table.hSession-1,x lda S.Table.hSession-1,x
stz S.Table.hSession-1,x stz S.Table.hSession-1,x
stz S.Table.hFILE-1,x stz S.Table.hFILE-1,x
>SYSCALL freemem >SYSCALL FreeMem
ldy #S.PS.hSID ldy #S.PS.hSID
lda ZPOldSID lda ZPOldSID
@ -387,7 +387,7 @@ CS.RUN.GetLine sta ZPGetLineMax
*-------------------------------------- *--------------------------------------
CS.RUN.StrOut >PUSHYA CS.RUN.StrOut >PUSHYA
>PUSHBI 0 >PUSHBI 0
>SYSCALL printf >SYSCALL PrintF
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN.DumpFile >PUSHYA CS.RUN.DumpFile >PUSHYA
@ -399,7 +399,7 @@ CS.RUN.DumpFile >PUSHYA
stx ZPhFile stx ZPhFile
>LDYAI 256 >LDYAI 256
>SYSCALL getmem >SYSCALL GetMem
bcs .99 bcs .99
>STYA ZPBufPtr >STYA ZPBufPtr
@ -424,16 +424,16 @@ CS.RUN.DumpFile >PUSHYA
.9 rts .9 rts
.2 phx .2 phx
>SYSCALL puts >SYSCALL PutS
pla pla
>SYSCALL freemem >SYSCALL FreeMem
bra .1 bra .1
.7 lda ZPhBuf .7 lda ZPhBuf
>SYSCALL freemem >SYSCALL FreeMem
.8 lda ZPhFile .8 lda ZPhFile
>SYSCALL fclose >SYSCALL FClose
rts rts
*-------------------------------------- *--------------------------------------
CS.DOEVENT CS.DOEVENT
@ -445,13 +445,13 @@ CS.CLEANUP lda ZPhGetLine
beq CS.CLEANUP.hPW beq CS.CLEANUP.hPW
stz ZPhGetLine stz ZPhGetLine
>SYSCALL freemem >SYSCALL FreeMem
CS.CLEANUP.hPW lda ZPhPW CS.CLEANUP.hPW lda ZPhPW
beq .8 beq .8
stz ZPhPW stz ZPhPW
>SYSCALL freemem >SYSCALL FreeMem
.8 clc .8 clc
rts rts

View File

@ -70,7 +70,7 @@ CS.INIT lda DevID
.9 rts .9 rts
.99 >LDYA L.MSG.RUNNING .99 >LDYA L.MSG.RUNNING
>SYSCALL puts >SYSCALL PutS
lda #0 lda #0
sec sec
rts rts
@ -86,7 +86,7 @@ CS.INIT.DEV >PUSHBI 0
bne CS.INIT.DEV bne CS.INIT.DEV
>LDYA L.MSG.DEV.KO >LDYA L.MSG.DEV.KO
>SYSCALL puts >SYSCALL PutS
lda #MLI.E.NODEV lda #MLI.E.NODEV
sec sec
rts rts
@ -96,7 +96,7 @@ CS.INIT.DEV >PUSHBI 0
>PUSHW L.MSG.DEV.OK >PUSHW L.MSG.DEV.OK
>PUSHW L.DEVNAME >PUSHW L.DEVNAME
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
>LDYA L.DCB.NIC >LDYA L.DCB.NIC
>STYA IOCTL+S.IOCTL.BUFPTR >STYA IOCTL+S.IOCTL.BUFPTR
@ -122,7 +122,7 @@ CS.INIT.LIBS lda LibCnt
pha pha
>PUSHYA >PUSHYA
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
pla pla
ply ply
@ -204,7 +204,7 @@ CS.INIT.CONF >LDYAI 64
>PUSHW L.MSG.EXEC >PUSHW L.MSG.EXEC
>PUSHW pBuf >PUSHW pBuf
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
>PUSHW pBuf >PUSHW pBuf
>PUSHBI 0 S.PS.F.HOLD+S.PS.F.NOHUP >PUSHBI 0 S.PS.F.HOLD+S.PS.F.NOHUP
@ -218,7 +218,7 @@ CS.INIT.CONF >LDYAI 64
rts rts
.80 lda hNetworkFile .80 lda hNetworkFile
>SYSCALL fclose >SYSCALL FClose
.81 lda hLineBuf .81 lda hLineBuf
>SYSCALL FreeMem >SYSCALL FreeMem
@ -251,7 +251,7 @@ CS.RUN >PUSHW L.IOCTL
bra .1 bra .1
.2 lda hFrameIn .2 lda hFrameIn
>SYSCALL freemem >SYSCALL FreeMem
bra CS.RUN bra CS.RUN
.8 clc .8 clc

View File

@ -49,16 +49,16 @@ CS.INIT >LDYA L.LIBTCPIP
>SYSCALL LoadLibYA >SYSCALL LoadLibYA
sta hLIBTCPIP sta hLIBTCPIP
lda (pPs) lda (pPS)
ora #S.PS.F.EVENT Now accept events ora #S.PS.F.EVENT Now accept events
sta (pPs) sta (pPS)
clc clc
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN jsr Init.Timeout CS.RUN jsr Init.Timeout
>LDYA L.MSG.TCPWAIT >LDYA L.MSG.TCPWAIT
>SYSCALL printf >SYSCALL PrintF
.1 >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG is TCPIP loaded ? .1 >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG is TCPIP loaded ?
bcs .99 bcs .99
>STYA ZPIPCfgPtr >STYA ZPIPCfgPtr
@ -68,7 +68,7 @@ CS.RUN jsr Init.Timeout
jsr Wait.Timeout jsr Wait.Timeout
bcc .1 bcc .1
.99 >LDYA L.MSG.TCPIPERR .99 >LDYA L.MSG.TCPIPERR
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
@ -85,7 +85,7 @@ CS.RUN.INIT ldx #3
>STA.G hSocket >STA.G hSocket
>LDYA L.MSG.INITOK >LDYA L.MSG.INITOK
>SYSCALL printf >SYSCALL PrintF
.11 >SLEEP .11 >SLEEP
ldy #bCTRLC ldy #bCTRLC
@ -105,15 +105,15 @@ CS.RUN.INIT ldx #3
dex dex
bpl .2 bpl .2
>LDYA L.MSG.INCOMING >LDYA L.MSG.INCOMING
>SYSCALL printf >SYSCALL PrintF
bra .11 bra .11
.9 >LDYA L.MSG.SKTERR .9 >LDYA L.MSG.SKTERR
>SYSCALL printf >SYSCALL PrintF
lda #E.SYN lda #E.SYN
sec sec
rts rts
.99 >LDYA L.MSG.ABORT .99 >LDYA L.MSG.ABORT
>SYSCALL printf >SYSCALL PrintF
lda #0 lda #0
sec sec
rts rts

View File

@ -66,7 +66,7 @@ CS.RUN lda #TIMEOUT.MAX
sta TimeOut sta TimeOut
>LDYA L.MSG.TCPWAIT >LDYA L.MSG.TCPWAIT
>SYSCALL puts >SYSCALL PutS
.1 >SLEEP .1 >SLEEP
>LIBCALL hLIBTCPIP,LIBTCPIP.GETCFG is TCPIP loaded ? >LIBCALL hLIBTCPIP,LIBTCPIP.GETCFG is TCPIP loaded ?
@ -81,7 +81,7 @@ CS.RUN lda #TIMEOUT.MAX
beq .99 beq .99
ldy #S.PS.hStdIn ldy #S.PS.hStdIn
lda (pPs),y lda (pPS),y
>SYSCALL feof >SYSCALL feof
bcs .9 I/O err bcs .9 I/O err
@ -98,7 +98,7 @@ CS.RUN lda #TIMEOUT.MAX
.99 pha .99 pha
>LDYA L.MSG.TCPIPERR >LDYA L.MSG.TCPIPERR
>SYSCALL puts >SYSCALL PutS
pla pla
sec sec
.9 rts .9 rts
@ -135,7 +135,7 @@ CS.RUN.PORTOK >PUSHBI 0 no protocol
bcs .9 bcs .9
>LDYA L.MSG.INITOK >LDYA L.MSG.INITOK
>SYSCALL puts >SYSCALL PutS
.2 >SLEEP .2 >SLEEP
@ -153,7 +153,7 @@ CS.RUN.PORTOK >PUSHBI 0 no protocol
.9 pha .9 pha
>LDYA L.MSG.SKTERR >LDYA L.MSG.SKTERR
>SYSCALL puts >SYSCALL PutS
pla pla
sec sec
rts rts
@ -177,7 +177,7 @@ CS.RUN.CLIENT >SLEEP give some time for TCPIP SYN/ACK
bpl .1 bpl .1
>PUSHBI 5 >PUSHBI 5
>SYSCALL printf >SYSCALL PrintF
>PUSHEA.G NodBuf >PUSHEA.G NodBuf
>PUSHW L.NOD.Template >PUSHW L.NOD.Template
@ -207,7 +207,7 @@ CS.RUN.CLIENT1 >PUSHB hClientSocket
pla pla
>PUSHA >PUSHA
>PUSHBI 1 >PUSHBI 1
>SYSCALL printf >SYSCALL PrintF
.8 clc .8 clc
.9 rts .9 rts

View File

@ -54,7 +54,7 @@ K.Shift jsr K.ArgV
*\-------------------------------------- *\--------------------------------------
K.ArgV tax save requested arg# K.ArgV tax save requested arg#
ldy #S.PS.hARGV ldy #S.PS.hARGV
lda (pPs),y lda (pPS),y
jsr K.GetMemPtr jsr K.GetMemPtr
>STYA ZPPtr2 Use Ptr2, called from ExpandStr >STYA ZPPtr2 Use Ptr2, called from ExpandStr

View File

@ -8,18 +8,18 @@ CORE.Run stz CORE.PSIndex
beq .8 beq .8
jsr K.GetMemPtr jsr K.GetMemPtr
>STYA pPs >STYA pPs
lda (pPs) get S.PS.F lda (pPS) get S.PS.F
* bit #S.PS.F.HOLD Waiting for Another Task to Terminate? * bit #S.PS.F.HOLD Waiting for Another Task to Terminate?
* beq .2 * beq .2
bpl .2 bpl .2
ldy #S.PS.CPID ldy #S.PS.CPID
lda (pPs),y lda (pPS),y
jsr CORE.GetPS jsr CORE.GetPS
bcc .8 yes, still running.... bcc .8 yes, still running....
lda (pPs) get S.PS.F again lda (pPS) get S.PS.F again
eor #S.PS.F.HOLD unmark as HOLD eor #S.PS.F.HOLD unmark as HOLD
sta (pPs) sta (pPS)
.2 jsr CORE.PSSelect Restore ZP & Ptrs .2 jsr CORE.PSSelect Restore ZP & Ptrs
.3 jsr CORE.PSExec INIT/RUN/QUIT/RESUME .3 jsr CORE.PSExec INIT/RUN/QUIT/RESUME
@ -29,22 +29,22 @@ CORE.Run stz CORE.PSIndex
jsr CORE.UpdateParentPS jsr CORE.UpdateParentPS
ldy #S.PS.S ldy #S.PS.S
lda #S.PS.S.QUIT lda #S.PS.S.QUIT
sta (pPs),y sta (pPS),y
bra .3 try executing QUIT now... bra .3 try executing QUIT now...
.4 lda (pPs) .4 lda (pPS)
bit #S.PS.F.SLEEP bit #S.PS.F.SLEEP
bne .7 bne .7
ldy #S.PS.S ldy #S.PS.S
lda (pPs),y lda (pPS),y
bne .5 bne .5
lda #S.PS.S.RUN go from INIT to RUN lda #S.PS.S.RUN go from INIT to RUN
sta (pPs),y sta (pPS),y
bra .7 bra .7
.5 cmp #S.PS.S.QUIT .5 cmp #S.PS.S.QUIT
bne .7 bne .7
>PUSHBI 2 >PUSHBI 2
ldy #S.PS.PID ldy #S.PS.PID
lda (pPs),y lda (pPS),y
>SYSCALL2 Kill >SYSCALL2 Kill
bra .8 bra .8
.7 jsr CORE.PSLeave Save ZP & Ptrs .7 jsr CORE.PSLeave Save ZP & Ptrs
@ -106,7 +106,7 @@ CORE.UpdateParentPS
tax save RC From INIT or RUN tax save RC From INIT or RUN
ldy #S.PS.PPID Notify Parent Process for exit code... ldy #S.PS.PPID Notify Parent Process for exit code...
lda (pPs),y lda (pPS),y
beq .8 no parent process beq .8 no parent process
jsr CORE.GetPSByID X unmodified jsr CORE.GetPSByID X unmodified
bcs .8 parent is dead.....skipping... bcs .8 parent is dead.....skipping...
@ -119,7 +119,7 @@ CORE.UpdateParentPS
ldy #S.PS.CPID ldy #S.PS.CPID
lda (ZPPtr1),y lda (ZPPtr1),y
dey #S.PS.PID dey #S.PS.PID
cmp (pPs),y cmp (pPS),y
bne .8 Hold, but not waiting this PS bne .8 Hold, but not waiting this PS
txa waiting for this PS to terminate.... txa waiting for this PS to terminate....
ldy #S.PS.RC give it RC ldy #S.PS.RC give it RC
@ -215,17 +215,17 @@ CORE.Dispatch stz CORE.PSIndex
jsr K.GetMemPtr jsr K.GetMemPtr
>STYA pPS >STYA pPS
lda (pPs) lda (pPS)
bit #S.PS.F.EVENT Accept Events ? bit #S.PS.F.EVENT Accept Events ?
beq .5 beq .5
ldy #S.PS.S ldy #S.PS.S
lda (pPs),y lda (pPS),y
cmp #S.PS.S.RUN cmp #S.PS.S.RUN
bne .5 bne .5
lda #S.PS.S.DOEVENT Flag this PS for IRQ Mgr lda #S.PS.S.DOEVENT Flag this PS for IRQ Mgr
sta (pPs),y sta (pPS),y
jsr CORE.PSSelect jsr CORE.PSSelect
lda #Evt.Table lda #Evt.Table
@ -254,7 +254,7 @@ CORE.Dispatch stz CORE.PSIndex
.4 ldy #S.PS.S .4 ldy #S.PS.S
lda #S.PS.S.RUN lda #S.PS.S.RUN
sta (pPs),y sta (pPS),y
jsr CORE.PSLeave jsr CORE.PSLeave
.5 inc CORE.PSIndex .5 inc CORE.PSIndex
ldx CORE.PSIndex ldx CORE.PSIndex
@ -321,7 +321,7 @@ CORE.DestroyEvent
CORE.PSSelect ldy #S.PS.ZP.CODE+PSCTX.SIZE-1 CORE.PSSelect ldy #S.PS.ZP.CODE+PSCTX.SIZE-1
ldx #PSCTX.SIZE-1 ldx #PSCTX.SIZE-1
.1 lda (pPs),y .1 lda (pPS),y
sta pCode,x sta pCode,x
dey dey
dex dex
@ -333,7 +333,7 @@ CORE.PSLeave ldx #PSCTX.SIZE-1
ldy #S.PS.ZP.CODE+PSCTX.SIZE-1 ldy #S.PS.ZP.CODE+PSCTX.SIZE-1
.1 lda pCode,x .1 lda pCode,x
sta (pPs),y sta (pPS),y
dey dey
dex dex
bpl .1 bpl .1
@ -372,22 +372,22 @@ CORE.PSResume sei
inx inx
bne .1 bne .1
.2 ldy #S.PS.PC+1 .2 ldy #S.PS.PC+1
lda (pPs),y lda (pPS),y
pha pha
dey #S.PS.PC dey #S.PS.PC
lda (pPs),y lda (pPS),y
pha pha
dey #S.PS.P dey #S.PS.P
lda (pPs),y lda (pPS),y
pha pha
dey #S.PS.Y dey #S.PS.Y
lda (pPs),y lda (pPS),y
pha pha
dey #S.PS.X dey #S.PS.X
lda (pPs),y lda (pPS),y
tax tax
dey #S.PS.A dey #S.PS.A
lda (pPs),y lda (pPS),y
ply ply
inc IRQ.InKernel inc IRQ.InKernel

View File

@ -17,7 +17,7 @@ K.SetEnv
* >PULLW TXTPTR name * >PULLW TXTPTR name
* ldy #S.PS.hENV * ldy #S.PS.hENV
* lda (pPs),y * lda (pPS),y
* jmp K.SYSCALL.JMPX * jmp K.SYSCALL.JMPX
*/-------------------------------------- */--------------------------------------
@ -39,7 +39,7 @@ K.GetEnv >PULLW FORPNT value
* >PULLW TXTPTR name * >PULLW TXTPTR name
* *
* ldy #S.PS.hENV * ldy #S.PS.hENV
* lda (pPs),y * lda (pPS),y
* jmp K.SYSCALL.JMPX * jmp K.SYSCALL.JMPX
*/-------------------------------------- */--------------------------------------
@ -69,7 +69,7 @@ K.UnsetEnv
* >PULLW TXTPTR name * >PULLW TXTPTR name
ldy #S.PS.hENV ldy #S.PS.hENV
lda (pPs),y lda (pPS),y
jmp K.SYSCALL.JMPX jmp K.SYSCALL.JMPX
*-------------------------------------- *--------------------------------------

View File

@ -85,7 +85,7 @@ ENVX.SetEnv jsr ENVX.UnsetEnv
txa txa
sta CLRWRITEAUX sta CLRWRITEAUX
ldy #S.PS.hENV ldy #S.PS.hENV
lda (pPs),y lda (pPS),y
sta SETWRITEAUX sta SETWRITEAUX
bra .1 Start over bra .1 Start over

View File

@ -46,19 +46,19 @@ GP.Sleep php
phy phy
ldy #S.PS.A ldy #S.PS.A
sta (pPs),y sta (pPS),y
txa txa
iny #S.PS.X iny #S.PS.X
sta (pPs),y sta (pPS),y
pla pla
iny #S.PS.Y iny #S.PS.Y
sta (pPs),y sta (pPS),y
pla pla
iny #S.PS.P iny #S.PS.P
sta (pPs),y sta (pPS),y
pla get PC LO pla get PC LO
plx get PC HI plx get PC HI
@ -68,11 +68,11 @@ GP.Sleep php
inx inx
GP.Sleep2 ldy #S.PS.PC GP.Sleep2 ldy #S.PS.PC
sta (pPs),y sta (pPS),y
txa txa
iny #S.PS.PC+1 iny #S.PS.PC+1
sta (pPs),y sta (pPS),y
tsx tsx
@ -98,9 +98,9 @@ GP.Sleep2 ldy #S.PS.PC
inc $1fe PC=PC+1 inc $1fe PC=PC+1
bne .4 bne .4
inc $1ff because of RTI inc $1ff because of RTI
.4 lda (pPs) .4 lda (pPS)
ora #S.PS.F.SLEEP ora #S.PS.F.SLEEP
sta (pPs) sta (pPS)
lda #0 cld,clc,cli lda #0 cld,clc,cli
pha pha
rti exit to kernel with CC rti exit to kernel with CC
@ -112,13 +112,13 @@ GP.SysCall dec IRQ.InKernel
pha pha
phy phy
ldy #S.PS.A ldy #S.PS.A
sta (pPs),y sta (pPS),y
txa txa
iny #S.PS.X iny #S.PS.X
sta (pPs),y sta (pPS),y
pla pla
iny #S.PS.Y iny #S.PS.Y
sta (pPs),y sta (pPS),y
tay tay
pla pla
jsr K.SYSCALL2 jsr K.SYSCALL2

View File

@ -123,11 +123,11 @@ Kernel.Init3 sta SETALTZP
bcs * bcs *
ldy #S.PS.hStdIn ldy #S.PS.hStdIn
sta (pPs),y sta (pPS),y
iny #S.PS.hStdOut iny #S.PS.hStdOut
sta (pPs),y sta (pPS),y
iny #S.PS.hStdErr iny #S.PS.hStdErr
sta (pPs),y sta (pPS),y
*-------------------------------------- *--------------------------------------
Kernel.Init3C >PUSHWI MSG.Init3 Kernel.Init3C >PUSHWI MSG.Init3
>PUSHBI 0 >PUSHBI 0
@ -154,7 +154,7 @@ Kernel.Init3C >PUSHWI MSG.Init3
>PUSHWI MSG.EXEC >PUSHWI MSG.EXEC
>PUSHWI SBININITD >PUSHWI SBININITD
>PUSHBI 2 >PUSHBI 2
>SYSCALL printf >SYSCALL PrintF
>PUSHWI SBININITD >PUSHWI SBININITD
>PUSHBI 0 PS Flags >PUSHBI 0 PS Flags
@ -999,7 +999,7 @@ TskMgrInit >LDYAI MSG.TSK
txa txa
ldy #S.PS.hENV ldy #S.PS.hENV
sta (pPs),y sta (pPS),y
sta SETWRITEAUX sta SETWRITEAUX
lda #0 lda #0
@ -1013,7 +1013,7 @@ TskMgrInit >LDYAI MSG.TSK
txa txa
ldy #S.PS.hCWD ldy #S.PS.hCWD
sta (pPs),y sta (pPS),y
>PUSHWI I.ENV.BOOT >PUSHWI I.ENV.BOOT
>PUSHWI $2C0 Get BOOT from QC >PUSHWI $2C0 Get BOOT from QC

View File

@ -190,7 +190,7 @@ K.IrqH.Switch inc IRQ.Tick
bvc .8 bvc .8
ldy #S.PS.S ldy #S.PS.S
lda (pPs),y lda (pPS),y
eor #S.PS.S.RUN eor #S.PS.S.RUN
bne .9 bne .9
lda IRQ.InLib lda IRQ.InLib

Some files were not shown because too many files have changed in this diff Show More