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

<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 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$#65535'
10 DO .6 <- '&.1$.2'~'#0$#65535'
11 PLEASE DO .5 <- "?!6~#32768'$#1"~#3
12 DO (1002) NEXT
13 DO .4 <- #2
14 (1005) DO (1006) NEXT
15 (1999) DOUBLE OR SINGLE PRECISION OVERFLOW
16 (1002) DO (1001) NEXT
17 (1006) PLEASE FORGET #1
18 DO .5 <- '?"!6~.6'~#1"$#1'~#3
19 DO (1003) NEXT
20 DO .1 <- .3
21 DO .2 <- !6$#0'~'#32767$#1'
22 DO (1004) NEXT
23 (1003) DO (1001) NEXT
24 DO REINSTATE (1005)
25 (1007) PLEASE RETRIEVE .1 + .2 + .5 + .6
26 DO REMEMBER .4
27 PLEASE RESUME #2
28 (1001) DO RESUME .5
29 (1010) DO STASH .1 + .2 + .4
30 DO .4 <- .1
31 DO .1 <- '?.2$#65535'~'#0$#65535'
32 DO (1020) NEXT
33 PLEASE DO .2 <- .4
34 PLEASE DO (1009) NEXT
35 DO RETRIEVE .1 + .2 + .4
36 PLEASE RESUME #1
37 (1020) DO STASH .2 + .3
38 DO .2 <- #1
39 PLEASE DO (1021) NEXT
40 (1021) DO FORGET #1
41 DO .3 <- "?!1~.2'$#1"~#3
42 PLEASE DO .1 <- '?.1$.2'~'#0$#65535'
43 DO (1022) NEXT
44 DO .2 <- !2$#0'~'#32767$#1'
45 DO (1021) NEXT
46 (1023) PLEASE RESUME .3
47 (1022) DO (1023) NEXT
48 PLEASE RETRIEVE .2 + .3
49 PLEASE RESUME #2
50 (1030) DO ABSTAIN FROM (1033)
51 PLEASE ABSTAIN FROM (1032)
52 (1039) DO STASH :1 + .5
53 DO (1530) NEXT
54 DO .3 <- :1~#65535
55 PLEASE DO .5 <- :1~'#65280$#65280'
56 DO .5 <- '?"!5~.5'~#1"$#1'~#3
57 DO (1031) NEXT
58 (1032) DO (1033) NEXT
59 DO (1999) NEXT
60 (1031) DO (1001) NEXT
61 (1033) DO .4 <- .5
62 DO REINSTATE (1032)
63 PLEASE REINSTATE (1033)
64 DO RETRIEVE :1 + .5
65 PLEASE RESUME #2
66 (1040) PLEASE STASH .1 + .2 + .2 + :1 + :2 + :3
67 DO .2 <- #0
68 DO (1520) NEXT
69 DO STASH :1
70 PLEASE RETRIEVE .2
71 DO .1 <- .2
72 DO .2 <- #0
73 PLEASE DO (1520) NEXT
74 DO :2 <- :1
75 DO RETRIEVE .1 + .2 + :1
76 DO (1550) NEXT
77 PLEASE DO .3 <- :3
78 DO RETRIEVE :1 + :2 + :3
79 DO RESUME #1
80 (1050) PLEASE STASH :2 + :3 + .5
81 DO :2 <- .1
82 PLEASE DO (1550) NEXT
83 DO .5 <- :3~'#65280$#65280'
84 DO .5 <- '?"!5~.5'~#1"$#1'~#3
85 DO (1051) NEXT
86 DO (1999) NEXT
87 (1051) DO (1001) NEXT
88 DO .2 <- :3
89 PLEASE RETRIEVE :2 + :3 + .5
90 DO RESUME #2
91 (1500) PLEASE ABSTAIN FROM (1502)
92 PLEASE ABSTAIN FROM (1506)
93 (1509) PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6
94 DO .1 <- :1~#65535
95 PLEASE DO .2 <- :2~#65535
96 DO (1009) NEXT
97 DO .5 <- .3
98 PLEASE DO .6 <- .4
99 DO .1 <- :1~'#65280$#65280'
100 DO .2 <- :2~'#65280$#65280'
101 DO (1009) NEXT
102 DO .1 <- .3
103 PLEASE DO (1503) NEXT
104 DO .6 <- .4
105 DO .2 <- #1
106 DO (1009) NEXT
107 DO .1 <- .3
108 DO (1501) NEXT
109 (1504) PLEASE RESUME .6
110 (1503) DO (1504) NEXT
111 (1501) DO .2 <- .5
112 DO .5 <- '?"'&.6$.4'~#1"$#2'~#3
113 DO (1505) NEXT
114 (1506) DO (1502) NEXT
115 PLEASE DO (1999) NEXT
116 (1505) DO (1001) NEXT
117 (1502) DO :4 <- .5
118 DO (1520) NEXT
119 DO :3 <- :1
120 PLEASE RETRIEVE :1 + .1 + .2 + .3 + .4 + .5 + .6
121 DO REINSTATE (1502)
122 DO REINSTATE (1506)
123 PLEASE RESUME #3
124 (1510) DO STASH :1 + :2 + :4
125 DO :1 <- "'?":2~'#65535$#0'"$#65535'~'#0$#65535'"$
126 "'?":2~'#0$#65535'"$#65535'~'#0$#65535'"
127 DO :2 <- #1
128 DO (1509) NEXT
129 PLEASE RETRIEVE :1
130 DO :2 <- :3
131 PLEASE DO (1509) NEXT
132 DO RETRIEVE :2 + :4
133 PLEASE RESUME #1
134 (1520) PLEASE STASH .3 + .4
135 DO .3 <- .1~#43690
136 DO (1525) NEXT
137 PLEASE DO .4 <- 'V.3$".2~#43690"'~'#0$#65535'
138 DO .3 <- .1~#21845
139 PLEASE DO (1525) NEXT
140 DO :1 <- .4$"'V.3$".2~#21845"'~'#0$#65535'"
141 PLEASE RETRIEVE .3 + .4
142 DO RESUME #1
143 (1525) DO .3 <- '"'"'"!3$#0'~'#32767$#1'"$#0'~'#32767$
144 #1'"$#0'~'#16383$#3'"$#0'~'#4095$#15'
145 PLEASE RESUME #1
146 (1530) DO STASH :2 + :3 + .3 + .5
147 DO :1 <- #0
148 DO :2 <- .2
149 DO .3 <- #1
150 DO (1535) NEXT
151 (1535) PLEASE FORGET #1
152 DO .5 <- "?!1~.3'$#1"~#3
153 DO (1531) NEXT
154 DO (1500) NEXT
155 DO :1 <- :3
156 PLEASE DO (1533) NEXT
157 (1531) PLEASE DO (1001) NEXT
158 (1533) DO FORGET #1
159 DO .3 <- !3$#0'~'#32767$#1'
160 DO :2 <- ":2~'#0$#65535'"$"'":2~'#32767$#0'"$
161 #0'~'#32767$#1'"
162 PLEASE DO .5 <- "?!3~.3'$#1"~#3
163 DO (1532) NEXT
164 DO (1535) NEXT
165 (1532) DO (1001) NEXT
166 PLEASE RETRIEVE :2 + :3 + .3 + .5
167 DO RESUME #2
168 (1540) PLEASE ABSTAIN FROM (1541)
169 DO ABSTAIN FROM (1542)
170 (1549) PLEASE STASH :1 + :2 + :4 + :5 + .1 + .2 + .5
171 DO .1 <- :1~#65535
172 PLEASE DO .2 <- :2~'#65280$#65280'
173 DO .5 <- :1~'#65280$#65280'
174 DO (1530) NEXT
175 DO :3 <- :1
176 DO .2 <- :2~#65535
177 PLEASE DO (1530) NEXT
178 DO :5 <- :1
179 DO .1 <- .5
180 DO (1530) NEXT
181 DO :4 <- :1
182 PLEASE DO :1 <- ":3~'#65280$#65280'"$":4~'#65280$
183 #65280'"
184 DO .5 <- ':1~:1'~#1
185 DO .2 <- :2~'#65280$#65280'
186 DO (1530) NEXT
187 PLEASE DO .5 <- '"':1~:1'~#1"$.5'~#3
188 DO .1 <- :3~#65535
189 DO .2 <- #0
190 DO (1520) NEXT
191 PLEASE DO :2 <- :1
192 PLEASE DO .1 <- :4~#65535
193 DO (1520) NEXT
194 DO (1509) NEXT
195 DO .5 <- !5$":4~#3"'~#15
196 DO :1 <- :3
197 DO :2 <- :5
198 DO (1509) NEXT
199 PLEASE DO .5 <- !5$":4~#3"'~#172
200 DO .5 <- '?"!5~.5'~#1"$#1'~#3
201 PLEASE RETRIEVE :4
202 (1541) DO :4 <- .5
203 DO (1543) NEXT
204 (1542) DO (1544) NEXT
205 PLEASE DO (1999) NEXT
206 (1543) DO (1001) NEXT
207 (1544) DO REINSTATE (1541)
208 PLEASE REINSTATE (1542)
209 PLEASE RETRIEVE :1 + :2 + :5 + .1 + .2 + .5
210 DO RESUME #2
211 (1550) DO STASH :1 + :4 + :5 + .5
212 DO :3 <- #0
213 DO .5 <- '?"':2~:2'~#1"$#1'~#3
214 PLEASE DO (1551) NEXT
215 DO :4 <- #1
216 PLEASE DO (1553) NEXT
217 (1553) DO FORGET #1
218 DO .5 <- '?":2~'#32768$#0'"$#2'~#3
219 DO (1552) NEXT
220 DO :2 <- ":2~'#0$#65535'"$"'":2~'#32767$#0'"$#
221 0'~'#32767$#1'"
222 PLEASE DO :4 <- ":4~'#0$#65535'"$"'":4~'#32767
223 $#0'"$#0'~'#32767$#1'"
224 DO (1553) NEXT
225 (1552) DO (1001) NEXT
226 (1556) PLEASE FORGET #1
227 DO :5 <- "'?":1~'#65535$#0'"$":2~'#65535$#0'"'
228 ~'#0$#65535'"$"'?":1~'#0$#65535'"$":2~'#0$
229 #65535'"'~'#0$#65535'"
230 DO .5 <- '?"'&"':2~:5'~'"'?"'?":5~:5"~"#65535$
231 #65535"'~'#65535$#0'"$#32768'~'#0$#65535'"
232 $"'?":5~:5"~"#65535$#65535"'~'#0$#65535'"'
233 "$"':5~:5'~#1"'~#1"$#2'~#3
234 DO (1554) NEXT
235 DO :5 <- :3
236 DO (1510) NEXT
237 PLEASE DO :1 <- :3
238 DO :3 <- "'V":4~'#65535$#0'"$":5~'#65535$#0'"'
239 ~'#0$#65535'"$"'V":4~'#0$#65535'"$":5~'#0$
240 #65535'"'~'#0$#65535'"
241 DO (1555) NEXT
242 (1554) PLEASE DO (1001) NEXT
243 (1555) DO FORGET #1
244 DO .5 <- "?':4~#1'$#2"~#3
245 DO (1551) NEXT
246 DO :2 <- ":2~'#0$#65534'"$":2~'#65535$#0'"
247 DO :4 <- ":4~'#0$#65534'"$":4~'#65535$#0'"
248 PLEASE DO (1556) NEXT
249 (1551) DO (1001) NEXT
250 PLEASE RETRIEVE :1 + :4 + :5 + .5
251 PLEASE RESUME #2
252 (1900) DO STASH .2 + .3 + .5
253 DO .1 <- #0
254 DO .2 <- #1
255 PLEASE DO (1901) NEXT
256 (1901) DO FORGET #1
257 DO %50 .1 <- 'V.1$.2'~'#0$#65535'
258 DO .2 <- !2$#0'~'#32767$#1'
259 PLEASE DO .5 <- "?!2~.2'$#1"~#3
260 DO (1902) NEXT
261 DO (1901) NEXT
262 (1902) DO (1001) NEXT
263 DO RETRIEVE .2 + .3 + .5
264 PLEASE RESUME #2
265 (1910) PLEASE STASH .1 + .3 + .5 + :1 + :2 + :3
266 DO .3 <- #65524
267 DO :1 <- #6
268 DO (1911) NEXT
269 PLEASE NOTE THAT YOU CAN'T GET THERE FROM HERE
270 (1912) DO (1001) NEXT
271 (1911) DO FORGET #1
272 PLEASE DO (1900) NEXT
273 DO :2 <- .1
274 DO (1500) NEXT
275 PLEASE DO :1 <- :3
276 DO .1 <- .3
277 DO (1020) NEXT
278 PLEASE DO .3 <- .1
279 DO .5 <- '?"!3~.3'~#1"$#2'~#3
280 DO (1912) NEXT
281 DO .1 <- #12
282 PLEASE DO (1050) NEXT
283 DO RETRIEVE .1
284 DO (1530) NEXT
285 DO :2 <- #32768
286 DO (1500) NEXT
287 PLEASE DO .2 <- :3~'#65280$#65280'
288 PLEASE RETRIEVE .3 + .5 + :1 + :2 + :3
289 DO RESUME #1