Mercurial > repo
view interps/c-intercal/pit/tests/test2.i @ 12518:2d8fe55c6e65 draft default tip
<int-e> learn The password of the month is release incident pilot.
author | HackEso <hackeso@esolangs.org> |
---|---|
date | Sun, 03 Nov 2024 00:31:02 +0000 |
parents | 859f9b4339e6 |
children |
line wrap: on
line source
DO WRITE IN .1 DO WRITE IN .2 DO (1030) NEXT DO READ OUT .3 DO GIVE UP (1000) PLEASE IGNORE .4 PLEASE ABSTAIN FROM (1005) (1009) DO STASH .1 + .2 + .5 + .6 DO .4 <- #1 DO (1004) NEXT (1004) PLEASE FORGET #1 DO .3 <- '?.1$.2'~'#0$#65535' DO .6 <- '&.1$.2'~'#0$#65535' PLEASE DO .5 <- "?!6~#32768'$#1"~#3 DO (1002) NEXT DO .4 <- #2 (1005) DO (1006) NEXT (1999) DOUBLE OR SINGLE PRECISION OVERFLOW (1002) DO (1001) NEXT (1006) PLEASE FORGET #1 DO .5 <- '?"!6~.6'~#1"$#1'~#3 DO (1003) NEXT DO .1 <- .3 DO .2 <- !6$#0'~'#32767$#1' DO (1004) NEXT (1003) DO (1001) NEXT DO REINSTATE (1005) (1007) PLEASE RETRIEVE .1 + .2 + .5 + .6 DO REMEMBER .4 PLEASE RESUME #2 (1001) DO RESUME .5 (1010) DO STASH .1 + .2 + .4 DO .4 <- .1 DO .1 <- '?.2$#65535'~'#0$#65535' DO (1020) NEXT PLEASE DO .2 <- .4 PLEASE DO (1009) NEXT DO RETRIEVE .1 + .2 + .4 PLEASE RESUME #1 (1020) DO STASH .2 + .3 DO .2 <- #1 PLEASE DO (1021) NEXT (1021) DO FORGET #1 DO .3 <- "?!1~.2'$#1"~#3 PLEASE DO .1 <- '?.1$.2'~'#0$#65535' DO (1022) NEXT DO .2 <- !2$#0'~'#32767$#1' DO (1021) NEXT (1023) PLEASE RESUME .3 (1022) DO (1023) NEXT PLEASE RETRIEVE .2 + .3 PLEASE RESUME #2 (1030) DO ABSTAIN FROM (1033) PLEASE ABSTAIN FROM (1032) (1039) DO STASH :1 + .5 DO (1530) NEXT DO .3 <- :1~#65535 PLEASE DO .5 <- :1~'#65280$#65280' DO .5 <- '?"!5~.5'~#1"$#1'~#3 DO (1031) NEXT (1032) DO (1033) NEXT DO (1999) NEXT (1031) DO (1001) NEXT (1033) DO .4 <- .5 DO REINSTATE (1032) PLEASE REINSTATE (1033) DO RETRIEVE :1 + .5 PLEASE RESUME #2 (1500) PLEASE ABSTAIN FROM (1502) PLEASE ABSTAIN FROM (1506) (1509) PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6 DO .1 <- :1~#65535 PLEASE DO .2 <- :2~#65535 DO (1009) NEXT DO .5 <- .3 PLEASE DO .6 <- .4 DO .1 <- :1~'#65280$#65280' DO .2 <- :2~'#65280$#65280' DO (1009) NEXT DO .1 <- .3 PLEASE DO (1503) NEXT DO .6 <- .4 DO .2 <- #1 DO (1009) NEXT DO .1 <- .3 DO (1501) NEXT (1504) PLEASE RESUME .6 (1503) DO (1504) NEXT (1501) DO .2 <- .5 DO .5 <- '?"'&.6$.4'~#1"$#2'~#3 DO (1505) NEXT (1506) DO (1502) NEXT PLEASE DO (1999) NEXT (1505) DO (1001) NEXT (1502) DO :4 <- .5 DO (1520) NEXT DO :3 <- :1 PLEASE RETRIEVE :1 + .1 + .2 + .3 + .4 + .5 + .6 DO REINSTATE (1502) DO REINSTATE (1506) PLEASE RESUME #3 (1510) DO STASH :1 + :2 + :4 DO :1 <- "'?":2~'#65535$#0'"$#65535'~'#0$#65535 '"$"'?":2~'#0$#65535'"$#65535'~'#0$#65535'" DO :2 <- #1 DO (1509) NEXT PLEASE RETRIEVE :1 DO :2 <- :3 PLEASE DO (1509) NEXT DO RETRIEVE :2 + :4 PLEASE RESUME #1 (1520) PLEASE STASH .3 + .4 DO .3 <- .1~#43690 DO (1525) NEXT PLEASE DO .4 <- 'V.3$".2~#43690"'~'#0$#65535' DO .3 <- .1~#21845 PLEASE DO (1525) NEXT DO :1 <- .4$"'V.3$".2~#21845"'~'#0$#65535'" PLEASE RETRIEVE .3 + .4 DO RESUME #1 (1525) DO .3 <- '"'"'"!3$#0'~'#32767$#1'"$#0'~'#32767 $#1'"$#0'~'#16383$#3'"$#0'~'#4095$#15' PLEASE RESUME #1 (1530) DO STASH :2 + :3 + .3 + .5 DO :1 <- #0 DO :2 <- .2 DO .3 <- #1 DO (1535) NEXT (1535) PLEASE FORGET #1 DO .5 <- "?!1~.3'$#1"~#3 DO (1531) NEXT DO (1500) NEXT DO :1 <- :3 PLEASE DO (1533) NEXT (1531) PLEASE DO (1001) NEXT (1533) DO FORGET #1 DO .3 <- !3$#0'~'#32767$#1' DO :2 <- ":2~'#0$#65535'"$"'":2~'#32767$#0'"$# 0'~'#32767$#1'" PLEASE DO .5 <- "?!3~.3'$#1"~#3 DO (1532) NEXT DO (1535) NEXT (1532) DO (1001) NEXT PLEASE RETRIEVE :2 + :3 + .3 + .5 DO RESUME #2 (1540) PLEASE ABSTAIN FROM (1541) DO ABSTAIN FROM (1542) (1549) PLEASE STASH :1 + :2 + :4 + :5 + .1 + .2 + .5 DO .1 <- :1~#65535 PLEASE DO .2 <- :2~'#65280$#65280' DO .5 <- :1~'#65280$#65280' DO (1530) NEXT DO :3 <- :1 DO .2 <- :2~#65535 PLEASE DO (1530) NEXT DO :5 <- :1 DO .1 <- .5 DO (1530) NEXT DO :4 <- :1 PLEASE DO :1 <- ":3~'#65280$#65280'"$":5~'#65280$#65280'" DO .5 <- ':1~:1'~#1 DO .2 <- :2~'#65280$#65280' DO (1530) NEXT PLEASE DO .5 <- '"':1~:1'~#1"$.5'~#3 DO .1 <- :3~#65535 DO .2 <- #0 DO (1520) NEXT PLEASE DO :2 <- :1 PLEASE DO .1 <- :4~#65535 DO (1520) NEXT DO (1509) NEXT DO .5 <- !5$":4~#3"'~#15 DO :1 <- :3 DO :2 <- :5 DO (1509) NEXT PLEASE DO .5 <- !5$":4~#3"'~#63 DO .5 <- '?"!5~.5'~#1"$#1'~#3 PLEASE RETRIEVE :4 (1541) DO :4 <- .5 DO (1543) NEXT (1542) DO (1544) NEXT PLEASE DO (1999) NEXT (1543) DO (1001) NEXT (1544) DO REINSTATE (1541) PLEASE REINSTATE (1542) PLEASE RETRIEVE :1 + :2 + :5 + .1 + .2 + .5 DO RESUME #2