Mercurial > repo
comparison interps/c-intercal/pit/tests/ais2.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 NOTE THIS PROGRAM USES NO NEXTING + FORGETTING + RESUMING | |
| 2 | |
| 3 (5) DO .1 <- #0 | |
| 4 (6) DO .2 <- #1 | |
| 5 (7) DO .9 <- #1 | |
| 6 DON'T .1 <- .2 | |
| 7 DON'T .2 <- .3 | |
| 8 DON'T READ OUT .1 | |
| 9 DON'T WRITE IN .9 | |
| 10 PLEASE NOTE THAT WE EXIT IF WE READ ZERO | |
| 11 DO REINSTATE (15) | |
| 12 DO REINSTATE (14) | |
| 13 (14) DO ABSTAIN FROM (16) | |
| 14 (15) DO ABSTAIN '"'.9~.9'~#1"$#1'~#3 FROM (16) | |
| 15 PLEASE NOTE THAT LINE 16 IS NOW ABSTAINED FROM TWICE OR FOUR TIMES | |
| 16 DO REINSTATE (16) | |
| 17 DO REINSTATE (16) | |
| 18 (16) DON'T ABSTAIN FROM CALCULATING + REINSTATING + ABSTAINING + TRYING AGAIN | |
| 19 DO REINSTATE (16) | |
| 20 DO REINSTATE (16) | |
| 21 | |
| 22 (10) PLEASE DO REINSTATE CALCULATING + READING OUT + WRITING IN | |
| 23 DO ABSTAIN FROM (5) | |
| 24 DO ABSTAIN FROM (6) | |
| 25 DO ABSTAIN FROM (7) | |
| 26 DO ABSTAIN FROM (10) | |
| 27 DO ABSTAIN FROM ABSTAINING | |
| 28 | |
| 29 DO .3 <- .1 | |
| 30 DO .4 <- .2 | |
| 31 | |
| 32 PLEASE NOTE THAT WE ARE PERFORMING .3 <- .3 (arithmetic +) .4 | |
| 33 NOTE ALSO THAT THIS CAN BE SUPRESSED BY IGNORING .3 | |
| 34 AND ALSO THAT .5, .6 ARE USED AS TEMPORARIES | |
| 35 AND THAT THIS DISCARDS THE HIGH BIT ON OVERFLOW | |
| 36 DON'T FORGET THAT THIS CONTAINS 16 REPETITIONS OF THE SAME LINE | |
| 37 DO .5 <- .4 | |
| 38 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 39 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 40 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 41 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 42 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 43 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 44 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 45 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 46 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 47 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 48 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 49 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 50 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 51 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 52 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 53 PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1" | |
| 54 | |
| 55 PLEASE TRY AGAIN | |
| 56 |