Mercurial > repo
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 |