1Program "Eco 1.1/ 2860/  500" (length 15) by "John Dilick <dilickjm@comcast.net>"
2
3       ORG      START
4START  MOV.I  {     0, >   390
5       SPL.AB #   -18, <   273
6       SPL.BA #     7, {    -1
7       MOV.I  $    -3, {    -2
8       MOV.I  >     4, }     4
9       MOV.I  >    -6, }     2
10       MOV.I  <   286, >     2
11       DJN.B  <   208, }    -1
12       JMP.AB #  -383, @    15
13       DIV.I  >  -398, >   386
14       MUL.AB }   273, @   195
15       DIV.I  {    17, >   -14
16       MUL.B  @    18, <   284
17       JMP.AB {     4, $   -13
18       JMP.AB {     4, }   187
19
20