diff --git a/.Floppies/A2OSX.BUILD.po b/.Floppies/A2OSX.BUILD.po index e653aa5d..bb5e06db 100644 Binary files a/.Floppies/A2OSX.BUILD.po and b/.Floppies/A2OSX.BUILD.po differ diff --git a/.Floppies/A2OSX.TEST.po b/.Floppies/A2OSX.TEST.po index 39aafc53..bf29ce44 100644 Binary files a/.Floppies/A2OSX.TEST.po and b/.Floppies/A2OSX.TEST.po differ diff --git a/BIN/ATBROWSE.S.txt b/BIN/ATBROWSE.S.txt index dfc3b4e9..4661572c 100644 --- a/BIN/ATBROWSE.S.txt +++ b/BIN/ATBROWSE.S.txt @@ -23,7 +23,7 @@ CS.START cld .DA 0 .DA CS.END-CS.START CS .DA DS.END-DS.START DS - .DA #16 SS + .DA #64 SS .DA #4 ZP .DA 0 *-------------------------------------- @@ -44,17 +44,23 @@ CS.INIT clc rts *-------------------------------------- CS.RUN >STZ.G P.GetInfo Sync + lda #ATGetInfo >STA.G P.GetInfo+1 + + >LEA.G P.GetInfo + >DEBUG jsr A2osX.ATKCALL - bcc .10 + bcc CS.RUN.ATKOK + pha >LDYA L.MSG.NOATK >SYSCALL printf pla sec -.99 rts -.10 >LDA.G P.GetInfo+$E NODE + rts + +CS.RUN.ATKOK >LDA.G P.GetInfo+$E NODE >PUSHA >PUSHW.G P.GetInfo+$8 NET >LDYA L.MSG.NETNODE @@ -73,19 +79,26 @@ CS.RUN >STZ.G P.GetInfo Sync >STYA.G P.LookupName+$10 BufLen >SYSCALL getmem bcs .99 + >STYA.G P.LookupName+$12 BufPtr >STYA ZPPTR1 txa >STA.G hBuf + lda #16 >STA.G P.LookupName+$16 MaxMatch + + >LEA.G P.LookupName jsr A2osX.ATKCALL - bcs .99 +.99 bcs .9 + >LDA.G P.LookupName+$17 beq .8 + >LDYA L.MSG.DUMP0 >SYSCALL printf bcs .9 + .1 lda ZPPTR1 clc adc #5 @@ -96,12 +109,15 @@ CS.RUN >STZ.G P.GetInfo Sync >PUSHW ZPPTR2 ldy #4 + .2 >PUSHB (ZPPTR1),y dey bpl .2 + >LDYA L.MSG.DUMP >SYSCALL printf bcs .9 + lda ZPPTR2 sec adc (ZPPTR2) @@ -111,7 +127,9 @@ CS.RUN >STZ.G P.GetInfo Sync sta ZPPTR1+1 >DEC.G P.LookupName+$17 bne .2 + lda #0 + .8 sec .9 rts *-------------------------------------- @@ -142,5 +160,5 @@ DS.END .ED *-------------------------------------- MAN -SAVE USR/SRC/BIN/BIN/ATBROWSE.S +SAVE USR/SRC/BIN/ATBROWSE.S ASM diff --git a/INC/IO.I.txt b/INC/IO.I.txt index 65ee14e4..10779725 100644 --- a/INC/IO.I.txt +++ b/INC/IO.I.txt @@ -1,6 +1,5 @@ NEW -PREFIX -AUTO 4,1 + AUTO 3,1 .LIST OFF *-------------------------------------- * Software Switches @@ -39,7 +38,7 @@ RDHIRES .EQ $C01D R RDALTCHAR .EQ $C01E R RD80DISP .EQ $C01F R *TAPEOUT .EQ $C020 W -newvideo .EQ $C029 video mode select +newvideo .EQ $C029 video mode select SPEAKER .EQ $C030 W, toggle speaker diaphragm *STROBE .EQ $C040 R, generate .5 uS low pulse @ Game pin 5 *RDVBLIIC .EQ $C05A R, VBL switch Status (IIc) @@ -64,8 +63,6 @@ SETHIRES .EQ $C057 W SETAN3 .EQ $C05E W, Set annunciator-3 output to 0 CLRAN3 .EQ $C05F W, Set annunciator-3 output to 1 -*DISVBLIIC .EQ $C05A W, Disable VBL switch (IIc) -*ENBVBLIIC .EQ $C05B W, Enable VBL switch (IIc) SETDHIRES .EQ $C05E W, if IOUDIS Set, turn on double-hires CLRDHIRES .EQ $C05F W, if IOUDIS Set, turn off double-hires @@ -79,7 +76,7 @@ SOLIDAPPLE .EQ $C062 R *PADDLE1 .EQ $C065 R, bit 7 = status of pdl-1 timer *PADDLE2 .EQ $C066 R, bit 7 = status of pdl-2 timer *PADDLE3 .EQ $C067 R, bit 7 = status of pdl-3 timer -statereg .EQ $C068 memory state register +statereg .EQ $C068 memory state register *PDLTRIG .EQ $C070 W, trigger paddles SETIOUDIS .EQ $C07E W, enable DHIRES & disable $C058-5F diff --git a/SYS/KERNEL.S.INIT.txt b/SYS/KERNEL.S.INIT.txt index cc8370fd..861c38f1 100644 --- a/SYS/KERNEL.S.INIT.txt +++ b/SYS/KERNEL.S.INIT.txt @@ -449,13 +449,18 @@ CPU.Init.6502 >PUSHBI 0 lda MACHID and #MACHID.T - cmp #MACHID.T.IIc + eor #MACHID.T.IIc bne .1 - + sta CLRIOUDIS + lda IO.IIC.RDVBLMSK + asl + + sta CLRIOUDIS + sta IO.IIC.ENVBL .1 bit VBL - bpl .2 + bpl .1 .2 bit VBL bmi .2 @@ -481,11 +486,14 @@ CPU.Init.6502 >PUSHBI 0 .6 lda MACHID and #MACHID.T - cmp #MACHID.T.IIc + eor #MACHID.T.IIc bne .60 + lda IO.IIC.CLRVBLIRQ + bcs .60 + sta IO.IIC.DISVBL .60 plp diff --git a/SYS/KERNEL.S.txt b/SYS/KERNEL.S.txt index 306d34c7..ba906c2f 100644 --- a/SYS/KERNEL.S.txt +++ b/SYS/KERNEL.S.txt @@ -8,6 +8,7 @@ NEW .INB INC/MACROS.I .INB INC/A2OSX.I .INB INC/IO.I + .INB INC/IO.IIC.I .INB INC/MLI.I .INB INC/MLI.E.I .INB INC/NET.TELNET.I