Johannes Eckart a écrit :
3.)One specific question: is there any possibility to work with fractals or the formulas of them on Gem? maybe any patches exist already? any hint would be great for me!!!
Hello, you might be interested by this attached patch for drawing strange attractors, Patco.
#N canvas 448 7 516 364 10; #N canvas 0 0 494 344 gemwin 0; #X msg 262 153 0 , destroy; #X text 294 108 <- create GEM windows; #X obj 109 132 hsl 128 15 0 127 0 0 empty empty Camera_X -2 -6 0 8 -262144 -1 -1 0 1; #X obj 110 158 hsl 128 15 0 127 0 0 empty empty Camera_Y -2 -6 0 8 -262144 -1 -1 0 1; #X obj 109 184 hsl 128 15 0 500 0 0 empty empty Camera_Z -2 -6 0 8 -262144 -1 -1 0 1; #X text 188 86 camera position; #N canvas 0 0 462 312 ch_gemwin 0; #X obj 285 171 f; #X obj 206 152 spigot; #X obj 267 143 sel 0 1; #X obj 237 124 t f f; #X obj 206 200 -; #X obj 206 249 +; #X obj 267 213 f; #X obj 159 168 f; #X obj 80 149 spigot; #X obj 141 140 sel 0 1; #X obj 111 121 t f f; #X obj 80 200 -; #X obj 80 249 +; #X obj 141 210 f; #X obj 406 162 f; #X obj 327 146 spigot; #X obj 388 137 sel 0 1; #X obj 358 118 t f f; #X obj 327 197 -; #X obj 388 207 f; #X obj 80 465 * 4; #X obj 135 467 * 4; #X obj 156 308 t b f; #X obj 94 372 cos; #X obj 106 430 * 1; #X obj 80 430 * 1; #X obj 132 373 sin; #X obj 107 466 * 4; #X obj 94 394 t b f; #X obj 94 348 / 200; #X obj 80 491 pack f f f; #X obj 458 49 gemmouse; #X obj 515 135 t b f; #X obj 515 164 |; #X obj 487 240 gemhead; #X obj 491 193 loadbang; #X msg 487 215 0; #X obj 487 315 curve 2; #X obj 487 266 color 1 0 0; #X obj 571 240 gemhead; #X obj 571 315 curve 2; #X obj 651 242 gemhead; #X obj 651 317 curve 2; #X msg 524 289 3 0 0; #X msg 608 289 0 3 0; #X msg 688 291 0 0 3; #X msg 80 516 view $1 $2 $3 0 0 0 0 1 0; #X obj 571 266 color 0 1 0; #X obj 651 268 color 0 0 1; #X obj 80 308 sin; #X obj 106 309 cos; #X obj 327 246 + 200; #X obj 157 282 / 50; #X obj 80 283 / -200; #X obj 18 12 inlet; #X obj 20 579 outlet; #X obj 60 14 inlet; #X obj 215 19 inlet; #X obj 132 15 inlet; #X obj 213 44 * 5; #X obj 59 82 / 127; #X obj 60 61 * 400; #X obj 131 82 / 127; #X obj 131 58 * 200; #X obj 131 36 * -3.14; #X obj 60 37 * 3.14; #X obj 21 551 gemwin 10; #X connect 0 0 4 1; #X connect 1 0 4 0; #X connect 2 0 6 0; #X connect 2 1 0 0; #X connect 3 0 1 1; #X connect 3 1 2 0; #X connect 4 0 5 0; #X connect 5 0 6 1; #X connect 5 0 29 0; #X connect 6 0 5 1; #X connect 7 0 11 1; #X connect 8 0 11 0; #X connect 9 0 13 0; #X connect 9 1 7 0; #X connect 10 0 8 1; #X connect 10 1 9 0; #X connect 11 0 12 0; #X connect 12 0 13 1; #X connect 12 0 53 0; #X connect 13 0 12 1; #X connect 14 0 18 1; #X connect 15 0 18 0; #X connect 16 0 19 0; #X connect 16 1 14 0; #X connect 17 0 15 1; #X connect 17 1 16 0; #X connect 18 0 51 0; #X connect 19 0 51 1; #X connect 20 0 30 0; #X connect 21 0 30 2; #X connect 22 0 21 0; #X connect 22 0 20 0; #X connect 22 0 27 0; #X connect 22 1 21 1; #X connect 22 1 20 1; #X connect 22 1 27 1; #X connect 23 0 28 0; #X connect 24 0 21 0; #X connect 25 0 20 0; #X connect 26 0 27 0; #X connect 27 0 30 1; #X connect 28 0 24 0; #X connect 28 0 25 0; #X connect 28 1 24 1; #X connect 28 1 25 1; #X connect 29 0 23 0; #X connect 29 0 26 0; #X connect 30 0 46 0; #X connect 31 0 8 0; #X connect 31 0 7 1; #X connect 31 1 1 0; #X connect 31 1 0 1; #X connect 31 1 14 1; #X connect 31 1 15 0; #X connect 31 2 3 0; #X connect 31 2 10 0; #X connect 31 2 33 0; #X connect 31 3 17 0; #X connect 31 3 32 0; #X connect 32 0 33 0; #X connect 32 1 33 1; #X connect 33 0 34 0; #X connect 33 0 39 0; #X connect 33 0 41 0; #X connect 34 0 38 0; #X connect 35 0 36 0; #X connect 35 0 43 0; #X connect 35 0 44 0; #X connect 35 0 45 0; #X connect 35 0 53 0; #X connect 35 0 51 0; #X connect 36 0 34 0; #X connect 36 0 39 0; #X connect 36 0 41 0; #X connect 38 0 37 0; #X connect 39 0 47 0; #X connect 41 0 48 0; #X connect 43 0 37 2; #X connect 44 0 40 2; #X connect 45 0 42 2; #X connect 46 0 66 0; #X connect 47 0 40 0; #X connect 48 0 42 0; #X connect 49 0 25 0; #X connect 50 0 24 0; #X connect 51 0 19 1; #X connect 51 0 52 0; #X connect 52 0 22 0; #X connect 53 0 49 0; #X connect 53 0 50 0; #X connect 54 0 66 0; #X connect 56 0 65 0; #X connect 57 0 59 0; #X connect 58 0 64 0; #X connect 59 0 52 0; #X connect 60 0 53 0; #X connect 61 0 60 0; #X connect 62 0 29 0; #X connect 63 0 62 0; #X connect 64 0 63 0; #X connect 65 0 61 0; #X connect 66 0 55 0; #X restore 144 244 pd ch_gemwin; #X obj 109 105 tgl 15 0 empty empty gemwin 17 7 0 10 -262144 -1 -1 0 1; #X obj 223 58 sel 0 1; #X msg 335 153 create , 1; #X obj 193 106 tgl 15 0 empty empty light 17 7 0 10 -262144 -1 -1 0 1; #X msg 328 187 lighting $1 , color $1 0 0; #X connect 0 0 6 0; #X connect 2 0 6 1; #X connect 3 0 6 2; #X connect 4 0 6 3; #X connect 7 0 8 0; #X connect 8 0 0 0; #X connect 8 1 9 0; #X connect 9 0 6 0; #X connect 10 0 11 0; #X connect 11 0 6 0; #X coords 0 -1 1 1 150 100 2 100 100; #X restore 166 -16 pd gemwin; #N canvas 302 123 679 572 strangelorenz 0; #X obj 431 145 loadbang; #X msg 397 146 bang; #X obj 445 252 s $0-dt4; #X obj 508 250 s $0-dt1; #X obj 464 275 s $0-dt3; #X obj 528 269 s $0-dt2; #N canvas 292 106 658 480 values 0; #X obj 101 51 cnv 15 140 58 empty empty empty 20 12 0 14 -170752 -66577 0; #X obj 242 51 cnv 15 127 58 empty empty empty 20 12 0 14 -233017 -66577 0; #X obj 31 178 inlet; #X obj 221 13 inlet; #X obj 96 -27 loadbang; #X obj 108 90 hsl 128 15 0 100000 0 0 empty $0-value-r Sigma -2 -8 0 10 -262144 -1 -1 0 1; #X obj 104 71 nbx 6 14 0 100000 0 0 empty $0-value-r Sigma 0 -8 0 10 -262144 -1 -1 0 256; #X obj 31 205 route set; #X obj 29 242 print; #X obj 257 64 hradio 15 1 0 4 $0-Metro $0-Metro-r Metro 0 -8 0 8 -262144 -1 -1 0; #N canvas 402 90 626 682 value 0; #X obj 148 4 inlet; #X obj 304 -1 inlet; #X msg 95 272 set $1 $2 $3; #X obj 68 161 pack f 25 2.6667; #X obj 104 130 t b a; #X obj 152 133 t b a; #X obj 62 129 / 1000; #X obj 104 110 / 1000; #X obj 150 111 / 1000; #X obj 162 51 demux 0 1 2; #X obj 295 124 list prepend label; #X obj 119 236 outlet; #X obj 296 145 list trim; #X msg 339 104 Rho; #X msg 295 103 Sigma; #X msg 376 102 Beta; #X obj 274 52 sel 0 1 2; #X obj 198 104 f; #X obj 222 105 f; #X obj 246 103 f; #X msg 213 127 set $1; #X obj 216 149 s $0-value-r; #N canvas 469 365 427 295 counter 0; #X obj 86 146 gem_counter; #X obj 85 193 outlet; #X obj 82 14 inlet; #X obj 16 41 inlet; #X obj 51 72 spigot; #X floatatom 152 192 7 0 0 0 - - -; #X obj 82 42 route on dir float size step; #X obj 141 117 +; #X floatatom 205 177 5 0 0 0 - - -; #X floatatom 247 87 5 0 0 0 - - -; #X obj 127 77 t a b a; #X obj 97 168 * 100; #X obj 300 118 commun /sigma-metro; #X connect 0 0 11 0; #X connect 2 0 6 0; #X connect 3 0 4 0; #X connect 4 0 0 0; #X connect 6 0 4 1; #X connect 6 1 0 1; #X connect 6 2 9 0; #X connect 6 2 10 0; #X connect 6 3 7 0; #X connect 6 4 11 1; #X connect 7 0 0 3; #X connect 10 0 0 2; #X connect 10 1 7 0; #X connect 10 2 7 1; #X connect 11 0 1 0; #X connect 11 0 5 0; #X restore 323 310 pd counter; #X obj 429 203 demux 0 1 2; #X obj 385 165 inlet; #X obj 295 165 s $0-value-r; #X obj 346 226 route time; #X obj 283 281 t b b; #X obj 339 409 t b a; #X obj 383 414 t b a; #X obj 319 442 pack f 25 2.6667; #X obj 320 367 / 1000; #X obj 339 388 / 1000; #X obj 381 385 / 1000; #X obj 69 189 demux; #X obj 68 212 t b a; #N canvas 469 365 423 291 counter 0; #X obj 86 146 gem_counter; #X obj 85 193 outlet; #X obj 82 14 inlet; #X obj 16 41 inlet; #X obj 51 72 spigot; #X floatatom 152 192 7 0 0 0 - - -; #X obj 82 42 route on dir float size step; #X obj 141 117 +; #X floatatom 205 177 5 0 0 0 - - -; #X floatatom 247 87 5 0 0 0 - - -; #X obj 127 77 t a b a; #X obj 97 168 * 100; #X connect 0 0 11 0; #X connect 2 0 6 0; #X connect 3 0 4 0; #X connect 4 0 0 0; #X connect 6 0 4 1; #X connect 6 1 0 1; #X connect 6 2 9 0; #X connect 6 2 10 0; #X connect 6 3 7 0; #X connect 6 4 11 1; #X connect 7 0 0 3; #X connect 10 0 0 2; #X connect 10 1 7 0; #X connect 10 2 7 1; #X connect 11 0 1 0; #X connect 11 0 5 0; #X restore 345 333 pd counter; #N canvas 469 365 423 291 counter 0; #X obj 86 146 gem_counter; #X obj 85 193 outlet; #X obj 82 14 inlet; #X obj 16 41 inlet; #X obj 51 72 spigot; #X floatatom 152 192 7 0 0 0 - - -; #X obj 82 42 route on dir float size step; #X obj 141 117 +; #X floatatom 205 177 5 0 0 0 - - -; #X floatatom 247 87 5 0 0 0 - - -; #X obj 127 77 t a b a; #X obj 97 168 * 100; #X connect 0 0 11 0; #X connect 2 0 6 0; #X connect 3 0 4 0; #X connect 4 0 0 0; #X connect 6 0 4 1; #X connect 6 1 0 1; #X connect 6 2 9 0; #X connect 6 2 10 0; #X connect 6 3 7 0; #X connect 6 4 11 1; #X connect 7 0 0 3; #X connect 10 0 0 2; #X connect 10 1 7 0; #X connect 10 2 7 1; #X connect 11 0 1 0; #X connect 11 0 5 0; #X restore 373 354 pd counter; #X obj 72 317 outlet; #X obj 288 199 r $0-metro; #X connect 0 0 9 0; #X connect 1 0 16 0; #X connect 1 0 9 1; #X connect 1 0 23 1; #X connect 2 0 38 0; #X connect 3 0 34 0; #X connect 4 0 3 0; #X connect 4 1 3 1; #X connect 4 1 30 1; #X connect 5 0 3 0; #X connect 5 1 3 2; #X connect 5 1 30 2; #X connect 6 0 3 0; #X connect 6 0 30 0; #X connect 7 0 4 0; #X connect 8 0 5 0; #X connect 9 0 6 0; #X connect 9 0 17 1; #X connect 9 1 7 0; #X connect 9 1 18 1; #X connect 9 2 8 0; #X connect 9 2 19 1; #X connect 10 0 12 0; #X connect 12 0 25 0; #X connect 13 0 10 0; #X connect 14 0 10 0; #X connect 15 0 10 0; #X connect 16 0 14 0; #X connect 16 0 17 0; #X connect 16 1 13 0; #X connect 16 1 18 0; #X connect 16 2 15 0; #X connect 16 2 19 0; #X connect 17 0 20 0; #X connect 18 0 20 0; #X connect 19 0 20 0; #X connect 20 0 21 0; #X connect 22 0 31 0; #X connect 23 0 22 1; #X connect 23 1 36 1; #X connect 23 2 37 1; #X connect 24 0 23 0; #X connect 24 0 26 0; #X connect 27 0 11 0; #X connect 27 1 22 0; #X connect 27 1 36 0; #X connect 27 1 37 0; #X connect 28 0 30 0; #X connect 28 1 30 1; #X connect 29 0 30 0; #X connect 29 1 30 2; #X connect 30 0 2 0; #X connect 31 0 30 0; #X connect 32 0 28 0; #X connect 33 0 29 0; #X connect 34 0 35 0; #X connect 34 1 2 0; #X connect 35 0 11 0; #X connect 35 1 2 0; #X connect 36 0 32 0; #X connect 37 0 33 0; #X connect 39 0 27 0; #X restore 119 286 pd value; #X floatatom 330 64 5 0 0 2 time - -; #X obj 173 69 hradio 15 1 0 3 empty empty value 0 -8 0 10 -262144 -1 -1 0; #X obj 173 322 outlet; #X msg 311 167 1; #X msg 284 166 0; #X msg 285 194 on $1; #X msg 325 191 dir $1; #X obj 283 125 sel 0; #X obj 324 129 moses 1; #X floatatom 254 90 5 0 0 0 / - -; #X msg 273 248 step $1; #X msg 226 187 size $1; #X floatatom 314 92 5 0 0 2 Loop_size - -; #X msg 165 188 float $1; #X obj 186 148 / 100; #X obj 120 324 outlet; #X obj 438 120 s $0-metro-t; #X msg 38 88 set $1; #X msg 58 125 set $1; #X connect 2 0 7 0; #X connect 5 0 28 0; #X connect 5 0 10 0; #X connect 5 0 25 0; #X connect 6 0 10 0; #X connect 6 0 25 0; #X connect 6 0 29 0; #X connect 7 0 8 0; #X connect 9 0 18 0; #X connect 9 0 19 0; #X connect 10 0 26 0; #X connect 10 1 13 0; #X connect 11 0 27 0; #X connect 12 0 10 1; #X connect 14 0 16 0; #X connect 15 0 16 0; #X connect 16 0 10 2; #X connect 17 0 10 2; #X connect 18 0 15 0; #X connect 18 1 14 0; #X connect 19 1 17 0; #X connect 20 0 21 0; #X connect 20 0 25 1; #X connect 21 0 10 2; #X connect 22 0 10 2; #X connect 23 0 22 0; #X connect 24 0 10 2; #X connect 25 0 24 0; #X connect 28 0 6 0; #X connect 29 0 5 0; #X coords 0 -1 1 1 270 60 2 100 50; #X restore 251 49 pd values; #X obj 252 178 unpack f f f; #X obj 319 203 v beta; #X obj 286 222 v rho; #X obj 260 240 v sigma; #X msg 252 157 14.03 43.3071 6.29921; #X obj 202 118 r $0-dt1; #X obj 207 319 s $0-val-cnv; #X obj 204 271 list prepend label; #X obj 205 294 list trim; #X obj 204 247 l2s __; #X obj 255 32 hsl 264 15 0 127 0 0 $0-val-cnv-s $0-val-cnv sigma_rho_beta 10 7 0 10 -129656 -129656 -262144 0 1; #X obj 445 230 t a a a a; #X msg 439 196 lorenz; #X obj 492 171 inlet; #X msg 487 192 set $2; #X obj 44 121 loadbang; #X floatatom 133 82 5 0 0 0 - - -; #X msg 61 264 size 264 15; #X msg 98 172 label_pos 10 7; #X obj 47 143 t b b b b; #X msg 25 242 color -8.3e+006 -8.3e+006 0; #X msg 158 131 label; #X msg 77 195 label sigma_rho_beta; #X connect 0 0 19 0; #X connect 1 0 19 0; #X connect 6 0 11 0; #X connect 6 1 1 0; #X connect 7 0 10 0; #X connect 7 1 9 0; #X connect 7 2 8 0; #X connect 11 0 7 0; #X connect 11 0 16 0; #X connect 12 0 11 0; #X connect 14 0 15 0; #X connect 15 0 13 0; #X connect 16 0 14 0; #X connect 18 0 2 0; #X connect 18 1 4 0; #X connect 18 2 5 0; #X connect 18 3 3 0; #X connect 19 0 18 0; #X connect 20 0 21 0; #X connect 21 0 19 0; #X connect 22 0 26 0; #X connect 24 0 13 0; #X connect 25 0 13 0; #X connect 26 0 27 0; #X connect 26 1 24 0; #X connect 26 2 29 0; #X connect 26 3 25 0; #X connect 27 0 13 0; #X connect 29 0 13 0; #X coords 0 -1 1 1 277 80 2 250 30; #X restore 121 124 pd strangelorenz; #N canvas 305 28 694 590 chain 0; #X obj 169 25 gemhead; #X obj 156 126 separator; #X obj 159 231 translateXYZ; #X obj 166 99 t a b; #X obj 167 46 alpha; #X floatatom 7 45 3 0 999 2 part_numb - -; #X floatatom 65 15 5 0 0 2 zoom - -; #X floatatom 7 14 5 0 0 2 part_size - -; #X obj 295 325 colorRGB; #X obj 196 200 / 5; #X obj 220 200 / 5; #X obj 246 203 / 5; #X obj 229 139 tabread $0-lorenzx; #X obj 266 164 tabread $0-lorenzy; #X obj 236 113 gem_counter 0 64; #X obj 307 198 tabread $0-lorenzz; #X obj 392 71 inlet; #X msg 395 102 set $1-$2x; #X msg 401 131 set $1-$2y; #X msg 418 157 set $1-$2z; #X obj 167 70 repeat 64; #X obj 306 87 - 1; #X obj 94 148 s $0-gemhead; #X obj 160 275 / 1000; #X obj 317 239 / 100; #X obj 323 259 * 3; #X obj 411 271 * 3; #X floatatom 68 97 5 0 0 0 - - -; #X obj 403 240 / 1000; #X obj 276 241 / 100; #X obj 287 261 * 3; #X floatatom 3 97 5 0 0 2 color - -; #X floatatom 36 97 5 0 0 0 - - -; #X obj 473 46 list prepend $0; #X obj 505 109 list prepend 100; #X msg 397 21 lorenz; #X obj 569 81 t b a; #X obj 570 48 list; #X obj 330 16 loadbang; #X msg 489 140 ; $2x resize $1; #X msg 511 176 ; $2y resize $1; #X msg 510 209 ; $2z resize $1; #X msg 476 82 $1-$2; #X obj 224 381 cube 0.05; #X connect 0 0 4 0; #X connect 1 0 2 0; #X connect 2 0 8 0; #X connect 3 0 1 0; #X connect 3 0 22 0; #X connect 3 1 14 0; #X connect 4 0 20 0; #X connect 5 0 20 1; #X connect 5 0 21 0; #X connect 6 0 9 1; #X connect 6 0 10 1; #X connect 6 0 11 1; #X connect 7 0 23 0; #X connect 8 0 43 0; #X connect 9 0 2 1; #X connect 10 0 2 2; #X connect 11 0 2 3; #X connect 12 0 9 0; #X connect 12 0 29 0; #X connect 13 0 10 0; #X connect 13 0 28 0; #X connect 13 0 24 0; #X connect 14 0 12 0; #X connect 14 0 13 0; #X connect 14 0 15 0; #X connect 15 0 11 0; #X connect 15 0 8 4; #X connect 16 0 17 0; #X connect 16 0 18 0; #X connect 16 0 19 0; #X connect 16 0 33 0; #X connect 17 0 12 0; #X connect 18 0 13 0; #X connect 19 0 15 0; #X connect 20 0 3 0; #X connect 21 0 14 3; #X connect 23 0 43 1; #X connect 24 0 25 0; #X connect 25 0 8 2; #X connect 26 0 8 3; #X connect 27 0 26 1; #X connect 28 0 26 0; #X connect 29 0 30 0; #X connect 30 0 8 1; #X connect 31 0 29 1; #X connect 32 0 24 1; #X connect 33 0 42 0; #X connect 34 0 39 0; #X connect 34 0 40 0; #X connect 34 0 41 0; #X connect 35 0 33 0; #X connect 36 0 37 0; #X connect 36 1 34 1; #X connect 37 0 34 0; #X connect 38 0 35 0; #X connect 42 0 34 0; #X connect 42 0 37 1; #X coords 0 -1 1 1 100 120 2 1 1; #X restore 11 208 pd chain; #X text 4 174 Gem chain is here; #N canvas 0 0 530 380 lorenz 0; #X obj 96 115 unpack f f f; #X obj 25 113 t b b b; #X obj 253 154 0; #X obj 279 154 + 1; #X obj 25 95 until; #X msg 269 133 0; #X obj 210 90 clip 0.01 0.1; #X msg 96 94 0.6 0.6 0.6; #X obj 25 166 expr $f1+$f4*sigma*($f2-$f1) ; $f2+$f4*(rho*$f1-$f2-$f1*$f3) ; $f3+$f4*($f1*$f2-beta*$f3); #X msg 210 55 0.01; #X floatatom 210 74 5 0 0 0 - - -; #X obj 25 13 r $0-dt4; #X obj 270 5 r $0-dt4; #X obj 210 3 r $0-dt3; #X obj 96 7 r $0-dt2; #X obj 93 141 0.6; #X obj 161 141 0.6; #X obj 25 140 0.6; #X text 296 179 expr to calc the lorenz; #X text 310 194 diff equations; #X msg 25 76 512; #X obj 68 279 table $0-lorenzx; #X obj 184 282 table $0-lorenzy; #X obj 121 309 table $0-lorenzz; #X obj 25 219 tabwrite $0-lorenzx; #X obj 104 246 tabwrite $0-lorenzy; #X obj 230 221 tabwrite $0-lorenzz; #X obj 274 58 route lorenz; #X obj 27 38 route lorenz; #X obj 109 63 route lorenz; #X obj 184 32 route lorenz; #X obj 319 309 s $0-lorenzx; #X obj 331 327 s $0-lorenzy; #X obj 348 345 s $0-lorenzz; #X msg 338 279 resize 1000; #X obj 338 255 loadbang; #X connect 0 0 17 1; #X connect 0 1 15 1; #X connect 0 2 16 1; #X connect 1 0 17 0; #X connect 1 1 2 0; #X connect 1 1 15 0; #X connect 1 2 16 0; #X connect 2 0 3 0; #X connect 2 0 24 1; #X connect 2 0 25 1; #X connect 2 0 26 1; #X connect 3 0 2 1; #X connect 4 0 1 0; #X connect 5 0 2 1; #X connect 6 0 8 3; #X connect 7 0 0 0; #X connect 8 0 17 1; #X connect 8 0 24 0; #X connect 8 1 15 1; #X connect 8 1 25 0; #X connect 8 2 16 1; #X connect 8 2 26 0; #X connect 9 0 10 0; #X connect 10 0 6 0; #X connect 11 0 28 0; #X connect 12 0 27 0; #X connect 13 0 30 0; #X connect 14 0 29 0; #X connect 15 0 8 1; #X connect 16 0 8 2; #X connect 17 0 8 0; #X connect 20 0 4 0; #X connect 27 0 5 0; #X connect 28 0 20 0; #X connect 29 0 7 0; #X connect 30 0 9 0; #X connect 34 0 31 0; #X connect 34 0 32 0; #X connect 34 0 33 0; #X connect 35 0 34 0; #X restore 226 279 pd lorenz; #X obj 407 159 metro 500; #X obj 406 130 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; #X obj 414 187 s $0-metro; #N canvas 0 0 510 360 rossler 0; #X obj 96 115 unpack f f f; #X obj 25 113 t b b b; #X obj 253 154 0; #X obj 25 95 until; #X obj 210 90 clip 0.01 0.1; #X msg 210 55 0.01; #X floatatom 210 74 5 0 0 0 - - -; #X obj 23 -8 r $0-dt4; #X obj 269 114 r $0-dt4; #X obj 211 5 r $0-dt3; #X obj 96 48 r $0-dt2; #X obj 93 141 0.6; #X obj 161 141 0.6; #X obj 25 140 0.6; #X text 296 179 expr to calc the lorenz; #X text 310 194 diff equations; #X msg 25 76 512; #X obj 68 279 table $0-rosslerx; #X obj 184 282 table $0-rosslery; #X obj 301 248 table $0-rosslerz; #X obj 230 222 tabwrite $0-rosslerz; #X obj 104 246 tabwrite $0-rosslery; #X obj 25 219 tabwrite $0-rosslerx; #X obj 211 33 route rossler; #X obj 96 71 route rossler; #X obj 24 25 route rossler; #X obj 25 166 expr $f1-$f4*($f2-$f3) ; $f2+$f4*($f1+sigma*$f2) ; $f3+$f4*(rho+$f1*$f3-beta*$f3); #X obj 279 154 + 0.1; #X msg 269 133 0; #X msg 96 94 0.2 0.2 0.2; #X connect 0 0 13 1; #X connect 0 1 11 1; #X connect 0 2 12 1; #X connect 1 0 13 0; #X connect 1 1 2 0; #X connect 1 1 11 0; #X connect 1 2 12 0; #X connect 2 0 20 1; #X connect 2 0 21 1; #X connect 2 0 22 1; #X connect 2 0 27 0; #X connect 3 0 1 0; #X connect 4 0 26 3; #X connect 5 0 6 0; #X connect 6 0 4 0; #X connect 7 0 25 0; #X connect 8 0 28 0; #X connect 9 0 23 0; #X connect 10 0 24 0; #X connect 11 0 26 1; #X connect 12 0 26 2; #X connect 13 0 26 0; #X connect 16 0 3 0; #X connect 23 0 5 0; #X connect 24 0 29 0; #X connect 25 0 16 0; #X connect 26 0 13 1; #X connect 26 0 22 0; #X connect 26 1 11 1; #X connect 26 1 21 0; #X connect 26 2 12 1; #X connect 26 2 20 0; #X connect 27 0 2 1; #X connect 28 0 2 1; #X connect 29 0 0 0; #X restore 225 308 pd rossler; #X msg 10 -14 lorenz; #X msg 56 30 rossler; #X obj 12 81 list prepend $0; #X text 42 4 no ready yet; #X text 143 104 Sigma , Rho and Beta are the three variables in functions ; #X obj 428 129 r $0-metro-t; #N canvas 0 0 478 328 gem_capture 0; #X msg 154 224 $1 $2; #X msg 230 225 $1 $2; #X floatatom 103 142 5 0 0 2 OffX - -; #X floatatom 139 141 5 0 0 2 OffY - -; #X floatatom 174 141 5 0 0 2 width - -; #X floatatom 211 142 5 0 0 2 heigth - -; #X obj 182 114 tgl 15 0 empty empty Auto 0 -6 0 8 -262144 -1 -1 0 1 ; #X msg 85 65 auto $1; #X obj 65 20 loadbang; #X obj 200 114 bng 15 250 50 0 empty empty Snap 17 7 0 10 -262144 -1 -1; #N canvas 531 200 269 198 setdir 0; #X obj 12 7 inlet; #X obj 12 161 outlet; #X obj 12 51 tot .; #X msg 12 28 query set dir [tk_chooseDirectory] .:; #X obj 12 139 list trim; #X obj 12 118 list prepend file; #X obj 12 74 l2s; #X msg 11 98 $1/snap 0; #X connect 0 0 3 0; #X connect 2 0 6 0; #X connect 3 0 2 0; #X connect 4 0 1 0; #X connect 5 0 4 0; #X connect 6 0 7 0; #X connect 7 0 5 0; #X restore 32 140 pd setdir; #X obj 104 108 bng 15 250 50 0 empty empty dir 17 7 0 10 -262144 -1 -1; #X obj 226 203 pack 0 0; #X obj 243 182 t b a; #X obj 156 202 pack 0 0; #X obj 173 181 t b a; #X obj 32 278 print Image_Capture_Directory:; #X obj 41 220 r $0-gemhead; #X obj 43 239 separator; #X obj 123 250 pix_write; #X msg 63 41 file capt/test 100; #X connect 0 0 19 1; #X connect 1 0 19 2; #X connect 2 0 14 0; #X connect 3 0 15 0; #X connect 4 0 12 0; #X connect 5 0 13 0; #X connect 6 0 7 0; #X connect 7 0 19 0; #X connect 8 0 20 0; #X connect 9 0 19 0; #X connect 10 0 16 0; #X connect 10 0 19 0; #X connect 11 0 10 0; #X connect 12 0 1 0; #X connect 13 0 12 0; #X connect 13 1 12 1; #X connect 14 0 0 0; #X connect 15 0 14 0; #X connect 15 1 14 1; #X connect 17 0 18 0; #X connect 18 0 19 0; #X connect 20 0 19 0; #X coords 0 -1 1 1 150 60 2 100 100; #X restore 320 8 pd gem_capture; #X text 335 -19 capture images; #X text 133 255 lorenz strange attractor function stored in a table: ; #X connect 5 0 7 0; #X connect 6 0 5 0; #X connect 9 0 11 0; #X connect 10 0 11 0; #X connect 11 0 2 0; #X connect 11 0 1 0; #X connect 14 0 5 1;