]>
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; |