comparison interps/c-intercal/pit/flonck.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 DO :321 <- #0
2 DO :322 <- #0
3 DO :123 <- #65535$#65535
4 PLEASE STASH :123
5 DO (1) NEXT
6
7 (1) PLEASE FORGET #1
8 PLEASE WRITE IN :1
9 DO .5 <- '?"':1~:1'~#1"$#2'~#3
10 DO (11) NEXT
11 DO :123 <- #0
12 PLEASE STASH :123
13 DO (1) NEXT
14 (11) DO (1001) NEXT
15 DO .5 <- :1~'#65280$#65280'
16 DO .5 <- '?"!5~.5'~#1"$#1'~#3
17 DO (10) NEXT
18 PLEASE FORGET #1
19 DO (5090) NEXT
20 DO .5 <- '?".5~#2"$#2'~#3
21 DO (19) NEXT
22 DO :123 <- :2
23 PLEASE STASH :123
24 DO (1) NEXT
25 (10) DO (1001) NEXT
26 PLEASE FORGET #2
27 DO .5 <- '?"':1~#65504'~#1"$#2'~#3
28 DO (19) NEXT
29 DO (131) NEXT
30
31 (131) DO (130) NEXT
32 PLEASE FORGET #1
33 DO (18) NEXT
34 (130) DO (129) NEXT
35 PLEASE GIVE UP
36 (129) DO (128) NEXT
37 PLEASE FORGET #3
38 DO :1 <- :322
39 DO (5080) NEXT
40 PLEASE READ OUT :2
41 DO (1) NEXT
42 (128) DO (127) NEXT
43 PLEASE FORGET #4
44 DO (22) NEXT
45 DO :123 <- :322
46 PLEASE STASH :123
47 DO :322 <- :2
48 DO (1) NEXT
49 (127) DO (126) NEXT
50 PLEASE FORGET #5
51 DO :123 <- :322
52 PLEASE STASH :123
53 DO (1) NEXT
54 (126) DO (125) NEXT
55 PLEASE FORGET #6
56 DO (21) NEXT
57 DO :2 <- :322
58 DO (5000) NEXT
59 DO (33) NEXT
60 PLEASE RETRIEVE :123
61 DO :322 <- :123
62 DO (1) NEXT
63 (125) DO (124) NEXT
64 PLEASE FORGET #7
65 DO (22) NEXT
66 DO :322 <- :2
67 DO (1) NEXT
68 (124) DO (123) NEXT
69 PLEASE FORGET #8
70 DO :1 <- :321
71 DO (5080) NEXT
72 PLEASE READ OUT :2
73 DO (1) NEXT
74 (123) DO (122) NEXT
75 PLEASE FORGET #9
76 DO (21) NEXT
77 DO :123 <- :321
78 PLEASE STASH :123
79 DO :321 <- :1
80 DO (1) NEXT
81 (122) DO (121) NEXT
82 PLEASE FORGET #10
83 DO :123 <- :321
84 PLEASE STASH :123
85 DO (1) NEXT
86 (121) DO (120) NEXT
87 PLEASE FORGET #11
88 DO (22) NEXT
89 DO :1 <- :321
90 DO (5000) NEXT
91 DO (33) NEXT
92 PLEASE RETRIEVE :123
93 DO :321 <- :123
94 DO (1) NEXT
95 (120) DO (119) NEXT
96 PLEASE FORGET #12
97 DO (21) NEXT
98 DO :321 <- :1
99 DO (1) NEXT
100 (119) DO (118) NEXT
101 PLEASE FORGET #13
102 DO (5400) NEXT
103 DO :123 <- :1
104 PLEASE STASH :123
105 DO (1) NEXT
106 (118) DO (117) NEXT
107 PLEASE FORGET #14
108 DO (21) NEXT
109 DO (5020) NEXT
110 DO :123 <- :2
111 PLEASE STASH :123
112 DO (1) NEXT
113 (117) DO (116) NEXT
114 PLEASE FORGET #15
115 DO (271) NEXT
116 (272) DO (1001) NEXT
117 (271) PLEASE FORGET #1
118 PLEASE RETRIEVE :123
119 DO .5 <- '?"':123~:123'~'#32768$#0'"$#1'~#3
120 DO (272) NEXT
121 PLEASE STASH :123
122 DO (1) NEXT
123 (116) DO (115) NEXT
124 PLEASE FORGET #16
125 DO (21) NEXT
126 DO (1) NEXT
127 (115) DO (114) NEXT
128 PLEASE FORGET #17
129 DO (22) NEXT
130 DO (21) NEXT
131 DO (5130) NEXT
132 DO (33) NEXT
133 DO (1) NEXT
134 (114) DO (113) NEXT
135 PLEASE FORGET #18
136 DO (21) NEXT
137 DO (5120) NEXT
138 DO (32) NEXT
139 DO (1) NEXT
140 (113) DO (112) NEXT
141 PLEASE FORGET #19
142 DO (21) NEXT
143 DO (5110) NEXT
144 DO (32) NEXT
145 DO (1) NEXT
146 (112) DO (111) NEXT
147 PLEASE FORGET #20
148 DO (21) NEXT
149 DO (5100) NEXT
150 DO (32) NEXT
151 DO (1) NEXT
152 (111) DO (110) NEXT
153 PLEASE FORGET #21
154 DO (22) NEXT
155 DO :1 <- #30720$#28672
156 DO (5040) NEXT
157 DO (33) NEXT
158 DO (1) NEXT
159 (110) DO (109) NEXT
160 PLEASE FORGET #22
161 DO (21) NEXT
162 PLEASE DO :123 <- '"?':123~"#65535$#0"'$#32768"~"#0$#65535"'$
163 ':123~"#0$#65535"'
164 PLEASE STASH :123
165 DO (1) NEXT
166 (109) DO (108) NEXT
167 PLEASE FORGET #23
168 DO (21) NEXT
169 DO (22) NEXT
170 DO :123 <- :1
171 PLEASE STASH :123
172 DO :123 <- :2
173 PLEASE STASH :123
174 DO (1) NEXT
175 (108) DO (107) NEXT
176 PLEASE FORGET #24
177 DO (21) NEXT
178 PLEASE STASH :123 + :123
179 DO (1) NEXT
180 (107) DO (106) NEXT
181 PLEASE FORGET #25
182 DO :1 <- #65535$#65535
183 DO (171) NEXT
184 (171) PLEASE FORGET #1
185 PLEASE STASH :1
186 PLEASE RETRIEVE :123
187 DO .5 <- '?"':123~:123'~'#32768$#0'"$#2'~#3
188 DO (172) NEXT
189 DO :1 <- :123
190 DO (5080) NEXT
191 PLEASE READ OUT :2
192 DO (171) NEXT
193 (172) DO (1001) NEXT
194 PLEASE FORGET #1
195 PLEASE STASH :123
196 PLEASE RETRIEVE :1
197 DO :123 <- :1
198 DO .5 <- '?"':1~:1'~'#32768$#0'"$#1'~#3
199 DO (172) NEXT
200 DO (1) NEXT
201 (106) DO (105) NEXT
202 PLEASE FORGET #26
203 DO (21) NEXT
204 PLEASE STASH :123
205 DO (5080) NEXT
206 PLEASE READ OUT :2
207 DO (1) NEXT
208 (105) DO (104) NEXT
209 PLEASE FORGET #27
210 DO (22) NEXT
211 DO (21) NEXT
212 DO (5050) NEXT
213 DO (33) NEXT
214 DO (1) NEXT
215 (104) DO (103) NEXT
216 PLEASE FORGET #28
217 DO (22) NEXT
218 DO (21) NEXT
219 DO (5040) NEXT
220 DO (33) NEXT
221 DO (1) NEXT
222 (103) DO (102) NEXT
223 PLEASE FORGET #29
224 DO (22) NEXT
225 DO (21) NEXT
226 DO (5030) NEXT
227 DO (33) NEXT
228 DO (1) NEXT
229 (102) DO (101) NEXT
230 PLEASE FORGET #30
231 DO (22) NEXT
232 DO (21) NEXT
233 DO (5010) NEXT
234 DO (33) NEXT
235 DO (1) NEXT
236 (101) DO (100) NEXT
237 PLEASE FORGET #31
238 DO (22) NEXT
239 DO (21) NEXT
240 DO (5000) NEXT
241 DO (33) NEXT
242 DO (1) NEXT
243
244 (100) PLEASE RESUME :1
245
246 (19) DO (1001) NEXT
247 (18) PLEASE READ OUT #30
248 PLEASE FORGET #1
249 DO (1) NEXT
250
251 (21) PLEASE RETRIEVE :123
252 DO :1 <- :123
253 DO .5 <- '?"':1~:1'~'#32768$#0'"$#2'~#3
254 DO (1001) NEXT
255 PLEASE FORGET #2
256 DO (18) NEXT
257
258 (22) PLEASE RETRIEVE :123
259 DO :2 <- :123
260 DO .5 <- '?"':2~:2'~'#32768$#0'"$#2'~#3
261 DO (1001) NEXT
262 PLEASE FORGET #2
263 DO (18) NEXT
264
265 (32) DO :3 <- :2
266 (33) DO :123 <- :3
267 DO (35) NEXT
268 PLEASE FORGET #1
269 DO (18) NEXT
270 (35) DO (36) NEXT
271 DO :123 <- #0
272 DO (37) NEXT
273 (36) DO (1001) NEXT
274 (37) PLEASE STASH :123
275 PLEASE RESUME #3
276
277 PLEASE APPEND THE FLOATING-POINT LIBRARY ROUTINES