批处理版Java编程器
[code]@echo offtitle 欢迎使用[1+1=2]——Java编程器 Version 2.0 终结版 Code By 呆呆鱼520
setlocal enabledelayedexpansion
:Select
call :DisplayLogo
for /f "tokens=1-15" %%i in ("1. 蓝色 2. 绿色 3. 浅绿色 4. 红色 5. 紫色 6. 黄色 7. 亮白色 回车是默认颜色") do (
echo %%i %%j
echo %%k %%l
echo %%m %%n
echo %%o %%p
echo %%q %%r
echo %%s %%t
echo %%u %%v
echo (%%w^)
)
set DisplayColor=0
set /p DisplayColor=请选择你喜欢的字体颜色：
if "%DisplayColor%"=="0" cls&call :DisplayLogo&goto Menu
if "%DisplayColor%"=="1" color 09&cls&call :DisplayLogo&goto Menu
if "%DisplayColor%"=="2" color 0a&cls&call :DisplayLogo&goto Menu
if "%DisplayColor%"=="3" color 0b&cls&call :DisplayLogo&goto Menu
if "%DisplayColor%"=="4" color 0c&cls&call :DisplayLogo&goto Menu
if "%DisplayColor%"=="5" color 0d&cls&call :DisplayLogo&goto Menu
if "%DisplayColor%"=="6" color 0e&cls&call :DisplayLogo&goto Menu
if "%DisplayColor%"=="7" color 0f&cls&call :DisplayLogo&goto Menu
cls
goto Select
:Menu
set Option=0
set class=
echo 1. 新建类
echo 2. 返回
echo 3. 退出
echo 4. 进入作者网站
set /p Option=请选择？
if "%Option%"=="0" cls&call :DisplayLogo&echo 请输入选项！！！&goto Menu
if "%Option%"=="1" cls&call :DisplayLogo&echo 提示：类名必须符合Java命名标准（如：类名第一个字符不能为数字）&goto CreateClass
if "%Option%"=="2" cls&goto Select
if "%Option%"=="3" exit
if "%Option%"=="4" cls&call :DisplayLogo&call :EnterHomePage&goto Menu
if "%class%"=="" cls&call :DisplayLogo&echo 输入选项错误，请从输入！！！&goto Menu
:CreateClass
set class=
set identify=0
set /p class=请输入类名：
if "%class%"=="" cls&call :DisplayLogo&echo 注意: 类名不能为空！！！&echo 提示：类名必须符合Java命名标准（如：类名第一个字符不能为数字）& goto CreateClass
for /l %%i in (0,1,9) do (
if "%class:~0,1%"=="%%i" set identify=1
)
if "%identify%"=="0" (goto begin) else ( cls&call :DisplayLogo&echo 注意: 类名不符合Java命名标准,请从输入！！！&echo 提示：类名必须符合Java命名标准（如：类名第一个字符不能为数字）&goto CreateClass)
:Begin
echo public class %class%{ >c:\%class%.java
echo public static void main(String[] args) { >>c:\%class%.java
echo /*请输入编程内容*/ >>c:\%class%.java
echo. >>c:\%class%.java
echo. >>c:\%class%.java
echo. >>c:\%class%.java
echo. >>c:\%class%.java
echo } >>c:\%class%.java
echo } >>c:\%class%.java
:Modify
start /wait notepad.exe c:\%class%.java
:Build
set build=0
set /p build=是否进行编译（y/n）?
if /i "%build%"=="y" (goto DisplayResult) else ( if /i "%build%"=="n" (goto ShowNewMenu) else (echo 参数输入错误！！！&goto Build))
:DisplayResult
cls
call :DisplayLogo
C:
cd \
javac %class%.java
echo 运行结果：
java %class% %ccss%
pause
cls&call :DisplayLogo&echo 提示：类名必须符合Java命名标准（如：类名第一个字符不能为数字）&goto CreateClass
:ShowNewMenu
cls
call :DisplayLogo
set Option1=0
echo 1.对%class%.java进行修改
echo 2.对%class%.java编译
echo 3.删除%class%.java源程序文件
echo 4.退出
set /p Option1=请选择？
if "%Option1%"=="0" goto ShowNewMenu
if "%Option1%"=="1" goto Modify
if "%Option1%"=="2" goto DisplayResult
if "%Option1%"=="3" del c:\*.java &del C:\*.class&cls&call :DisplayLogo&echo 删除成功&pause&cls&call :DisplayLogo&goto Menu
if "%Option1%"=="4" exit
goto ShowNewMenu
:DisplayLogo
set component1= **************************************
set component2= * *
set component3= * 欢迎使用1+1=2系列软件 *
set component4= * *
set component5= * 注意:该软件基于SUN公司的JDK运行 *
set component6= * *
set component7= **************************************
for /l %%i in (1,1,7) do (
echo !component%%i!
)
goto :eof
:EnterHomePage
::start http://yuhaodonga.web.dns12580.com
start http://192.168.0.1
goto :eof[/code]
[[i] 本帖最后由 yuhaodong 于 2010-5-9 18:22 编辑 [/i]] 不错，很好，支持一下！ 代码从哪来的哦 [b]回复 [url=http://www.bathome.net/redirect.php?goto=findpost&pid=39227&ptid=6052]1#[/url] [i]yuhaodong[/i] [/b]
神奇的批处理，居然能做到这一点 够灵活！赞 start /wait notepad.exe c:\%class%.java 妙用啊，赞个！
页:
[1]