Mercurial > repo
view interps/c-intercal/pit/lib/syslib.3i @ 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
PLEASE KNOCK THREE TIMES BEFORE ENTERING (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$#29524' DO .6 <- '?"'V"'&.1$.2'~'#0$#29524'"$#29524' ~'#0$#29524'"$#29524'~'#0$#29524' PLEASE DO .5 <- 'V".6~#39366"$#1'~#1 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 <- 'V"!6~.6'~#2"$#1'~#1 DO (1003) NEXT DO .1 <- .3 DO .2 <- !6$#0'~'#9841$#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 <- '?#59048$.2'~'#0$#29524' 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 <- 'V"!1~.2'$#1"'~#1 PLEASE DO .1 <- '^.1$.2'~'#0$#29524' DO (1022) NEXT DO .2 <- !2$#0'~'#9841$#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~#29524 PLEASE DO .5 <- :1~'#29403$#29403' DO .5 <- 'V"!5~.5'~#2"$#1'~#1 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 (1040) PLEASE STASH .1 + .2 + .2 + :1 + :2 + :3 DO .2 <- #0 DO (1520) NEXT DO STASH :1 PLEASE RETRIEVE .2 DO .1 <- .2 DO .2 <- #0 PLEASE DO (1520) NEXT DO :2 <- :1 DO RETRIEVE .1 + .2 + :1 DO (1550) NEXT PLEASE DO .3 <- :3 DO RETRIEVE :1 + :2 + :3 DO RESUME #1 (1050) PLEASE STASH :2 + :3 + .5 DO :2 <- .1 PLEASE DO (1550) NEXT DO .5 <- :3~'#29403$#29403' DO .5 <- 'V"!5~.5'~#2"$#1'~#1 DO (1051) NEXT DO (1999) NEXT (1051) DO (1001) NEXT DO .2 <- :3 PLEASE RETRIEVE :2 + :3 + .5 DO RESUME #2 (1500) PLEASE ABSTAIN FROM (1502) PLEASE ABSTAIN FROM (1506) (1509) PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6 DO .1 <- :1~#29524 PLEASE DO .2 <- :2~#29524 DO (1009) NEXT DO .5 <- .3 PLEASE DO .6 <- .4 DO .1 <- :1~'#29403$#29403' DO .2 <- :2~'#29403$#29403' 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' 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 <- "'?#59048$":2~'#29524$#0'"'~'#0$#29524'" $"'?#59048$":2~'#0$#29524'"'~'#0$#29524'" 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~#22143 DO (1525) NEXT PLEASE DO .4 <- 'V.3$".2~#22143"'~'#0$#29524' DO .3 <- .1~#7381 PLEASE DO (1525) NEXT DO :1 <- .4$"'V.3$".2~#7381"'~'#0$#29524'" PLEASE RETRIEVE .3 + .4 DO RESUME #1 (1525) DO .3 <- '"'"!3$#0'~'#9841$#1'"$#0'~'#3280$#4'" $#0'~'#3280$#4' 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"$#7'~#4"$#2'~#10 DO (1534) NEXT DO (1500) NEXT DO :1 <- :3 DO (1536) NEXT (1534) DO (1531) NEXT (1536) DO (1500) NEXT DO :1 <- :3 PLEASE DO (1533) NEXT (1531) PLEASE DO (1001) NEXT (1533) DO FORGET #2 DO .3 <- !3$#0'~'#9841$#1' DO :2 <- ":2~'#0$#29524'"$"'":2~'#9841$#0'"$#0' ~'#9841$#1'" PLEASE DO .5 <- 'V"!3~.3'~#2"$#1'~#1 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~#29524 PLEASE DO .2 <- :2~'#29403$#29403' DO .5 <- :1~'#29403$#29403' DO (1530) NEXT DO :3 <- :1 DO .2 <- :2~#29524 PLEASE DO (1530) NEXT DO :5 <- :1 DO .1 <- .5 DO (1530) NEXT DO :4 <- :1 PLEASE DO :1 <- ":3~'#29403$#29403'"$":4~'#29403 $#29403'" DO .5 <- ':1~:1'~#2 DO .2 <- :2~'#29403$#29403' DO (1530) NEXT PLEASE DO .5 <- '"':1~:1'~#2"$.5'~#4 DO .1 <- :3~#29524 DO .2 <- #0 DO (1520) NEXT PLEASE DO :2 <- :1 PLEASE DO .1 <- :4~#29524 DO (1520) NEXT DO (1509) NEXT DO .5 <- !5$":4~#1"'~#31 DO :1 <- :3 DO :2 <- :5 DO (1509) NEXT PLEASE DO .5 <- !5$":4~#1"'~#274 DO .5 <- !5~.5'~#1 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 (1550) DO STASH :1 + :4 + :5 + :6 + .5 DO :3 <- #0 DO .5 <- 'V"':2~:2'~#2"$#1'~#1 PLEASE DO (1551) NEXT DO :4 <- #1 PLEASE DO (1553) NEXT (1553) DO FORGET #1 DO .5 <- '?"':2~"#39366$#0"'"$#1'~#1 DO (1552) NEXT DO :2 <- ":2~'#0$#29524'"$"'":2~'#9841$#0'"$#0' ~'#9841$#1'" PLEASE DO :4 <- ":4~'#0$#29524'"$"'":4~'#9841 $#0'"$#0'~'#9841$#1'" DO (1553) NEXT (1552) DO (1001) NEXT (1556) PLEASE FORGET #1 DO :6 <- "'&":2~'#29524$#0'"$"'?#59048$":1 ~'#29524$#0'"'~'#0$#29524'"'~'#0$#29524'"$ "'&":2~'#0$#29524'"$"'?#59048$":1~'#0$ #29524'"'~'#0$#29524'"'~'#0$#29524'" DO :5 <- "'?":1~'#29524$#0'"$":2~'#29524$#0'"' ~'#0$#59048'"$"'?":1~'#0$#29524'"$":2~'#0$ #29524'"'~'#0$#59048'" DO .5 <- "?'"':6~:5'~'"'"'&"':5~:5'~'#29524$#0'"$ #19683'~'#0$#29524'"$"'?:5~:5'~'#9841$#0'"' ~'#19683$#9841'"$"'?:5~:5'~'#0$#29524'"'" ~#1'$#1"~#1 DO (1554) NEXT DO :5 <- :3 DO (1510) NEXT PLEASE DO :1 <- :3 DO :6 <- "'&":2~'#29524$#0'"$"'?#59048$":1 ~'#29524$#0'"'~'#0$#29524'"'~'#0$#29524'"$ "'&":2~'#0$#29524'"$"'?#59048$":1~'#0$ #29524'"'~'#0$#29524'"'~'#0$#29524'" DO :3 <- "'?":1~'#29524$#0'"$":2~'#29524$#0'"' ~'#0$#59048'"$"'?":1~'#0$#29524'"$":2~'#0$ #29524'"'~'#0$#59048'" DO .5 <- "?'"':6~:3'~'"'"'&"':3~:3'~'#29524$#0'"$ #19683'~'#0$#29524'"$"'?:3~:3'~'#9841$#0'"' ~'#19683$#9841'"$"'?:3~:3'~'#0$#29524'"'" ~#1'$#1"~#1 DO (1557) NEXT DO (1510) NEXT PLEASE DO :1 <- :3 DO :3 <- "'V":4~'#59048$#0'"$":5~'#29524$#0'"' ~'#0$#29524'"$"'V":4~'#0$#59048'"$":5~'#0$ #29524'"'~'#0$#29524'" PLEASE DO (1555) NEXT (1557) PLEASE DO (1001) NEXT PLEASE FORGET #1 DO :3 <- "'V":4~'#29524$#0'"$":5~'#29524$#0'"' ~'#0$#29524'"$"'V":4~'#0$#29524'"$":5~'#0$ #29524'"'~'#0$#29524'" PLEASE DO (1555) NEXT (1554) PLEASE DO (1001) NEXT (1555) PLEASE FORGET #1 DO .5 <- "?':4~#2'$#1"~#1 DO (1551) NEXT DO :2 <- :2~'#29524$#29523' DO :4 <- :4~'#29524$#29523' PLEASE DO (1556) NEXT (1551) DO (1001) NEXT PLEASE RETRIEVE :1 + :4 + :5 + :6 + .5 PLEASE RESUME #2 (1900) DO STASH .2 + .5 DO .1 <- #0 DO .2 <- #1 PLEASE DO (1901) NEXT (1901) DO FORGET #1 DO %50 (1904) NEXT DO %50 (1901) NEXT PLEASE DO (1903) NEXT (1904) DO .1 <- '^.1$.2'~'#0$#29524' DO %50 .1 <- '^.1$.2'~'#0$#29524' (1903) PLEASE FORGET #1 DO .2 <- !2$#0'~'#9841$#1' PLEASE DO .5 <- 'V"!2~.2'~#2"$#1'~#1 DO (1902) NEXT DO (1901) NEXT (1902) DO (1001) NEXT DO RETRIEVE .2 + .5 PLEASE RESUME #2 (1910) PLEASE STASH .1 + .3 + .5 + :1 + :2 + :3 DO .3 <- #59037 DO :1 <- #6 DO (1911) NEXT PLEASE NOTE THAT YOU CAN'T GET THREE FROM HERE (1912) DO (1001) NEXT (1911) DO FORGET #1 PLEASE DO (1900) NEXT DO :2 <- .1 DO (1500) NEXT PLEASE DO :1 <- :3 DO .1 <- .3 DO (1020) NEXT PLEASE DO .3 <- .1 DO .5 <- '?"!3~.3'~#2"$#1'~#1 DO (1912) NEXT DO .1 <- #12 PLEASE DO (1050) NEXT DO RETRIEVE .1 DO (1530) NEXT DO :2 <- #29524 DO (1500) NEXT PLEASE DO .2 <- :3~'#29403$#29403' PLEASE RETRIEVE .3 + .5 + :1 + :2 + :3 DO RESUME #1