#N canvas 220 101 523 589 10;
#X declare -path purest_json;
#X obj 196 482 dac~;
#X obj 203 428 *~ 0;
#X obj 204 452 *~ 0;
#X obj 306 276 vsl 15 128 0 1 0 0 empty empty volume 0 -9 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 174 73 rest;
#X obj 20 77 tgl 15 0 empty empty Print\ to\ console 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X floatatom 99 266 7 0 0 3 exchange\ rate - - 0;
#X symbolatom 11 265 13 0 0 3 Date - - 0;
#X obj 202 402 osc~;
#N canvas 626 288 864 436 print-to-console 0;
#X obj 28 17 inlet;
#X obj 308 26 inlet;
#X obj 172 28 inlet;
#X obj 431 18 inlet;
#X obj 308 135 print decoded-data;
#X obj 28 101 spigot;
#X obj 308 106 spigot;
#X obj 28 128 print complete-data;
#X obj 172 131 print decoding-done;
#X obj 172 100 spigot;
#X connect 0 0 5 0;
#X connect 1 0 6 0;
#X connect 2 0 9 0;
#X connect 3 0 9 1;
#X connect 3 0 5 1;
#X connect 3 0 6 1;
#X connect 5 0 7 0;
#X connect 6 0 4 0;
#X connect 9 0 8 0;
#X restore 12 161 pd print-to-console;
#N canvas 772 407 388 274 stepper 0;
#X obj 17 19 inlet;
#X obj 51 215 outlet;
#X obj 96 217 outlet;
#X obj 17 184 unpack f s f;
#X obj 17 150 text sequence \$0-sequence;
#X obj 192 224 outlet;
#X msg 192 84 1;
#X msg 164 185 0;
#X obj 17 90 metro 20;
#X msg 223 185 stop;
#X obj 17 42 t b b b;
#X msg 74 111 line 0;
#X msg 17 113 step;
#X connect 0 0 10 0;
#X connect 3 1 1 0;
#X connect 3 2 2 0;
#X connect 4 0 3 0;
#X connect 4 1 7 0;
#X connect 4 1 9 0;
#X connect 6 0 5 0;
#X connect 7 0 5 0;
#X connect 8 0 12 0;
#X connect 9 0 8 0;
#X connect 10 0 8 0;
#X connect 10 1 11 0;
#X connect 10 2 6 0;
#X connect 11 0 4 0;
#X connect 12 0 4 0;
#X restore 174 232 pd stepper;
#X obj 184 110 json-decode, f 12;
#X msg 174 44 GET https://ix.residuum.org/pd/currency_example.php;
#X obj 202 357 mtof;
#X obj 202 380 line \$1 5;
#X obj 202 304 * 32;
#X obj 202 329 + 32;
#X text 15 6 Gets the complete exchange rate history of USD to EUR and drives a sine oscillator with the rates, f 78;
#X obj 17 524 text define \$0-sequence;
#N canvas 766 104 365 231 store-data 0;
#X obj 103 66 list trim;
#X obj 103 18 inlet;
#X obj 55 18 inlet;
#X obj 103 94 route day rate;
#X obj 55 41 t b b;
#X obj 55 182 text set \$0-sequence;
#X msg 213 123 1e+15;
#X obj 103 117 symbol;
#X obj 55 157 pack f s f;
#X connect 0 0 3 0;
#X connect 1 0 0 0;
#X connect 2 0 4 0;
#X connect 3 0 7 0;
#X connect 3 1 8 2;
#X connect 4 0 8 0;
#X connect 4 1 6 0;
#X connect 6 0 5 1;
#X connect 7 0 8 1;
#X connect 8 0 5 0;
#X restore 184 149 pd store-data;
#X obj 191 190 bng 18 250 50 0 empty empty start\ sequence\ again 0 -9 0 10 #fcfcfc #000000 #000000;
#X obj 15 557 declare -path purest_json;
#X connect 1 0 2 0;
#X connect 2 0 0 1;
#X connect 2 0 0 0;
#X connect 3 0 2 1;
#X connect 4 0 10 0;
#X connect 4 1 11 0;
#X connect 4 1 9 0;
#X connect 5 0 9 3;
#X connect 8 0 1 0;
#X connect 10 0 7 0;
#X connect 10 1 15 0;
#X connect 10 1 6 0;
#X connect 10 2 1 1;
#X connect 11 0 9 1;
#X connect 11 0 19 0;
#X connect 11 1 9 2;
#X connect 11 1 19 1;
#X connect 12 0 4 0;
#X connect 13 0 14 0;
#X connect 14 0 8 0;
#X connect 15 0 16 0;
#X connect 16 0 13 0;
#X connect 20 0 10 0;