summaryrefslogtreecommitdiff
path: root/tetris/tetris.prn
blob: 729f491e56a24f86ac3ed35c960c80bb7960c49d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
@includeonce "io.prn"
@includeonce "utility.prn"
@includeonce "blocks.prn"

1 "i" store
i 8 < while
	io_clearscreen
	io_windowbox
	0 0 i b_drawblock
	1000000 sleep
	i 1 + "i" store
i 8 < end
io_pos_after io_goto