批处理版pascal编译器

happy886rr

【体积：2M】下载地址：https://page37.ctfile.com/fs/14274637-203913834
用批处理调用的pascal编译器，方便你快速的编译pas，直接拖拽到Pascal.cmd图标上，瞬间编译出exe文件。
画个分形就这么简单。

1. @echo off
   
2. echo =================================
   
3. echo  Free-Pascal 编译器
   
4. echo =================================
   
5. set "PATH=%PATH%;%~dp0Main"
   
6. if "%~x1"==".pas" (
   
7.         pushd "%~dp1"
   
8.         echo  编译运行...
   
9.         echo +++++++++++++++++++++++++++++++++
   
10.         fpc "%~nx1"
    
11.         if exist "%~n1.exe" (del /f /q "%~n1.o"&>NUL "%~n1.exe")
    
12. )
    
13. set/p=

复制代码