#N canvas 2 50 590 524 10; #X obj 283 192 tms5220~; #X floatatom 298 271 5 0 0 0 - - -; #X floatatom 313 248 5 0 0 0 - - -; #X floatatom 328 225 5 0 0 0 - - -; #X obj 283 376 dac~; #X obj 350 329 hsl 128 15 0 1 0 0 empty empty OUTPUT_LEVEL -2 -8 0 10 -262144 -1 -1 0 1; #X obj 283 328 *~ 0; #X msg 347 369 \; pd dsp 1; #X text 379 224 <-- interrupt; #X text 377 246 <-- ready; #X text 376 269 <-- status bits; #X msg 283 123 write \$1; #X msg 310 152 reset; #X text 43 473 (C) Federico Ferri - 2010; #X obj 47 316 * 16; #X msg 47 79 0; #X text 85 76 nop; #X obj 283 94 r \$0.byte; #X text 133 43 (check the TMS5220 datasheet for description of commands) ; #X obj 47 443 s \$0.byte; #X obj 47 357 |; #X obj 139 221 vradio 8 1 0 16 empty empty empty 0 -8 0 10 -262144 -1 -1 0; #X text 162 274 << address; #X msg 47 99 1; #X msg 47 119 2; #X msg 47 139 3; #X msg 47 159 4; #X msg 47 179 5; #X msg 47 199 6; #X msg 47 219 7; #X text 85 96 read byte; #X text 85 116 nop; #X text 85 136 read & branch; #X text 85 156 load address; #X text 85 176 speak; #X text 85 196 speak external; #X text 85 216 reset; #X text 46 45 COMMANDS:; #X connect 0 0 6 0; #X connect 0 1 1 0; #X connect 0 2 2 0; #X connect 0 3 3 0; #X connect 5 0 6 1; #X connect 5 0 7 0; #X connect 6 0 4 0; #X connect 6 0 4 1; #X connect 11 0 0 0; #X connect 12 0 0 0; #X connect 14 0 20 0; #X connect 15 0 14 0; #X connect 17 0 11 0; #X connect 20 0 19 0; #X connect 21 0 20 1; #X connect 23 0 14 0; #X connect 24 0 14 0; #X connect 25 0 14 0; #X connect 26 0 14 0; #X connect 27 0 14 0; #X connect 28 0 14 0; #X connect 29 0 14 0;