diff --git a/strings/23A004B12285 b/strings/23A004B12285 new file mode 100644 index 00000000..1f3c1d02 --- /dev/null +++ b/strings/23A004B12285 @@ -0,0 +1,3 @@ +$23 + LDY #$04 + LDA ($22),Y + STA + +Loop fragment load from index pointer diff --git a/strings/25A000B124 b/strings/25A000B124 new file mode 100644 index 00000000..81cf5a79 --- /dev/null +++ b/strings/25A000B124 @@ -0,0 +1,3 @@ +$25 + LDY #$00 + LDA ($24),Y + +Clear via index vector 2 in zero page diff --git a/strings/38E561F0 b/strings/38E561F0 new file mode 100644 index 00000000..47dc3bc3 --- /dev/null +++ b/strings/38E561F0 @@ -0,0 +1,3 @@ +SEC + SBC $61 + BEQ + +Sub from floating point area in zero page diff --git a/strings/49FF6901 b/strings/49FF6901 new file mode 100644 index 00000000..28985aa5 --- /dev/null +++ b/strings/49FF6901 @@ -0,0 +1,3 @@ +EOR #$FF + ADC #$01 + +Two's complement diff --git a/strings/4C37A4A2 b/strings/4C37A4A2 new file mode 100644 index 00000000..4b02b31b --- /dev/null +++ b/strings/4C37A4A2 @@ -0,0 +1,3 @@ +JMP $A437 + LDX + +Jump to error routine in BASIC diff --git a/strings/60A56649FF b/strings/60A56649FF new file mode 100644 index 00000000..4268ca19 --- /dev/null +++ b/strings/60A56649FF @@ -0,0 +1,3 @@ +RTS + LDA $66 + EOR #$FF + +Load and invert value from floating point area of zero page diff --git a/strings/614C6AB8 b/strings/614C6AB8 new file mode 100644 index 00000000..1aac5923 --- /dev/null +++ b/strings/614C6AB8 @@ -0,0 +1,3 @@ +RTS + JMP $B86A + +Fragment + jump to floating point function diff --git a/strings/6E4566856F b/strings/6E4566856F new file mode 100644 index 00000000..c153ed9b --- /dev/null +++ b/strings/6E4566856F @@ -0,0 +1,3 @@ +$6E + EOR $66 + STA $6F + +Manipulate floating point area in zero page (from BASIC) diff --git a/strings/85628463 b/strings/85628463 new file mode 100644 index 00000000..89f07e7e --- /dev/null +++ b/strings/85628463 @@ -0,0 +1,3 @@ +STA $62 + STY $63 + +Store AY into floating point area in zero page diff --git a/strings/856E4566856FA5 b/strings/856E4566856FA5 new file mode 100644 index 00000000..304b6c66 --- /dev/null +++ b/strings/856E4566856FA5 @@ -0,0 +1,3 @@ +STA $6E + EOR $66 + STA $6F + LDA + +Floating point code from BASIC diff --git a/strings/856FA561 b/strings/856FA561 new file mode 100644 index 00000000..eeba6cb8 --- /dev/null +++ b/strings/856FA561 @@ -0,0 +1,3 @@ +STA $6F + LDA $61 + +Store and load from/to floating point area in zero page diff --git a/strings/8CBAD0034C b/strings/8CBAD0034C new file mode 100644 index 00000000..154a35fb --- /dev/null +++ b/strings/8CBAD0034C @@ -0,0 +1,3 @@ +$8C + $BA + BNE $03 + JMP + +Fragments diff --git a/strings/A004B122 b/strings/A004B122 new file mode 100644 index 00000000..2296abcd --- /dev/null +++ b/strings/A004B122 @@ -0,0 +1,3 @@ +LDY #$04 + LDA ($22),Y + +Loop fragment load from index pointer diff --git a/strings/A20F4C37A4 b/strings/A20F4C37A4 new file mode 100644 index 00000000..f1574a6e --- /dev/null +++ b/strings/A20F4C37A4 @@ -0,0 +1,3 @@ +LDX #$0F + JMP $A437 + +Emit overflow error from BASIC diff --git a/strings/A3A90085 b/strings/A3A90085 new file mode 100644 index 00000000..cf0b45de --- /dev/null +++ b/strings/A3A90085 @@ -0,0 +1,3 @@ +$A3 + LDA #0 + STA + +Fragments diff --git a/strings/AFA90020 b/strings/AFA90020 new file mode 100644 index 00000000..9582b0a1 --- /dev/null +++ b/strings/AFA90020 @@ -0,0 +1,3 @@ +$AF + LDA #0 + JSR + +Fragments diff --git a/strings/BAD0034C b/strings/BAD0034C new file mode 100644 index 00000000..ca6c36d3 --- /dev/null +++ b/strings/BAD0034C @@ -0,0 +1,3 @@ +$BA + BNE $03 + JMP + +Fragments diff --git a/strings/D004A000 b/strings/D004A000 new file mode 100644 index 00000000..2fde13ca --- /dev/null +++ b/strings/D004A000 @@ -0,0 +1,3 @@ +BNE $04 + LDY #$00 + +Fragments