#{
	main <- {
		text <- sim readFd: 0
		playfield <- (sim state) fromStr: text
		os write: 2 text
		os write: 2 "width: " . (string: (playfield width)) . "\n"
		os write: 2 "height: " . (string: (playfield height)) . "\n"
	}
}