From ydebutee at gmail.com  Thu Sep  3 18:53:33 2009
From: ydebutee at gmail.com (matusko bolka)
Date: Thu, 3 Sep 2009 21:53:33 +0200
Subject: [Puredata] dropsound
Message-ID: <9e1d59980909031253t4c02a0d0k144d5d9915053154@mail.gmail.com>

Zdravim,

Ak s tym niekto prisiel skor tak nic ...
Pre pohodlnejsie dievcata a pohodlnejsich chlapcov tu mam takuto ficuru.
Ja sa z toho moc tesim
... niekomu to mozno pride ako kokotina.

Ako si vyrobit Drag&Drop [soundfiler]:

1.
predpokladam, ze nemate nainstalovane tkdnd binarky

Fedora Core users reported the package *tkdnd* is available for tcl8.4 so
you'll just have to fire up your package manager and install it.

For Debian based systems (including Ubuntu), you'll have to do a little
command-fu. First, go to
sourceforge<http://sourceforge.net/project/showfiles.php?group_id=13167>and
download the latest i386 rpm file. I know, you thought that you were
done with rpms, but... you're not.

Open up a command line and issue the following commands as root in the
directory that you downloaded it (probably ~/Desktop):

  apt-get install alien

  alien -d tkdnd*.rpm
  dpkg --install tkdnd*.deb

2.
v adresari pd/bin by sa mal nachadzat subor pd.tk
nahradte proceduru pdtk_canvas_makeobjs tymito riadkami:

proc pdtk_canvas_makeobjs {name files x y} {
    set c 0
    for {set n 0} {$n < [llength $files]} {incr n} {

    set absolute [lindex $files $n]

    if {[regexp {.*/(.+).pd$} $absolute file obj] == 1} {
            pd $name obj $x [expr $y + ($c * 30)] [pdtk_enquote $obj] \;
            incr c
        } elseif {[regexp {.*/(.+).(wav|WAV|aiff|AIFF)$} $absolute file obj]
== 1} {

            set tmp [string trimleft $absolute "file:"]
            set filename [file join / $tmp]

            pd $name obj $x [expr $y + ($c * 30)] [concat "table " $obj
\;]
            pd PDTK_ondrop [concat "??????" $filename] $obj $x $y \;
            incr c
            }
    }
}

Malo kodu, vela muziky.

V prilohe som zaslal priklad s jednoduchou abstrakciou, si to tam skuste
malo by to fungovat.
Kazdopadne sa da so suborom pd.tk vyhrat ... a so stipkou trpezlivosti sa da
celkom fajne kastmizovat pedecko.

Majte sa pekne.
matus
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://itchybit.org/pipermail/puredata/attachments/20090903/385b8d51/attachment.html 
-------------- next part --------------
A non-text attachment was scrubbed...
Name: dropsound.tar.gz
Type: application/x-gzip
Size: 303 bytes
Desc: not available
Url : http://itchybit.org/pipermail/puredata/attachments/20090903/385b8d51/attachment.bin