#N canvas 17 74 534 300 10; #X obj 269 42 array define -k B 1000; #A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 13 17 20 29 29 33 39 50 67 82 97 117 141 156 174 187 196 203 207 210 212 216 220 230 235 240 248 260 267 274 285 292 299 307 314 320 326 331 337 338 338 338 339 340 340 340 342 344 346 351 359 364 374 380 386 392 396 400 404 405 406 411 412 419 424 430 437 440 443 448 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 455 461 468 471 473 477 482 490 496 503 510 518 518 522 522 521 522 521 521 521 521 521 521 522 522 522 522 522 522 522 522 521 522 522 522 522 521 521 521 519 518 517 514 512 509 506 504 502 497 492 485 481 479 479 475 472 469 468 468 468 468 468 468 468 468 468 469 471 473 476 477 478 482 486 489 493 496 498 499 499 500 503 505 506 510 516 516 527 530 530 532 536 540 541 542 545 547 551 555 563 571 577 584 591 593 595 596 597 599 601 603 606 610 613 616 618 619 620 619 620 619 620 620 619 620 620 620 622 623 626 632 632 638 642 644 645 646 646 646 646 645 645 645 645 646 645 634 630 626 621 615 612 609 607 605 603 601 598 595 592 588 582 577 570 567 567 562 558 554 549 549 548 547 546 544 542 539 536 534 530 527 525 521 517 517 514 512 510 510 510 509 509 509 509 508 508 506 504 502 501 500 497 496 495 493 492 490 486 486 485 484 483 482 481 480 480 480 480 480 480 479 477 476 475 474 474 472 472 470 468 465 461 459 457 455 454 454 454 453 453 454 453 453 453 452 453 453 453 453 453 453 453 453 453 453 453 453 453 453 452 453 453 453 453 452 453 451 447 443 442 442 440 439 439 439 438 438 438 436 434 433 432 432 432 431 431 431 431 430 425 423 422 422 420 421 421 420 421 421 421 421 421 421 421 421 421 421 421 421 422 424 429 432 434 436 438 441 443 445 447 448 448 448 448 448 448 448 448 448 449 453 455 456 461 465 468 468 469 471 472 472 473 475 477 479 481 483 485 485 486 490 492 494 496 498 500 501 504 505 505 506 507 508 509 511 513 517 519 522 526 528 530 531 532 534 537 538 538 538 538 538 538 538 537 538 538 538 539 540 541 542 542 542 542 542 542 542 543 546 548 550 551 550 550 550 550 551 551 552 552 554 555 558 560 561 564 565 565 565 566 565 566 566 567 568 570 570 571 571 571 572 572 572 572 573 575 576 576 576 576 576 576 576 576 575 575 575 575 575 575 575 575 575 575 575 575 575 575 575 575 575 580 591 600 610 622 629 638 644 649 653 658 663 666 667 667 667 668 669 671 676 678 678 679 683 686 690 693 696 700 702 703 703 703 705 708 710 715 717 720 721 720 721 722 722 722 722 723 722 722 723 724 726 733 737 742 747 755 758 760 762 763 766 766 769 770 775 777 778 779 782 786 791 794 797 797 799 799 799 799 799 800 806 812 822 837 845 852 856 860 865 867 868 868 872 878 878 886 894 909 909 913 915 917 921 922 925 927 927 929 930 930 930 930 929 930 930 930 929 928 925 924 923 923 923 923 918 915 913 912 909 907 905 904 904 904 904 904 903 901 901; #X msg 139 149 donecanvasdialog 1 -1 2 0 1023 \$1 0 \$1 \$2 0 0 \, dirty 0; #X msg 139 116 1000 512; #X obj 139 176 s pd-1-waveform; #X msg 28 45 bang; #X text 164 2 2; #X msg 170 49 bang; #X text 68 1 1; #X text 7 16 click here first; #X text 162 19 then here; #X text 336 21 input data; #N canvas 467 136 450 300 wave 1; #N canvas 0 169 450 153 \$0-template 0; #X text 286 118 color 9=zwart 900=rood; #X obj 44 100 plot Wave 9 1 0 0 1; #X obj 226 87 print; #X obj 43 32 struct \$0-template float x float y array Wave \$0-array-element ; #X connect 3 0 2 0; #X restore 317 13 pd \$0-template; #N canvas 0 50 450 300 \$0-array-element 0; #X obj 62 51 struct \$0-array-element float y; #X restore 317 33 pd \$0-array-element; #N canvas 637 114 709 822 \$0-wave.drawer 0; #X obj 52 13 r \$0-draw.wave; #N canvas 749 96 576 295 initialize.ds 0; #X obj 70 61 f \$0; #X obj 199 180 pointer; #X obj 70 203 append \$0-template x y; #X obj 70 228 outlet; #X text 103 182 create (x \, y); #X text 293 95 delete what's there; #X text 349 184 bring pointer to beginning; #X msg 70 182 0 0; #X obj 70 30 r \$0-init.ds; #X obj 234 66 f \$0; #X obj 215 31 loadbang; #X msg 199 124 \; pd-1-waveform clear; #X msg 199 160 traverse pd-1-waveform \, bang; #X obj 132 69 t b f f; #X obj 70 81 t b b b; #X connect 0 0 14 0; #X connect 1 0 2 2; #X connect 2 0 3 0; #X connect 7 0 2 0; #X connect 8 0 0 0; #X connect 9 0 11 0; #X connect 10 0 11 0; #X connect 12 0 1 0; #X connect 14 0 7 0; #X connect 14 1 12 0; #X connect 14 2 11 0; #X restore 292 117 pd initialize.ds; #X obj 429 163 s \$0-scalar.pointer; #X obj 469 205 r \$0-scalar.pointer; #N canvas 56 50 550 351 write.array 0; #X obj 80 237 set \$0-array-element y; #X obj 368 159 r \$0-scalar.pointer; #X obj 80 66 inlet; #X obj 209 27 inlet; #X obj 209 205 element \$0-template Wave; #X connect 1 0 4 1; #X connect 2 0 0 0; #X connect 3 0 4 0; #X connect 4 0 0 1; #X restore 83 371 pd write.array; #X obj 292 140 trigger bang pointer; #X obj 165 13 r \$0-width; #X obj 84 101 f; #X obj 235 204 change -1; #X msg 235 183 set -1; #X obj 52 69 t b b; #X obj 83 285 t f f; #X obj 84 195 until; #X obj 83 239 f 0; #X obj 112 239 + 1; #X msg 102 218 0; #X obj 84 173 t f b; #X obj 84 130 t f b f; #X obj 12 120 s \$0-zien; #X msg 12 93 1; #X obj 296 232 setsize \$0-template Wave; #X obj 83 311 i; #X obj 83 340 tabread B; #X connect 0 0 10 0; #X connect 1 0 5 0; #X connect 3 0 20 1; #X connect 5 0 9 0; #X connect 5 1 2 0; #X connect 6 0 7 1; #X connect 7 0 17 0; #X connect 8 0 20 0; #X connect 9 0 8 0; #X connect 10 0 19 0; #X connect 10 1 7 0; #X connect 11 0 21 0; #X connect 11 1 4 1; #X connect 12 0 13 0; #X connect 13 0 14 0; #X connect 13 0 11 0; #X connect 14 0 13 1; #X connect 15 0 13 1; #X connect 16 0 12 0; #X connect 16 1 15 0; #X connect 17 0 16 0; #X connect 17 2 8 0; #X connect 19 0 18 0; #X connect 21 0 22 0; #X connect 22 0 4 0; #X restore 317 56 pd \$0-wave.drawer; #X obj 101 141 inlet; #N canvas 0 50 450 300 zien 0; #X obj 139 65 inlet; #X msg 139 120 vis \$1; #X obj 217 66 r \$0-zien; #X obj 139 154 s pd-1-zicht; #X connect 0 0 1 0; #X connect 1 0 3 0; #X connect 2 0 1 0; #X restore 238 185 pd zien; #X msg 238 158 0; #X obj 507 182 v end-tick; #X obj 507 130 loadbang; #X msg 507 152 999; #N canvas 362 133 1133 733 1-zicht 0; #X obj 50 30 table 1-waveform 1; #X restore 32 27 pd 1-zicht; #X obj 101 234 del 5; #X obj 124 201 s \$0-init.ds; #N canvas 19 300 740 616 size 0; #X obj 85 139 inlet; #X obj 357 126 unpack f f; #X obj 356 186 s \$0-width; #X obj 377 156 s \$0-height; #X msg 85 252 donecanvasdialog 1 -1 2 0 1023 \$1 0 \$1 \$2 0 0 \, dirty 0; #X msg 85 172 1000 512; #X obj 85 279 s pd-1-waveform; #X msg 358 93 1000 512; #X obj 358 41 loadbang; #X connect 0 0 5 0; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 6 0; #X connect 5 0 4 0; #X connect 7 0 1 0; #X connect 8 0 7 0; #X restore 241 276 pd size; #X obj 101 275 s \$0-draw.wave; #X obj 101 168 t b b b; #X connect 3 0 14 0; #X connect 5 0 4 0; #X connect 7 0 8 0; #X connect 8 0 6 0; #X connect 10 0 13 0; #X connect 14 0 10 0; #X connect 14 1 11 0; #X connect 14 2 5 0; #X restore 28 81 pd wave; #X connect 1 0 3 0; #X connect 2 0 1 0; #X connect 4 0 11 0; #X connect 6 0 2 0;