求助：Fortran如何实现批处理（需要在屏幕中输入路径）

楚香饭

第一步，把 SHAW modify 21-9-24.exe 和 所有 *.inp 文件放在一个文件夹下。
第二步，在该文件夹下新建一个文本文件，并重命名为 “a.bat”，用记事本打开 a.bat，输入以下批处理代码，并保存。（请注意扩展名为 .bat ，而不是 .bat.txt，windows默认会隐藏扩展名）
第三步，双击 a.bat 运行。

[Bash shell] 纯文本查看 复制代码

@echo off
@title 正在批处理...
@color 0A
setlocal enabledelayedexpansion 

For %%i in (*.inp) do (
  echo %%i > conin.txt
  @"SHAW modify 21-9-24.exe" < conin.txt 2>nul
)
del conin.txt
echo 批处理完成
@pause

楚香饭

[Bash shell] 纯文本查看 复制代码

@echo off
@title 正在批处理...
@color 0A
setlocal enabledelayedexpansion 

For %%i in (*.inp) do (
  echo %%i > conin.txt
  echo y >> conin.txt
  @"SHAW modify 21-9-24.exe" < conin.txt 2>nul
)
del conin.txt
echo 批处理完成
@pause