OS/2 Shareware BBS: 10 Tools/10-Tools.zip/lifeos2.zip/LIFE-1.02/PITCH/SHUFFLE.P

Text File | 1995-05-09 | 8KB | 1,621 lines

bind_deck(0,[5,
11,
12,
40,
16,
2,
15,
21,
30,
36,
45,
22,
6,
8,
19,
23,
20,
9,
24,
26,
27,
29,
10,
32,
0,
46,
38,
48,
51,
52,
17,
18,
25,
35,
43,
13,
4,
1,
7,
33,
39,
28,
44,
47,
3,
53,
42,
50,
34,
49,
14,
31,
37,
41]).
bind_deck(1,[53,
52,
49,
30,
15,
29,
44,
51,
50,
7,
19,
48,
8,
13,
16,
14,
0,
24,
40,
43,
6,
28,
45,
5,
22,
37,
47,
46,
42,
41,
3,
11,
20,
21,
25,
26,
10,
23,
18,
27,
32,
34,
12,
36,
17,
9,
38,
33,
1,
35,
39,
4,
31,
2]).
bind_deck(2,[34,
33,
31,
53,
32,
38,
43,
12,
26,
36,
21,
5,
17,
29,
35,
37,
44,
45,
41,
15,
46,
52,
51,
9,
50,
49,
48,
47,
27,
4,
16,
11,
10,
25,
42,
40,
0,
18,
2,
3,
7,
8,
19,
1,
6,
14,
22,
23,
30,
24,
20,
28,
39,
13]).
bind_deck(3,[6,
34,
21,
17,
38,
15,
1,
7,
13,
10,
24,
2,
9,
26,
28,
35,
14,
39,
43,
23,
44,
45,
30,
37,
4,
50,
51,
0,
46,
41,
20,
32,
25,
19,
11,
12,
22,
29,
40,
42,
47,
16,
5,
31,
36,
3,
52,
18,
8,
27,
53,
49,
33,
48]).
bind_deck(4,[53,
0,
14,
15,
17,
37,
51,
16,
18,
32,
52,
5,
23,
44,
10,
24,
50,
11,
28,
2,
34,
38,
41,
30,
9,
49,
48,
6,
33,
25,
47,
26,
46,
45,
43,
42,
3,
31,
7,
29,
35,
1,
20,
39,
27,
4,
8,
12,
13,
21,
22,
19,
36,
40]).
bind_deck(5,[38,
41,
52,
0,
36,
11,
19,
26,
37,
12,
44,
45,
5,
17,
31,
49,
2,
7,
21,
46,
50,
10,
13,
16,
6,
20,
3,
27,
9,
29,
1,
30,
4,
22,
24,
32,
14,
18,
23,
25,
33,
35,
39,
8,
34,
43,
28,
48,
47,
42,
15,
51,
53,
40]).
bind_deck(6,[3,
9,
29,
32,
36,
39,
40,
25,
2,
17,
27,
31,
7,
4,
24,
23,
14,
10,
13,
35,
38,
11,
21,
0,
15,
22,
26,
12,
19,
28,
41,
43,
1,
30,
18,
20,
33,
44,
46,
48,
34,
50,
47,
6,
16,
37,
49,
51,
52,
42,
53,
5,
45,
8]).
bind_deck(7,[9,
7,
53,
52,
46,
5,
4,
6,
18,
16,
14,
25,
35,
36,
42,
43,
47,
40,
31,
2,
51,
38,
44,
32,
23,
24,
26,
13,
17,
50,
49,
29,
37,
48,
45,
15,
27,
1,
28,
8,
20,
22,
12,
33,
11,
10,
34,
3,
39,
21,
30,
19,
0,
41]).
bind_deck(8,[31,
43,
53,
52,
1,
51,
50,
49,
48,
25,
39,
36,
47,
24,
46,
45,
2,
29,
20,
28,
22,
12,
26,
27,
40,
42,
5,
8,
17,
21,
38,
34,
4,
10,
33,
6,
18,
37,
3,
44,
23,
41,
13,
11,
16,
19,
15,
7,
30,
32,
35,
0,
14,
9]).
bind_deck(9,[53,
52,
15,
26,
19,
38,
2,
11,
6,
0,
8,
16,
18,
22,
28,
5,
29,
32,
1,
30,
34,
35,
37,
39,
36,
44,
9,
21,
17,
27,
42,
45,
7,
10,
46,
23,
43,
47,
12,
4,
13,
20,
25,
31,
41,
24,
48,
3,
49,
14,
33,
40,
50,
51]).
bind_deck(10,[9,
11,
26,
53,
52,
13,
28,
2,
10,
30,
0,
17,
22,
41,
6,
4,
18,
33,
34,
3,
5,
37,
46,
12,
15,
16,
24,
25,
32,
19,
39,
35,
47,
1,
48,
51,
36,
43,
8,
50,
40,
29,
44,
20,
49,
27,
14,
31,
7,
21,
38,
42,
45,
23]).
bind_deck(11,[9,
22,
24,
32,
39,
23,
21,
17,
40,
47,
2,
8,
53,
10,
33,
28,
4,
16,
13,
29,
44,
51,
52,
15,
26,
30,
14,
50,
48,
49,
3,
31,
37,
46,
27,
5,
1,
35,
20,
0,
6,
11,
12,
34,
36,
7,
38,
41,
45,
43,
18,
25,
19,
42]).
bind_deck(12,[53,
11,
30,
26,
32,
1,
8,
45,
52,
29,
16,
28,
15,
33,
19,
34,
35,
39,
42,
43,
48,
21,
22,
49,
12,
50,
46,
6,
24,
4,
51,
9,
18,
13,
7,
10,
31,
5,
27,
20,
25,
36,
40,
38,
23,
0,
3,
37,
41,
14,
44,
17,
47,
2]).
bind_deck(13,[53,
19,
0,
9,
25,
52,
2,
11,
17,
13,
20,
21,
37,
23,
51,
50,
10,
33,
45,
18,
35,
46,
4,
14,
27,
34,
15,
12,
26,
38,
42,
36,
32,
47,
40,
3,
6,
7,
30,
44,
43,
16,
22,
28,
29,
8,
31,
1,
5,
24,
41,
39,
48,
49]).
bind_deck(14,[53,
32,
8,
24,
26,
52,
51,
50,
2,
49,
17,
36,
39,
41,
27,
16,
48,
10,
12,
18,
19,
23,
5,
7,
14,
21,
28,
42,
44,
45,
46,
47,
9,
0,
4,
3,
6,
13,
1,
15,
11,
37,
38,
40,
20,
43,
34,
30,
29,
31,
33,
22,
25,
35]).
bind_deck(15,[4,
1,
43,
53,
18,
39,
9,
38,
13,
32,
48,
50,
19,
52,
33,
46,
40,
51,
49,
47,
11,
21,
25,
45,
44,
3,
16,
0,
17,
20,
27,
30,
42,
2,
41,
15,
6,
29,
37,
35,
5,
7,
28,
31,
24,
36,
10,
22,
26,
34,
23,
14,
8,
12]).
bind_deck(16,[53,
52,
51,
50,
5,
12,
49,
29,
13,
43,
23,
48,
6,
14,
4,
10,
32,
42,
0,
9,
22,
31,
34,
39,
27,
7,
33,
16,
36,
26,
41,
45,
3,
2,
30,
44,
1,
11,
18,
21,
46,
25,
20,
24,
35,
28,
17,
19,
38,
8,
47,
40,
37,
15]).
bind_deck(17,[53,
49,
37,
52,
51,
19,
2,
20,
32,
39,
50,
4,
9,
18,
17,
48,
47,
46,
45,
44,
30,
11,
5,
38,
43,
21,
13,
15,
3,
35,
36,
25,
41,
6,
42,
40,
34,
1,
8,
7,
0,
10,
12,
14,
16,
23,
24,
22,
27,
26,
28,
29,
31,
33]).
bind_deck(18,[15,
53,
52,
40,
17,
9,
0,
16,
43,
50,
51,
49,
11,
48,
47,
46,
27,
30,
28,
29,
38,
3,
24,
34,
32,
45,
44,
42,
20,
37,
5,
23,
2,
7,
14,
10,
8,
1,
4,
12,
18,
19,
13,
21,
6,
22,
26,
31,
25,
33,
35,
36,
39,
41]).
bind_deck(19,[28,
35,
40,
0,
29,
30,
52,
53,
51,
50,
45,
1,
8,
15,
17,
24,
10,
14,
33,
4,
36,
23,
38,
11,
22,
12,
27,
43,
18,
32,
37,
13,
26,
34,
9,
2,
5,
21,
25,
7,
31,
41,
42,
46,
6,
16,
3,
19,
20,
39,
44,
47,
48,
49]).
bind_deck(20,[53,
0,
16,
28,
8,
10,
3,
12,
15,
20,
30,
14,
31,
36,
26,
11,
23,
7,
13,
33,
39,
40,
41,
45,
9,
32,
38,
47,
6,
19,
4,
24,
27,
2,
17,
29,
46,
5,
48,
49,
50,
37,
51,
52,
42,
44,
43,
22,
35,
34,
25,
1,
21,
18]).
bind_deck(21,[11,
15,
6,
0,
30,
7,
32,
42,
22,
25,
18,
29,
26,
31,
33,
35,
39,
45,
16,
48,
37,
43,
5,
46,
50,
4,
9,
36,
3,
8,
19,
27,
10,
14,
40,
47,
24,
49,
51,
1,
52,
2,
20,
28,
23,
41,
44,
12,
21,
38,
53,
13,
34,
17]).
bind_deck(22,[1,
53,
18,
30,
52,
51,
50,
16,
0,
6,
15,
31,
7,
4,
10,
11,
38,
41,
39,
49,
3,
48,
13,
34,
47,
42,
36,
14,
37,
46,
40,
25,
23,
8,
45,
44,
43,
22,
20,
19,
26,
28,
29,
35,
33,
27,
32,
24,
2,
9,
12,
5,
17,
21]).
bind_deck(23,[23,
27,
39,
53,
52,
8,
51,
1,
5,
26,
28,
34,
35,
0,
10,
14,
16,
30,
19,
32,
37,
40,
25,
29,
2,
42,
13,
20,
17,
22,
3,
6,
11,
36,
21,
15,
7,
4,
24,
38,
43,
46,
41,
49,
9,
12,
18,
31,
44,
47,
45,
33,
48,
50]).
bind_deck(24,[44,
49,
53,
11,
25,
28,
52,
39,
50,
51,
48,
6,
27,
47,
20,
23,
34,
46,
29,
2,
3,
12,
0,
5,
7,
13,
17,
9,
22,
1,
30,
8,
31,
35,
4,
21,
36,
18,
37,
24,
15,
38,
40,
10,
41,
19,
14,
26,
42,
32,
43,
45,
33,
16]).
bind_deck(25,[3,
7,
9,
23,
16,
33,
42,
32,
35,
28,
27,
31,
34,
36,
46,
4,
1,
49,
50,
14,
19,
29,
8,
39,
43,
52,
2,
44,
53,
51,
5,
30,
22,
47,
48,
0,
45,
41,
40,
38,
10,
17,
18,
20,
21,
25,
24,
13,
26,
12,
37,
11,
6,
15]).
bind_deck(26,[2,
26,
22,
3,
43,
53,
8,
0,
34,
38,
52,
49,
11,
24,
45,
10,
51,
13,
30,
20,
44,
7,
48,
50,
47,
21,
46,
9,
42,
23,
41,
40,
25,
28,
27,
35,
14,
5,
15,
17,
4,
18,
19,
16,
29,
12,
32,
37,
1,
6,
31,
33,
36,
39]).
bind_deck(27,[53,
17,
51,
50,
52,
49,
33,
34,
31,
12,
1,
20,
28,
5,
32,
35,
10,
11,
2,
27,
29,
9,
36,
0,
25,
30,
40,
18,
41,
42,
43,
26,
19,
48,
23,
15,
13,
16,
22,
39,
3,
45,
46,
8,
24,
4,
38,
44,
47,
37,
21,
14,
6,
7]).
bind_deck(28,[15,
19,
20,
30,
27,
7,
31,
6,
13,
34,
42,
16,
5,
28,
43,
40,
44,
45,
46,
49,
11,
33,
47,
51,
26,
3,
10,
32,
38,
41,
52,
53,
50,
48,
9,
12,
17,
0,
8,
21,
23,
1,
29,
35,
2,
36,
14,
4,
39,
22,
25,
24,
18,
37]).
bind_deck(29,[16,
22,
23,
30,
33,
53,
24,
12,
28,
19,
18,
35,
44,
7,
52,
51,
50,
38,
39,
29,
40,
3,
36,
21,
15,
45,
2,
4,
25,
37,
42,
17,
49,
5,
11,
1,
8,
48,
47,
0,
6,
10,
20,
27,
31,
41,
9,
43,
14,
34,
13,
26,
32,
46]).