diff 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
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/interps/c-intercal/pit/tests/ais2.i	Sun Dec 09 19:30:08 2012 +0000
@@ -0,0 +1,56 @@
+        PLEASE NOTE THIS PROGRAM USES NO NEXTING + FORGETTING + RESUMING
+
+(5)	DO .1 <- #0
+(6)	DO .2 <- #1
+(7)	DO .9 <- #1	
+	DON'T .1 <- .2
+	DON'T .2 <- .3
+	DON'T READ OUT .1
+	DON'T WRITE IN .9
+        PLEASE NOTE THAT WE EXIT IF WE READ ZERO
+	DO REINSTATE (15)
+	DO REINSTATE (14)
+(14)	DO ABSTAIN FROM (16)
+(15)  	DO ABSTAIN '"'.9~.9'~#1"$#1'~#3 FROM (16)
+	PLEASE NOTE THAT LINE 16 IS NOW ABSTAINED FROM TWICE OR FOUR TIMES
+	DO REINSTATE (16)
+	DO REINSTATE (16)
+(16)	DON'T ABSTAIN FROM CALCULATING + REINSTATING + ABSTAINING + TRYING AGAIN
+	DO REINSTATE (16)
+	DO REINSTATE (16)
+	
+(10)   	PLEASE DO REINSTATE CALCULATING + READING OUT + WRITING IN
+	DO ABSTAIN FROM (5)
+	DO ABSTAIN FROM (6)
+	DO ABSTAIN FROM (7)
+	DO ABSTAIN FROM (10)
+	DO ABSTAIN FROM ABSTAINING
+	
+       	DO .3 <- .1
+	DO .4 <- .2
+	
+	PLEASE NOTE THAT WE ARE PERFORMING .3 <- .3 (arithmetic +) .4
+	NOTE ALSO THAT THIS CAN BE SUPRESSED BY IGNORING .3
+        AND ALSO THAT .5, .6 ARE USED AS TEMPORARIES
+	AND THAT THIS DISCARDS THE HIGH BIT ON OVERFLOW
+	DON'T FORGET THAT THIS CONTAINS 16 REPETITIONS OF THE SAME LINE
+	DO .5 <- .4
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	PLEASE DO .6 <- "&!3$.5'"~'#0$#65535' DO .3 <- "?!3$.5'"~'#0$#65535' DO .5 <- !6$#0'~"#32767$#1"
+	
+	PLEASE TRY AGAIN
+