Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2025-02-16 18:30:26 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.9.2

Browse Source
This commit is contained in:
Rémy GIBERT 2018-08-24 16:54:02 +02:00
parent 67873e3518
commit f5fa2094c1
4 changed files with 12 additions and 5 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.

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

@ -80,9 +80,12 @@ K.ATan ldx #ROM.ATAN
* **Out:** * **Out:**
* On stack (float) * On stack (float)
*\-------------------------------------- *\--------------------------------------
K.Float >PULLW FAC+1 K.Float ldx #4
>PULLW FAC+3
.1 >PULLB FAC,x Reverse Order
dex
bne .1
stz FAC.SIGN stz FAC.SIGN
lda #$A0 lda #$A0
sta FAC Exp=32 sta FAC Exp=32
@ -121,8 +124,12 @@ K.lrintf jsr MATH.PullFAC
ldx #ROM.QINT ldx #ROM.QINT
jsr GP.ROMCALL jsr GP.ROMCALL
>PUSHW FAC+1 ldx #0
>PUSHW FAC+3
.1 >PUSHB FAC+1,x
inx
cpx #4
bne .1
clc clc
rts rts