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

BASIC:some Bugs fixed: PR,IN...., RENAME still buggy

Browse Source
This commit is contained in:
burniouf 2022-03-27 23:05:28 +02:00
parent 60620b33f5
commit d20a7c8277
6 changed files with 422 additions and 422 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

2
BASIC.FX/BASIC.S.A.txt
View File

@ -1265,7 +1265,7 @@ LA29F sta GP.SBUFADR+1
sta XBBEE,x sta XBBEE,x
stz GP.SBUFADR stz GP.SBUFADR
lda XBBF6,x lda BS.REFNUMs,x
sta GP.MLIMRKEOFBUF.REFNUM sta GP.MLIMRKEOFBUF.REFNUM
lda #MLI.C.SETBUF lda #MLI.C.SETBUF
jsr GP.GOSYSTEM jsr GP.GOSYSTEM

5
BASIC.FX/BASIC.S.B.txt
View File

@ -645,17 +645,19 @@ LA6BA stz GP.FoundBITS
stz GP.FoundBITS+1 stz GP.FoundBITS+1
stz BS.CMDBUF stz BS.CMDBUF
stz MLI.PATHBUF stz MLI.PATHBUF
lda GP.VDEFSLT lda GP.VDEFSLT
sta GP.ParamS sta GP.ParamS
lda GP.VDEFDRV lda GP.VDEFDRV
sta GP.ParamD sta GP.ParamD
lda AS.HIMEM+1 lda AS.HIMEM+1
sta XBBE3 sta XBBE3
ldx GP.XLEN ldx GP.XLEN
inx inx
inx inx
stx BS.GetCharMax stx BS.GetCharMax
lda GP.AllowedBITS lda GP.AllowedBITS
beq LA744 beq LA744
@ -708,6 +710,7 @@ LA70B dex
bcs LA73A bcs LA73A
dex dex
* >DEBUG
jsr BS.GetCharSpaceSep jsr BS.GetCharSpaceSep
bne LA73A bne LA73A

24
BASIC.FX/BASIC.S.C.txt
View File

@ -750,7 +750,7 @@ LB2F2 cmp XBBEE,x
LB2FB tya LB2FB tya
sta XBBEE,x sta XBBEE,x
lda XBBF6,x lda BS.REFNUMs,x
sta GP.MLIMRKEOFBUF.REFNUM sta GP.MLIMRKEOFBUF.REFNUM
lda #MLI.C.SETBUF lda #MLI.C.SETBUF
jsr GP.GOSYSTEM jsr GP.GOSYSTEM
@ -775,7 +775,7 @@ LB30E sta XBBE3
rts rts
LB327 ldx GP.OSYSBUF+1 LB327 ldx GP.OSYSBUF+1
stx XBBF6 stx BS.REFNUMs
lda GP.OREFNUM lda GP.OREFNUM
sta XBBFE sta XBBFE
@ -810,7 +810,7 @@ LB36B lda GP.EXECACTV
sta GP.EXECFILE sta GP.EXECFILE
ldx #$08 ldx #$08
lda XBBF6,x lda BS.REFNUMs,x
jsr LB515 jsr LB515
LB37B rts LB37B rts
@ -937,7 +937,7 @@ LB443 lda #$00
lda XBBE3 lda XBBE3
sta XBBEF,x sta XBBEF,x
lda GP.OREFNUM lda GP.OREFNUM
sta XBBF7,x sta BS.REFNUMs+1,x
inc GP.OPENCNT inc GP.OPENCNT
LB45B asl LB45B asl
@ -987,13 +987,13 @@ LB49A ldx GP.OPENCNT
stx GP.EXECFILE stx GP.EXECFILE
LB4A2 stx ZP.PCH LB4A2 stx ZP.PCH
lda XBBF6,x lda BS.REFNUMs,x
jsr LB4D2 jsr LB4D2
bne LB4B3 bne LB4B3
ldx ZP.PCH ldx ZP.PCH
LB4AE lda XBBF6,x LB4AE lda BS.REFNUMs,x
LB4B1 clc LB4B1 clc
rts rts
@ -1016,7 +1016,7 @@ LB4B8 lda GP.EXECACTV
LB4CE lda #BS.E.FNOTOPEN LB4CE lda #BS.E.FNOTOPEN
sec sec
rts rts
*--------------------------------------
LB4D2 asl LB4D2 asl
asl asl
asl asl
@ -1071,12 +1071,12 @@ LB515 sta GP.MLICF.REFNUM
sta XBBEE,x sta XBBEE,x
pla pla
sta XBBEE,y sta XBBEE,y
lda XBBF6,x lda BS.REFNUMs,x
pha pha
lda XBBF6,y lda BS.REFNUMs,y
sta XBBF6,x sta BS.REFNUMs,x
pla pla
sta XBBF6,y sta BS.REFNUMs,y
LB53F stz MLI.LEVEL LB53F stz MLI.LEVEL
@ -1099,7 +1099,7 @@ LB562 ldx GP.OPENCNT
beq LB573 beq LB573
stx GP.EXECFILE stx GP.EXECFILE
lda XBBF6,x lda BS.REFNUMs,x
jsr LB515 jsr LB515
bcc LB562 bcc LB562

810
BASIC.FX/BASIC.S.D.txt
View File

@ -1,10 +1,5 @@
NEW NEW
AUTO 3,1 AUTO 3,1
*--------------------------------------
.LIST ON
BS.FREESPACE .EQ $B861-*
.BS BS.FREESPACE
.LIST OFF
*-------------------------------------- *--------------------------------------
BS.SYSIOVECTS .DA BS.IO.OUT BS.SYSIOVECTS .DA BS.IO.OUT
.DA BS.IO.IN .DA BS.IO.IN
@ -100,106 +95,106 @@ BS.AS.KW .DA #$80
.DA #$BE .DA #$BE
.DA #$BF .DA #$BF
*-------------------------------------- *--------------------------------------
BS.KW.LEN.OLD .DA #$47 *BS.KW.LEN.OLD .DA #$47
.DA #$5F * .DA #$5F
.DA #$18 * .DA #$18
.DA #$30 * .DA #$30
.DA #$15 * .DA #$15
.DA #$BD * .DA #$BD
.DA #$3D * .DA #$3D
.DA #$28 * .DA #$28
.DA #$0D * .DA #$0D
.DA #$41 * .DA #$41
.DA #$20 * .DA #$20
.DA #$50 * .DA #$50
.DA #$84 * .DA #$84
.DA #$0D * .DA #$0D
.DA #$04 * .DA #$04
.DA #$46 * .DA #$46
.DA #$6A * .DA #$6A
.DA #$4C * .DA #$4C
.DA #$5C * .DA #$5C
.DA #$35 * .DA #$35
.DA #$A5 * .DA #$A5
.DA #$70 * .DA #$70
.DA #$2D * .DA #$2D
.DA #$12 * .DA #$12
.DA #$65 * .DA #$65
.DA #$39 * .DA #$39
.DA #$41 * .DA #$41
.DA #$88 * .DA #$88
.DA #$1C * .DA #$1C
.DA #$B5 * .DA #$B5
.DA #$D8 * .DA #$D8
*-------------------------------------- *--------------------------------------
BS.KW.TABLE.OLD .AS "BSAVERIFYBLOADELETEBYECATALOGOPENWRITEXECREATEFRESTORENAMEBRUNLOCKCHAIN#FLUSHREADPOSITIONOMONPR#PREFIXCLOSEAPPEND" *BS.KW.TABLE.OLD .AS "BSAVERIFYBLOADELETEBYECATALOGOPENWRITEXECREATEFRESTORENAMEBRUNLOCKCHAIN#FLUSHREADPOSITIONOMONPR#PREFIXCLOSEAPPEND"
*-------------------------------------- *--------------------------------------
BS.KW.JMP.OLD .DA BS.JMP.XTRNADDR $00 *BS.KW.JMP.OLD .DA BS.JMP.XTRNADDR $00
.DA BS.KW.IN * .DA BS.KW.IN
.DA BS.KW.PR * .DA BS.KW.PR
.DA BS.KW.CAT * .DA BS.KW.CAT
.DA BS.KW.FRE * .DA BS.KW.FRE
.DA BS.KW.BYE * .DA BS.KW.BYE
.DA BS.KW.RUN * .DA BS.KW.RUN
.DA BS.KW.BRUN * .DA BS.KW.BRUN
.DA BS.KW.EXEC $10 * .DA BS.KW.EXEC $10
.DA BS.KW.LOAD * .DA BS.KW.LOAD
.DA BS.KW.LOCK * .DA BS.KW.LOCK
.DA BS.KW.OPEN * .DA BS.KW.OPEN
.DA BS.KW.READ * .DA BS.KW.READ
.DA BS.KW.SAVE * .DA BS.KW.SAVE
.DA BS.KW.BLOAD * .DA BS.KW.BLOAD
.DA BS.KW.BSAVE * .DA BS.KW.BSAVE
.DA BS.KW.CHAIN $20 * .DA BS.KW.CHAIN $20
.DA BS.KW.CLOSE * .DA BS.KW.CLOSE
.DA BS.KW.FLUSH * .DA BS.KW.FLUSH
.DA BS.KW.NOMON * .DA BS.KW.NOMON
.DA BS.KW.STORE * .DA BS.KW.STORE
.DA BS.KW.WRITE * .DA BS.KW.WRITE
.DA BS.KW.APPEND * .DA BS.KW.APPEND
.DA BS.KW.CREATE * .DA BS.KW.CREATE
.DA BS.KW.DELETE $30 * .DA BS.KW.DELETE $30
.DA BS.KW.PREFIX * .DA BS.KW.PREFIX
.DA BS.KW.RENAME * .DA BS.KW.RENAME
.DA BS.KW.UNLOCK * .DA BS.KW.UNLOCK
.DA BS.KW.VERIFY * .DA BS.KW.VERIFY
.DA BS.KW.CATALOG * .DA BS.KW.CATALOG
.DA BS.KW.RESTORE * .DA BS.KW.RESTORE
.DA BS.KW.POSITION * .DA BS.KW.POSITION
.DA BS.KW.DASH $40 * .DA BS.KW.DASH $40
*-------------------------------------- *--------------------------------------
BS.KW.PBITS.OLD .DA $8040 IN *BS.KW.PBITS.OLD .DA $8040 IN
.DA $8040 PR * .DA $8040 PR
.DA $0495 CAT * .DA $0495 CAT
.DA $0000 FRE * .DA $0000 FRE
.DA $0000 BYE * .DA $0000 BYE
.DA $0C11 RUN * .DA $0C11 RUN
.DA $F401 BRUN * .DA $F401 BRUN
.DA $0701 EXEC * .DA $0701 EXEC
.DA $0401 LOAD * .DA $0401 LOAD
.DA $0401 LOCK * .DA $0401 LOCK
.DA $142D OPEN * .DA $142D OPEN
.DA $5321 READ * .DA $5321 READ
.DA $0409 SAVE * .DA $0409 SAVE
.DA $F405 BLOAD * .DA $F405 BLOAD
.DA $F40D BSAVE * .DA $F40D BSAVE
.DA $0C01 CHAIN * .DA $0C01 CHAIN
.DA $0001 CLOSE * .DA $0001 CLOSE
.DA $0001 FLUSH * .DA $0001 FLUSH
.DA $0000 NOMON * .DA $0000 NOMON
.DA $0409 STORE * .DA $0409 STORE
.DA $4321 WRITE * .DA $4321 WRITE
.DA $142D APPEND * .DA $142D APPEND
.DA $040D CREATE * .DA $040D CREATE
.DA $0401 DELETE * .DA $0401 DELETE
.DA $0491 PREFIX * .DA $0491 PREFIX
.DA $0403 RENAME * .DA $0403 RENAME
.DA $0401 UNLOCK * .DA $0401 UNLOCK
.DA $0411 VERIFY * .DA $0411 VERIFY
.DA $0495 CATALOG * .DA $0495 CATALOG
.DA $0401 RESTORE * .DA $0401 RESTORE
.DA $0321 POSITION * .DA $0321 POSITION
.DA $0401 DASH * .DA $0401 DASH
*-------------------------------------- *--------------------------------------
BS.KW.OPT .AS "ABELS@FRVD" BS.KW.OPT .AS "ABELS@FRVD"
*-------------------------------------- *--------------------------------------
@ -289,316 +284,312 @@ BS.BIERRTBL .DA #$03
.DA #$0C .DA #$0C
.DA #$08 .DA #$08
*-------------------------------------- *--------------------------------------
* .DA #$00 "Copyright..." (VERIFY with no arg) *BS.ERRCODES.OLD .DA #$54
* .DA #$10 CATALOG header * .DA #$5B
* .DA #$36 CATALOG footer * .DA #$66
* .DA #$6F
* .DA #$75
* .DA #$75
* .DA #$7E
* .DA #$84
* .DA #$8A
* .DA #$91
* .DA #$9B
* .DA #$A8
* .DA #$B4
* .DA #$BF
* .DA #$C9
* .DA #$D1
* .DA #$D9
* .DA #$E1
* .DA #$EC
* .DA #$F3
*-------------------------------------- *--------------------------------------
BS.TBL7.IDX.OLD .DA #$54 *BS.TBL6.OLD .AS -"ACDEFILMNORTU "
.DA #$5B * .DA #$00
.DA #$66
.DA #$6F
.DA #$75
.DA #$75
.DA #$7E
.DA #$84
.DA #$8A
.DA #$91
.DA #$9B
.DA #$A8
.DA #$B4
.DA #$BF
.DA #$C9
.DA #$D1
.DA #$D9
.DA #$E1
.DA #$EC
.DA #$F3
*-------------------------------------- *--------------------------------------
BS.TBL6.OLD .AS -"ACDEFILMNORTU " * .DA #$00
.DA #$00 * .AS -"BGHKPSVWXY/().:"
*-------------------------------------- *--------------------------------------
.DA #$00 *BS.TBL7.OLD .DA #$2A
.AS -"BGHKPSVWXY/().:" * .DA #$05
*-------------------------------------- * .DA #$0A
BS.TBL7.OLD .DA #$2A * .DA #$B6
.DA #$05 * .DA #$02
.DA #$0A * .DA #$03
.DA #$B6 * .DA #$CE
.DA #$02 * .DA #$10
.DA #$03 * .DA #$50
.DA #$CE * .DA #$57
.DA #$10 * .DA #$4E
.DA #$50 * .DA #$2A
.DA #$57 * .DA #$80
.DA #$4E * .DA #$5D
.DA #$2A * .DA #$C4
.DA #$80 * .DA #$BF
.DA #$5D * .DA #$E9
.DA #$C4 * .DA #$18
.DA #$BF * .DA #$4E
.DA #$E9 * .DA #$00
.DA #$18 * .DA #$10
.DA #$4E * .DA #$C0
.DA #$00 * .DA #$A0
.DA #$10 * .DA #$54
.DA #$C0 * .DA #$EE
.DA #$A0 * .DA #$01
.DA #$54 * .DA #$7A
.DA #$EE * .DA #$20
.DA #$01 * .DA #$40
.DA #$7A * .DA #$6E
.DA #$20 * .DA #$00
.DA #$40 * .DA #$1E
.DA #$6E * .DA #$8A
.DA #$00 * .DA #$36
.DA #$1E * .DA #$56
.DA #$8A * .DA #$43
.DA #$36 * .DA #$00
.DA #$56 * .DA #$2F
.DA #$43 * .DA #$2B
.DA #$00 * .DA #$41
.DA #$2F * .DA #$C4
.DA #$2B * .DA #$3E
.DA #$41 * .DA #$00
.DA #$C4 * .DA #$40
.DA #$3E * .DA #$49
.DA #$00 * .DA #$35
.DA #$40 * .DA #$67
.DA #$49 * .DA #$4E
.DA #$35 * .DA #$06
.DA #$67 * .DA #$D0
.DA #$4E * .DA #$1C
.DA #$06 * .DA #$0A
.DA #$D0 * .DA #$05
.DA #$1C * .DA #$4F
.DA #$0A * .DA #$01
.DA #$05 * .DA #$7A
.DA #$4F * .DA #$20
.DA #$01 * .DA #$40
.DA #$7A * .DA #$6E
.DA #$20 * .DA #$5B
.DA #$40 * .DA #$44
.DA #$6E * .DA #$0F
.DA #$5B * .DA #$00
.DA #$44 * .DA #$16
.DA #$0F * .DA #$01
.DA #$00 * .DA #$7A
.DA #$16 * .DA #$20
.DA #$01 * .DA #$40
.DA #$7A * .DA #$6E
.DA #$20 * .DA #$D0
.DA #$40 * .DA #$64
.DA #$6E * .DA #$30
.DA #$D0 * .DA #$FE
.DA #$64 * .DA #$00
.DA #$30 * .DA #$2C
.DA #$FE * .DA #$CA
.DA #$00 * .DA #$C1
.DA #$2C * .DA #$7E
.DA #$CA * .DA #$01
.DA #$C1 * .DA #$7A
.DA #$7E * .DA #$20
.DA #$01 * .DA #$40
.DA #$7A * .DA #$60
.DA #$20 * .DA #$FF
.DA #$40 * .DA #$B1
.DA #$60 * .DA #$90
.DA #$FF * .DA #$24
.DA #$B1 * .DA #$E4
.DA #$90 * .DA #$BB
.DA #$24 * .DA #$AB
.DA #$E4 * .DA #$F0
.DA #$BB * .DA #$9A
.DA #$AB * .DA #$E3
.DA #$F0 * .DA #$40
.DA #$9A * .DA #$76
.DA #$E3 * .DA #$24
.DA #$40 * .DA #$E2
.DA #$76 * .DA #$A9
.DA #$24 * .DA #$94
.DA #$E2 * .DA #$2C
.DA #$A9 * .DA #$43
.DA #$94 * .DA #$F0
.DA #$2C * .DA #$08
.DA #$43 * .DA #$B6
.DA #$F0 * .DA #$C4
.DA #$08 * .DA #$E0
.DA #$B6 * .DA #$5B
.DA #$C4 * .DA #$AC
.DA #$E0 * .DA #$42
.DA #$5B * .DA #$C4
.DA #$AC * .DA #$3F
.DA #$42 * .DA #$49
.DA #$C4 * .DA #$3E
.DA #$3F * .DA #$A5
.DA #$49 * .DA #$E3
.DA #$3E * .DA #$1C
.DA #$A5 * .DA #$1F
.DA #$E3 * .DA #$05
.DA #$1C * .DA #$1C
.DA #$1F * .DA #$03
.DA #$05 * .DA #$E9
.DA #$1C * .DA #$AC
.DA #$03 * .DA #$E5
.DA #$E9 * .DA #$AD
.DA #$AC * .DA #$93
.DA #$E5 * .DA #$F0
.DA #$AD * .DA #$60
.DA #$93 * .DA #$BA
.DA #$F0 * .DA #$E4
.DA #$60 * .DA #$BB
.DA #$BA * .DA #$AB
.DA #$E4 * .DA #$F0
.DA #$BB * .DA #$36
.DA #$AB * .DA #$06
.DA #$F0 * .DA #$04
.DA #$36 * .DA #$E5
.DA #$06 * .DA #$D7
.DA #$04 * .DA #$7F
.DA #$E5 * .DA #$56
.DA #$D7 * .DA #$74
.DA #$7F * .DA #$E7
.DA #$56 * .DA #$A2
.DA #$74 * .DA #$04
.DA #$E7 * .DA #$43
.DA #$A2 * .DA #$F0
.DA #$04 * .DA #$69
.DA #$43 * .DA #$07
.DA #$F0 * .DA #$17
.DA #$69 * .DA #$63
.DA #$07 * .DA #$E0
.DA #$17 * .DA #$51
.DA #$63 * .DA #$B1
.DA #$E0 * .DA #$84
.DA #$51 * .DA #$C4
.DA #$B1 * .DA #$BF
.DA #$84 * .DA #$9A
.DA #$C4 * .DA #$E0
.DA #$BF * .DA #$1D
.DA #$9A * .DA #$55
.DA #$E0 * .DA #$4B
.DA #$1D * .DA #$06
.DA #$55 * .DA #$E1
.DA #$4B * .DA #$07
.DA #$06 * .DA #$16
.DA #$E1 * .DA #$71
.DA #$07 * .DA #$01
.DA #$16 * .DA #$74
.DA #$71 * .DA #$F0
.DA #$01 * .DA #$56
.DA #$74 * .DA #$74
.DA #$F0 * .DA #$EC
.DA #$56 * .DA #$0A
.DA #$74 * .DA #$05
.DA #$EC * .DA #$4E
.DA #$0A * .DA #$86
.DA #$05 * .DA #$06
.DA #$4E * .DA #$81
.DA #$86 * .DA #$C2
.DA #$06 * .DA #$03
.DA #$81 * .DA #$F0
.DA #$C2 * .DA #$05
.DA #$03 * .DA #$BA
.DA #$F0 * .DA #$02
.DA #$05 * .DA #$B1
.DA #$BA * .DA #$8E
.DA #$02 * .DA #$CA
.DA #$B1 * .DA #$AE
.DA #$8E * .DA #$71
.DA #$CA * .DA #$B0
.DA #$AE * .DA #$24
.DA #$71 * .DA #$F0
.DA #$B0 * .DA #$9A
.DA #$24 * .DA #$CE
.DA #$F0 * .DA #$36
.DA #$9A * .DA #$B4
.DA #$CE * .DA #$2C
.DA #$36 * .DA #$E2
.DA #$B4 * .DA #$A8
.DA #$2C * .DA #$81
.DA #$E2 * .DA #$93
.DA #$A8 * .DA #$F0
.DA #$81 * .DA #$06
.DA #$93 * .DA #$0A
.DA #$F0 * .DA #$9C
.DA #$06 * .DA #$10
.DA #$0A * .DA #$9E
.DA #$9C * .DA #$4B
.DA #$10 * .DA #$BA
.DA #$9E * .DA #$BF
.DA #$4B * .DA #$36
.DA #$BA * .DA #$B4
.DA #$BF * .DA #$2C
.DA #$36 * .DA #$AB
.DA #$B4 * .DA #$0A
.DA #$2C * .DA #$E5
.DA #$AB * .DA #$D7
.DA #$0A * .DA #$7F
.DA #$E5 * .DA #$56
.DA #$D7 * .DA #$74
.DA #$7F * .DA #$E9
.DA #$56 * .DA #$AC
.DA #$74 * .DA #$EA
.DA #$E9 * .DA #$05
.DA #$AC * .DA #$49
.DA #$EA * .DA #$F0
.DA #$05 * .DA #$3D
.DA #$49 * .DA #$05
.DA #$F0 * .DA #$76
.DA #$3D * .DA #$21
.DA #$05 * .DA #$C4
.DA #$76 * .DA #$E5
.DA #$21 * .DA #$67
.DA #$C4 * .DA #$4E
.DA #$E5 * .DA #$91
.DA #$67 * .DA #$84
.DA #$4E * .DA #$F0
.DA #$91 * .DA #$56
.DA #$84 * .DA #$74
.DA #$F0 * .DA #$E0
.DA #$56 * .DA #$1D
.DA #$74 * .DA #$06
.DA #$E0 * .DA #$0A
.DA #$1D * .DA #$F0
.DA #$06 * .DA #$56
.DA #$0A * .DA #$74
.DA #$F0 * .DA #$0C
.DA #$56 * .DA #$06
.DA #$74 * .DA #$0D
.DA #$0C * .DA #$E0
.DA #$06 * .DA #$6C
.DA #$0D * .DA #$67
.DA #$E0 * .DA #$7E
.DA #$6C * .DA #$A0
.DA #$67 * .DA #$54
.DA #$7E * .DA #$9F
.DA #$A0
.DA #$54
.DA #$9F
*-------------------------------------- *--------------------------------------
XBBB5 .BS 2 XBBB5 .BS 2
XBBB7 .BS 1 XBBB7 .BS 1
XBBB8 .BS 1 XBBB8 .BS 1
*-------------------------------------- *--------------------------------------
BS.IsIntCmdMTR.OLD ldy #$02 *BS.IsIntCmdMTR.OLD ldy #$02
*
LBBBB lda BS.CMDBUF,y *LBBBB lda BS.CMDBUF,y
cmp BS.MTR,y * cmp BS.MTR,y
bne LBBCF * bne LBBCF
*
dey * dey
bpl LBBBB * bpl LBBBB
*
jsr BS.SetState0 * jsr BS.SetState0
jsr MON.CLREOL * jsr MON.CLREOL
jmp MON.ENTERMON * jmp MON.ENTERMON
*
LBBCF jmp BS.IsIntCmd *LBBCF jmp BS.IsIntCmd
*
BS.MTR .AS "MTR" *BS.MTR .AS "MTR"
*--------------------------------------
*BS.IVERSION .DA #5
*-------------------------------------- *--------------------------------------
BS.IVERSION .DA #5
BS.AS.HIMEMSave .BS 1 BS.AS.HIMEMSave .BS 1
XBBD7 .BS 1 XBBD7 .BS 1
XBBD8 .BS 1 XBBD8 .BS 1
@ -623,8 +614,7 @@ XBBEC .BS 1
XBBED .BS 1 XBBED .BS 1
XBBEE .BS 1 XBBEE .BS 1
XBBEF .BS 7 XBBEF .BS 7
XBBF6 .BS 1 BS.REFNUMs .BS 8
XBBF7 .BS 7
XBBFE .BS 1 XBBFE .BS 1
XBBFF .BS 1 XBBFF .BS 1
XBC00 .BS 3 XBC00 .BS 3
@ -648,12 +638,18 @@ XBC13 .BS 1
XBC14 .BS 1 XBC14 .BS 1
XBC15 .BS 1 XBC15 .BS 1
XBC16 .BS 1 XBC16 .BS 1
*--------------------------------------
BS.CMDBUF.LEN .BS 1 .LIST ON
BS.FREESPACE .EQ $BC17-*
.LIST OFF
.BS BS.FREESPACE
*--------------------------------------
BS.CMDBUF.LEN .BS 1 keep this in $BC page, flagged in MLI.MEMTABL
BS.CMDBUF .BS 65 BS.CMDBUF .BS 65
XBC59 .BS 1 XBC59 .BS 1
XBC5A .BS 1 XBC5A .BS 1
XBC5B .BS 165 XBC5B .BS 165
*-------------------------------------- *--------------------------------------
MAN MAN

3
BASIC.FX/BASIC.S.LDR.txt
View File

@ -303,7 +303,8 @@ L21C3 lda LDR.JMP.GP.ENTRY,x
lda #$A5 lda #$A5
sta AS.TRCFLG sta AS.TRCFLG
lda BS.IVERSION * lda BS.IVERSION
lda #5
sta MLI.IVERSION sta MLI.IVERSION
LDR.JMP.GP.ENTRY LDR.JMP.GP.ENTRY