aboutsummaryrefslogtreecommitdiff
path: root/packages/noncvs/windows/extra/Gem/examples/99.games/puzzle.pd
blob: d02322c734bd4d771bdb233f1ec038f910c90ea1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
#N canvas 14 64 584 223 12;
#X obj 171 14 cnv 15 200 130 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 258 30 bng 30 250 50 0 up y up 8 -8 192 12 -261681 -1 -1;
#X obj 258 90 bng 30 250 50 0 down y down -5 38 192 12 -261681 -1 -1
;
#X obj 288 60 bng 30 250 50 0 right y right 33 15 192 12 -261681 -1
-1;
#X obj 228 60 bng 30 250 50 0 left y left -53 15 192 12 -261681 -1
-1;
#N canvas 133 127 818 527 code 0;
#X obj 128 45 gemkeyname;
#X obj 128 77 select 1;
#X obj 128 104 symbol;
#X msg 128 131 \$1 0;
#X obj 411 229 r reset;
#X obj 411 255 t b b;
#X msg 505 229 bang;
#X obj 418 194 gemwin;
#X msg 415 132 create;
#X msg 422 157 destroy;
#X obj 501 147 tgl 30 0 empty empty empty 20 8 0 8 -262144 -1 -1 1
1;
#X obj 342 79 del 100;
#X msg 342 130 1;
#X obj 342 17 r start;
#X msg 509 113 reset;
#X obj 584 204 gemmouse;
#X obj 617 239 s help;
#X obj 342 45 t b b b;
#X obj 342 103 t b b b;
#N canvas 81 93 600 400 original 0;
#X obj 86 109 gemhead;
#X obj 86 345 square 4;
#X obj 86 30 r help;
#X obj 86 73 != 0;
#X obj 173 45 loadbang;
#X msg 173 68 0;
#X obj 86 143 pix_image ../data/fractal.JPG;
#X obj 86 272 pix_texture;
#X connect 0 0 6 0;
#X connect 2 0 3 0;
#X connect 3 0 0 0;
#X connect 4 0 5 0;
#X connect 5 0 3 0;
#X connect 6 0 7 0;
#X connect 7 0 1 0;
#X restore 445 390 pd original image;
#N canvas 4 20 450 300 control 0;
#X obj 149 48 route Left Right Up Down;
#X msg 191 206 move \$1;
#X msg 191 138 5;
#X msg 149 138 4;
#X msg 231 138 6;
#X msg 192 111 8;
#X msg 193 165 2;
#X obj 48 98 r up;
#X obj 47 167 r down;
#X obj 0 129 r left;
#X obj 71 131 r right;
#X obj 194 256 outlet;
#X obj 146 18 inlet;
#X obj 295 109 inlet;
#X connect 0 0 3 0;
#X connect 0 1 4 0;
#X connect 0 2 5 0;
#X connect 0 3 6 0;
#X connect 1 0 11 0;
#X connect 2 0 1 0;
#X connect 3 0 1 0;
#X connect 4 0 1 0;
#X connect 5 0 1 0;
#X connect 6 0 1 0;
#X connect 7 0 5 0;
#X connect 8 0 6 0;
#X connect 9 0 3 0;
#X connect 10 0 4 0;
#X connect 12 0 0 0;
#X connect 13 0 2 0;
#X restore 128 276 pd control;
#N canvas 113 141 600 498 puzzled 0;
#X obj 120 110 gemhead;
#X obj 120 415 square 4;
#X floatatom 179 389 5 0 0 0 - - -;
#X obj 120 309 pix_puzzle 4 4;
#X msg 221 203 size 4 4;
#X obj 120 213 pix_image;
#X msg 153 175 open ../data/fractal.JPG;
#X obj 204 97 loadbang;
#X obj 204 125 t b b;
#X obj 221 48 t b a;
#X obj 341 56 t b b;
#X obj 117 40 r help;
#X obj 120 79 == 0;
#X obj 37 27 loadbang;
#X msg 38 52 0;
#X obj 120 342 pix_texture;
#X obj 343 27 inlet scramble!;
#X obj 222 18 inlet move!;
#X connect 0 0 5 0;
#X connect 2 0 1 1;
#X connect 3 0 15 0;
#X connect 4 0 3 0;
#X connect 5 0 3 0;
#X connect 6 0 5 0;
#X connect 7 0 8 0;
#X connect 8 0 4 0;
#X connect 8 1 6 0;
#X connect 9 0 6 0;
#X connect 9 1 3 0;
#X connect 10 0 6 0;
#X connect 10 1 3 0;
#X connect 11 0 12 0;
#X connect 12 0 0 0;
#X connect 13 0 14 0;
#X connect 14 0 12 0;
#X connect 15 0 1 0;
#X connect 16 0 10 0;
#X connect 17 0 9 0;
#X restore 128 390 pd puzzled image;
#X obj 213 249 loadbang;
#X text 116 439 we use [pix_puzzle] to scramble the image. this is
not very effective (as we could use openGL-texture coordinates too).
anyhow it is just simple;
#X connect 0 0 1 0;
#X connect 0 1 2 1;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 20 0;
#X connect 4 0 5 0;
#X connect 5 0 20 1;
#X connect 5 1 21 1;
#X connect 6 0 5 0;
#X connect 8 0 7 0;
#X connect 9 0 7 0;
#X connect 10 0 7 0;
#X connect 11 0 18 0;
#X connect 12 0 7 0;
#X connect 13 0 17 0;
#X connect 14 0 7 0;
#X connect 15 2 16 0;
#X connect 17 0 11 0;
#X connect 17 1 14 0;
#X connect 17 2 9 0;
#X connect 18 0 12 0;
#X connect 18 1 8 0;
#X connect 18 2 6 0;
#X connect 20 0 21 0;
#X connect 22 0 20 1;
#X restore 420 99 pd code;
#X obj 435 39 bng 50 250 50 0 reset empty RESET 0 -8 128 12 -258699
-1 -1;
#X obj 50 38 bng 50 250 50 0 start empty start 0 -8 128 12 -24198 -1
-1;
#X obj 257 60 tgl 30 0 help help ? 7 15 192 24 -262144 -258699 -1 0
1;
#X text 61 168 on linux you can use the arrow-keys too...;
#X text 46 187 first mouse-button toggles between help/game;