996
|
1 PLEASE KNOCK "SHAVE-AND-A-HAIRCUT-TWO-PLEASE" BEFORE ENTERING
|
|
2
|
|
3 (1000) PLEASE IGNORE .4
|
|
4 PLEASE ABSTAIN FROM (1005)
|
|
5 (1009) DO STASH .1 + .2 + .5 + .6
|
|
6 DO .4 <- #1
|
|
7 DO (1004) NEXT
|
|
8 (1004) PLEASE FORGET #1
|
|
9 DO .3 <- '^.1$.2'~'#0$#2801'
|
|
10 DO .6 <- '?"'V"'V"'&.1$.2'~'#0$#2801'"$"'^"'@.1$
|
|
11 .2'~'#0$#2801'"$#2801'~'#0$#2801'"'~'#0$
|
|
12 #2801'"$"'^"'2@.1$.2'~'#0$#2801'"$#5602'
|
|
13 ~'#0$#2801'"'~'#0$#14005'"$#14005'~'#0$#2801'
|
|
14 PLEASE DO .5 <- "?!6~#14406'$#7"~#7
|
|
15 DO (1002) NEXT
|
|
16 DO .4 <- #2
|
|
17 (1005) DO (1006) NEXT
|
|
18 (1999) DOUBLE OR SINGLE PRECISION OVERFLOW
|
|
19 (1002) DO (1001) NEXT
|
|
20 (1006) PLEASE FORGET #1
|
|
21 DO .5 <- '?"!6~.6'~#6"$#7'~#7
|
|
22 DO (1003) NEXT
|
|
23 DO .1 <- .3
|
|
24 DO .2 <- !6$#0'~'#400$#1'
|
|
25 DO (1004) NEXT
|
|
26 (1003) DO (1001) NEXT
|
|
27 DO REINSTATE (1005)
|
|
28 (1007) PLEASE RETRIEVE .1 + .2 + .5 + .6
|
|
29 DO REMEMBER .4
|
|
30 PLEASE RESUME #2
|
|
31 (1001) DO RESUME .5
|
|
32 (1010) DO STASH .1 + .2 + .4
|
|
33 DO .4 <- .1
|
|
34 DO .1 <- '?#16806$.2'~'#0$#2801'
|
|
35 DO (1020) NEXT
|
|
36 PLEASE DO .2 <- .4
|
|
37 PLEASE DO (1009) NEXT
|
|
38 DO RETRIEVE .1 + .2 + .4
|
|
39 PLEASE RESUME #1
|
|
40 (1020) DO STASH .2 + .3
|
|
41 DO .2 <- #1
|
|
42 PLEASE DO (1021) NEXT
|
|
43 (1021) DO FORGET #1
|
|
44 DO .3 <- '?"'V".1~.2"$#5'~#1"$#4'~#1
|
|
45 PLEASE DO .1 <- '^.1$.2'~'#0$#2801'
|
|
46 DO (1022) NEXT
|
|
47 DO .2 <- !2$#0'~'#400$#1'
|
|
48 DO (1021) NEXT
|
|
49 (1023) PLEASE RESUME .3
|
|
50 (1022) DO (1023) NEXT
|
|
51 PLEASE RETRIEVE .2 + .3
|
|
52 PLEASE RESUME #2
|
|
53 (1030) DO ABSTAIN FROM (1033)
|
|
54 PLEASE ABSTAIN FROM (1032)
|
|
55 (1039) DO STASH :1 + .5
|
|
56 DO (1530) NEXT
|
|
57 DO .3 <- :1~#2801
|
|
58 PLEASE DO .5 <- :1~'#2793$#2744'
|
|
59 DO .5 <- '?"!5~.5'~#6"$#7'~#7
|
|
60 DO (1031) NEXT
|
|
61 (1032) DO (1033) NEXT
|
|
62 DO (1999) NEXT
|
|
63 (1031) DO (1001) NEXT
|
|
64 (1033) DO .4 <- .5
|
|
65 DO REINSTATE (1032)
|
|
66 PLEASE REINSTATE (1033)
|
|
67 DO RETRIEVE :1 + .5
|
|
68 PLEASE RESUME #2
|
|
69 (1040) PLEASE STASH .1 + .2 + .2 + :1 + :2 + :3
|
|
70 DO .2 <- #0
|
|
71 DO (1520) NEXT
|
|
72 DO STASH :1
|
|
73 PLEASE RETRIEVE .2
|
|
74 DO .1 <- .2
|
|
75 DO .2 <- #0
|
|
76 PLEASE DO (1520) NEXT
|
|
77 DO :2 <- :1
|
|
78 DO RETRIEVE .1 + .2 + :1
|
|
79 DO (1550) NEXT
|
|
80 PLEASE DO .3 <- :3
|
|
81 DO RETRIEVE :1 + :2 + :3
|
|
82 DO RESUME #1
|
|
83 (1050) PLEASE STASH :2 + :3 + .5
|
|
84 DO :2 <- .1
|
|
85 PLEASE DO (1550) NEXT
|
|
86 DO .5 <- :3~'#2793$#2744'
|
|
87 DO .5 <- '?"!5~.5'~#6"$#7'~#7
|
|
88 DO (1051) NEXT
|
|
89 DO (1999) NEXT
|
|
90 (1051) DO (1001) NEXT
|
|
91 DO .2 <- :3
|
|
92 PLEASE RETRIEVE :2 + :3 + .5
|
|
93 DO RESUME #2
|
|
94 (1500) PLEASE ABSTAIN FROM (1502)
|
|
95 PLEASE ABSTAIN FROM (1506)
|
|
96 (1509) PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6
|
|
97 DO .1 <- :1~#2801
|
|
98 PLEASE DO .2 <- :2~#2801
|
|
99 DO (1009) NEXT
|
|
100 DO .5 <- .3
|
|
101 PLEASE DO .6 <- .4
|
|
102 DO .1 <- :1~'#2793$#2744'
|
|
103 DO .2 <- :2~'#2793$#2744'
|
|
104 DO (1009) NEXT
|
|
105 DO .1 <- .3
|
|
106 PLEASE DO (1503) NEXT
|
|
107 DO .6 <- .4
|
|
108 DO .2 <- #1
|
|
109 DO (1009) NEXT
|
|
110 DO .1 <- .3
|
|
111 DO (1501) NEXT
|
|
112 (1504) PLEASE RESUME .6
|
|
113 (1503) DO (1504) NEXT
|
|
114 (1501) DO .2 <- .5
|
|
115 DO .5 <- '&.6$.4'
|
|
116 DO (1505) NEXT
|
|
117 (1506) DO (1502) NEXT
|
|
118 PLEASE DO (1999) NEXT
|
|
119 (1505) DO (1001) NEXT
|
|
120 (1502) DO :4 <- .5
|
|
121 DO (1520) NEXT
|
|
122 DO :3 <- :1
|
|
123 PLEASE RETRIEVE :1 + .1 + .2 + .3 + .4 + .5 + .6
|
|
124 DO REINSTATE (1502)
|
|
125 DO REINSTATE (1506)
|
|
126 PLEASE RESUME #3
|
|
127 (1510) DO STASH :1 + :2 + :4
|
|
128 DO :1 <- "'?#16806$":2~'#2801$#0'"'~'#0$#2801'"$
|
|
129 "'?#16806$":2~'#0$#2801'"'~'#0$#2801'"
|
|
130 DO :2 <- #1
|
|
131 DO (1509) NEXT
|
|
132 PLEASE RETRIEVE :1
|
|
133 DO :2 <- :3
|
|
134 PLEASE DO (1509) NEXT
|
|
135 DO RETRIEVE :2 + :4
|
|
136 PLEASE RESUME #1
|
|
137 (1520) PLEASE STASH .3 + .4
|
|
138 DO .3 <- .1~#2451
|
|
139 DO (1525) NEXT
|
|
140 PLEASE DO .4 <- 'V.3$".2~#350"'~'#0$#2801'
|
|
141 DO .3 <- .1~#350
|
|
142 PLEASE DO (1526) NEXT
|
|
143 DO :1 <- .4$"'V.3$".2~#2451"'~'#0$#2801'"
|
|
144 PLEASE RETRIEVE .3 + .4
|
|
145 DO RESUME #1
|
|
146 (1525) DO .3 <- '"!3$#0'~'#400$#1'"$#0'~'#400$#1'
|
|
147 PLEASE RESUME #1
|
|
148 (1526) DO .3 <- '"!3$#0'~'#400$#1'"$#0'~'#57$#8'
|
|
149 PLEASE RESUME #1
|
|
150 (1530) DO STASH :2 + :3 + :4 + .1 + .2 + .5
|
|
151 DO :3 <- #0
|
|
152 DO :4 <- .2
|
|
153 DO (1535) NEXT
|
|
154 (1535) PLEASE FORGET #1
|
|
155 DO .5 <- '?".1~#6"$#7'~#7
|
|
156 DO (1531) NEXT
|
|
157 DO :1 <- :4
|
|
158 DO (1720) NEXT
|
|
159 DO :1 <- :3
|
|
160 DO (1500) NEXT
|
|
161 PLEASE DO (1533) NEXT
|
|
162 (1531) PLEASE DO (1001) NEXT
|
|
163 (1533) DO FORGET #1
|
|
164 DO .1 <- .1~#2800
|
|
165 DO :4 <- ":4~'#0$#2801'"$"'":4~'#400$#0'"$#0'
|
|
166 ~'#400$#1'"
|
|
167 PLEASE DO .5 <- '?"!1~.1'~#6"$#7'~#7
|
|
168 DO (1532) NEXT
|
|
169 DO (1535) NEXT
|
|
170 (1532) DO (1001) NEXT
|
|
171 DO :1 <- :3
|
|
172 PLEASE RETRIEVE :2 + :3 + :4 + .1 + .2 + .5
|
|
173 DO RESUME #2
|
|
174 (1540) PLEASE ABSTAIN FROM (1541)
|
|
175 DO ABSTAIN FROM (1542)
|
|
176 (1549) PLEASE STASH :1 + :2 + :4 + :5 + .1 + .2 + .5
|
|
177 DO .1 <- :1~#2801
|
|
178 PLEASE DO .2 <- :2~'#2793$#2744'
|
|
179 DO .5 <- :1~'#2793$#2744'
|
|
180 DO (1530) NEXT
|
|
181 DO :3 <- :1
|
|
182 DO .2 <- :2~#2801
|
|
183 PLEASE DO (1530) NEXT
|
|
184 DO :5 <- :1
|
|
185 DO .1 <- .5
|
|
186 DO (1530) NEXT
|
|
187 DO :4 <- :1
|
|
188 PLEASE DO :1 <- ":3~'#2793$#2744'"$":4
|
|
189 ~'#2793$#2744'"
|
|
190 DO .5 <- ':1~:1'~#6
|
|
191 DO .2 <- :2~'#2793$#2744'
|
|
192 DO (1530) NEXT
|
|
193 PLEASE DO .5 <- '"':1~:1'~#6"$.5'~#8
|
|
194 DO .1 <- :3~#2801
|
|
195 DO .2 <- #0
|
|
196 DO (1520) NEXT
|
|
197 PLEASE DO :2 <- :1
|
|
198 PLEASE DO .1 <- :4~#2801
|
|
199 DO (1520) NEXT
|
|
200 DO (1509) NEXT
|
|
201 DO .5 <- !5$"'^":4~#1"$#4'~#1"'~#351
|
|
202 DO :1 <- :3
|
|
203 DO :2 <- :5
|
|
204 DO (1509) NEXT
|
|
205 PLEASE DO .5 <- !5$"'^":4~#1"$#4'~#1"'~'#57$#1'
|
|
206 DO .5 <- '?"!5~.5'~#1"$#4'~#1
|
|
207 PLEASE RETRIEVE :4
|
|
208 (1541) DO :4 <- .5
|
|
209 DO (1543) NEXT
|
|
210 (1542) DO (1544) NEXT
|
|
211 PLEASE DO (1999) NEXT
|
|
212 (1543) DO (1001) NEXT
|
|
213 (1544) DO REINSTATE (1541)
|
|
214 PLEASE REINSTATE (1542)
|
|
215 PLEASE RETRIEVE :1 + :2 + :5 + .1 + .2 + .5
|
|
216 DO RESUME #2
|
|
217 (1550) DO STASH :1 + :4 + :5 + :6 + .1 + .5
|
|
218 DO :5 <- #0
|
|
219 DO .5 <- '?"':2~:2'~#6"$#7'~#7
|
|
220 PLEASE DO (1551) NEXT
|
|
221 DO :4 <- #1
|
|
222 PLEASE DO (1553) NEXT
|
|
223 (1553) DO FORGET #1
|
|
224 DO .5 <- '?"':2~"#14406$#0"'"$#5'~#1
|
|
225 DO (1552) NEXT
|
|
226 DO :2 <- ":2~'#0$#2801'"$"'":2~'#400$#0'"$#0'
|
|
227 ~'#400$#1'"
|
|
228 PLEASE DO :4 <- ":4~'#0$#2801'"$"'":4~'#400
|
|
229 $#0'"$#0'~'#400$#1'"
|
|
230 DO (1553) NEXT
|
|
231 (1552) DO (1001) NEXT
|
|
232 DO .1 <- #0
|
|
233 (1556) PLEASE FORGET #1
|
|
234 DO :6 <- "'&":2~'#2801$#0'"$"'?#16806$":1
|
|
235 ~'#2801$#0'"'~'#0$#2801'"'~'#0$#2801'"$
|
|
236 "'&":2~'#0$#2801'"$"'?#16806$":1~'#0$
|
|
237 #2801'"'~'#0$#2801'"'~'#0$#2801'"
|
|
238 DO :3 <- "'?":1~'#2801$#0'"$":2~'#2801$#0'"'
|
|
239 ~'#0$#2801'"$"'?":1~'#0$#2801'"$":2~'#0$
|
|
240 #2801'"'~'#0$#2801'"
|
|
241 DO :6 <- "'&":6~'#2801$#0'"$":3~'#2801$#0'"'
|
|
242 ~'#0$#2801'"$"'&":6~'#0$#2801'"$":3~'#0$
|
|
243 #2801'"'~'#0$#2801'"
|
|
244 DO :3 <- :3~'#16806$#16806'
|
|
245 DO :6 <- "'?"'V":6~'#2801$#0'"$#11204'~'#0$
|
|
246 #2801'"$#11204'~'#0$#16806'"$"'?"'V":6
|
|
247 ~'#0$#2801'"$#11204'~'#0$#2801'"$#11204'
|
|
248 ~'#0$#16806'"
|
|
249 DO .5 <- "?'"':6~:3'~'"'"'&"':3~:3'~'#2801$#0'"$
|
|
250 #2401'~'#0$#2801'"$"'?:3~:3'~'#400$#0'"'
|
|
251 ~'#2401$#400'"$"'?:3~:3'~'#0$#2801'"'"~#1'$
|
|
252 #5"~#1
|
|
253 PLEASE DO (1557) NEXT
|
|
254 DO (1510) NEXT
|
|
255 DO :1 <- :3
|
|
256 DO .5 <- '?#0$"'V.1$#5'~#1"'~#1
|
|
257 DO (1557) NEXT
|
|
258 DO .1 <- '^.1$#2801'~'#0$#2801'
|
|
259 DO (1556) NEXT
|
|
260 (1557) PLEASE DO (1001) NEXT
|
|
261 PLEASE FORGET #1
|
|
262 DO :5 <- "'V":4~'.1$#0'"$":5~'#2801$#0'"'
|
|
263 ~'#0$#2801'"$"'V":4~'#0$.1'"$":5~'#0$
|
|
264 #2801'"'~'#0$#2801'"
|
|
265 DO .5 <- "?#2$':4~#1'"~#1
|
|
266 DO (1551) NEXT
|
|
267 DO :2 <- :2~'#2801$#2800'
|
|
268 DO :4 <- :4~'#2801$#2800'
|
|
269 DO .1 <- #0
|
|
270 PLEASE DO (1556) NEXT
|
|
271 (1551) DO (1001) NEXT
|
|
272 DO :3 <- :5
|
|
273 PLEASE RETRIEVE :1 + :4 + :5 + :6 + .1 + .5
|
|
274 PLEASE RESUME #2
|
|
275 (1720) PLEASE STASH :1 + :3 + :4 + .1 + .5
|
|
276 DO :2 <- #0
|
|
277 DO .2 <- #0
|
|
278 DO .5 <- '?".1~#6"$#7'~#7
|
|
279 DO (1729) NEXT
|
|
280 DO .5 <- .1~#1
|
|
281 DO .2 <- :1~'#2801$#0'
|
|
282 DO .1 <- :1~'#0$#2801'
|
|
283 PLEASE DO (1726) NEXT
|
|
284 DO :1 <- '"?#0$.2"~"#0$#2801"'$'"?#0$.1"~"#0$
|
|
285 #2801"'
|
|
286 DO :2 <- '"?'"V.2$#2801"~"#0$#2801"'$#2801"
|
|
287 ~"#0$#2801"'$'"?'"V.1$#2801"~"#0$#2801"'$
|
|
288 #2801"~"#0$#2801"'
|
|
289 DO (1728) NEXT
|
|
290 (1726) PLEASE DO (1725) NEXT
|
|
291 DO :1 <- '"?#0$'"^.2$.2"~"#0$#2801"'"~"#0$
|
|
292 #2801"'$'"?#0$'"^.1$.1"~"#0$#2801"'"~"#0$
|
|
293 #2801"'
|
|
294 DO .2 <- "^'"V'"2@.2$#11204"~"#0$#2801"'$
|
|
295 #5602"~"#0$#2801"'$'"2@.2$#2801"~"#0$
|
|
296 #2801"'"~"#0$#2801"
|
|
297 DO .1 <- "^'"V'"2@.1$#11204"~"#0$#2801"'$
|
|
298 #5602"~"#0$#2801"'$'"2@.1$#2801"~"#0$
|
|
299 #2801"'"~"#0$#2801"
|
|
300 DO :2 <- '"?.2$#8403"~"#0$#2801"'$'"?.1$#8403"
|
|
301 ~"#0$#2801"'
|
|
302 (1728) DO .2 <- :2~'#2401$#0'
|
|
303 DO :2 <- ':2~"#0$#2801"'$'"':2~"#400$#0"'$#0"
|
|
304 ~"#400$#1"'
|
|
305 DO (1509) NEXT
|
|
306 DO :2 <- :3
|
|
307 DO .2 <- '^.2$"'?":4~#1"$#1'~#1"'~#1
|
|
308 DO (1721) NEXT
|
|
309 (1725) PLEASE DO (1724) NEXT
|
|
310 DO :2 <- '"?'"V'"?'"3@.2$#14005"~"#0$#2801"'$
|
|
311 '"@.2$#0"~"#0$#2801"'"~"#0$#11204"'$#8403"
|
|
312 ~"#0$#2801"'$#8403"~"#0$#2801"'$
|
|
313 '"?'"V'"?'"3@.1$#14005"~"#0$#2801"'$'"@.1$
|
|
314 #0"~"#0$#2801"'"~"#0$#11204"'$#8403"~"#0$
|
|
315 #2801"'$#8403"~"#0$#2801"'
|
|
316 DO .2 <- '^.2$.2'~'#0$#2801'
|
|
317 DO .1 <- '^.1$.1'~'#0$#2801'
|
|
318 DO :1 <- '"^.2$.2"~"#0$#2801"'$'"^.1$.1"~"#0$
|
|
319 #2801"'
|
|
320 PLEASE FORGET #2
|
|
321 DO (1728) NEXT
|
|
322 (1724) PLEASE DO (1723) NEXT
|
|
323 DO :1 <- '"^'"^.2$.2"~"#0$#2801"'$.2"~"#0$
|
|
324 #2801"'$'"^'"^.1$.1"~"#0$#2801"'$.1"
|
|
325 ~"#0$#2801"'
|
|
326 DO .2 <- "^'"V'"2@.2$#16806"~"#0$#2801"'$
|
|
327 #14005"~"#0$#2801"'$'"V'"4@.2$#16806"
|
|
328 ~"#0$#2801"'$#14005"~"#0$#2801"'"~"#0$
|
|
329 #2801"
|
|
330 DO .1 <- "^'"V'"2@.1$#16806"~"#0$#2801"'$
|
|
331 #14005"~"#0$#2801"'$'"V'"4@.1$#16806"
|
|
332 ~"#0$#2801"'$#14005"~"#0$#2801"'"~"#0$
|
|
333 #2801"
|
|
334 DO :2 <- '"?.2$#8403"~"#0$#2801"'$'"?.1$#8403"
|
|
335 ~"#0$#2801"'
|
|
336 PLEASE FORGET #3
|
|
337 DO (1728) NEXT
|
|
338 (1723) PLEASE DO (1722) NEXT
|
|
339 DO :1 <- '"^.2$.2"~"#0$#2801"'$'"^.1$.1"~"#0$
|
|
340 #2801"'
|
|
341 DO :2 <- '"?'"V'"3@.2$#16806"~"#0$#2801"'$
|
|
342 #14005"~"#0$#2801"'$#14005"~"#0$#2801"'$
|
|
343 '"?'"V'"3@.1$#16806"~"#0$#2801"'$#14005"
|
|
344 ~"#0$#2801"'$#14005"~"#0$#2801"'
|
|
345 PLEASE FORGET #4
|
|
346 DO (1728) NEXT
|
|
347 (1729) DO (1001) NEXT
|
|
348 DO (1721) NEXT
|
|
349 (1722) PLEASE DO (1001) NEXT
|
|
350 DO :2 <- :1
|
|
351 DO .2 <- #0
|
|
352 DO FORGET #3
|
|
353 (1721) PLEASE RETRIEVE :1 + :3 + :4 + .1 + .5
|
|
354 PLEASE RESUME #3
|
|
355 (1900) DO STASH .2 + .5
|
|
356 DO .1 <- #0
|
|
357 DO .2 <- #1
|
|
358 PLEASE DO (1901) NEXT
|
|
359 (1901) DO FORGET #1
|
|
360 DO %50 (1905) NEXT
|
|
361 DO %50 (1904) NEXT
|
|
362 DO %50 (1901) NEXT
|
|
363 PLEASE DO (1903) NEXT
|
|
364 (1905) DO FORGET #1
|
|
365 DO .1 <- '^.1$".2~#8403"'~'#0$#2801'
|
|
366 PLEASE DO %50 .1 <- '^.1$".2~#5602"'~'#0$#2801'
|
|
367 DO (1906) NEXT
|
|
368 (1904) DO .1 <- '^.1$.2'~'#0$#2801'
|
|
369 (1906) DO %50 .1 <- '^.1$.2'~'#0$#2801'
|
|
370 (1903) PLEASE FORGET #1
|
|
371 DO .2 <- !2$#0'~'#400$#1'
|
|
372 PLEASE DO .5 <- '^".2~.2"$#1'~#1
|
|
373 DO (1902) NEXT
|
|
374 DO (1901) NEXT
|
|
375 (1902) DO (1001) NEXT
|
|
376 DO RETRIEVE .2 + .5
|
|
377 PLEASE RESUME #2
|
|
378 (1910) PLEASE STASH .1 + .3 + .5 + :1 + :2 + :3
|
|
379 DO .3 <- #16795
|
|
380 DO :1 <- #6
|
|
381 DO (1911) NEXT
|
|
382 PLEASE NOTE THAT YOU CAN'T GET SENSE FROM INTERCAL
|
|
383 (1912) DO (1001) NEXT
|
|
384 (1911) DO FORGET #1
|
|
385 PLEASE DO (1900) NEXT
|
|
386 DO :2 <- .1
|
|
387 DO (1500) NEXT
|
|
388 PLEASE DO :1 <- :3
|
|
389 DO .1 <- .3
|
|
390 DO (1020) NEXT
|
|
391 PLEASE DO .3 <- .1
|
|
392 DO .5 <- '?"!3~.3'~#6"$#5'~#1
|
|
393 DO (1912) NEXT
|
|
394 DO .1 <- #12
|
|
395 PLEASE DO (1050) NEXT
|
|
396 DO RETRIEVE .1
|
|
397 DO (1530) NEXT
|
|
398 DO :2 <- #8403
|
|
399 DO (1500) NEXT
|
|
400 PLEASE DO .2 <- :3~'#2793$#2744'
|
|
401 PLEASE RETRIEVE .3 + .5 + :1 + :2 + :3
|
|
402 DO RESUME #1
|