# [PD] externals in lua

Forrest Curo treegestalt at gmail.com
Sat Jul 4 23:53:20 CEST 2015

```[I see I was replying to Claude earlier. He says I shouldn't send proposed
improvements to him alone, but to the list, in particular MrPeach, who
maintains the distribution. So: ]

----------------------------------------------------------

if type(atoms[1]) ~= "string" then
return false
else
self.prefix = atoms[1]
end
[default is 'prefix1']*
if type(atoms[2]) ~= "number" or atoms[2] < 1 then
self.start = 1
else
self.start = math.floor(atoms[2])
end

* -- to 'prefix..(n-atoms[3])'  (if atoms[3] is present && greater than
1.)*
if type(atoms[3]) ~= "number" or atoms[3] < 1 then
self.count = 1
else
self.count = math.floor(atoms[3])
end
self.inlets = 0
self.outlets = 2
return true
end

local i = 0
while (i < self.count) do
local n = self.start + i
self["receive_" .. n] = function (self, sel, atoms)
self:outlet(2, "float", { n })
self:outlet(1, sel, atoms)
end
i = i + 1
end
end

for _,r in ipairs(self.receives) do r:destruct() end
end
----------------------------------------------------------------
------------------------------------------------
#N canvas 0 0 540 307 10;
#X obj 27 76 print lreceive-LEFT;
#X obj 190 76 print lreceive-RIGHT;
#X obj 26 252 send lreceive-25;
#X msg 26 196 foo bar 1 2 3;
#X msg 146 196 123 bar 1 2 3;
#X obj 146 252 send lreceive-27;
#X obj 272 252 send;
#X floatatom 295 204 5 24 35 2 n - -;
#X obj 295 226 makefilename lreceive-%d;
#X symbolatom 272 171 10 0 0 0 - - -;
#X obj 272 143 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
*#X text 100 10 This example receives messages sent to 'lreceive-25' and
#X connect 0 0 1 0;
#X connect 0 1 2 0;
#X connect 4 0 3 0;
#X connect 5 0 6 0;
#X connect 8 0 9 0;
#X connect 9 0 7 1;
#X connect 10 0 7 0;
#X connect 11 0 10 0;

On Sat, Jul 4, 2015 at 10:07 AM, Claude Heiland-Allen <claude at mathr.co.uk>
wrote:

> Hi Forrest,
>
>
> On 04/07/15 17:43, Forrest Curo wrote:
>
>> When I use the example lreceive.pd_lua to produce [lreceive poo], it won't
>>
>> Messages from [lsend poo] and [send poo] are both picked up by [r poo],
>> but
>> the lreceive just sits there.
>>
>> Anyone have a guess what's going on?
>>
>
> [lreceive] actually binds a number of receives, named with a prefix. For
> example:
>
>
> is more like
>
> [r poo42] [r poo43] [r poo44]
>  |         |         |
> [t a b]   [t a b]   [t a b]
>  | [42(    | [43(    | [44(
>  |  |      |  |      |  |
> (each pair is sent out from the 2 outlets of [lreceive])
>
>
> The start (here 42) and count (here 3) both default to 1, so just to test
> that it's working try [s poo1].
>
> Anyway, the examples I wrote weren't originally meant to be used as
> standalone objects (perhaps that was a mistake), but more as examples of
> how to use different parts of the pdlua API - you can read the source code
> of the .pd_lua examples (which are plain text) to guide you when writing
> your own objects, or just to see how they work.
>
>
> Claude
> --
> http://mathr.co.uk
>
>
> _______________________________________________
> Pd-list at lists.iem.at mailing list
> UNSUBSCRIBE and account-management ->
> http://lists.puredata.info/listinfo/pd-list
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.puredata.info/pipermail/pd-list/attachments/20150704/5dd0c77b/attachment-0001.html>
```