Toggle navigation
IEM pastebin
Create
Recent
Trending
About
WAV-loops-bad
From IOhannes, 3 Years ago, written in Pure Data (Pd-patch).
URL
https://pastie.iem.at/view/996b6ace
Embed
Download Paste
or
View Raw
Reply to "WAV-loops-bad"
Author
Title
Language
Plain Text
HTML5
CSS
JavaScript
PHP
Python
Ruby
Lua
Bash
Erlang
Go
C
C++
Diff-output
LaTeX
SQL
XML
-----------------
Pure Data (Pd-patch)
Matlab M-file
TCL/iTCL
Smalltalk
4CS
MOS 6502
MOS 6502 Kick Assembler
MOS 6502 TASM/64TASS
Motorola 68000 Devpac Assembler
ABAP
Actionscript
ActionScript3
Ada
AIMMS
ALGOL 68
Apache
AppleScript
Apt sources.list
ARM Assembler
x86 Assembler
asymptote
ASP
autoconf
Autohotkey
AutoIT
AviSynth
Awk
BASCOM AVR
Basic4GL
BBCode
Brainfuck
BibTeX
BlitzBasic
BNF (Backus-Naur form)
Boo
C (for LoadRunner)
C for Macs
C with WiAPI
CAD DCL (Dialog Control Language)
AutoCAD/IntelliCAD Lisp
CFDG
ColdFusion
ChaiScript
Chapel
CIL (Common Intermediate Language)
Clojure
CMake
COBOL
CoffeeScript
C++ with WinAPI
C#
Cuesheet
D
Dart
DCS
DCL
DCPU/16 Assembly
Delphi (Object Pascal)
DIV
DOS
dot
E
ECMAScript
Eiffel
Email (mbox/eml/RFC format)
Enerscript
Euphoria
EZT
Formula One
Falcon
fo
Fortran
FreeBasic
FreeSWITCH
F#
GAMBAS
GDB
Genero
Genie
GNU Gettext .po/.pot
glSlang
GML
Gnuplot script
Groovy
GwBasic
Haskell
Haxe
HicEst
HQ9+
HTML 4.01 strict
Icon
Unoidl
INI
Inno Script
INTERCAL
Io
ISPF Panel
J
Java
Java 5
Job Control Language
jQuery 1.3
KLone with C
KLone with C++
Kotlin
Liberty BASIC
LDIF
Generic Lisp
LLVM
Locomotive Basic (Amstrad CPC series)
Logcat
Logtalk
LOLcode
@Formula/@Command
LotusScript
Lightwave Script
Linden Scripting
Motorola 68000 Assembler
MagikSF
Make
MapBasic
mIRC Scripting
MMIX Assembler
Modula-2
Modula-3
Microchip Assembler
MXML
MySQL
Nagios
NetRexx
newLISP
nginx
Nimrod
Nullsoft Scriptable Install System
Oberon-2
Objective-C
Objeck Programming Language
OCaml (Objective Caml)
GNU Octave M-file
OpenOffice.org Basic
ooRexx
Oracle 11i
Oracle 8
Delphi Prism (Oxygene)
Oz
ParaSail
PARI/GP
Pascal
PCRE
Per (forms)
Perl
Perl 6
OpenBSD packet filter
PIC16 Assembler
Pike
Pixel Bender 1.0
PL/I
Oracle 9.2 PL/SQL
PostgreSQL
Postscript
Povray
PowerBuilder (PowerScript)
PowerShell
ProFTPd
Progress
Prolog
Property
ProvideX
PureBasic
Python for S60
q/kdb+
QBasic/QuickBASIC
QML
Racket
Ruby (with Ruby on Rails Framework)
RBS Script
Rebol
Microsoft Registry Editor
Rexx
robots.txt
RPM Spec
R
Rust
SAS
Scala
Scheme
SciLab
SCL
sdlBasic
Smarty template
SPARK
SPARQL
StandardML
StoneScript
SystemVerilog IEEE 1800-2009(draft8)
Tera Term Macro
thinBasic
T-SQL
TypoScript
Unicon
UnrealScript
UPC
Urbi
Vala
Visual Basic
VB.NET
VBScript
Vedit macro language
Verilog
VHDL
Vim scripting
Visual FoxPro
Visual Prolog
Whitespace
Whois response (RPSL format)
WinBatch
XBasic
xorg.conf
Axapta/Dynamics Ax X++
YAML
ZiLOG Z80 Assembler
ZXBasic
Your paste
- Paste your paste here
#N canvas 565 301 975 588 12; #X obj 74 134 file handle; #X obj 74 157 list prepend chunk; #X obj 74 180 list trim; #X msg 278 94 CHUNK; #X msg 296 162 LOOP; #X msg 242 71 FILE; #X msg 74 349 8; #X obj 385 276 bytestruct unpack <i4p; #X obj 385 301 t f b; #X obj 385 326 until; #X msg 385 351 24; #X obj 575 284 bytestruct unpack <6i; #X obj 74 203 route FILE CHUNK SMPL LOOP FMT; #X obj 783 269 bytestruct unpack <2H10xH; #X obj 783 294 route 0 1; #X obj 783 319 *; #X obj 783 344 / 8; #X obj 783 373 t b f; #X msg 783 398 1; #X obj 575 309 t b a; #X obj 618 309 print LOOP; #X msg 575 334 1; #X obj 595 369 t b f; #X obj 575 518 select 0; #X obj 575 543 t b b; #X obj 575 484 t f f; #X obj 575 449 *; #X msg 663 367 0; #X obj 575 409 f; #X obj 666 392 t f f; #X msg 624 544 skip; #X msg 74 111 open \$1 \, 12 \, close; #X obj 74 81 t s b b; #N canvas 6 70 587 522 CHUNK 0; #X obj 146 145 bytestruct unpack <4si; #X obj 146 169 list trim; #X obj 255 355 unpack s f; #X msg 255 378 seek \$1 current \, 8; #X obj 146 219 t b b; #X msg 146 327 seek 28 current \, 8; #X obj 200 219 t f b; #X obj 200 242 - 16; #X obj 146 194 route smpl fmt\ ; #X obj 200 265 t f b; #X msg 232 294 16; #X obj 146 121 inlet; #X obj 146 352 outlet filectl; #X obj 450 378 outlet prefix; #X msg 450 340 SMPL; #X msg 499 340 FMT; #X connect 0 0 1 0; #X connect 1 0 8 0; #X connect 2 1 3 0; #X connect 3 0 12 0; #X connect 4 0 5 0; #X connect 4 1 14 0; #X connect 5 0 12 0; #X connect 6 0 7 0; #X connect 6 1 15 0; #X connect 7 0 9 0; #X connect 8 0 4 0; #X connect 8 1 6 0; #X connect 8 2 2 0; #X connect 9 0 3 0; #X connect 9 1 10 0; #X connect 10 0 12 0; #X connect 11 0 0 0; #X connect 14 0 13 0; #X connect 15 0 13 0; #X restore 115 304 pd CHUNK; #N canvas 6 148 450 300 FILE 0; #X obj 104 33 inlet; #X obj 104 79 list trim; #X obj 104 102 route RIFF; #X obj 104 125 route WAVE; #X obj 104 148 t b b; #X msg 104 179 8; #X obj 104 56 bytestruct unpack <4s4x4s; #X obj 104 204 outlet filectl; #X msg 221 179 CHUNK; #X obj 221 204 outlet prefix; #X connect 0 0 6 0; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 4 1 8 0; #X connect 5 0 7 0; #X connect 6 0 1 0; #X connect 8 0 9 0; #X restore 74 230 pd FILE; #X obj 34 392 t a; #X obj 74 28 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 74 53 openpanel; #X obj 242 170 t a; #X obj 815 398 print BYTESPERSAMPLE; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 2 0 12 0; #X connect 3 0 38 0; #X connect 4 0 38 0; #X connect 5 0 38 0; #X connect 6 0 35 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 8 1 4 0; #X connect 9 0 10 0; #X connect 10 0 35 0; #X connect 11 0 19 0; #X connect 12 0 34 0; #X connect 12 1 33 0; #X connect 12 2 7 0; #X connect 12 3 11 0; #X connect 12 4 13 0; #X connect 13 0 14 0; #X connect 14 0 15 0; #X connect 14 1 15 0; #X connect 15 0 16 0; #X connect 16 0 17 0; #X connect 17 0 18 0; #X connect 17 1 39 0; #X connect 18 0 22 0; #X connect 19 0 21 0; #X connect 19 1 20 0; #X connect 21 0 28 0; #X connect 22 0 28 0; #X connect 22 1 26 1; #X connect 23 0 24 0; #X connect 23 1 30 0; #X connect 24 0 6 0; #X connect 24 1 3 0; #X connect 25 0 23 0; #X connect 26 0 25 0; #X connect 27 0 29 0; #X connect 28 0 26 0; #X connect 29 0 28 1; #X connect 29 1 26 1; #X connect 30 0 38 0; #X connect 31 0 0 0; #X connect 32 0 31 0; #X connect 32 1 5 0; #X connect 32 2 27 0; #X connect 33 0 35 0; #X connect 33 1 38 0; #X connect 34 0 35 0; #X connect 34 1 38 0; #X connect 35 0 0 0; #X connect 36 0 37 0; #X connect 37 0 32 0; #X connect 38 0 1 1;
Create Shorturl - Create a shorter url that redirects to your paste?
Private - Private paste aren't shown in recent listings.
Delete After
- When should we delete your paste?
Burn on reading
Keep Forever
5 Minutes
1 Hour
1 Day
1 Week
1 Month
1 Year
Spam protection
- Type in the letters
Create