Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-06-12 20:29:41 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.9.1 : Move To S-C MASM 3.0

Browse Source
This commit is contained in:
Rémy GIBERT 2017-12-22 22:24:30 +01:00
parent 0d13988212
commit e9793ad02b
101 changed files with 334 additions and 978 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BOOT.po
View File

Binary file not shown.

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

BIN
.Floppies/A2OSX.SRC.po
View File

Binary file not shown.

7
BIN/ARP.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -54,7 +52,6 @@ CS.INIT >LDYA L.LIBTCPIP
*-------------------------------------- *--------------------------------------
CS.RUN ldy #S.PS.ARGC CS.RUN ldy #S.PS.ARGC
lda (pPs),y lda (pPs),y
cmp #1
bne .1 bne .1
jmp CS.RUN.DUMP jmp CS.RUN.DUMP

6
BIN/ATBROWSE.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
BIN/ATLOGON.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
BIN/CAT.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
BIN/CHTYP.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
BIN/CP.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

23
BIN/DNSINFO.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -24,7 +22,8 @@ CS.START cld
.DA 0 .DA 0
.DA CS.END-CS.START Code Length To Relocate .DA CS.END-CS.START Code Length To Relocate
.DA 0 No Data Segment to Allocate .DA 0 No Data Segment to Allocate
.DA 0 .DA #16 SS
.DA #4 ZP
.DA 0 .DA 0
*-------------------------------------- *--------------------------------------
* Relocation Table * Relocation Table
@ -41,7 +40,7 @@ L.MSG1 .DA MSG1
.DA 0 .DA 0
*-------------------------------------- *--------------------------------------
CS.INIT >LDYA L.LIBTCPIP CS.INIT >LDYA L.LIBTCPIP
>SYSCALL LoadLibYA >SYSCALL LoadLib.YA
sta hLIBTCPIP sta hLIBTCPIP
.8 lda (pPs) .8 lda (pPs)
@ -50,8 +49,8 @@ CS.INIT >LDYA L.LIBTCPIP
clc clc
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN >SYSCALL GetArgC CS.RUN ldy #S.PS.ARGC
cmp #1 lda (pPs),y
beq CS.RUN.DUMP beq CS.RUN.DUMP
CS.RUN.ADD cmp #3 CS.RUN.ADD cmp #3
@ -80,7 +79,7 @@ CS.RUN.ADD cmp #3
sec sec
.99 rts .99 rts
CS.RUN.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.DNS.GetC.ACHE CS.RUN.DUMP >LIBCALL hLIBTCPIP,LIBTCPIP.DNS.GetCache
>STYA ZPPTR1 >STYA ZPPTR1
>LDYA L.MSG0 >LDYA L.MSG0
>SYSCALL PrintF.YA >SYSCALL PrintF.YA
@ -138,13 +137,13 @@ CS.EVENT sec
rts rts
*-------------------------------------- *--------------------------------------
CS.QUIT lda hLIBTCPIP CS.QUIT lda hLIBTCPIP
>SYSCALL UnloadLibA >SYSCALL UnloadLib.A
clc clc
rts rts
*-------------------------------------- *--------------------------------------
CS.END CS.END
LIBTCPIP >PSTR "libtcpip.o" LIBTCPIP >CSTR "libtcpip.o"
SSCANF.IP >PSTR "%d.%d.%d.%d" SSCANF.IP >CSTR "%d.%d.%d.%d"
MSG0 >CSTR "STS TR.ID Hostname IP Address TTL\r\n" MSG0 >CSTR "STS TR.ID Hostname IP Address TTL\r\n"
MSG1 >CSTR "$%h $%H %32S %03d.%03d.%03d.%03d %L\r\n" MSG1 >CSTR "$%h $%H %32S %03d.%03d.%03d.%03d %L\r\n"
hLIBTCPIP .BS 1 hLIBTCPIP .BS 1

6
BIN/EDIT.S.BUF.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
BUF.InsertClipboard BUF.InsertClipboard

6
BIN/EDIT.S.CTRL.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
* ^A = Help * ^A = Help

6
BIN/EDIT.S.SCRN.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
SCRN.Init ldy #ScreenH SCRN.Init ldy #ScreenH

14
BIN/EDIT.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -470,12 +468,12 @@ SEQ.SCROLLDN >CSTR "\e[%d;%dH\eM"
SEQ.INV >CSTR "\e[7m" SEQ.INV >CSTR "\e[7m"
SEQ.NORM >CSTR "\e[0m" SEQ.NORM >CSTR "\e[0m"
SEQ.CEOL >CSTR "\e[K" SEQ.CEOL >CSTR "\e[K"
MSG.TOPBAR >CSTR "\e[1;1HA2osX Edit:%S\e[0m" MSG.TOPBAR >CSTR "\e[1;1HA2osX Edit:%s\e[0m"
MSG.STATUSBAR >CSTR "Press Ctrl-A For Help Length:%5D,Col:%3d,Line:%5D" MSG.STATUSBAR >CSTR "Press Ctrl-A For Help Length:%5D,Col:%3d,Line:%5D"
MSG.STATUSBAR.H >CSTR "Press any key to exit this screen:\e[0m" MSG.STATUSBAR.H >CSTR "Press any key to exit this screen:\e[0m"
MSG.STATUSBAR.F >CSTR "Find:%S\e[0m" MSG.STATUSBAR.F >CSTR "Find:%s\e[0m"
MSG.STATUSBAR.R >CSTR "Replace:%S\e[0m" MSG.STATUSBAR.R >CSTR "Replace:%s\e[0m"
MSG.STATUSBAR.S >CSTR "Save:%S\e[0m" MSG.STATUSBAR.S >CSTR "Save:%s\e[0m"
MSG.STATUSBAR.E >CSTR "Error:%h\e[0m" MSG.STATUSBAR.E >CSTR "Error:%h\e[0m"
MSG.GOTOXY >CSTR "\e[%d;%dH" MSG.GOTOXY >CSTR "\e[%d;%dH"
MSG.HELPLINE >CSTR "%S\e[K" MSG.HELPLINE >CSTR "%S\e[K"

6
BIN/FORMAT.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

32
BIN/IPCONFIG.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -10,7 +8,7 @@ AUTO 6
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB /A2OSX.BUILD/INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB /A2OSX.BUILD/INC/A2OSX.I
.INB /A2OSX.BUILD/INC/NET.I .INB /A2OSX.BUILD/INC/NIC.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB /A2OSX.BUILD/INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
ZPIPCfgPtr .EQ ZPBIN ZPIPCfgPtr .EQ ZPBIN
@ -93,11 +91,11 @@ CS.RUN.DUMPDEV sta DevID
>LDYA L.MSG0.L >LDYA L.MSG0.L
>SYSCALL PrintF.YA >SYSCALL PrintF.YA
ldy #S.DSTAT.NET.MAC+5 ldy #S.DSTAT.NIC.MAC+5
.1 >PUSHB (ZPDevStatPtr),y .1 >PUSHB (ZPDevStatPtr),y
dey dey
cpy #S.DSTAT.NET.MAC-1 cpy #S.DSTAT.NIC.MAC-1
bne .1 bne .1
lda #S.DEV.NAME lda #S.DEV.NAME
@ -122,27 +120,27 @@ CS.RUN.DUMPDEV sta DevID
>LDYA L.MSG1.DEV >LDYA L.MSG1.DEV
>SYSCALL PrintF.YA >SYSCALL PrintF.YA
ldy #S.DSTAT.NET.FLAGS ldy #S.DSTAT.NIC.FLAGS
lda (ZPDevStatPtr),y lda (ZPDevStatPtr),y
and #S.DSTAT.NET.FLAGS.ARPOFFLOAD and #S.DSTAT.NIC.FLAGS.ARPOFFLOAD
beq .2 beq .2
lda #1 lda #1
.2 >PUSHA .2 >PUSHA
>LDYA L.MSG1.DEV.ARP >LDYA L.MSG1.DEV.ARP
>SYSCALL PrintF.YA >SYSCALL PrintF.YA
ldy #S.DSTAT.NET.FLAGS ldy #S.DSTAT.NIC.FLAGS
lda (ZPDevStatPtr),y lda (ZPDevStatPtr),y
and #S.DSTAT.NET.FLAGS.IPOFFLOAD and #S.DSTAT.NIC.FLAGS.IPOFFLOAD
beq .3 beq .3
lda #1 lda #1
.3 >PUSHA .3 >PUSHA
>LDYA L.MSG1.DEV.IP >LDYA L.MSG1.DEV.IP
>SYSCALL PrintF.YA >SYSCALL PrintF.YA
ldy #S.DSTAT.NET.STATUS ldy #S.DSTAT.NIC.STATUS
lda (ZPDevStatPtr),y lda (ZPDevStatPtr),y
and #S.DSTAT.NET.STATUS.OK and #S.DSTAT.NIC.STATUS.OK
bne CS.RUN.LINK bne CS.RUN.LINK
>PUSHW L.MSG1.LINK.KO >PUSHW L.MSG1.LINK.KO
>LDYA L.MSG1.LINK >LDYA L.MSG1.LINK
@ -156,7 +154,7 @@ CS.RUN.LINK >PUSHW L.MSG1.LINK.OK
>LDYA L.MSG1.LINKSPEED >LDYA L.MSG1.LINKSPEED
>SYSCALL PrintF.YA >SYSCALL PrintF.YA
ldy #S.DSTAT.NET.STATUS ldy #S.DSTAT.NIC.STATUS
lda (ZPDevStatPtr),y lda (ZPDevStatPtr),y
and #$0F and #$0F
tax tax
@ -168,9 +166,9 @@ CS.RUN.LINK >PUSHW L.MSG1.LINK.OK
dex dex
bne .4 bne .4
ldy #S.DSTAT.NET.STATUS ldy #S.DSTAT.NIC.STATUS
lda (ZPDevStatPtr),y lda (ZPDevStatPtr),y
and #S.DSTAT.NET.STATUS.FD and #S.DSTAT.NIC.STATUS.FD
bne .5 bne .5
>LDYA L.MSG1.DPLX.HD >LDYA L.MSG1.DPLX.HD
bra .6 bra .6
@ -252,7 +250,7 @@ CS.DOEVENT sec
*-------------------------------------- *--------------------------------------
CS.QUIT lda hLIBTCPIP CS.QUIT lda hLIBTCPIP
beq .8 beq .8
>SYSCALL FreeMem.A >SYSCALL UnloadLib.A
.8 clc .8 clc
rts rts

6
BIN/LS.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
BIN/LSDEV.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
BIN/MD.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
BIN/MEM.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
BIN/MEMDUMP.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
BIN/MV.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

13
BIN/NETSTAT.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -23,7 +21,8 @@ CS.START cld
.DA 0 .DA 0
.DA CS.END-CS.START Code Length To Relocate .DA CS.END-CS.START Code Length To Relocate
.DA 0 Data Segment to Allocate .DA 0 Data Segment to Allocate
.DA 0 .DA #16 SS
.DA #2 ZP
.DA 0 .DA 0
*-------------------------------------- *--------------------------------------
* Relocation Table * Relocation Table
@ -53,7 +52,7 @@ L.MSG1.S .DA MSG1.S.0
.DA 0 .DA 0
*-------------------------------------- *--------------------------------------
CS.INIT >LDYA L.LIBTCPIP CS.INIT >LDYA L.LIBTCPIP
>SYSCALL LoadLibYA >SYSCALL LoadLib.YA
bcs .9 bcs .9
sta hLIBTCPIP sta hLIBTCPIP
@ -123,8 +122,8 @@ CS.DOEVENT sec
*-------------------------------------- *--------------------------------------
CS.QUIT lda hLIBTCPIP CS.QUIT lda hLIBTCPIP
beq .8 beq .8
>SYSCALL UnloadLib.A
>SYSCALL FreeMem.A
.8 clc .8 clc
rts rts
*-------------------------------------- *--------------------------------------

22
BIN/PING.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -28,7 +26,8 @@ CS.START cld
.DA 0 .DA 0
.DA CS.END-CS.START Code Length To Relocate .DA CS.END-CS.START Code Length To Relocate
.DA DS.END-DS.START Data Segment to Allocate .DA DS.END-DS.START Data Segment to Allocate
.DA 0 .DA #16 SS
.DA #8 ZP
.DA 0 .DA 0
*-------------------------------------- *--------------------------------------
.1 .DA CS.INIT .1 .DA CS.INIT
@ -48,7 +47,7 @@ L.MSG.UNREACH .DA MSG.UNREACH
.DA 0 .DA 0
*-------------------------------------- *--------------------------------------
CS.INIT >LDYA L.LIBTCPIP CS.INIT >LDYA L.LIBTCPIP
>SYSCALL LoadLibYA >SYSCALL LoadLib.YA
bcs .9 bcs .9
sta hLIBTCPIP sta hLIBTCPIP
@ -72,8 +71,9 @@ CS.RUN >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG is TCPIP loaded ?
sec sec
rts rts
CS.RUN.IPOK >SYSCALL GetArgC CS.RUN.IPOK ldy #S.PS.ARGC
cmp #1 lda (pPs),y
beq .9 beq .9
jsr Init.Timeout jsr Init.Timeout
@ -184,7 +184,7 @@ CS.RUN.SEND.ECHO
CS.RUN.WAIT.REPLY CS.RUN.WAIT.REPLY
>SLEEP >SLEEP
>SYSCALL GetC >SYSCALL GetChar
bcs .1 bcs .1
cmp #3 Ctrl-C cmp #3 Ctrl-C
beq .9 beq .9
@ -303,7 +303,7 @@ CS.QUIT ldy #hFrame
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.CLOSEA >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.CLOSEA
lda hLIBTCPIP lda hLIBTCPIP
>SYSCALL UnloadLibA >SYSCALL UnloadLib.A
clc clc
rts rts
*-------------------------------------- *--------------------------------------
@ -321,7 +321,7 @@ Wait.TimeOut sec
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
CS.END CS.END
LIBTCPIP >PSTR "libtcpip.o" LIBTCPIP >CSTR "libtcpip.o"
MSG.IPKO >CSTR "TCP/IP Not Loaded/Configured.\r\n" MSG.IPKO >CSTR "TCP/IP Not Loaded/Configured.\r\n"
MSG.USAGE >CSTR "Usage : PING <ip|host>\r\n" MSG.USAGE >CSTR "Usage : PING <ip|host>\r\n"
MSG.UNKNOWN >CSTR "%S: Unknown host\r\n" MSG.UNKNOWN >CSTR "%S: Unknown host\r\n"

6
BIN/PS.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
BIN/RM.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

14
BIN/RPCDUMP.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -44,12 +42,12 @@ L.MSG.DUMP0 .DA MSG.DUMP0
L.MSG.DUMP1 .DA MSG.DUMP1 L.MSG.DUMP1 .DA MSG.DUMP1
.DA 0 .DA 0
*-------------------------------------- *--------------------------------------
CS.INIT >SYSCALL GetArgC CS.INIT ldy #S.PS.ARGC
cmp #1 lda (pPs),y
beq .99 beq .99
>LDYA L.LIBTCPIP >LDYA L.LIBTCPIP
>SYSCALL LoadLibYA >SYSCALL LoadLib.YA
sta hLIBTCPIP sta hLIBTCPIP
>LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG is TCPIP loaded ? >LIBCALL hLIBTCPIP,LIBTCPIP.GET.IPCFG is TCPIP loaded ?
@ -181,7 +179,7 @@ CS.QUIT ldy #hSocket
.1 lda hLIBTCPIP .1 lda hLIBTCPIP
beq .8 beq .8
>SYSCALL UnloadLibA >SYSCALL UnloadLib.A
.8 clc .8 clc
rts rts

8
BIN/X.CPMVRM.G.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
ArgCount .BS 1 ArgCount .BS 1
@ -32,5 +30,3 @@ hToDelete .BS 1
*-------------------------------------- *--------------------------------------
MAN MAN
SAVE /A2OSX.SRC/BIN/X.CPMVRM.G SAVE /A2OSX.SRC/BIN/X.CPMVRM.G
LOAD /A2OSX.SRC/BIN/CP.S
ASM

8
BIN/X.CPMVRM.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
X.COPY.BUF.SIZE .EQ 4096 X.COPY.BUF.SIZE .EQ 4096
@ -819,5 +817,3 @@ CS.QUIT.FREE lda (pData),y
*-------------------------------------- *--------------------------------------
MAN MAN
SAVE /A2OSX.SRC/BIN/X.CPMVRM.S SAVE /A2OSX.SRC/BIN/X.CPMVRM.S
LOAD /A2OSX.SRC/BIN/CP.S
ASM

8
BIN/X.FILEENUM.G.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
Index .BS 1 Index .BS 1
@ -21,5 +19,3 @@ hDstBasePath .BS 1
*-------------------------------------- *--------------------------------------
MAN MAN
SAVE /A2OSX.SRC/BIN/X.FILEENUM.G SAVE /A2OSX.SRC/BIN/X.FILEENUM.G
LOAD /A2OSX.SRC/BIN/LS.S
ASM

8
BIN/X.FILEENUM.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
X.MAX.RECURSE .EQ 8 X.MAX.RECURSE .EQ 8
@ -565,5 +563,3 @@ BasePath..1 lda (pData),y
*-------------------------------------- *--------------------------------------
MAN MAN
SAVE /A2OSX.SRC/BIN/X.FILEENUM.S SAVE /A2OSX.SRC/BIN/X.FILEENUM.S
LOAD /A2OSX.SRC/BIN/LS.S
ASM

8
BMP2PIX.S.txt
View File

@ -1,12 +1,10 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BMP2PIX .TF /A2OSX.BUILD/ROOT/BMP2PIX
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB /A2OSX.BUILD/INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB /A2OSX.BUILD/INC/A2OSX.I

9
DRV/CONSOLE.DRV.S.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -881,7 +879,8 @@ DEVSTAT .DA #S.DSTAT.S.WRITE+S.DSTAT.S.READ
>PSTR "ANSI 80c Console" >PSTR "ANSI 80c Console"
.DA #S.DSTAT.T.CHAR .DA #S.DSTAT.T.CHAR
.DA #0 .DA #0
.DA $0900 .DA #0
.DA #91
ENQ.String >CSTR "XTERM" ENQ.String >CSTR "XTERM"
SB.IS.TTYPE .DA #IAC,#SB,#TELOPT.TTYPE,#SB.IS SB.IS.TTYPE .DA #IAC,#SB,#TELOPT.TTYPE,#SB.IS
.AS 'XTERM' .AS 'XTERM'

6
DRV/DHGR.DRV.G.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
Mask7BitsH .DA #%01111111 Useless Mask7BitsH .DA #%01111111 Useless

6
DRV/DHGR.DRV.S.BLT.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
* BitBlt * BitBlt

12
DRV/DHGR.DRV.S.LBUF.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
LBUF.SetBounds1YA LBUF.SetBounds1YA
@ -140,6 +138,7 @@ LBUF.DrawAtY.AND.XOR
.8 rts .8 rts
*-------------------------------------- *--------------------------------------
LBUF.DrawAtY.SET LBUF.DrawAtY.SET
LBUF.DrawAtY.AND.SET
ldx LBUF.C1 x C1->C2 ldx LBUF.C1 x C1->C2
ldy COL.BANK,x ldy COL.BANK,x
@ -211,9 +210,6 @@ LBUF.DrawAtY.SET
.8 rts .8 rts
*-------------------------------------- *--------------------------------------
LBUF.DrawAtY.AND.SET
rts
*--------------------------------------
LBUF.DrawAtY.ORA LBUF.DrawAtY.ORA
ldx LBUF.C1 x C1->C2 ldx LBUF.C1 x C1->C2
@ -266,7 +262,7 @@ LBUF.DrawAtY.ORA
*-------------------------------------- *--------------------------------------
LBUF.DrawAtY.AND.ORA LBUF.DrawAtY.AND.ORA
ldx LBUF.C1 x C1->C2 ldx LBUF.C1 x C1->C2
ldy COL.BANK,x ldy COL.BANK,x
sta $C000,y sta $C000,y
ldy COL.OFS,x ldy COL.OFS,x

14
DRV/DHGR.DRV.S.LINE.txt
View File

@ -1,15 +1,13 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
* HLINE X1,X2 at Y1 (XOR,SET,ORA) * HLINE X1,X2 at Y1 (XOR,SET,ORA)
*-------------------------------------- *--------------------------------------
HLINE lda CB.Cache+S.CB.MODE HLINE lda CB.Cache+S.CB.M
cmp #S.CB.MODE.MONO cmp #S.CB.M.MONO
bne HLINE.C16 bne HLINE.C16
HLINE.MONO >LDYA CB.Cache+S.CB.X1 HLINE.MONO >LDYA CB.Cache+S.CB.X1
@ -76,8 +74,8 @@ HLINE.C16 lda CB.Cache+S.CB.X1
*-------------------------------------- *--------------------------------------
* VLINE Y1,Y2 at X1 (XOR,SET,ORA) * VLINE Y1,Y2 at X1 (XOR,SET,ORA)
*-------------------------------------- *--------------------------------------
VLINE lda CB.Cache+S.CB.MODE VLINE lda CB.Cache+S.CB.M
cmp #S.CB.MODE.MONO cmp #S.CB.M.MONO
bne VLINE.C16 bne VLINE.C16
VLINE.MONO >LDYA CB.Cache+S.CB.X1 VLINE.MONO >LDYA CB.Cache+S.CB.X1

10
DRV/DHGR.DRV.S.PIX.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
* SETPIXEL * SETPIXEL
@ -12,8 +10,8 @@ AUTO 6
* 4 : SrcX1 * 4 : SrcX1
* 6 : SrcY1 * 6 : SrcY1
*-------------------------------------- *--------------------------------------
SETPIXEL lda CB.Cache+S.CB.MODE SETPIXEL lda CB.Cache+S.CB.M
bit #S.CB.MODE.C16 bit #S.CB.M.C16
bne SETPIXEL.C16 bne SETPIXEL.C16
SETPIXEL.MONO >LDYA CB.Cache+S.CB.X1 SETPIXEL.MONO >LDYA CB.Cache+S.CB.X1

6
DRV/DHGR.DRV.S.RECT.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
* FILLRECT * FILLRECT

12
DRV/DHGR.DRV.S.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -14,6 +12,7 @@ AUTO 6
.INB /A2OSX.BUILD/INC/IO.I .INB /A2OSX.BUILD/INC/IO.I
.INB /A2OSX.BUILD/INC/GFX.I .INB /A2OSX.BUILD/INC/GFX.I
.INB /A2OSX.BUILD/INC/GFX.EVE.I .INB /A2OSX.BUILD/INC/GFX.EVE.I
.INB /A2OSX.BUILD/INC/GUI.I
.INB /A2OSX.BUILD/INC/LIBGUI.I .INB /A2OSX.BUILD/INC/LIBGUI.I
*-------------------------------------- *--------------------------------------
ZPCmdPtr .EQ ZPDRV ZPCmdPtr .EQ ZPDRV
@ -219,7 +218,7 @@ CLOSE clc
*-------------------------------------- *--------------------------------------
WRITE >STYA ZPCmdPtr WRITE >STYA ZPCmdPtr
sta SETHIRES Make sure SET80STORE active a $2000 sta SETHIRES Make sure SET80STORE active at $2000
sta SET80STORE sta SET80STORE
lda (ZPCmdPtr) Get Cmd lda (ZPCmdPtr) Get Cmd
@ -234,6 +233,7 @@ WRITE >STYA ZPCmdPtr
.3 jsr .10 .3 jsr .10
sta CLRPAGE2
sta CLR80STORE sta CLR80STORE
clc clc
@ -425,7 +425,7 @@ DSTAT .DA #0
.DA #0 .DA #0
.DA #91 .DA #91
*-------------------------------------- *--------------------------------------
.DA #S.CB.MODE.MONO+S.CB.MODE.C16 .DA #S.CB.M.MONO+S.CB.M.C16
.DA #0 S .DA #0 S
.DA 560 W .DA 560 W
.DA 192 H .DA 192 H

18
DRV/LANCEGS.DRV.S.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -11,8 +9,8 @@ AUTO 6
.INB /A2OSX.BUILD/INC/MACROS.I .INB /A2OSX.BUILD/INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB /A2OSX.BUILD/INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB /A2OSX.BUILD/INC/MLI.ERR.I
.INB /A2OSX.BUILD/INC/NET.I .INB /A2OSX.BUILD/INC/NIC.I
.INB /A2OSX.BUILD/INC/NET.91C96.I .INB /A2OSX.BUILD/INC/NIC.91C96.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB /A2OSX.BUILD/INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
ZPTmpPTR .EQ ZPDRV ZPTmpPTR .EQ ZPDRV
@ -107,7 +105,7 @@ DEV.HEADER cld
jmp (DRV.CS.START,x) jmp (DRV.CS.START,x)
.DA #0 .DA #0
.BS 6 .BS 6
DEV.HEADER.NAME >PSTR "ETH7" DEV.HEADER.NAME >CSTR "ETH7"
*-------------------------------------- *--------------------------------------
* Driver Code * Driver Code
*-------------------------------------- *--------------------------------------
@ -124,7 +122,7 @@ DRV.CS.START .DA STATUS
L.DEVSTAT .DA DEVSTAT L.DEVSTAT .DA DEVSTAT
.DA 0 end or relocation .DA 0 end or relocation
*-------------------------------------- *--------------------------------------
STATUS lda #S.DSTAT.NET.STATUS.10 STATUS lda #S.DSTAT.NIC.STATUS.10
sta LINK.STATUS sta LINK.STATUS
ldx DEVSLOTx0 ldx DEVSLOTx0
@ -135,7 +133,7 @@ STATUS lda #S.DSTAT.NET.STATUS.10
and /L91C96.0.EPHSR.LINK and /L91C96.0.EPHSR.LINK
beq .1 beq .1
lda LINK.STATUS lda LINK.STATUS
ora #S.DSTAT.NET.STATUS.OK ora #S.DSTAT.NIC.STATUS.OK
sta LINK.STATUS sta LINK.STATUS
.1 lda L91C96.0.TCR,x .1 lda L91C96.0.TCR,x
@ -143,7 +141,7 @@ STATUS lda #S.DSTAT.NET.STATUS.10
and /L91C96.0.TCR.FDSE and /L91C96.0.TCR.FDSE
bne .2 bne .2
lda LINK.STATUS lda LINK.STATUS
ora #S.DSTAT.NET.STATUS.FD ora #S.DSTAT.NIC.STATUS.FD
sta LINK.STATUS sta LINK.STATUS
.2 >LDYA L.DEVSTAT .2 >LDYA L.DEVSTAT

6
DRV/MOUSE.DRV.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
DRV/SSC.DRV.S.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
DRV/SSC.I.DRV.S.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

14
DRV/UTHER2.AI.DRV.S.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -11,8 +9,8 @@ AUTO 6
.INB /A2OSX.BUILD/INC/MACROS.I .INB /A2OSX.BUILD/INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB /A2OSX.BUILD/INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB /A2OSX.BUILD/INC/MLI.ERR.I
.INB /A2OSX.BUILD/INC/NET.I .INB /A2OSX.BUILD/INC/NIC.I
.INB /A2OSX.BUILD/INC/NET.W5100.I .INB /A2OSX.BUILD/INC/NIC.W5100.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB /A2OSX.BUILD/INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
ZPTmpPTR .EQ ZPDRV ZPTmpPTR .EQ ZPDRV
@ -507,8 +505,8 @@ DEVSTAT .DA #0
.BS 1 Subtype .BS 1 Subtype
.BS 2 Version .BS 2 Version
*-------------------------------------- *--------------------------------------
FLAGS .DA #S.DSTAT.NET.FLAGS.ARPOFFLOAD+S.DSTAT.NET.FLAGS.IPOFFLOAD FLAGS .DA #S.DSTAT.NIC.FLAGS.ARPOFFLOAD+S.DSTAT.NIC.FLAGS.IPOFFLOAD
LINK.STATUS .DA #S.DSTAT.NET.STATUS.OK+S.DSTAT.NET.STATUS.FD+S.DSTAT.NET.STATUS.100 LINK.STATUS .DA #S.DSTAT.NIC.STATUS.OK+S.DSTAT.NIC.STATUS.FD+S.DSTAT.NIC.STATUS.100
MAC .BS 6 MAC .BS 6
MAN MAN
SAVE /A2OSX.SRC/DRV/UTHER2.AI.DRV.S SAVE /A2OSX.SRC/DRV/UTHER2.AI.DRV.S

16
DRV/UTHERNET.DRV.S.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -11,8 +9,8 @@ AUTO 6
.INB /A2OSX.BUILD/INC/MACROS.I .INB /A2OSX.BUILD/INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB /A2OSX.BUILD/INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB /A2OSX.BUILD/INC/MLI.ERR.I
.INB /A2OSX.BUILD/INC/NET.I .INB /A2OSX.BUILD/INC/NIC.I
.INB /A2OSX.BUILD/INC/NET.8900A.I .INB /A2OSX.BUILD/INC/NIC.8900A.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB /A2OSX.BUILD/INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
ZPTmpPTR .EQ ZPDRV ZPTmpPTR .EQ ZPDRV
@ -154,7 +152,7 @@ DRV.CS.START .DA STATUS
L.DEVSTAT .DA DEVSTAT L.DEVSTAT .DA DEVSTAT
.DA 0 end or relocation .DA 0 end or relocation
*-------------------------------------- *--------------------------------------
STATUS lda #S.DSTAT.NET.STATUS.10 STATUS lda #S.DSTAT.NIC.STATUS.10
sta LINK.STATUS sta LINK.STATUS
ldx DEVSLOTx0 ldx DEVSLOTx0
@ -170,7 +168,7 @@ STATUS lda #S.DSTAT.NET.STATUS.10
beq .1 beq .1
lda LINK.STATUS lda LINK.STATUS
ora #S.DSTAT.NET.STATUS.OK ora #S.DSTAT.NIC.STATUS.OK
sta LINK.STATUS sta LINK.STATUS
.1 lda /PP.TestCTL .1 lda /PP.TestCTL
@ -184,7 +182,7 @@ STATUS lda #S.DSTAT.NET.STATUS.10
beq .2 beq .2
lda LINK.STATUS lda LINK.STATUS
ora #S.DSTAT.NET.STATUS.FD ora #S.DSTAT.NIC.STATUS.FD
sta LINK.STATUS sta LINK.STATUS
.2 >LDYA L.DEVSTAT .2 >LDYA L.DEVSTAT

12
DRV/UTHERNET2.DRV.S.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -11,8 +9,8 @@ AUTO 6
.INB /A2OSX.BUILD/INC/MACROS.I .INB /A2OSX.BUILD/INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB /A2OSX.BUILD/INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB /A2OSX.BUILD/INC/MLI.ERR.I
.INB /A2OSX.BUILD/INC/NET.I .INB /A2OSX.BUILD/INC/NIC.I
.INB /A2OSX.BUILD/INC/NET.W5100.I .INB /A2OSX.BUILD/INC/NIC.W5100.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB /A2OSX.BUILD/INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
ZPTmpPTR .EQ ZPDRV ZPTmpPTR .EQ ZPDRV
@ -394,7 +392,7 @@ DEVSTAT .DA #0
.BS 2 Version .BS 2 Version
*-------------------------------------- *--------------------------------------
FLAGS .DA #0 FLAGS .DA #0
LINK.STATUS .DA #S.DSTAT.NET.STATUS.OK+S.DSTAT.NET.STATUS.FD+S.DSTAT.NET.STATUS.100 LINK.STATUS .DA #S.DSTAT.NIC.STATUS.OK+S.DSTAT.NIC.STATUS.FD+S.DSTAT.NIC.STATUS.100
MAC .BS 6 MAC .BS 6
MAN MAN
SAVE /A2OSX.SRC/DRV/UTHERNET2.DRV.S SAVE /A2OSX.SRC/DRV/UTHERNET2.DRV.S

6
DRV/X.NET.DRV.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
DecodeMac lda (ZPTmpPTR) DecodeMac lda (ZPTmpPTR)

6
ETC/TCPIP.CONF
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BOOT
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
IP=192.168.1.150 IP=192.168.1.150
MASK=255.255.255.0 MASK=255.255.255.0
GW=192.168.1.1 GW=192.168.1.1

8
FNT2FON.S.txt
View File

@ -1,12 +1,10 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $900 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/FNT2FON .TF /A2OSX.BUILD/ROOT/FNT2FON
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB /A2OSX.BUILD/INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB /A2OSX.BUILD/INC/A2OSX.I

1
INC/COM.6551.I.txt
View File

@ -39,7 +39,6 @@ SSC.CTL.8D .EQ %00000000
SSC.CTL.7D .EQ %00100000 SSC.CTL.7D .EQ %00100000
SSC.CTL.6D .EQ %01000000 SSC.CTL.6D .EQ %01000000
SSC.CTL.5D .EQ %01100000 SSC.CTL.5D .EQ %01100000
SSC.CTL.CLKEXT .EQ %00000000
SSC.CTL.CLKINT .EQ %00010000 SSC.CTL.CLKINT .EQ %00010000
SSC.CTL.B16EXT .EQ %00000000 SSC.CTL.B16EXT .EQ %00000000
SSC.CTL.B50 .EQ %00000001 SSC.CTL.B50 .EQ %00000001

10
INC/IO.I.txt
View File

@ -44,7 +44,7 @@ RD80DISP .EQ $C01F R
SPEAKER .EQ $C030 W, toggle speaker diaphragm SPEAKER .EQ $C030 W, toggle speaker diaphragm
*STROBE .EQ $C040 R, generate .5 uS low pulse @ Game pin 5 *STROBE .EQ $C040 R, generate .5 uS low pulse @ Game pin 5
EMUBYTE .EQ $C04F WRR, Write once then Read EMUL, Read Version *EMUBYTE .EQ $C04F WRR, Write once then Read EMUL, Read Version
CLRTEXT .EQ $C050 W CLRTEXT .EQ $C050 W
SETTEXT .EQ $C051 W SETTEXT .EQ $C051 W
@ -84,12 +84,12 @@ SETIOUDIS .EQ $C07E W, enable DHIRES & disable $C058-5F
RDIOUDIS .EQ $C07E R, bit 7 = IOUDIS status RDIOUDIS .EQ $C07E R, bit 7 = IOUDIS status
CLRIOUDIS .EQ $C07F W, disable DHIRES & enable $C058-5F CLRIOUDIS .EQ $C07F W, disable DHIRES & enable $C058-5F
*-------------------------------------- *--------------------------------------
RRAMBNK2 .EQ $C080 R *RRAMBNK2 .EQ $C080 R
RROMWRAMBNK2 .EQ $C081 RR *RROMWRAMBNK2 .EQ $C081 RR
RROMBNK2 .EQ $C082 R RROMBNK2 .EQ $C082 R
RRAMWRAMBNK2 .EQ $C083 RR RRAMWRAMBNK2 .EQ $C083 RR
RRAMBNK1 .EQ $C088 R *RRAMBNK1 .EQ $C088 R
RROMWRAMBNK1 .EQ $C089 RR *RROMWRAMBNK1 .EQ $C089 RR
RROMBNK1 .EQ $C08A R RROMBNK1 .EQ $C08A R
RRAMWRAMBNK1 .EQ $C08B RR RRAMWRAMBNK1 .EQ $C08B RR
*-------------------------------------- *--------------------------------------

6
INC/KERNEL.I.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
* KERNEL CONSTANTS DEFINITON * KERNEL CONSTANTS DEFINITON

67
INC/LIBGUI.I.txt
View File

@ -28,50 +28,6 @@ S.GC.Y2 .EQ 10
* *
S.GC .EQ 12 S.GC .EQ 12
*-------------------------------------- *--------------------------------------
S.CB.CMD .EQ 0
S.CB.CMD.SETPIXEL .EQ 0
S.CB.CMD.GETPIXEL .EQ 2
S.CB.CMD.HLINE .EQ 4
S.CB.CMD.VLINE .EQ 6
S.CB.CMD.FILLRECT .EQ 8
S.CB.CMD.BITBLT .EQ 10
S.CB.CMD.GETRECTBUFSIZE .EQ 12
S.CB.CMD.DRAWLINE .EQ 14
S.CB.CMD.DRAWTEXT .EQ 16
S.CB.OP .EQ 1
S.CB.OP.XOR .EQ 0 screen EOR bitmap -> Screen
S.CB.OP.SET .EQ 2 replace screen with bitmap
S.CB.OP.ORA .EQ 4 combine screen & bitmap -> Screen
S.CB.OP.MASK .EQ %00001000 Apply BitMap mask before painting
S.CB.OP.SAVE .EQ %00010000 Save Screen to DstPtr before painting
S.CB.OP.RESTORE .EQ %00100000 Restore Screen From DstPtr
S.CB.OP.COLOR .EQ %01000000 Assume BitMap is COLOR
S.CB.OP.F.BOLD .EQ %00010000
S.CB.OP.F.ITALIC .EQ %00100000
S.CB.OP.F.UNDERLINE .EQ %01000000
S.CB.OP.F.GRAYED .EQ %10000000
S.CB.MODE .EQ 2
S.CB.MODE.MONO .EQ %00000001 b/w (1 bit/pixel)
*S.CB.MODE.C4 .EQ %00000010
*S.CB.MODE.C8 .EQ %00000100
S.CB.MODE.C16 .EQ %00001000 16 colors (4 bits/pixel)
*S.CB.MODE.C256 .EQ %00010000 256 colors (8 bits/pixel)
S.CB.COLOR .EQ 3 xPIXEL,xLINE,FILLRECT,BITBLT
S.CB.hFONT .EQ 3 DRAWTEXT
S.CB.X1 .EQ 4 xPIXEL,xLINE,FILLRECT,BITBLT,GETRECTBUFSIZE,DRAWLINE
S.CB.Y1 .EQ 6 xPIXEL,xLINE,FILLRECT,BITBLT,GETRECTBUFSIZE,DRAWLINE
S.CB.X2 .EQ 8 VLINE,FILLRECT,DRAWLINE
S.CB.Y2 .EQ 10 HLINE,FILLRECT,DRAWLINE
S.CB.SrcW .EQ 8 BITBLT,GETRECTBUFSIZE
S.CB.SrcH .EQ 10 BITBLT,GETRECTBUFSIZE
S.CB.DstX .EQ 12 BITBLT,DRAWTEXT
S.CB.DstY .EQ 14 BITBLT,DRAWTEXT
S.CB.SrcPtr .EQ 16 BITBLT,DRAWTEXT
S.CB.DstPtr .EQ 18 BITBLT
*
S.CB .EQ 20
*--------------------------------------
CUR.T.ARROW .EQ 0 CUR.T.ARROW .EQ 0
CUR.T.RESIZEX .EQ 2 CUR.T.RESIZEX .EQ 2
CUR.T.RESIZEY .EQ 4 CUR.T.RESIZEY .EQ 4
@ -81,29 +37,6 @@ CUR.T.CROSS .EQ 10
CUT.T.TEXT .EQ 12 CUT.T.TEXT .EQ 12
CUR.T.WAIT .EQ 14 CUR.T.WAIT .EQ 14
*-------------------------------------- *--------------------------------------
S.BM.F .EQ 0
S.BM.F.BBP1 .EQ %00000001
S.BM.F.BBP2 .EQ %00000010
S.BM.F.BBP4 .EQ %00000100
S.BM.F.BBP8 .EQ %00001000
S.BM.RowBytes .EQ 1
S.BM.W .EQ 2
S.BM.H .EQ 4
S.BM.MASK.OFS .EQ 6
*
S.BM .EQ 8
*--------------------------------------
S.FON.F .EQ 0
S.FON.Ascent .EQ 1
S.FON.PixW .EQ 2 if 0, variable W
S.FON.PixH .EQ 3
S.FON.First .EQ 4
S.FON.Last .EQ 5
S.FON.Default .EQ 6
S.FON.Break .EQ 7
*
S.FON .EQ 8
*--------------------------------------
S.MOUSE.X1 .EQ 0 S.MOUSE.X1 .EQ 0
S.MOUSE.Y1 .EQ 2 S.MOUSE.Y1 .EQ 2
S.MOUSE.X2 .EQ 4 S.MOUSE.X2 .EQ 4

6
LIB/LIBBLKDEV.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
LIB/LIBCRYPT.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

8
LIB/LIBGUI.G.CUR.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
CUR.T .BS 1 CUR.T .BS 1
@ -25,7 +23,7 @@ CUR.HotPoints .DA #0,#0 CUR.T.ARROW
*-------------------------------------- *--------------------------------------
CUR.CB .DA #S.CB.CMD.BITBLT CUR.CB .DA #S.CB.CMD.BITBLT
.BS 1 .BS 1
.DA #S.CB.MODE.MONO .DA #S.CB.M.MONO
.DA #0 .DA #0
.BS S.CB-4 .BS S.CB-4
*-------------------------------------- *--------------------------------------

7
LIB/LIBGUI.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -10,6 +8,7 @@ AUTO 6
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB /A2OSX.BUILD/INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB /A2OSX.BUILD/INC/A2OSX.I
.INB /A2OSX.BUILD/INC/GUI.I
.INB /A2OSX.BUILD/INC/LIBGUI.I .INB /A2OSX.BUILD/INC/LIBGUI.I
.INB /A2OSX.BUILD/INC/GFX.I .INB /A2OSX.BUILD/INC/GFX.I
*-------------------------------------- *--------------------------------------

6
LIB/LIBPAK.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
LIB/LIBTCPIP.S.ARP.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*/-------------------------------------- */--------------------------------------
* # ARP.Clear * # ARP.Clear

10
LIB/LIBTCPIP.S.CFG.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
* PULLW = PTR to S.IPCFG * PULLW = PTR to S.IPCFG
@ -44,10 +42,10 @@ SET.IPCFG >PULLW ZPTmpPtr1
jsr NetDevJmp jsr NetDevJmp
>STYA ZPTmpPtr2 >STYA ZPTmpPtr2
ldy #S.DSTAT.NET.FLAGS ldy #S.DSTAT.NIC.FLAGS
lda (ZPTmpPtr2),y lda (ZPTmpPtr2),y
sta DevFlags sta DevFlags
and #S.DSTAT.NET.FLAGS.ARPOFFLOAD and #S.DSTAT.NIC.FLAGS.ARPOFFLOAD
beq .4 beq .4
>LDYA ZPTmpPtr1 >LDYA ZPTmpPtr1

6
LIB/LIBTCPIP.S.DNS.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $900 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*/-------------------------------------- */--------------------------------------
* # DNS.Clear * # DNS.Clear

12
LIB/LIBTCPIP.S.FRM.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
* FRM.New * FRM.New
@ -78,7 +76,7 @@ FRM.NewIP stx .8+1
sta ZPDataOutPtr+1 sta ZPDataOutPtr+1
lda DevFlags lda DevFlags
and #S.DSTAT.NET.FLAGS.IPOFFLOAD and #S.DSTAT.NIC.FLAGS.IPOFFLOAD
bne .7 bne .7
ldy #S.ETH.ETHERTYPE ldy #S.ETH.ETHERTYPE
@ -138,7 +136,7 @@ FRM.SendIP ldx #3 Copy SRC.IP even if IP offload
bpl .1 bpl .1
lda DevFlags lda DevFlags
and #S.DSTAT.NET.FLAGS.IPOFFLOAD and #S.DSTAT.NIC.FLAGS.IPOFFLOAD
bne .21 bne .21
ldy #S.IP.TOTAL.LENGTH+1 ldy #S.IP.TOTAL.LENGTH+1
@ -219,7 +217,7 @@ FRM.SendIP ldx #3 Copy SRC.IP even if IP offload
jsr ICMP.ComputeChecksum jsr ICMP.ComputeChecksum
.5 lda DevFlags .5 lda DevFlags
and #S.DSTAT.NET.FLAGS.ARPOFFLOAD and #S.DSTAT.NIC.FLAGS.ARPOFFLOAD
bne .6 bne .6
jsr IP.SetDestMAC jsr IP.SetDestMAC

6
LIB/LIBTCPIP.S.HST.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
HST.GetByName >PULLW ZPPtrDNS HST.GetByName >PULLW ZPPtrDNS

6
LIB/LIBTCPIP.S.ICMP.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
ICMP.IN ldy #S.ICMP.TYPE ICMP.IN ldy #S.ICMP.TYPE

6
LIB/LIBTCPIP.S.IP.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
IP.IN ldy #S.IP.PROTOCOL IP.IN ldy #S.IP.PROTOCOL

6
LIB/LIBTCPIP.S.SKT.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $900 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*/-------------------------------------- */--------------------------------------
* # SKT.New * # SKT.New

6
LIB/LIBTCPIP.S.TCP.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $900 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
TCP.IN jsr IP.FillSKT.TemplateSrcDst TCP.IN jsr IP.FillSKT.TemplateSrcDst

6
LIB/LIBTCPIP.S.UDP.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
UDP.IN jsr IP.FillSKT.TemplateSrcDst UDP.IN jsr IP.FillSKT.TemplateSrcDst

11
LIB/LIBTCPIP.S.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -10,9 +8,8 @@ AUTO 6
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB /A2OSX.BUILD/INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB /A2OSX.BUILD/INC/A2OSX.I
* .INB /A2OSX.BUILD/INC/MLI.ERR.I .INB /A2OSX.BUILD/INC/MLI.ERR.I
MLI.ERR.IO .EQ $27 .INB /A2OSX.BUILD/INC/NIC.I
.INB /A2OSX.BUILD/INC/NET.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB /A2OSX.BUILD/INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
ZPFrameInPtr .EQ ZPLIB ZPFrameInPtr .EQ ZPLIB

2
README.md
View File

@ -45,7 +45,7 @@ Kernel 0.9.1 stable enough to resume building.
| -------------------------| ---------- | ----------- | ------- | | -------------------------| ---------- | ----------- | ------- |
| //c,//c+,IIgs Mouse port | 50/50 Hz | Working | Supported at Kernel level, no conflict with GUI's Mouse.DRV (not required to be loaded), requires setting "Machine Timing" properly in KConfig Utility | | //c,//c+,IIgs Mouse port | 50/50 Hz | Working | Supported at Kernel level, no conflict with GUI's Mouse.DRV (not required to be loaded), requires setting "Machine Timing" properly in KConfig Utility |
| IIe Mouse Card | 50/50 Hz | Working | (same as above) | | IIe Mouse Card | 50/50 Hz | Working | (same as above) |
| ThunderClock Plus | 64 Hz | In Progress | ...Need to fix this faulty H/W first! | | ThunderClock Plus | 64 Hz | Working | gave up fixing this faulty H/W, thanx to JACE emulator! |
| ... Any suggestion ? | | | | | ... Any suggestion ? | | | |
## !!!HELP NEEDED!!! ## !!!HELP NEEDED!!!

6
SBIN/DHCPCLNT.S.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
SBIN/GETTY.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

47
SBIN/GUI.S.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -11,6 +9,7 @@ AUTO 6
.INB /A2OSX.BUILD/INC/IO.I .INB /A2OSX.BUILD/INC/IO.I
.INB /A2OSX.BUILD/INC/MACROS.I .INB /A2OSX.BUILD/INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB /A2OSX.BUILD/INC/A2OSX.I
.INB /A2OSX.BUILD/INC/GUI.I
.INB /A2OSX.BUILD/INC/LIBGUI.I .INB /A2OSX.BUILD/INC/LIBGUI.I
*-------------------------------------- *--------------------------------------
ZPPtr1 .EQ ZPBIN ZPPtr1 .EQ ZPBIN
@ -41,7 +40,7 @@ L.Filename .DA Filename
L.MouseData .DA MouseData L.MouseData .DA MouseData
L.CB.Rect .DA CB.Rect L.CB.Rect .DA CB.Rect
L.BM.Apple .DA BM.Apple L.BM.Apple .DA BM.Apple
L.CB.BitBlt .DA CB.BitBlt L.CB.Marylin .DA CB.Marylin
L.CB.DrawLine .DA CB.DrawLine L.CB.DrawLine .DA CB.DrawLine
L.GC.Clip .DA GC.Clip L.GC.Clip .DA GC.Clip
.DA 0 .DA 0
@ -72,7 +71,7 @@ CS.INIT >LDYA L.MSG.INIT
>SYSCALL LoadStkObj >SYSCALL LoadStkObj
.99 bcs .9 .99 bcs .9
sta CB.BitBlt+S.CB.SrcPtr sta CB.Marylin+S.CB.SrcPtr
jsr Destop.Paint jsr Destop.Paint
@ -121,14 +120,14 @@ CS.RUN lda A2osX.ASCREEN GUI screen active ?
>LIBCALL hLIBGUI,LIBGUI.SetCursor.A >LIBCALL hLIBGUI,LIBGUI.SetCursor.A
lda MouseData+S.MOUSE.X1 lda MouseData+S.MOUSE.X1
sta CB.BitBlt+S.CB.DstX sta CB.Marylin+S.CB.DstX
lda MouseData+S.MOUSE.X1+1 lda MouseData+S.MOUSE.X1+1
sta CB.BitBlt+S.CB.DstX+1 sta CB.Marylin+S.CB.DstX+1
lda MouseData+S.MOUSE.Y1 lda MouseData+S.MOUSE.Y1
sta CB.BitBlt+S.CB.DstY sta CB.Marylin+S.CB.DstY
lda MouseData+S.MOUSE.Y1+1 lda MouseData+S.MOUSE.Y1+1
sta CB.BitBlt+S.CB.DstY+1 sta CB.Marylin+S.CB.DstY+1
jsr Destop.Paint jsr Destop.Paint
@ -165,7 +164,7 @@ Destop.Paint >LIBCALL hLIBGUI,LIBGUI.HideCursor
>PUSHW L.GC.Clip >PUSHW L.GC.Clip
>PUSHW L.CB.BitBlt >PUSHW L.CB.Marylin
>LIBCALL hLIBGUI,LIBGUI.Draw >LIBCALL hLIBGUI,LIBGUI.Draw
>LIBCALL hLIBGUI,LIBGUI.ShowCursor >LIBCALL hLIBGUI,LIBGUI.ShowCursor
@ -177,7 +176,7 @@ MSG.INIT >CSTR "GUI:Init...\r\n"
hLIBGUI .BS 1 hLIBGUI .BS 1
hSYSFONT .BS 1 hSYSFONT .BS 1
*-------------------------------------- *--------------------------------------
Filename >CSTR "/A2OSX.BUILD/MARILYN" Filename >CSTR "/A2OSX.BUILD/ROOT/MARILYN"
*-------------------------------------- *--------------------------------------
SYSFONT >CSTR "/A2OSX.BUILD/SBIN/GUI/SYSTEM" SYSFONT >CSTR "/A2OSX.BUILD/SBIN/GUI/SYSTEM"
*-------------------------------------- *--------------------------------------
@ -185,7 +184,7 @@ MouseData .BS S.MOUSE
*-------------------------------------- *--------------------------------------
CB.Rect .DA #S.CB.CMD.FILLRECT CB.Rect .DA #S.CB.CMD.FILLRECT
.DA #S.CB.OP.SET .DA #S.CB.OP.SET
.DA #S.CB.MODE.C16 .DA #S.CB.M.MONO
.DA #1 .DA #1
.DA 0 X1 .DA 0 X1
.DA 0 Y1 .DA 0 Y1
@ -194,24 +193,24 @@ CB.Rect .DA #S.CB.CMD.FILLRECT
.DA #S.CB.CMD.FILLRECT .DA #S.CB.CMD.FILLRECT
.DA #S.CB.OP.SET .DA #S.CB.OP.SET
.DA #S.CB.MODE.C16 .DA #S.CB.M.C16
.DA #4 .DA #4
.DA 40 X1 .DA 40 X1
.DA 40 Y1 .DA 20 Y1
.DA 519 X2 .DA 519 X2
.DA 151 Y2 .DA 171 Y2
*-------------------------------------- *--------------------------------------
CB.Apple .DA #S.CB.CMD.BITBLT CB.Apple .DA #S.CB.CMD.BITBLT
.DA #S.CB.OP.SET .DA #S.CB.OP.SET
.DA #S.CB.MODE.C16 .DA #S.CB.M.C16
.DA #0 .DA #0
.DA 0 X1 .DA 0 X1
.DA 0 Y1 .DA 0 Y1
.DA 16 W .DA 16 W
.DA 9 H .DA 9 H
.DA 28 DestX .DA 28 DestX
.DA 170 DestY .DA 180 DestY
.BS 2 SrcPtr .BS 2 SrcPtr
.DA 0 .DA 0
@ -233,16 +232,16 @@ BM.Apple .DA #S.BM.F.BBP4
.HS 1111 Dark blue (4) .HS 1111 Dark blue (4)
.HS 1FF1 Dark blue (4) .HS 1FF1 Dark blue (4)
*-------------------------------------- *--------------------------------------
CB.BitBlt .DA #S.CB.CMD.BITBLT CB.Marylin .DA #S.CB.CMD.BITBLT
.DA #S.CB.OP.SET .DA #S.CB.OP.SET
.DA #S.CB.MODE.MONO .DA #S.CB.M.MONO
.DA #0 .DA #0
.DA 0 X1 .DA 0 X1
.DA 0 Y1 .DA 0 Y1
.DA 141 W .DA 141 W
.DA 150 H .DA 150 H
.DA 200 DestX .DA 200 DestX
.DA 60 DestY .DA 35 DestY
.BS 2 SrcPtr .BS 2 SrcPtr
.DA 0 .DA 0
@ -251,7 +250,7 @@ CB.BitBlt .DA #S.CB.CMD.BITBLT
CB.DrawLine .DA #0 CB.DrawLine .DA #0
.DA #S.CB.CMD.DRAWLINE .DA #S.CB.CMD.DRAWLINE
.DA #S.CB.OP.XOR .DA #S.CB.OP.XOR
.DA #S.CB.MODE.MONO .DA #S.CB.M.MONO
.DA #1 .DA #1
.BS 2 X1 .BS 2 X1
.BS 2 Y1 .BS 2 Y1
@ -266,9 +265,9 @@ GC.Clip .DA #0
.DA #0 .DA #0
.DA 40 X1 .DA 40 X1
.DA 40 Y1 .DA 20 Y1
.DA 519 X2 .DA 519 X2
.DA 151 Y2 .DA 171 Y2
*-------------------------------------- *--------------------------------------
.DUMMY .DUMMY
.OR 0 .OR 0

412
SBIN/GUIOSD.S.txt
View File

@ -57,416 +57,6 @@ CS.QUIT clc
CS.END CS.END
*-------------------------------------- *--------------------------------------
.PH $0C00 .PH $0C00
*--------------------------------------
ZPCmdPtr .EQ ZPDRV
ZPDstBMPtr .EQ ZPDRV+2
ZPFontPtr .EQ ZPDRV+4
ZPCharPtr .EQ ZPDRV+6
ZPSrcBMPtr .EQ ZPDRV+8
ZPTmpPtr .EQ ZPDRV+10
*--------------------------------------
* YA =Ptr to S.CB in MAIN
* X = DestBM hMem
*--------------------------------------
GUIOSD >STYA A1L Src Start Address (MAIN)
pha
tya
clc
adc #S.CB
sta A2L Src End Address (MAIN)
pla
adc /S.CB
sta A2L+1
>LDYA CB.Cache
>STYA A4L Dst Address (AUX)
sec Main To Aux
jsr MoveAux
txa
beq .1
jsr GO.GetMemPtr.A
>STYA ZPDstBMPtr
ldx #0
.1 lda (ZPDstBMPtr)
sta DstBM.Cache,x
inc ZPDstBMPtr
bne .2
inc ZPDstBMPtr+1
.2 inx
cpx #S.BM
bne .1
ldx CB.Cache+S.CB.CMD
jmp (J.Cmds,x)
*--------------------------------------
J.Cmds .DA SETPIXEL
.DA GETPIXEL
.DA HLINE
.DA VLINE
.DA FILLRECT
.DA BITBLT
.DA GETRECTBUFSIZE
*--------------------------------------
SETPIXEL >LDYA CB.Cache+S.CB.Y1
ldx DstBM.Cache+S.BM.RowBytes
jsr YAMultX
pha
tya
clc
adc ZPDstBMPtr
sta ZPDstBMPtr
pla
adc ZPDstBMPtr+1
sta ZPDstBMPtr+1
lda CB.Cache+S.CB.MODE
bit #S.CB.MODE.C16
bne SETPIXEL.C16
SETPIXEL.MONO lda CB.Cache+S.CB.X1
pha
and #$7 MOD 7
tax
pla
lsr CB.Cache+S.CB.X1
ror
lsr CB.Cache+S.CB.X1
ror
lsr CB.Cache+S.CB.X1
ror
clc
adc ZPDstBMPtr
sta ZPDstBMPtr
lda CB.Cache+S.CB.X1
adc ZPDstBMPtr+1
sta ZPDstBMPtr+1
lda CB.Cache+S.CB.OP
* cmp #S.CB.OP.XOR
beq SETPIXEL.MONO.XOR
lda CB.Cache+S.CB.COLOR
bne SETPIXEL.MONO.WHITE
SETPIXEL.MONO.BLACK
lda (ZPDstBMPtr)
and Mono.NMasks,x
sta (ZPDstBMPtr)
rts
SETPIXEL.MONO.WHITE
lda (ZPDstBMPtr)
ora Mono.Masks,x
sta (ZPDstBMPtr)
rts
SETPIXEL.MONO.XOR
lda (ZPDstBMPtr)
eor Mono.Masks,x
sta (ZPDstBMPtr)
rts
SETPIXEL.C16
*--------------------------------------
GETPIXEL
*--------------------------------------
HLINE
*--------------------------------------
VLINE
*--------------------------------------
FILLRECT
*--------------------------------------
* BitBlt
* S.CB.X1 : SrcX1 in bitmap/mask
* S.CB.Y1 : SrcY1
* S.CB.SrcW : width
* S.CB.SrcH : height
* S.CB.DstX : Destination X (screen)
* S.CB.DstY : Destination Y (screen)
* S.CB.SrcPtr : pointer to S.BM
* S.CB.SrcPtr+1 = 0, hMem in S.CB.SrcPtr
* S.CB.DstPtr : pointer to Save Buffer
*--------------------------------------
BITBLT >LDYA CB.CACHE+S.CB.SrcPtr
bne BITBLT.1
tya
jsr GO.GetMemPtr.A
BITBLT.1 >STYA ZPSrcBMPtr
*--------------------------------------
* In:
* S.CB.SrcW
* S.CB.SrcH
* Out:
* S.CB.DstPtr : Buffer Size (in bytes)
*--------------------------------------
GETRECTBUFSIZE
*--------------------------------------
* In:
* S.CB.S.CB.FONT : hFont
* S.CB.SrcPtr : Ptr to Text
* S.CB.DstPtr : Buffer Size (in bytes)
* Out:
* A=hBM
*--------------------------------------
DRAWTEXT lda CB.Cache+S.CB.hFONT
jsr GO.GetMemPtr.A
>STYA ZPFontPtr
ldy #S.FON-1
.1 lda (ZPFontPtr),y
sta FON.Cache,y
dey
bpl .1
lda ZPFontPtr
clc
adc #S.FON
sta ZPFontPtr
bcc .2
inc ZPFontPtr+1
.2 >LDYA CB.Cache+S.CB.SrcPtr
>STYA TXTPTR
lda S.BM.F.BBP1
sta DstBM.Cache+S.BM.F
stz DstBM.Cache+S.BM.W
stz DstBM.Cache+S.BM.W+1
lda FON.Cache+S.FON.PixH
sta DstBM.Cache+S.BM.H
stz DstBM.Cache+S.BM.H+1
.3 jsr TXTPTR.GetNext
beq .4
jsr FON.GetChar
lda (ZPCharPtr) Get Char PixelW
sec
adc DstBM.Cache+S.BM.W
sta DstBM.Cache+S.BM.W
bcc .3
inc DstBM.Cache+S.BM.W+1
bra .3
.4 jsr BM.Create
bcs .9
sta .8+1 save hBM, ZPDstBMPtr=BMData
>LDYA CB.Cache+S.CB.SrcPtr
>STYA TXTPTR
stz GWORD reset Col index in BM
stz GWORD+1 reset Bit index in Col
.5 jsr TXTPTR.GetNext
beq .8
jsr FON.GetChar
lda (ZPCharPtr) Char PixW
sta GBYTE
ldy #1 Char ByteW
lda (ZPCharPtr),y
sta GBYTE2
>LDYA ZPDstBMPtr
>STYA ZPTmpPtr
lda FON.Cache+S.FON.PixH
.6 pha
ldx GWORD+1 Get Bit Index for shifting
ldy #2
lda (ZPCharPtr),y
pla
dec
bne .6
bra .5
.8 lda #$ff SELF MODIFIED
clc
.9 rts
*--------------------------------------
FON.GetChar cmp FON.Cache+S.FON.Last
bcc .1
bne .2
.1 sec
sbc FON.Cache+S.FON.First
bcs .3
.2 lda FON.Cache+S.FON.Default
.3 asl
php
clc
adc ZPFontPtr
sta ZPCharPtr
adc ZPFontPtr+1
sta ZPCharPtr+1
plp
bcc .8
inc ZPCharPtr+1
.8 rts
*--------------------------------------
BM.Create lda DstBM.Cache+S.BM.W
ldx DstBM.Cache+S.BM.W+1
bit #7
beq .1
and #7
clc
adc #8
bcc .1
inx
.1 sta DstBM.Cache+S.BM.RowBytes
txa
lsr
ror DstBM.Cache+S.BM.RowBytes
lsr
ror DstBM.Cache+S.BM.RowBytes
lsr
ror DstBM.Cache+S.BM.RowBytes
>LDYA DstBM.Cache+S.BM.H
ldx DstBM.Cache+S.BM.RowBytes
jsr YAMultX
pha
tya
clc
adc #S.BM
tay
pla
adc /S.BM
jsr GO.GetMem.YA
bcs .9
>STYA ZPDstBMPtr
ldy #S.BM-1
.2 lda DstBM.Cache,y
sta (ZPDstBMPtr),y
dey
bpl .2
lda ZPDstBMPtr
* clc
adc #S.BM
sta ZPDstBMPtr
bcc .8
inc ZPDstBMPtr+1
.8 txa hBM
clc
.9 rts
*--------------------------------------
* to move in LC or ZP/STK
*--------------------------------------
TXTPTR.GetNext sta CLRREADAUX
lda (TXTPTR)
sta SETREADAUX
beq .9
inc TXTPTR
bne .9
inc TXTPTR+1
.9 rts
*--------------------------------------
* IN:
* Y,A = num1 (16)
* X = num2 (8)
* OUT:
* Y,A = (Y,A) * X
*--------------------------------------
YAMultX stx GBYTE
sty GWORD
sta GWORD+1
ldy #0 Result LO
tya Result HI
bra .3
.1 pha
tya
clc
adc GWORD
tay
pla
adc GWORD+1
.2 asl GWORD
rol GWORD+1
.3 lsr GBYTE
bcs .1
bne .2
rts
*--------------------------------------
GO.GetMem.YA ldx #SYS.GetMem.YA
.HS 2C BIT ABS
GO.GetMemPtr.A ldx #SYS.GetMemPtr.A
GO.Kernel jmp ($E000,x)
*--------------------------------------
Mono.NMasks .DA #%11111110
.DA #%11111101
.DA #%11111011
.DA #%11110111
.DA #%11101111
.DA #%11011111
.DA #%10111111
.DA #%01111111
*--------------------------------------
Mono.Masks .DA #%00000001
.DA #%00000010
.DA #%00000100
.DA #%00001000
.DA #%00010000
.DA #%00100000
.DA #%01000000
.DA #%10000000
*--------------------------------------
CB.Cache .BS S.CB
FON.Cache .BS S.FON
DstBM.Cache .BS S.BM
GBYTE .BS 1
GBYTE2 .BS 1
GWORD .BS 2
*-------------------------------------- *--------------------------------------
.EP .EP
GUIOSD.END .EQ * GUIOSD.END .EQ *
@ -478,5 +68,5 @@ DS.END
.ED .ED
*-------------------------------------- *--------------------------------------
MAN MAN
SAVE /A2OSX.SRC/SBIN/GUI/GUIOSD SAVE /A2OSX.SRC/SBIN/GUIOSD
ASM ASM

6
SBIN/SHELL.S.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000

6
SYS/KERNEL.S.ARG.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*/-------------------------------------- */--------------------------------------
* # GetArg.A * # GetArg.A
* ## In: * ## In:

9
SYS/KERNEL.S.CORE.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*-------------------------------------- *--------------------------------------
CORE.Run lda CORE.PSCount CORE.Run lda CORE.PSCount
sta CORE.Counter sta CORE.Counter
@ -86,7 +84,8 @@ CORE.Run lda CORE.PSCount
.7 jsr CORE.PSLeave Save ZP & Ptrs .7 jsr CORE.PSLeave Save ZP & Ptrs
.8 dec CORE.Counter .8 dec CORE.Counter
bne .1 beq CORE.Events
jmp .1
*-------------------------------------- *--------------------------------------
CORE.Events jsr CORE.GetEvents CORE.Events jsr CORE.GetEvents

17
SYS/KERNEL.S.CTRL.txt
View File

@ -1,19 +1,22 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1 *--------------------------------------
AUTO 6
* CONTROL SECTION : * CONTROL SECTION :
.LIST ON .LIST ON
*-------------------------------------- *--------------------------------------
A2osX.CORE.S .EQ A2osX.GP-A2osX.CORE A2osX.MAIN.S .EQ A2osX.AUX-A2osX.MAIN
A2osX.AUX.S .EQ A2osX.GP-A2osX.AUX
A2osX.GP.S .EQ A2osX.D1-A2osX.GP A2osX.GP.S .EQ A2osX.D1-A2osX.GP
A2osX.D1.S .EQ A2osX.D2-A2osX.D1 A2osX.D1.S .EQ A2osX.D2-A2osX.D1
A2osX.D2.S .EQ A2osX.E0-A2osX.D2 A2osX.D2.S .EQ A2osX.E0-A2osX.D2
A2osX.E0.S .EQ A2osX.E0.E-A2osX.E0 A2osX.E0.S .EQ A2osX.E0.E-A2osX.E0
*-------------------------------------- *--------------------------------------
.DO A2osX.CORE.S>$700 .DO A2osX.MAIN.S>$700
* ERROR:CORE too big * ERROR:MAIN too big
.FIN
.DO A2osX.AUX.S>$C00
* ERROR:AUX too big
.FIN .FIN
.DO A2osX.D1.S>$1000 .DO A2osX.D1.S>$1000
* ERROR:BNK1 too big * ERROR:BNK1 too big

6
SYS/KERNEL.S.D01.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*-------------------------------------- *--------------------------------------
* A2osX.DIIDrv * A2osX.DIIDrv
* X = DEVMGR.cmd * X = DEVMGR.cmd

6
SYS/KERNEL.S.DEV.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*/-------------------------------------- */--------------------------------------
* # GetDevByID.A * # GetDevByID.A
* ## IN: * ## IN:

6
SYS/KERNEL.S.DIRENT.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*/-------------------------------------- */--------------------------------------
* # OpenDir.YA * # OpenDir.YA
* ## In: * ## In:

6
SYS/KERNEL.S.ENV.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*/-------------------------------------- */--------------------------------------
* # ExpandStr.YA * # ExpandStr.YA
* ## In: * ## In:

6
SYS/KERNEL.S.FIO.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*/-------------------------------------- */--------------------------------------
* # LoadTxtFile.YA * # LoadTxtFile.YA
* Load TXT a file in memory (with ending 0) * Load TXT a file in memory (with ending 0)

6
SYS/KERNEL.S.GP.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*-------------------------------------- *--------------------------------------
* SYSCALL (AUXLC to AUXLC) * SYSCALL (AUXLC to AUXLC)
* Used by user & kernel for inter bank Calls * Used by user & kernel for inter bank Calls

31
SYS/KERNEL.S.INIT.txt
View File

@ -1,10 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*--------------------------------------
* Kernel ZP Aux
*-------------------------------------- *--------------------------------------
ZPPtr1 .EQ ZPKERNEL ZPPtr1 .EQ ZPKERNEL
ZPPtr2 .EQ ZPKERNEL+2 ZPPtr2 .EQ ZPKERNEL+2
@ -26,17 +22,31 @@ Kernel.Init sei
Kernel.Init2 >LDAXI MSG.Init2 Kernel.Init2 >LDAXI MSG.Init2
jsr PrintFAX jsr PrintFAX
>LDAXI MSG.CORE >LDAXI MSG.MAIN
jsr PrintFAX jsr PrintFAX
>LDYAI A2osX.CORE >LDYAI A2osX.MAIN
>STYA ZPPtr1 >STYA ZPPtr1
>LDYAI CORE.Run >LDYAI CORE.Run
>STYA ZPPtr2 >STYA ZPPtr2
>LDYAI A2osX.CORE.S^$FFFF >LDYAI A2osX.MAIN.S^$FFFF
>STYA ZPPtr3 >STYA ZPPtr3
jsr Kernel.Move jsr Kernel.Move
>LDAXI MSG.AUX
jsr PrintFAX
>LDYAI A2osX.AUX
>STYA A1L Src Start Address (MAIN)
>LDYAI A2osX.GP
>STYA A2L Src End Address (MAIN)
>LDYAI X.GUIOSD
>STYA A4L Dst Address (AUX)
sec Main To Aux
jsr AuxMove
>LDAXI MSG.GP >LDAXI MSG.GP
jsr PrintFAX jsr PrintFAX
@ -1033,7 +1043,8 @@ TskMgrInit >LDYAI MSG.TSK
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
MSG.Init2 >CSTR "A2osX[Stage2]:Init\nInstalling KERNEL...\n" MSG.Init2 >CSTR "A2osX[Stage2]:Init\nInstalling KERNEL...\n"
MSG.CORE >CSTR " - $1100 Core...\n" MSG.MAIN >CSTR " - $1100 Main...\n"
MSG.AUX >CSTR " - $0C00 Aux...\n"
MSG.GP >CSTR " - $BD00 Global Page...\n" MSG.GP >CSTR " - $BD00 Global Page...\n"
MSG.D1 >CSTR " - $D000 Bank1...\n" MSG.D1 >CSTR " - $D000 Bank1...\n"
MSG.D2 >CSTR " - $D000 Bank2...\n" MSG.D2 >CSTR " - $D000 Bank2...\n"

6
SYS/KERNEL.S.IRQ.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*-------------------------------------- *--------------------------------------
* called directly by IRQ Vector $FFFE in AuxLC * called directly by IRQ Vector $FFFE in AuxLC
* Must keep: * Must keep:

6
SYS/KERNEL.S.JMP.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*-------------------------------------- *--------------------------------------
* $E000-E0FF K.SYSCALL.JMP Jmp Table * $E000-E0FF K.SYSCALL.JMP Jmp Table
*-------------------------------------- *--------------------------------------

6
SYS/KERNEL.S.MATH.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*/-------------------------------------- */--------------------------------------
* # FAdd,FSub,FMult,FDiv,FPwr * # FAdd,FSub,FMult,FDiv,FPwr
* Return X+Y, X-Y, X*Y, X/Y, X^Y * Return X+Y, X-Y, X*Y, X/Y, X^Y

8
SYS/KERNEL.S.MEM.txt
View File

@ -1,10 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*--------------------------------------
* !!!!!! DO NOT USE ZPPtrs !!!!!
*-------------------------------------- *--------------------------------------
ZPMemMgrSPtr .EQ ZPMEMMGR Pointer To Slot selected ZPMemMgrSPtr .EQ ZPMEMMGR Pointer To Slot selected
ZPMemMgrTmp1 .EQ ZPMEMMGR+2 ZPMemMgrTmp1 .EQ ZPMEMMGR+2

6
SYS/KERNEL.S.PFT.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*-------------------------------------- *--------------------------------------
* K.PFTAdd * K.PFTAdd
* In : * In :

6
SYS/KERNEL.S.PS.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*/-------------------------------------- */--------------------------------------
* # ExecPSNewEnv.YA * # ExecPSNewEnv.YA
* # ExecPS.YA (Blocking Parent PID) * # ExecPS.YA (Blocking Parent PID)

6
SYS/KERNEL.S.STAT.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*-------------------------------------- *--------------------------------------
* # FStat * # FStat
* Return information about a hfile * Return information about a hfile

6
SYS/KERNEL.S.STDIO.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*/-------------------------------------- */--------------------------------------
* # FPutC.AY * # FPutC.AY
* Print A (char) to Node * Print A (char) to Node

6
SYS/KERNEL.S.STDLIB.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*/-------------------------------------- */--------------------------------------
* # StrToF * # StrToF
* Convert String to 40 bits Float * Convert String to 40 bits Float

6
SYS/KERNEL.S.STRING.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*/-------------------------------------- */--------------------------------------
* # StrLen.YA * # StrLen.YA
* Returns Length of C-String * Returns Length of C-String

6
SYS/KERNEL.S.TIME.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
*-------------------------------------- *--------------------------------------
* https://www.cise.ufl.edu/~cop4600/cgi-bin/lxr/http/source.cgi/lib/ansi/gmtime.c * https://www.cise.ufl.edu/~cop4600/cgi-bin/lxr/http/source.cgi/lib/ansi/gmtime.c
*-------------------------------------- *--------------------------------------

16
SYS/KERNEL.S.txt
View File

@ -1,8 +1,6 @@
PR#3 NEW
PREFIX /A2OSX.BUILD PREFIX /A2OSX.BUILD
LOMEM $A00 AUTO 4,1
INC 1
AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
@ -14,13 +12,17 @@ AUTO 6
.INB INC/IO.I .INB INC/IO.I
.INB INC/PRODOS.I .INB INC/PRODOS.I
.INB INC/MLI.ERR.I .INB INC/MLI.ERR.I
.INB INC/GUI.I
.INB /A2OSX.SRC/SYS/KERNEL.S.INIT .INB /A2OSX.SRC/SYS/KERNEL.S.INIT
.INB /A2OSX.SRC/X.PRINTF.S .INB /A2OSX.SRC/X.PRINTF.S
A2osX.CORE .PH $1100 A2osX.MAIN .PH $1100
.INB /A2OSX.SRC/SYS/KERNEL.S.CORE .INB /A2OSX.SRC/SYS/KERNEL.S.CORE
.INB /A2OSX.SRC/SYS/KERNEL.S.D01 .INB /A2OSX.SRC/SYS/KERNEL.S.D01
.EP .EP
A2osX.AUX .PH $0C00
.INB /A2OSX.SRC/SYS/KERNEL.S.OSD
.EP
A2osX.GP .PH $BD00 A2osX.GP .PH $BD00
.INB /A2OSX.SRC/SYS/KERNEL.S.GP .INB /A2OSX.SRC/SYS/KERNEL.S.GP
.EP .EP
@ -48,9 +50,7 @@ A2osX.E0 .PH $E000
.INB /A2OSX.SRC/SYS/KERNEL.S.JMP .INB /A2OSX.SRC/SYS/KERNEL.S.JMP
.INB /A2OSX.SRC/SYS/KERNEL.S.IRQ .INB /A2OSX.SRC/SYS/KERNEL.S.IRQ
.INB /A2OSX.SRC/SYS/KERNEL.S.MEM .INB /A2OSX.SRC/SYS/KERNEL.S.MEM
.LIST ON
DevMgr.FreeMem .EQ * DevMgr.FreeMem .EQ *
.LIST OFF
.EP .EP
A2osX.E0.E .EQ * A2osX.E0.E .EQ *
.INB /A2OSX.SRC/SYS/KERNEL.S.CTRL .INB /A2OSX.SRC/SYS/KERNEL.S.CTRL

2
SYS/KM.VSDRIVE.S.txt
View File

@ -121,7 +121,7 @@ SSC.Detect stz TmpPtr1
jsr VSDRIVE.Wait jsr VSDRIVE.Wait
lda #SSC.CTL.CLKEXT+SSC.CTL.B115200+SSC.CTL.8D+SSC.CTL.1S+SSC.CMD.NOP lda #SSC.CTL.CLKINT+SSC.CTL.B115200+SSC.CTL.8D+SSC.CTL.1S+SSC.CMD.NOP
sta SSC.CTL,x sta SSC.CTL,x
jsr VSDRIVE.Wait jsr VSDRIVE.Wait

2
X.FNT.I.txt
View File

@ -46,4 +46,4 @@ S.FNT.dfReserved13 .EQ 132
S.FNT.dfCharTable3 .EQ 148 S.FNT.dfCharTable3 .EQ 148
*-------------------------------------- *--------------------------------------
MAN MAN
SAVE /A2OSX.BUILD/X.FNT.I SAVE /A2OSX.BUILD/ROOT/X.FNT.I

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