mirror of
https://github.com/A2osX/A2osX.git
synced 2024-06-17 22:29:44 +00:00
Kernel 0.93
This commit is contained in:
parent
51b29cb1eb
commit
f85e1583b8
Binary file not shown.
19
A2osX.S.txt
19
A2osX.S.txt
|
@ -17,8 +17,8 @@ NEW
|
||||||
TmpPtr1 .EQ $0 main & aux ZP
|
TmpPtr1 .EQ $0 main & aux ZP
|
||||||
TmpPtr2 .EQ $2 main & aux ZP
|
TmpPtr2 .EQ $2 main & aux ZP
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
A2osX.LOGOLOAD .EQ $2000
|
|
||||||
A2osX.KMLOAD .EQ $2000
|
A2osX.KMLOAD .EQ $2000
|
||||||
|
A2osX.LOGOLOAD .EQ $4000
|
||||||
A2osX.KMMAXLEN .EQ $6000
|
A2osX.KMMAXLEN .EQ $6000
|
||||||
A2osX.OpenBuff1 .EQ $8000 1024 Buffer for MLIOPEN01
|
A2osX.OpenBuff1 .EQ $8000 1024 Buffer for MLIOPEN01
|
||||||
A2osX.OpenBuff2 .EQ $8400 1024 Buffer for MLIOPEN02
|
A2osX.OpenBuff2 .EQ $8400 1024 Buffer for MLIOPEN02
|
||||||
|
@ -151,7 +151,7 @@ A2osX.EnumKM >LDYAI MSG.KMENUM
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
A2osX.MLIQuit >LDYAI MSG.INIT0OK
|
A2osX.MLIQuit >LDYAI MSG.INIT0OK
|
||||||
jsr PrintFYA
|
jsr PrintFYA
|
||||||
>DEBUG
|
|
||||||
>DEBUGOA
|
>DEBUGOA
|
||||||
jsr MLI
|
jsr MLI
|
||||||
.DA #MLIQUIT
|
.DA #MLIQUIT
|
||||||
|
@ -270,7 +270,7 @@ A2osX.ScreenDLGR
|
||||||
|
|
||||||
lda TmpPtr1
|
lda TmpPtr1
|
||||||
clc
|
clc
|
||||||
adc #80
|
adc #40
|
||||||
sta TmpPtr1
|
sta TmpPtr1
|
||||||
bcc .3
|
bcc .3
|
||||||
inc TmpPtr1+1
|
inc TmpPtr1+1
|
||||||
|
@ -300,20 +300,11 @@ A2osX.ScreenDLGR
|
||||||
|
|
||||||
iny
|
iny
|
||||||
cpy #40
|
cpy #40
|
||||||
bne .2
|
bne .4
|
||||||
|
|
||||||
lda TmpPtr1
|
lda TmpPtr1
|
||||||
clc
|
clc
|
||||||
adc #80
|
adc #40
|
||||||
sta TmpPtr1
|
|
||||||
bcc .3
|
|
||||||
inc TmpPtr1+1
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
lda TmpPtr1
|
|
||||||
clc
|
|
||||||
adc #80
|
|
||||||
sta TmpPtr1
|
sta TmpPtr1
|
||||||
bcc .7
|
bcc .7
|
||||||
inc TmpPtr1+1
|
inc TmpPtr1+1
|
||||||
|
|
|
@ -113,13 +113,13 @@ CS.RUN
|
||||||
|
|
||||||
.4 >LDA.G hInputFile
|
.4 >LDA.G hInputFile
|
||||||
bne .5
|
bne .5
|
||||||
jsr CS.RUN.OPENINPUT
|
jsr CS.RUN.OpenInput
|
||||||
bcc .1 scan for any other args
|
bcc .1 scan for any other args
|
||||||
rts
|
rts
|
||||||
|
|
||||||
.5 >LDA.G hOutputFile
|
.5 >LDA.G hOutputFile
|
||||||
bne .99
|
bne .99
|
||||||
jsr CS.RUN.CREATEOUTPUT
|
jsr CS.RUN.CreateOutput
|
||||||
bcc .1 scan for any other args
|
bcc .1 scan for any other args
|
||||||
.9 rts
|
.9 rts
|
||||||
|
|
||||||
|
@ -296,6 +296,9 @@ CS.RUN.24 lda #S.BM.F.BBP4
|
||||||
|
|
||||||
.2 sta ZPOutputRowBytes
|
.2 sta ZPOutputRowBytes
|
||||||
stx ZPOutputRowBytes+1
|
stx ZPOutputRowBytes+1
|
||||||
|
>STA.G PIX.Header+S.BM.RowBytes
|
||||||
|
* txa
|
||||||
|
* >STA.G PIX.Header+S.BM.RowBytes+1
|
||||||
|
|
||||||
jsr CS.RUN.GetOutputBuf
|
jsr CS.RUN.GetOutputBuf
|
||||||
bcs CS.RUN.RTS
|
bcs CS.RUN.RTS
|
||||||
|
@ -315,7 +318,7 @@ CS.RUN.24.LOOP inc ZPLineCount
|
||||||
lda #$ff
|
lda #$ff
|
||||||
sta ZPCntX
|
sta ZPCntX
|
||||||
|
|
||||||
jsr CS.RUN.READINPUT
|
jsr CS.RUN.ReadInput
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
lda ZPOutputBuf
|
lda ZPOutputBuf
|
||||||
|
@ -359,7 +362,7 @@ CS.RUN.24.LOOP inc ZPLineCount
|
||||||
tay
|
tay
|
||||||
|
|
||||||
pla
|
pla
|
||||||
bcc .6
|
bcs .6
|
||||||
sta (ZPOutputBuf),y
|
sta (ZPOutputBuf),y
|
||||||
bra .2
|
bra .2
|
||||||
|
|
||||||
|
@ -371,7 +374,7 @@ CS.RUN.24.LOOP inc ZPLineCount
|
||||||
sta (ZPOutputBuf),y
|
sta (ZPOutputBuf),y
|
||||||
bra .2
|
bra .2
|
||||||
|
|
||||||
.8 jsr CS.RUN.WRITE
|
.8 jsr CS.RUN.WriteOutput
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
lda #0
|
lda #0
|
||||||
|
@ -467,7 +470,7 @@ CS.RUN.GetNearestColor
|
||||||
CS.RUN.GetIndexInPalette.RTS
|
CS.RUN.GetIndexInPalette.RTS
|
||||||
rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.RUN.OPENINPUT
|
CS.RUN.OpenInput
|
||||||
>PUSHWI 0 Aux type
|
>PUSHWI 0 Aux type
|
||||||
>PUSHBI 0 Type
|
>PUSHBI 0 Type
|
||||||
>PUSHBI O.RDONLY
|
>PUSHBI O.RDONLY
|
||||||
|
@ -539,7 +542,7 @@ CS.RUN.OPENINPUT
|
||||||
sec
|
sec
|
||||||
rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.RUN.READINPUT
|
CS.RUN.ReadInput
|
||||||
>PUSHW ZPInputRowBytes
|
>PUSHW ZPInputRowBytes
|
||||||
>PUSHW ZPInputBuf
|
>PUSHW ZPInputBuf
|
||||||
>LDA.G hInputFile
|
>LDA.G hInputFile
|
||||||
|
@ -557,7 +560,7 @@ CS.RUN.READINPUT
|
||||||
sta ZPPixelCount+1
|
sta ZPPixelCount+1
|
||||||
.9 rts
|
.9 rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.RUN.CREATEOUTPUT
|
CS.RUN.CreateOutput
|
||||||
>PUSHWI 0 Aux type
|
>PUSHWI 0 Aux type
|
||||||
>PUSHBI $CB PIX Type
|
>PUSHBI $CB PIX Type
|
||||||
>PUSHBI O.WRONLY+O.CREATE
|
>PUSHBI O.WRONLY+O.CREATE
|
||||||
|
@ -589,13 +592,14 @@ CS.RUN.GetOutputBuf
|
||||||
sta ZPPtr1+1
|
sta ZPPtr1+1
|
||||||
bra .1
|
bra .1
|
||||||
|
|
||||||
.8 >LDYA.G ZPPtr1
|
.8 >LDYA ZPPtr1
|
||||||
>SYSCALL Getmem
|
>SYSCALL Getmem
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
>STYA ZPOutputBuf
|
>STYA ZPOutputBuf
|
||||||
txa
|
txa
|
||||||
>STA.G hOutputBuf
|
>STA.G hOutputBuf
|
||||||
|
|
||||||
lda ZPPtr1
|
lda ZPPtr1
|
||||||
>STA.G OutputDataLen
|
>STA.G OutputDataLen
|
||||||
clc
|
clc
|
||||||
|
@ -610,7 +614,8 @@ CS.RUN.GetOutputBuf
|
||||||
clc
|
clc
|
||||||
.9 rts
|
.9 rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.RUN.WRITE >PUSHWI S.BM
|
CS.RUN.WriteOutput
|
||||||
|
>PUSHWI S.BM
|
||||||
>PUSHEA.G PIX.Header
|
>PUSHEA.G PIX.Header
|
||||||
>LDA.G hOutputFile
|
>LDA.G hOutputFile
|
||||||
>SYSCALL FWrite
|
>SYSCALL FWrite
|
||||||
|
@ -621,9 +626,6 @@ CS.RUN.WRITE >PUSHWI S.BM
|
||||||
>LDA.G hOutputFile
|
>LDA.G hOutputFile
|
||||||
>SYSCALL FWrite
|
>SYSCALL FWrite
|
||||||
|
|
||||||
.9 rts
|
|
||||||
*--------------------------------------
|
|
||||||
CS.RUN.WRITE.BUF
|
|
||||||
.9 rts
|
.9 rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.DOEVENT sec
|
CS.DOEVENT sec
|
||||||
|
|
Binary file not shown.
Before Width: | Height: | Size: 9.3 KiB After Width: | Height: | Size: 9.4 KiB |
Loading…
Reference in New Issue
Block a user