do ioi=1,5
open(12,file='result\order.txt')
write(12,*)  200*2**(ioi-1)
write(12,11) order1,order2
close(12)
enddo

我希望 没做一次循环，就保存一次结果，但上面那段代码，下一次循环的结果会覆盖本次保存的结果。也就是说，我想order.txt里如下记录数据：
200
order1,order2
400
order1,order2
.....
.....
.....
.....
但上面那段代码全部循环完后，只能得到最后一次的结果
6400
order1,order2

请问，怎么修改上面那段代码？