Code:
repeat 10
move 506, 233
left 506, 233 [2000]
left 506, 233 [500]
send 9 [1000]
left 513, 620 [500]
send 8 [ 1000]
left 511, 672 [500]
send 8 [500]
left 554, 715 [500]
left 521, 618 [500]
send 8 [2000]
move 506, 233 [500]
send 8 [500]
left 506, 233 [2000]
left 506, 233
send 8 [1000]
left 527, 616
send 8 [500]
left 527, 616
send 8 [500]
left 516, 716
send 8 [500]
left 509, 622
send 8 [500]
left 634, 401 ---agi
send 8 [500]
left 658, 278
send 8 [500]
send 8 [1900]
move 506, 233
left 506, 233 [2000]
left 506, 233 [500]
send 9 [1000]
left 513, 620 [500]
send 8 [ 1000]
left 511, 672 [500]
send 8 [500]
left 554, 715 [500]
left 521, 618 [500]
send 8 [2000]
move 506, 233 [500]
send 8 [500]
left 506, 233 [2000]
left 506, 233
send 8 [1000]
left 527, 616
send 8 [500]
left 527, 616
send 8 [500]
left 516, 716
send 8 [500]
left 509, 622
send 8 [500]
left 582, 397 ---for
send 8 [500]
left 658, 278
send 8 [500]
send 8 [1900]
move 506, 233
left 506, 233 [2000]
left 506, 233 [500]
send 9 [1000]
left 513, 620 [500]
send 8 [ 1000]
left 511, 672 [500]
send 8 [500]
left 554, 715 [500]
left 521, 618 [500]
send 8 [2000]
move 506, 233 [500]
send 8 [500]
left 506, 233 [2000]
left 506, 233
send 8 [1000]
left 527, 616
send 8 [500]
left 527, 616
send 8 [500]
left 516, 716
send 8 [500]
left 509, 622
send 8 [500]
left 681, 399 ---int
send 8 [500]
left 658, 278
send 8 [500]
send 8 [1900]
end_repeat
------------------