-
Notifications
You must be signed in to change notification settings - Fork 0
/
snake++
executable file
·126 lines (125 loc) · 2.3 KB
/
snake++
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
blue ~~~8>~ 0 1;
yellow ~~~8>~ 0 2;
green ~<8~~~ 0 0;
if green == 0 then
blue ~~~8>~ 0 3;
yellow ~~~8>~ 0 4;
green := 1;
green ~~~8>~ 0 0;
return "";
else
if green == 1 then
green ~<8~~~ 0 3;
red ~<8~~~ 0 4;
green := blue - green;
red := yellow - red;
green ~~~8>~ 0 5;
red ~~~8>~ 0 6;
green := 2;
green ~~~8>~ 0 0;
slide {moveToCourse};
else
if green == 2 then
slide {moveToCourse};
else
slide {moveOnCourse};
fi;
fi;
fi;
{myReturn}
if banana == "R" then
green ~<8~~~ 0 5;
yellow ~<8~~~ 0 6;
blue := (0 - yellow);
green ~~~8>~ 0 6;
blue ~~~8>~ 0 5;
else
if banana == "L" then
green ~<8~~~ 0 5;
yellow ~<8~~~ 0 6;
blue := (0 - green);
yellow ~~~8>~ 0 5;
blue ~~~8>~ 0 6;
fi;
fi;
return banana;
{moveToCourse}
green ~<8~~~ 0 5;
red ~<8~~~ 0 6;
blue ~<8~~~ 0 1;
yellow ~<8~~~ 0 2;
if blue == 2 then
if green == 1 then
banana := "";
slide {myReturn};
fi;
if (green + 1) == 0 then
banana := "R";
slide {myReturn};
fi;
if red == 1 then
banana := "L";
slide {myReturn};
fi;
if (red + 1) == 0 then
banana := "R";
slide {myReturn};
fi;
else
if green == 1 then
banana := "R";
slide {myReturn};
else
green := 3;
green ~~~8>~ 0 0;
banana := "";
slide {myReturn};
fi;
fi;
{moveOnCourse}
blue ~<8~~~ 0 1;
yellow ~<8~~~ 0 2;
green ~<8~~~ 0 0;
red ~<8~~~ 0 6;
if green == 3 then
if blue == 1 then
if yellow == 2 then
green := 5;
green ~~~8>~ 0 0;
banana := "R";
slide {myReturn};
fi;
fi;
if yellow < 4 then
if yellow == 2 then
green := 4;
green ~~~8>~ 0 0;
fi;
banana := "L";
slide {myReturn};
fi;
banana := "";
slide {myReturn};
fi;
if green == 4 then
if yellow > 17 then
if yellow == 19 then
green := 3;
green ~~~8>~ 0 0;
fi;
banana := "R";
slide {myReturn};
fi;
banana := "";
slide {myReturn};
fi;
if green == 5 then
if blue == 28 then
green := 4;
green ~~~8>~ 0 0;
banana := "R";
slide {myReturn};
fi;
fi;
slide {myReturn};
.