[clump.git] / ledmatrix.pl

#!/usr/bin/perl
use v5.14;
use warnings;
use lib '.';

use asm;

storei 0, 0xF;
route 0, 9, 1;
ledi 1;
news_mm 0, 1, -1, 0;
route 1, 9, 1;
ledi 2;
news_mm 1, 2, -1, 0;
route 2, 9, 1;
ledi 4;
news_mm 2, 3, -1, 0;
route 3, 9, 1;
ledi 8;
Commit	Line	Data
46a95fd3 MG	1	#!/usr/bin/perl
	2	use v5.14;
	3	use warnings;
	4	use lib '.';
	5
	6	use asm;
	7
	8	storei 0, 0xF;
	9	route 0, 9, 1;
	10	ledi 1;
	11	news_mm 0, 1, -1, 0;
	12	route 1, 9, 1;
	13	ledi 2;
	14	news_mm 1, 2, -1, 0;
	15	route 2, 9, 1;
	16	ledi 4;
	17	news_mm 2, 3, -1, 0;
	18	route 3, 9, 1;
	19	ledi 8;