forked from: 10 PRINT CHR$(205.5+RND(1)); : GOTO 10.

by nicoptere forked from 10 PRINT CHR$(205.5+RND(1)); : GOTO 10. (diff: 31)
A Flash version of the classic 10 PRINT CHR$(205.5+RND(1)); : GOTO 10.
inspired by http://www.bogost.com/blog/talk_of_10_print.shtml
and https://forum.processing.org/topic/challenge-processing-variations-of-10-print-chr-205-5-rnd-1-goto-10

The challenge is to get the labyrinth look by using as little code as possible
Of course the biggest problem here is all the boilerplate stuff.
Feel free to create a shorter one.

Author: Mario Klingemann
♥0 | Line 18 | Modified 2012-12-05 04:58:22 | MIT License
play

ActionScript3 source code

/**
 * Copyright nicoptere ( http://wonderfl.net/user/nicoptere )
 * MIT License ( http://www.opensource.org/licenses/mit-license.php )
 * Downloaded from: http://wonderfl.net/c/ebMH
 */

// forked from Quasimondo's 10 PRINT CHR$(205.5+RND(1)); : GOTO 10.
// A Flash version of the classic 10 PRINT CHR$(205.5+RND(1)); : GOTO 10.
// inspired by http://www.bogost.com/blog/talk_of_10_print.shtml
// and https://forum.processing.org/topic/challenge-processing-variations-of-10-print-chr-205-5-rnd-1-goto-10
//
// The challenge is to get the labyrinth look by using as little code as possible
// Of course the biggest problem here is all the boilerplate stuff.
// Feel free to create a shorter one.
//
// Author: Mario Klingemann
package 
{
	import flash.display.Sprite;
	public class Main extends Sprite {	public function Main():void {	addChild( new tf() );	}	}
}
import flash.text.TextField;
import flash.utils.setTimeout;
internal class tf extends TextField
{
	public function tf()
	{
		defaultTextFormat = new flash.text.TextFormat( "Courier New", 20, 0, null, null, null, null, null, null, null, null, null, -4 );
		wordWrap = true; 
		width = 465;
		autoSize = "left";
		(function d(s:int):void { text += s&1?"\\":"/"; setTimeout(d,0,s+=s>>1); })(2);
	}
}