blob: 09143ccd818bf6e681cc04863e82c36a0c738d19 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
donkey
bar .ASSIGNA 0
.AWHILE \&bar LT 5
HI BAR IS \&bar
foo .ASSIGNA 0
.AWHILE \&foo LT 2
HI BEFORE
.AREPEAT 2
HI MEDIUM \&foo \&bar
.AENDR
HI AFTER
foo .ASSIGNA \&foo + 1
.AENDW
bar .ASSIGNA \&bar + 1
AND ITS NOW \&bar
.AENDW
.END
|