diff --git a/STATUS.md b/STATUS.md index 2c51de67..361d229b 100644 --- a/STATUS.md +++ b/STATUS.md @@ -241,7 +241,7 @@ Floating point mathematical routines - not official, but well known and broadly | `$BC58` | `abs_FAC1` | DONE | From the Microsoft BASIC, original name: ABS | | `$BC5B` | `FCOMP` | DONE | | | `$BC9B` | `QINT` | DONE | From the Microsoft BASIC, original name: QINT | -| `$BCCC` | `int_FAC1` | DONE | | +| `$BCCC` | `int_FAC1` | DONE | From the Microsoft BASIC, original name: INT | | `$BCE9` | `clear_FAC1` | DONE | From the Microsoft BASIC, original name: CLRFAC | | `$BCF3` | `FIN` | PARTIAL | Only for 38k memory model + not fully tested yet | | `$BD7E` | `FINLOG` | DONE | | diff --git a/tools/similarity.c b/tools/similarity.c index 061fb5b7..54ffe503 100644 --- a/tools/similarity.c +++ b/tools/similarity.c @@ -20,7 +20,7 @@ int matches[MAX_SIZE]; int phase_mask[MAX_SIZE+MAX_SIZE]; -#define NUM_CHUNKS 8 +#define NUM_CHUNKS 7 // Pairs of start, end memory addresses of known exact similarity with the open source Microsoft BASIC unsigned short microsoft_basic_chunks[NUM_CHUNKS * 2] = { 0xB849, 0xB84F, @@ -29,8 +29,7 @@ unsigned short microsoft_basic_chunks[NUM_CHUNKS * 2] = { 0xB983, 0xB9BB, 0xBBA2, 0xBC1A, 0xBC58, 0xBC5A, - 0xBC9B, 0xBCCB, - 0xBCE9, 0xBCF2, + 0xBC9B, 0xBCF2, };