[maxmsp] [mxj net.udp.send] to accept raw data (Art-Net development)

Hello Emmanuel, hello list,

here is the patch:

max v2;
#N vpatcher 393 44 1201 718;
#P window setfont "Sans Serif" 9.;
#P message 751 66 20 196617 10;
#P message 724 66 14 196617 0;
#P newex 724 32 48 196617 loadbang;
#P window setfont "Sans Serif" 18.;
#P comment 497 130 26 196626 3.;
#P comment 308 130 26 196626 2.;
#P window setfont "Sans Serif" 9.;
#P newex 567 490 56 196617 route text;
#P user textedit 567 422 667 472 32896 3 9 2.0.0.20;
#P newex 567 512 67 196617 prepend host;
#P comment 567 405 62 196617 Adresse ip:;
#P window linecount 3;
#P comment 524 138 75 196617 Nbre Ch (chiffre pair requis):;
#P user uslider 147 179 18 128 256 1 0 0;
#P window linecount 1;
#P newex 147 153 40 196617 change;
#P message 183 102 68 196617 255 \, 0 5000;
#P message 102 102 74 196617 0 \, 255 10000;
#P newex 147 126 50 196617 line 0 25;
#P button 383 233 15 0;
#P number 431 136 35 9 0 16 67 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P message 647 240 43 196617 size \$1;
#P newex 367 269 69 196617 pack 0 0 238;
#P newex 147 512 170 196617 t b l;
#P user multiSlider 147 361 98 84 0. 255. 10 2921 15 0 0 2 10 0 0;
#M frgb 0 0 0;
#M brgb 255 255 255;
#M rgb2 127 127 127;
#M rgb3 0 0 0;
#M rgb4 37 52 91;
#M rgb5 74 105 182;
#M rgb6 112 158 18;
#M rgb7 149 211 110;
#M rgb8 187 9 201;
#M rgb9 224 62 37;
#M rgb10 7 114 128;
#P newex 147 490 297 196617 prepend 65 114 116 45 78 101 116 0 0 80 0  
14 0 0 0 0 0 238;
#P number 559 239 35 9 0 0 160 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 495 239 35 9 0 0 160 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 559 203 40 196617 % 256;
#P newex 495 203 37 196617 / 256;
#P number 601 239 35 9 0 0 176 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 601 136 35 9 2 238 67 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 76 629 114 196617 udpsend 2.0.0.20 6454;
#P newex 76 569 70 196617 aka.datagram;
#P message 331 363 282 196617 set 65 114 116 45 78 101 116 0 0 80 0  
14 0 0 \$1 0 \$2 \$3;
#P comment 341 346 370 196617 Art-Net0 (8) opcode (2inv) revisionnr  
(2) seq(1) phys(1) universe(2) length(2);
#P comment 151 571 386 196617 accepte symbols ou 256 ints maxi => 256  
- 18 (ints d'en-tête) = 238 circuits maxi;
#P comment 336 138 94 196617 Universe (0 based):;
#P window linecount 5;
#P comment 42 371 100 196617 pour cette expérience \, les n circuits  
ont une valeur de sortie identique...;
#P window setfont "Sans Serif" 18.;
#P window linecount 1;
#P comment 539 397 26 196626 1.;
#P window setfont "Sans Serif" 24.;
#P comment 199 40 369 196632 Testé avec MagicQ (Art-Net In);
#P window setfont "Sans Serif" 9.;
#P window linecount 2;
#P comment 336 154 100 196617 1 univers == 512 circuits;
#P fasten 18 0 8 0 152 548 81 548;
#P fasten 18 1 8 0 312 550 81 550;
#P fasten 30 0 9 0 572 607 81 607;
#P connect 8 0 9 0;
#P fasten 25 0 23 0 188 121 152 121;
#P fasten 24 0 23 0 107 121 152 121;
#P connect 23 0 26 0;
#P connect 26 0 27 0;
#P connect 27 0 17 0;
#P fasten 20 0 17 0 652 332 152 332;
#P fasten 7 0 16 0 336 463 152 463;
#P connect 17 0 16 0;
#P connect 16 0 18 0;
#P fasten 19 0 7 0 372 329 336 329;
#P fasten 21 0 19 0 436 210 372 210;
#P fasten 22 0 19 0 388 258 372 258;
#P fasten 12 0 22 0 500 227 388 227;
#P fasten 14 0 19 1 500 261 401 261;
#P fasten 15 0 19 2 564 261 430 261;
#P fasten 36 0 21 0 729 112 436 112;
#P fasten 10 0 12 0 606 183 500 183;
#P connect 12 0 14 0;
#P fasten 10 0 13 0 606 185 564 185;
#P connect 13 0 15 0;
#P connect 31 0 32 0;
#P connect 32 0 30 0;
#P fasten 37 0 10 0 756 114 606 114;
#P connect 10 0 11 0;
#P fasten 10 0 20 0 606 161 652 161;
#P connect 35 0 36 0;
#P fasten 35 0 37 0 729 57 756 57;
#P pop;


you will need [aka.datagram] & [udpsend].

This patch has been tested  with a MagicQ for Macintosh (a virtual  
Art-Net light board) and is functionnal. I could not use [mxj  
net.udp.send] because I would have had to write values as text...  
(just imagine, 0x00 == NUL == ¿Ä)...

For information, Art-Net protocol is an Ethernet to DMX protocol by  
Artistic Licence shared by over 70 companies. I plan to build a  
"driver" for LightRegie120 and make an Art-Net to Enttec Pro  
converter for Mac.

Again, thank you very much for your help!
Philippe


Le 29 oct. 07 à 07:13, Emmanuel Jourdan a écrit :

> On 29 oct. 07, at 00:48, Philippe Montemont wrote:
>
>> Hello List,
>>
>> Is there a way that [mxj net.udp.send] and [mxj net.udp.recv] send  
>> or receive data as raw-bytes (binary 0-255), as aka.datagram does?
>> My problem is that I need to send/receive a list of 530 items and  
>> aka.datagram does not support this list size...
>> Any ideas?
>> Thanks very much for help.
>
> could you post a patch? You could encode the value (8 bits), in 32  
> bits to have shortest list.
>
> ej
> _______________________________________________
> maxmsp mailing list
> maxmsp at cycling74.com
> http://www.cycling74.com/mailman/listinfo/maxmsp
>

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://www.cycling74.com/pipermail/maxmsp/attachments/20071029/6958bb03/attachment.htm