Browse code
Added audio to calc
neauoire authored on 21/09/2021 19:31:48
Showing 1 changed files
| ... | ... |
@@ -30,9 +30,6 @@ |
| 30 | 30 |
|10 @Console [ &vector $2 &read $1 &pad $5 &write $1 &error $1 ] |
| 31 | 31 |
|20 @Screen [ &vector $2 &width $2 &height $2 &auto $1 &pad $1 &x $2 &y $2 &addr $2 &pixel $1 &sprite $1 ] |
| 32 | 32 |
|30 @Audio0 [ &vector $2 &position $2 &output $1 &pad $3 &adsr $2 &length $2 &addr $2 &volume $1 &pitch $1 ] |
| 33 |
-|40 @Audio1 [ &vector $2 &position $2 &output $1 &pad $3 &adsr $2 &length $2 &addr $2 &volume $1 &pitch $1 ] |
|
| 34 |
-|50 @Audio2 [ &vector $2 &position $2 &output $1 &pad $3 &adsr $2 &length $2 &addr $2 &volume $1 &pitch $1 ] |
|
| 35 |
-|60 @Audio3 [ &vector $2 &position $2 &output $1 &pad $3 &adsr $2 &length $2 &addr $2 &volume $1 &pitch $1 ] |
|
| 36 | 33 |
|80 @Controller [ &vector $2 &button $1 &key $1 ] |
| 37 | 34 |
|90 @Mouse [ &vector $2 &x $2 &y $2 &state $1 &wheel $1 ] |
| 38 | 35 |
|a0 @File [ &vector $2 &success $2 &offset-hs $2 &offset-ls $2 &name $2 &length $2 &load $2 &save $2 ] |
| ... | ... |
@@ -75,6 +72,12 @@ |
| 75 | 72 |
;on-mouse .Mouse/vector DEO2 |
| 76 | 73 |
;on-button .Controller/vector DEO2 |
| 77 | 74 |
|
| 75 |
+ ( setup synth ) |
|
| 76 |
+ #0208 .Audio0/adsr DEO2 |
|
| 77 |
+ ;saw-wav .Audio0/addr DEO2 |
|
| 78 |
+ #0100 .Audio0/length DEO2 |
|
| 79 |
+ #dd .Audio0/volume DEO ( TODO: turn ON ) |
|
| 80 |
+ |
|
| 78 | 81 |
( center ) |
| 79 | 82 |
.Screen/width DEI2 2// .center/x STZ2 |
| 80 | 83 |
.Screen/height DEI2 2// .center/y STZ2 |
| ... | ... |
@@ -211,6 +214,7 @@ BRK |
| 211 | 214 |
|
| 212 | 215 |
@push-input ( key -- ) |
| 213 | 216 |
|
| 217 |
+ DUP TOS ;keypad/notes ++ LDA .Audio0/pitch DEO |
|
| 214 | 218 |
DUP TOS ;keypad/series ++ LDA ;draw-keypad JSR2 |
| 215 | 219 |
TOS .input/value LDZ2 #40 SFT2 ++ .input/value STZ2 |
| 216 | 220 |
.input/length LDZ INC .input/length STZ |
| ... | ... |
@@ -533,6 +537,30 @@ RTN |
| 533 | 537 |
0101 0102 |
| 534 | 538 |
0101 0102 |
| 535 | 539 |
0102 0202 |
| 540 |
+ ¬es |
|
| 541 |
+ 484a 4c4d |
|
| 542 |
+ 4f51 5354 |
|
| 543 |
+ 5658 595b |
|
| 544 |
+ 5d5f 6062 |
|
| 545 |
+ 6465 6769 |
|
| 546 |
+ |
|
| 547 |
+@saw-wav |
|
| 548 |
+ 0003 0609 0c0f 1215 181b 1e21 2427 2a2d |
|
| 549 |
+ 3033 3639 3b3e 4143 4649 4b4e 5052 5557 |
|
| 550 |
+ 595b 5e60 6264 6667 696b 6c6e 7071 7274 |
|
| 551 |
+ 7576 7778 797a 7b7b 7c7d 7d7e 7e7e 7e7e |
|
| 552 |
+ 7f7e 7e7e 7e7e 7d7d 7c7b 7b7a 7978 7776 |
|
| 553 |
+ 7574 7271 706e 6c6b 6967 6664 6260 5e5b |
|
| 554 |
+ 5957 5552 504e 4b49 4643 413e 3b39 3633 |
|
| 555 |
+ 302d 2a27 2421 1e1b 1815 120f 0c09 0603 |
|
| 556 |
+ 00fd faf7 f4f1 eeeb e8e5 e2df dcd9 d6d3 |
|
| 557 |
+ d0cd cac7 c5c2 bfbd bab7 b5b2 b0ae aba9 |
|
| 558 |
+ a7a5 a2a0 9e9c 9a99 9795 9492 908f 8e8c |
|
| 559 |
+ 8b8a 8988 8786 8585 8483 8382 8282 8282 |
|
| 560 |
+ 8182 8282 8282 8383 8485 8586 8788 898a |
|
| 561 |
+ 8b8c 8e8f 9092 9495 9799 9a9c 9ea0 a2a5 |
|
| 562 |
+ a7a9 abae b0b2 b5b7 babd bfc2 c5c7 cacd |
|
| 563 |
+ d0d3 d6d9 dcdf e2e5 e8eb eef1 f4f7 fafd |
|
| 536 | 564 |
|
| 537 | 565 |
@font-hex |
| 538 | 566 |
007c 8282 8282 827c 0030 1010 1010 1010 |