Browse code
Erase 00f0-00f3 with first zero-page-loader loop
Andrew Alderwick authored on 23/09/2021 23:04:25
Showing 1 changed files
| ... | ... |
@@ -80,9 +80,7 @@ |
| 80 | 80 |
OVR2 #fafe ( arguments for STZ2 at fd and JMP (repeat) ) |
| 81 | 81 |
OVR2 #f8fe ( arguments for STZ2 at fd and JMP (repeat) ) |
| 82 | 82 |
OVR2 #f6fe ( arguments for STZ2 at fd and JMP (repeat) ) |
| 83 |
- OVR2 #f4fe ( arguments for STZ2 at fd and JMP (repeat) ) |
|
| 84 |
- OVR2 #f2fe ( arguments for STZ2 at fd and JMP (repeat) ) |
|
| 85 |
- OVR2 #f001 ( arguments for STZ2 at fd, plus an extra 01 ) |
|
| 83 |
+ OVR2 #f401 ( arguments for STZ2 at fd, plus an extra 01 ) |
|
| 86 | 84 |
STHkr ( first argument for ADD2 ) |
| 87 | 85 |
.File/success ( argument for DEI2 ) |
| 88 | 86 |
#0100 .File/load ( arguments for DEO2 ) |
| ... | ... |
@@ -103,7 +101,7 @@ |
| 103 | 101 |
( fa ) JCN |
| 104 | 102 |
( fb ) POPr |
| 105 | 103 |
( fc ) POP2 |
| 106 |
- ( fd ) STZ2 ( deletes f0-fd through looping ) |
|
| 104 |
+ ( fd ) STZ2 ( deletes f4-fd through looping ) |
|
| 107 | 105 |
( fe ) JMP |
| 108 | 106 |
( ff ) STZ2 ( deletes fe-ff ) |
| 109 | 107 |
|