Update mov_r_FAC1_VAR
This commit is contained in:
1 parent
e5b02075e0
commit
d35e301103
3 files changed
+9
-4
No files matched your search
@@ -225,7 +225,7 @@ Floating point mathematical routines - not official, but well known and broadly
|
|||||||
| `$BBA6` | `get_FAC1_via_INDEX` | DONE | |
|
| `$BBA6` | `get_FAC1_via_INDEX` | DONE | |
|
||||||
| `$BBC7` | `mov_r_FAC1_TMP2` | PARTIAL | not fully tested yet |
|
| `$BBC7` | `mov_r_FAC1_TMP2` | PARTIAL | not fully tested yet |
|
||||||
| `$BBCA` | `mov_r_FAC1_TMP1` | PARTIAL | not fully tested yet |
|
| `$BBCA` | `mov_r_FAC1_TMP1` | PARTIAL | not fully tested yet |
|
||||||
| `$BBD0` | `mov_r_FAC1_VAR` | PARTIAL | not fully tested yet |
|
| `$BBD0` | `mov_r_FAC1_VAR` | DONE | From the Microsoft BASIC, original name: MOVVF |
|
||||||
| `$BBD4` | `mov_r_FAC1_MEM` | DONE | From the Microsoft BASIC, original name: MOVMF |
|
| `$BBD4` | `mov_r_FAC1_MEM` | DONE | From the Microsoft BASIC, original name: MOVMF |
|
||||||
| `$BBFC` | `mov_FAC2_FAC1` | DONE | From the Microsoft BASIC, original name: MOVFA |
|
| `$BBFC` | `mov_FAC2_FAC1` | DONE | From the Microsoft BASIC, original name: MOVFA |
|
||||||
| `$BC0C` | `mov_r_FAC1_FAC2` | DONE | From the Microsoft BASIC, original name: MOVAF |
|
| `$BC0C` | `mov_r_FAC1_FAC2` | DONE | From the Microsoft BASIC, original name: MOVAF |
|
||||||
|
|||||||
@@ -3,9 +3,14 @@
|
|||||||
;; #LAYOUT# * BASIC_0 #TAKE
|
;; #LAYOUT# * BASIC_0 #TAKE
|
||||||
;; #LAYOUT# * * #IGNORE
|
;; #LAYOUT# * * #IGNORE
|
||||||
|
|
||||||
;
|
|
||||||
|
; This file is under the MIT license, it contains code released by Microsoft Corporation.
|
||||||
|
; See LICENSE for more information.
|
||||||
|
|
||||||
; Math package - move FAC1 (rounds) to memory variable
|
; Math package - move FAC1 (rounds) to memory variable
|
||||||
;
|
;
|
||||||
|
; This is verified to be identical to the original Microsoft implementation where it was named MOVVF.
|
||||||
|
;
|
||||||
; Input:
|
; Input:
|
||||||
; - FORPNT ($49/$4A) - variable address
|
; - FORPNT ($49/$4A) - variable address
|
||||||
;
|
;
|
||||||
@@ -15,7 +20,7 @@
|
|||||||
|
|
||||||
mov_r_FAC1_VAR:
|
mov_r_FAC1_VAR:
|
||||||
|
|
||||||
ldy #FORPNT+1
|
|
||||||
ldx #FORPNT+0
|
ldx #FORPNT+0
|
||||||
|
ldy #FORPNT+1
|
||||||
|
|
||||||
; FALLTROUGH to mov_r_FAC1_MEM
|
; FALLTROUGH to mov_r_FAC1_MEM
|
||||||
+1
-1
@@ -24,7 +24,7 @@ int phase_mask[MAX_SIZE+MAX_SIZE];
|
|||||||
// Pairs of start, end memory addresses of known exact similarity with the open source Microsoft BASIC
|
// Pairs of start, end memory addresses of known exact similarity with the open source Microsoft BASIC
|
||||||
unsigned short microsoft_basic_chunks[NUM_CHUNKS * 2] = {
|
unsigned short microsoft_basic_chunks[NUM_CHUNKS * 2] = {
|
||||||
0xB849, 0xB84F,
|
0xB849, 0xB84F,
|
||||||
0xBBD4, 0xBC1A
|
0xBBD0, 0xBC1A
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
Reference in new issue
Block a user