利用getarg函数进行参数化启动

nuisttony

新学习的，搜索了下发现相关帖子不多，分享~

getarg函数进行参数化启动：
例如程序11.f
character*80 buff
call getarg(0,buff)
write(*,*) buff
call getarg(1,buff)
read(buff,"(i3)")times
write(*,*) 'times=',times
end

然后编译，生成11.exe
例如想要times=5
那么运行：\11.exe  5，程序就启动了，参数times也赋值为5了。

balfulosa

多谢楼主分享，第一次知道Fortran的这种功能。