mirror of
https://github.com/A2osX/A2osX.git
synced 2024-12-25 04:30:59 +00:00
A2osX.95:LATEST & LAST bugfixes
This commit is contained in:
parent
adc09c0812
commit
335cd12297
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
BIN
.Floppies/ProDOSFX.BOOTXD.woz
Normal file
BIN
.Floppies/ProDOSFX.BOOTXD.woz
Normal file
Binary file not shown.
48
BASIC.FX/FORMAT.S.txt
Normal file
48
BASIC.FX/FORMAT.S.txt
Normal file
@ -0,0 +1,48 @@
|
||||
NEW
|
||||
AUTO 3,1
|
||||
.LIST OFF
|
||||
.OP 65c02
|
||||
.OR $2000
|
||||
.TF BIN/fmt
|
||||
*--------------------------------------
|
||||
.MA DEBUG
|
||||
:1 bit $C000
|
||||
bpl :1
|
||||
sta $C010
|
||||
.EM
|
||||
*--------------------------------------
|
||||
.INB inc/bs.i
|
||||
.INB inc/mon.i
|
||||
*--------------------------------------
|
||||
HEADER cld Allows BRUN at ORG=$2000
|
||||
jmp CODE.START for debugging without relocation
|
||||
.DA #CMDBITS0.FNOPT+CMDBITS0.CRFLG
|
||||
.DA #CMDBITS1.A+CMDBITS1.B+CMDBITS1.E+CMDBITS1.F+CMDBITS1.SD+CMDBITS1.F
|
||||
.DA 0 spare
|
||||
.DA CODE.END
|
||||
.DA DATA.END
|
||||
.DA 0
|
||||
.DA 0 spare....16 bytes header
|
||||
*--------------------------------------
|
||||
R.MSG.USAGE .DA MSG.USAGE
|
||||
.DA 0
|
||||
*--------------------------------------
|
||||
CODE.START
|
||||
|
||||
ldy R.MSG.USAGE
|
||||
lda R.MSG.USAGE+1
|
||||
ldx #GP.TBOX.PrintF
|
||||
jsr GP.TBOX
|
||||
|
||||
.8 clc
|
||||
rts
|
||||
|
||||
CODE.END .EQ *
|
||||
*--------------------------------------
|
||||
MSG.USAGE .CZ -"\r\rHello from fmt EXT command.\r\r"
|
||||
|
||||
DATA.END .EQ *
|
||||
*--------------------------------------
|
||||
MAN
|
||||
SAVE usr/src/basic.fx/fmt.s
|
||||
ASM
|
@ -16,7 +16,7 @@ X.COPY.TO.DEST .EQ 0
|
||||
X.DELETE.SOURCE .EQ 0
|
||||
X.RESET.SRC.DIR .EQ 0 single pass
|
||||
*--------------------------------------
|
||||
DBG .EQ 1
|
||||
DBG .EQ 0
|
||||
*--------------------------------------
|
||||
.DUMMY
|
||||
.OR ZPBIN
|
||||
|
@ -1062,25 +1062,24 @@ LDR.CheckDiskID ldy #5
|
||||
bra .8
|
||||
*--------------------------------------
|
||||
LDR.FindFreeDevPtr
|
||||
ldx #LDR.DEVPTRS.CNT-1
|
||||
ldx #LDR.DEVPTRS.CNT
|
||||
LDR.FindFreeDevPtrNext
|
||||
dex
|
||||
bmi .9
|
||||
|
||||
.1 ldy LDR.DEVPTRS.IDX,x
|
||||
ldy LDR.DEVPTRS.IDX,x
|
||||
lda GP.DEVPTRS,y device driver table 1
|
||||
cmp #XDOS.NoDevice
|
||||
bne .2
|
||||
bne LDR.FindFreeDevPtrNext
|
||||
|
||||
lda GP.DEVPTRS+1,y
|
||||
cmp /XDOS.NoDevice
|
||||
beq .8
|
||||
bne LDR.FindFreeDevPtrNext
|
||||
|
||||
.2 dex
|
||||
bpl .1
|
||||
|
||||
sec
|
||||
clc
|
||||
rts
|
||||
|
||||
.8 clc
|
||||
.9 sec
|
||||
rts
|
||||
*--------------------------------------
|
||||
LDR.SetDevID ldy #$FE check attributes byte.
|
||||
@ -1437,5 +1436,5 @@ LDR.SlotDevCnt .BS 7
|
||||
*--------------------------------------
|
||||
MAN
|
||||
SAVE usr/src/prodos.fx/prodos.s.ldr
|
||||
LOAD usr/src/prodos.fx/pdos8m.s
|
||||
LOAD usr/src/prodos.fx/prodos.s
|
||||
ASM
|
||||
|
28
ROOT/vttest.txt
Normal file
28
ROOT/vttest.txt
Normal file
@ -0,0 +1,28 @@
|
||||
NEW
|
||||
AUTO 3,1
|
||||
#!/bin/sh
|
||||
|
||||
# echo -e \e(B
|
||||
echo -e \e)0
|
||||
|
||||
echo -e \x0E
|
||||
echo "lqqqqqqqqqqk"
|
||||
echo -e "x\x0F Text Box \x0Ex"
|
||||
echo "mqqqqqqqqqqj"
|
||||
echo -e \x0F
|
||||
|
||||
echo -e "`abcdefghijklmnopqrstuvqxyz{\x7C}~"
|
||||
echo -e "\x0E`abcdefghijklmnopqrstuvqxyz{\x7C}~\x0F"
|
||||
|
||||
echo -e "`abcdefghijklmnopqrstuvqxyz{\x7C}~"
|
||||
echo -e "\x0E`abcdefghijklmnopqrstuvqxyz{\x7C}~\x0F"
|
||||
|
||||
ECHO -e \e[7m INVERSE inverse \e[0m
|
||||
pause
|
||||
echo -e Hide Cursor...\e[?25l
|
||||
pause
|
||||
echo -e Show Cursor...\e[?25h
|
||||
pause
|
||||
|
||||
MAN
|
||||
TEXT root/vttest
|
@ -417,8 +417,6 @@ READ php
|
||||
jsr IO.ExecA
|
||||
bcs READWRITE.99
|
||||
|
||||
lda UD.IO.DoDMA,x
|
||||
|
||||
.1 lda UD.IO.Status,x
|
||||
bmi .1
|
||||
|
||||
@ -524,8 +522,6 @@ WRITE php
|
||||
jsr IO.ExecA
|
||||
bcs READWRITE.99
|
||||
|
||||
lda UD.IO.DoDMA,x
|
||||
|
||||
.1 lda UD.IO.Status,x
|
||||
bmi .1
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user