[clump.git] / newsled.pl

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

use asm;

storei 0, 4;
storei 1, 2;
ledm   1, 0;
nop;
nop;
route  0, 1;
ledm   1, 0;
nop;
nop;
storei 1, 3;
ledm   1, 0;
nop;
nop;
route  0, 1;
ledm   1, 0;
nop;
Commit	Line	Data
7f1b6bd9 MG	1	#!/usr/bin/perl
	2	use v5.14;
	3	use warnings;
	4	use lib '.';
	5
	6	use asm;
	7
	8	storei 0, 4;
	9	storei 1, 2;
	10	ledm 1, 0;
	11	nop;
	12	nop;
	13	route 0, 1;
	14	ledm 1, 0;
	15	nop;
	16	nop;
	17	storei 1, 3;
	18	ledm 1, 0;
	19	nop;
	20	nop;
	21	route 0, 1;
	22	ledm 1, 0;
	23	nop;