Mercurial > repo

comparison interps/c-intercal/pit/lib/syslib.4i @ 996:859f9b4339e6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<Gregor> tar xf egobot.tar.xz
author HackBot
date Sun, 09 Dec 2012 19:30:08 +0000
parents
children
comparison
equal deleted inserted replaced
995:6883f5911eb7 996:859f9b4339e6
1 PLEASE KNOCK TWICE TWO TIMES 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$#21845'
10 DO .6 <- '?"'V"'&.1$.2'~'#0$#21845'"$"'^"'@.1$
11 .2'~'#0$#21845'"$#21845'~'#0$#43690'"'
12 ~'#0$#21845'"$#43690'~'#0$#21845'
13 PLEASE DO .5 <- '?".6~#49152"$#4'~#4
14 DO (1002) NEXT
15 DO .4 <- #2
16 (1005) DO (1006) NEXT
17 (1999) DOUBLE OR SINGLE PRECISION OVERFLOW
18 (1002) DO (1001) NEXT
19 (1006) PLEASE FORGET #1
20 DO .5 <- '?"!6~.6'~#3"$#4'~#4
21 DO (1003) NEXT
22 DO .1 <- .3
23 DO .2 <- !6$#0'~'#5461$#1'
24 DO (1004) NEXT
25 (1003) DO (1001) NEXT
26 DO REINSTATE (1005)
27 (1007) PLEASE RETRIEVE .1 + .2 + .5 + .6
28 DO REMEMBER .4
29 PLEASE RESUME #2
30 (1001) DO RESUME .5
31 (1010) DO STASH .1 + .2 + .4
32 DO .4 <- .1
33 DO .1 <- '?#65535$.2'~'#0$#21845'
34 DO (1020) NEXT
35 PLEASE DO .2 <- .4
36 PLEASE DO (1009) NEXT
37 DO RETRIEVE .1 + .2 + .4
38 PLEASE RESUME #1
39 (1020) DO STASH .2 + .3
40 DO .2 <- #1
41 PLEASE DO (1021) NEXT
42 (1021) DO FORGET #1
43 DO .3 <- '?"'V".1~.2"$#2'~#1"$#1'~#1
44 PLEASE DO .1 <- '^.1$.2'~'#0$#21845'
45 DO (1022) NEXT
46 DO .2 <- !2$#0'~'#5461$#1'
47 DO (1021) NEXT
48 (1023) PLEASE RESUME .3
49 (1022) DO (1023) NEXT
50 PLEASE RETRIEVE .2 + .3
51 PLEASE RESUME #2
52 (1030) DO ABSTAIN FROM (1033)
53 PLEASE ABSTAIN FROM (1032)
54 (1039) DO STASH :1 + .5
55 DO (1530) NEXT
56 DO .3 <- :1~#21845
57 PLEASE DO .5 <- :1~'#21760$#21760'
58 DO .5 <- '?"!5~.5'~#3"$#4'~#4
59 DO (1031) NEXT
60 (1032) DO (1033) NEXT
61 DO (1999) NEXT
62 (1031) DO (1001) NEXT
63 (1033) DO .4 <- .5
64 DO REINSTATE (1032)
65 PLEASE REINSTATE (1033)
66 DO RETRIEVE :1 + .5
67 PLEASE RESUME #2
68 (1040) PLEASE STASH .1 + .2 + .2 + :1 + :2 + :3
69 DO .2 <- #0
70 DO (1520) NEXT
71 DO STASH :1
72 PLEASE RETRIEVE .2
73 DO .1 <- .2
74 DO .2 <- #0
75 PLEASE DO (1520) NEXT
76 DO :2 <- :1
77 DO RETRIEVE .1 + .2 + :1
78 DO (1550) NEXT
79 PLEASE DO .3 <- :3
80 DO RETRIEVE :1 + :2 + :3
81 DO RESUME #1
82 (1050) PLEASE STASH :2 + :3 + .5
83 DO :2 <- .1
84 PLEASE DO (1550) NEXT
85 DO .5 <- :3~'#21760$#21760'
86 DO .5 <- '?"!5~.5'~#3"$#4'~#4
87 DO (1051) NEXT
88 DO (1999) NEXT
89 (1051) DO (1001) NEXT
90 DO .2 <- :3
91 PLEASE RETRIEVE :2 + :3 + .5
92 DO RESUME #2
93 (1200) DO .2 <- '^.1$.1'~'#0$#21845'
94 DO .3 <- '?"'@.1$#0'~'#0$#21845'"$"'@.1$#65535'
95 ~'#0$#21845'"'~'#0$#21845'
96 DO .2 <- '^.2$"!3$#0'~'#5461$#1'"'~'#0$#21845'
97 DO .3 <- .3~#16384
98 PLEASE RESUME #1
99 (1210) DO .2 <- '?"'@.1$#0'~'#0$#21845'"$"'@.1$#65535'
100 ~'#0$#21845'"'~'#0$#21845'
101 DO .3 <- '^.1$.1'~'#0$#21845'
102 DO .2 <- '^.2$".3~#21844"'~'#0$#21845'
103 DO .3 <- .3~#1
104 PLEASE RESUME #1
105 (1500) PLEASE ABSTAIN FROM (1502)
106 PLEASE ABSTAIN FROM (1506)
107 (1509) PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6
108 DO .1 <- :1~#21845
109 PLEASE DO .2 <- :2~#21845
110 DO (1009) NEXT
111 DO .5 <- .3
112 PLEASE DO .6 <- .4
113 DO .1 <- :1~'#21760$#21760'
114 DO .2 <- :2~'#21760$#21760'
115 DO (1009) NEXT
116 DO .1 <- .3
117 PLEASE DO (1503) NEXT
118 DO .6 <- .4
119 DO .2 <- #1
120 DO (1009) NEXT
121 DO .1 <- .3
122 DO (1501) NEXT
123 (1504) PLEASE RESUME .6
124 (1503) DO (1504) NEXT
125 (1501) DO .2 <- .5
126 DO .5 <- '&.6$.4'
127 DO (1505) NEXT
128 (1506) DO (1502) NEXT
129 PLEASE DO (1999) NEXT
130 (1505) DO (1001) NEXT
131 (1502) DO :4 <- .5
132 DO (1520) NEXT
133 DO :3 <- :1
134 PLEASE RETRIEVE :1 + .1 + .2 + .3 + .4 + .5 + .6
135 DO REINSTATE (1502)
136 DO REINSTATE (1506)
137 PLEASE RESUME #3
138 (1510) DO STASH :1 + :2 + :4
139 DO :1 <- "'?#65535$":2~'#21845$#0'"'~'#0$#21845'"$
140 "'?#65535$":2~'#0$#21845'"'~'#0$#21845'"
141 DO :2 <- #1
142 DO (1509) NEXT
143 PLEASE RETRIEVE :1
144 DO :2 <- :3
145 PLEASE DO (1509) NEXT
146 DO RETRIEVE :2 + :4
147 PLEASE RESUME #1
148 (1520) PLEASE STASH .3 + .4
149 DO .3 <- .1~#17476
150 DO (1525) NEXT
151 PLEASE DO .4 <- 'V.3$".2~#17476"'~'#0$#21845'
152 DO .3 <- .1~#4369
153 PLEASE DO (1525) NEXT
154 DO :1 <- .4$"'V.3$".2~#4369"'~'#0$#21845'"
155 PLEASE RETRIEVE .3 + .4
156 DO RESUME #1
157 (1525) DO .3 <- '"'"!3$#0'~'#5461$#1'"$#0'~'#5461$#1'"$
158 #0'~'#1365$#5'
159 PLEASE RESUME #1
160 (1530) DO STASH :2 + :3 + .1 + .2 + .3
161 DO :3 <- #0
162 DO :2 <- .1
163 DO (1535) NEXT
164 (1535) PLEASE FORGET #1
165 DO .3 <- '?"!2~.2'~#3"$#4'~#4
166 DO (1532) NEXT
167 DO .1 <- .2
168 DO (1210) NEXT
169 DO .3 <- 'V.3$#1'~#1
170 DO (1531) NEXT
171 DO :1 <- :3
172 DO (1500) NEXT
173 PLEASE DO (1533) NEXT
174 (1531) PLEASE DO (1534) NEXT
175 (1533) DO FORGET #1
176 DO :1 <- :2
177 DO (1700) NEXT
178 DO (1535) NEXT
179 (1534) PLEASE RESUME .3
180 (1532) DO (1534) NEXT
181 DO :1 <- :3
182 PLEASE RETRIEVE :2 + :3 + .1 + .2 + .3
183 DO RESUME #2
184 (1540) PLEASE ABSTAIN FROM (1541)
185 DO ABSTAIN FROM (1542)
186 (1549) PLEASE STASH :1 + :2 + :4 + :5 + .1 + .2 + .5
187 DO .1 <- :1~#21845
188 PLEASE DO .2 <- :2~'#21760$#21760'
189 DO .5 <- :1~'#21760$#21760'
190 DO (1530) NEXT
191 DO :3 <- :1
192 DO .2 <- :2~#21845
193 PLEASE DO (1530) NEXT
194 DO :5 <- :1
195 DO .1 <- .5
196 DO (1530) NEXT
197 DO :4 <- :1
198 PLEASE DO :1 <- ":3~'#21760$#21760'"$":4
199 ~'#21760$#21760'"
200 DO .5 <- ':1~:1'~#3
201 DO .2 <- :2~'#21760$#21760'
202 DO (1530) NEXT
203 PLEASE DO .5 <- '"':1~:1'~#3"$.5'~#5
204 DO .1 <- :3~#21845
205 DO .2 <- #0
206 DO (1520) NEXT
207 PLEASE DO :2 <- :1
208 PLEASE DO .1 <- :4~#21845
209 DO (1520) NEXT
210 DO (1509) NEXT
211 DO .5 <- !5$"'^":4~#1"$#1'~#1"'~#69
212 DO :1 <- :3
213 DO :2 <- :5
214 DO (1509) NEXT
215 PLEASE DO .5 <- !5$"'^":4~#1"$#1'~#1"'~#1093
216 DO .5 <- '?"!5~.5'~#1"$#1'~#1
217 PLEASE RETRIEVE :4
218 (1541) DO :4 <- .5
219 DO (1543) NEXT
220 (1542) DO (1544) NEXT
221 PLEASE DO (1999) NEXT
222 (1543) DO (1001) NEXT
223 (1544) DO REINSTATE (1541)
224 PLEASE REINSTATE (1542)
225 PLEASE RETRIEVE :1 + :2 + :5 + .1 + .2 + .5
226 DO RESUME #2
227 (1550) DO STASH :1 + :1 + :4 + :5 + :6 + .1 + .5
228 DO :3 <- #0
229 DO .5 <- '?"':2~:2'~#3"$#4'~#4
230 PLEASE DO (1551) NEXT
231 DO :4 <- #1
232 PLEASE DO (1553) NEXT
233 (1553) DO FORGET #1
234 DO .5 <- '?#0$"'V"'@":2~'#16384$#0'"$#3'~#1"$#2'
235 ~#1"'~#1
236 DO (1552) NEXT
237 DO :5 <- :2
238 DO :1 <- :4
239 PLEASE DO (1700) NEXT
240 DO :4 <- :2
241 DO :1 <- :5
242 PLEASE DO (1700) NEXT
243 DO (1553) NEXT
244 (1552) DO (1001) NEXT
245 DO RETRIEVE :1
246 (1556) PLEASE FORGET #1
247 DO :6 <- "'&":2~'#21845$#0'"$"'?#65535$":1
248 ~'#21845$#0'"'~'#0$#21845'"'~'#0$#21845'"$
249 "'&":2~'#0$#21845'"$"'?#65535$":1~'#0$
250 #21845'"'~'#0$#21845'"'~'#0$#21845'"
251 DO :6 <- "'?"'V":6~'#21845$#0'"$#21845'~'#0$
252 #21845'"$#21845'~'#0$#65535'"$"'?"'V":6
253 ~'#0$#21845'"$#21845'~'#0$#21845'"$#21845'
254 ~'#0$#65535'"
255 DO :5 <- "'?":1~'#21845$#0'"$":2~'#21845$#0'"'
256 ~'#0$#65535'"$"'?":1~'#0$#21845'"$":2~'#0$
257 #21845'"'~'#0$#65535'"
258 DO .5 <- "?'"':6~:5'~'"'"'&"':5~:5'~'#21845$#0'"$
259 #16384'~'#0$#21845'"$"'?:5~:5'~'#5461$#0'"'
260 ~'#16384$#5461'"$"'?:5~:5'~'#0$#21845'"'"
261 ~#1'$#2"~#1
262 DO (1554) NEXT
263 DO :5 <- :3
264 DO (1510) NEXT
265 PLEASE DO :1 <- :3
266 DO :3 <- "'^":4~'#21845$#0'"$":5~'#21845$#0'"'
267 ~'#0$#21845'"$"'^":4~'#0$#21845'"$":5~'#0$
268 #21845'"'~'#0$#21845'"
269 DO (1555) NEXT
270 (1554) PLEASE DO (1001) NEXT
271 (1555) DO FORGET #1
272 DO .5 <- 'V":4~#1"$"'?#2$":4~#1"'~#1"'~#1
273 DO (1551) NEXT
274 DO :5 <- :1
275 DO :1 <- :4
276 DO :4 <- :2
277 DO (1710) NEXT
278 DO :1 <- :4
279 DO :4 <- :2
280 DO (1710) NEXT
281 DO :1 <- :5
282 PLEASE DO (1556) NEXT
283 (1551) DO (1001) NEXT
284 PLEASE RETRIEVE :1 + :4 + :5 + :6 + .1 + .5
285 PLEASE RESUME #2
286 (1700) PLEASE STASH .2
287 DO .1 <- :1~'#0$#21845'
288 DO .2 <- :1~'#21845$#0'
289 DO :2 <- "'^.2$.2'~'#0$#21845'"$"'^.1$.1'~'#0$
290 #21845'"
291 DO .1 <- '?"'@.1$#0'~'#0$#21845'"$"'@.1$#65535'
292 ~'#0$#21845'"'~'#0$#21845'
293 DO .2 <- '?"'@.2$#0'~'#0$#21845'"$"'@.2$#65535'
294 ~'#0$#21845'"'~'#0$#21845'
295 DO :2 <- "'^":2~'#21845$#0'"$.1'~'#0$#21845'"$
296 "'^":2~'#0$#21845'"$"'.2$#0'~'#5461$#1'"'
297 ~'#0$#21845'"
298 DO .1 <- .2~#16384
299 PLEASE RETRIEVE .2
300 PLEASE RESUME #1
301 (1710) PLEASE STASH :1 + .2
302 DO .1 <- :1~'#0$#21845'
303 DO .2 <- :1~'#21845$#0'
304 DO :2 <- "'^.2$.2'~'#0$#21845'"$"'^.1$.1'~'#0$
305 #21845'"
306 DO :1 <- "'?"'@.2$#0'~'#0$#21845'"$"'@.2$#65535'
307 ~'#0$#21845'"'~'#0$#21845'"$"'?"'@.1$#0'
308 ~'#0$#21845'"$"'@.1$#65535'~'#0$#21845'"'
309 ~'#0$#21845'"
310 DO .1 <- :2~#1
311 DO :2 <- "'^":1~'#21845$#0'"$":2~'#0$#21844'"'
312 ~'#0$#21845'"$"'^":1~'#0$#21845'"$":2
313 ~'#21845$#0'"'~'#0$#21845'"
314 PLEASE RETRIEVE :1 + .2
315 PLEASE RESUME #1
316 (1900) DO STASH .2 + .5
317 DO .1 <- #0
318 DO .2 <- #1
319 PLEASE DO (1901) NEXT
320 (1901) PLEASE FORGET #1
321 DO %50 .1 <- 'V.1$.2'~'#0$#21845'
322 DO %50 .1 <- '^.1$".2~#43690"'~'#0$#21845'
323 DO .2 <- !2$#0'~'#5461$#1'
324 PLEASE DO .5 <- '^".2~.2"$#1'~#1
325 DO (1902) NEXT
326 DO (1901) NEXT
327 (1902) DO (1001) NEXT
328 DO RETRIEVE .2 + .5
329 PLEASE RESUME #2
330 (1910) PLEASE STASH .1 + .3 + .5 + :1 + :2 + :3
331 DO .3 <- #65524
332 DO :1 <- #6
333 DO (1911) NEXT
334 PLEASE NOTE THAT YOU CAN'T GET ANYWHERE FROM HERE
335 (1912) DO (1001) NEXT
336 (1911) DO FORGET #1
337 PLEASE DO (1900) NEXT
338 DO :2 <- .1
339 DO (1500) NEXT
340 PLEASE DO :1 <- :3
341 DO .1 <- .3
342 DO (1020) NEXT
343 PLEASE DO .3 <- .1
344 DO .5 <- '?"!3~.3'~#3"$#2'~#1
345 DO (1912) NEXT
346 DO .1 <- #12
347 PLEASE DO (1050) NEXT
348 DO RETRIEVE .1
349 DO (1530) NEXT
350 DO :2 <- #32768
351 DO (1500) NEXT
352 PLEASE DO .2 <- :3~'#21760$#21760'
353 PLEASE RETRIEVE .3 + .5 + :1 + :2 + :3
354 DO RESUME #1