view interps/clc-intercal/CLC-INTERCAL-Docs-1.-94.-2/doc/examples/quantum/come-from.i @ 9071:581584df6d82

<fizzie> revert 942e964c81c1
author HackBot
date Sun, 25 Sep 2016 20:17:31 +0000
parents 859f9b4339e6
children
line wrap: on
line source

	PLEASE NOTE: this program demonstrates quantum "COME FROM".
		     Requires CLC-INTERCAL 1.-94 or newer.

Copyright (c) 2006 Claudio Calvelli, all rights reserved.

CLC-INTERCAL is copyrighted software. However, permission to use, modify,
and distribute it is granted provided that the conditions set out in the
licence agreement are met. See files README and COPYING in the distribution.

(1)	DO .1 <- #2
(2)	DO COME FROM .1
	DO READ OUT .1
	DO GIVE UP

	DO NOTHING FOR A LITTLE WHILE
	TO LET THE TIME PASS
	AND SHOW THAT TIME, FOR US RUNNING INTERCAL, NEVER RUNS SHORT

	PLEASE PLEASE PLEASE
	DO PLEASE COME FROM (1) WHILE NOT COMING FROM THERE

	DO NOT BE MISLED BY THE ABOVE,
	THE PROGRAM WILL COME HERE ALL THE TIME,
	AND ALSO STOPS DEAD ON ITS TRACKS AT LABEL (TWO)

	DO .1 <- #3

	DO NOT THINK THE ABOVE STATEMENT IS POINTLESS:
	IT LETS THE OTHER STATE (SUPERPOSED TO THIS ONE)
	CONTINUE AND READ OUT ITS NUMBER "III"

	BUT FOR US, THERE'S NOTHING MORE TO DO

	GIVE UP

	DO NOT SPEND TOO MUCH TIME ON THIS CODE,
	WITH SUCH AN OBVIOUS MEANING
	BUT INSTEAD THINK (DO NOT GIVE UP HOPE OF UNDERSTANDING)
	THAT THIS LITTLE CODE
	TURNS AROUNDS AND TWISTS
	JUST A LITTLE BIT
	AND THEN READS
	THE SINGLE NUMBER THREE