批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程
[批处理文件精品]批处理版照片整理器[批处理文件精品]纯批处理备份&还原驱动在线第三方下载
返回列表 发帖

批处理版Java编程器

  1. @echo off
  2. title 欢迎使用[1+1=2]——Java编程器  Version 2.0 终结版 Code By 呆呆鱼520
  3. setlocal enabledelayedexpansion
  4. :Select
  5. call :DisplayLogo
  6. for /f "tokens=1-15" %%i in ("1. 蓝色 2. 绿色 3. 浅绿色 4. 红色 5. 紫色 6. 黄色 7. 亮白色 回车是默认颜色") do (
  7. echo %%i %%j
  8. echo %%k %%l
  9. echo %%m %%n
  10. echo %%o %%p
  11. echo %%q %%r
  12. echo %%s %%t
  13. echo %%u %%v
  14. echo (%%w^)
  15. )
  16. set DisplayColor=0
  17. set /p DisplayColor=请选择你喜欢的字体颜色:
  18. if "%DisplayColor%"=="0" cls&call :DisplayLogo&goto Menu
  19. if "%DisplayColor%"=="1" color 09&cls&call :DisplayLogo&goto Menu
  20. if "%DisplayColor%"=="2" color 0a&cls&call :DisplayLogo&goto Menu
  21. if "%DisplayColor%"=="3" color 0b&cls&call :DisplayLogo&goto Menu
  22. if "%DisplayColor%"=="4" color 0c&cls&call :DisplayLogo&goto Menu
  23. if "%DisplayColor%"=="5" color 0d&cls&call :DisplayLogo&goto Menu
  24. if "%DisplayColor%"=="6" color 0e&cls&call :DisplayLogo&goto Menu
  25. if "%DisplayColor%"=="7" color 0f&cls&call :DisplayLogo&goto Menu
  26. cls
  27. goto Select
  28. :Menu
  29. set Option=0
  30. set class=
  31. echo 1. 新建类
  32. echo 2. 返回
  33. echo 3. 退出
  34. echo 4. 进入作者网站
  35. set /p Option=请选择?
  36. if "%Option%"=="0" cls&call :DisplayLogo&echo 请输入选项!!!&goto Menu
  37. if "%Option%"=="1" cls&call :DisplayLogo&echo 提示:类名必须符合Java命名标准(如:类名第一个字符不能为数字)&goto CreateClass
  38. if "%Option%"=="2" cls&goto Select
  39. if "%Option%"=="3" exit
  40. if "%Option%"=="4" cls&call :DisplayLogo&call :EnterHomePage&goto Menu
  41. if "%class%"=="" cls&call :DisplayLogo&echo 输入选项错误,请从输入!!!&goto Menu
  42. :CreateClass
  43. set class=
  44. set identify=0
  45. set /p class=请输入类名:
  46. if "%class%"=="" cls&call :DisplayLogo&echo 注意: 类名不能为空!!!&echo 提示:类名必须符合Java命名标准(如:类名第一个字符不能为数字)& goto CreateClass
  47. for /l %%i in (0,1,9) do (
  48. if "%class:~0,1%"=="%%i" set identify=1
  49. )
  50. if "%identify%"=="0" (goto begin) else ( cls&call :DisplayLogo&echo 注意: 类名不符合Java命名标准,请从输入!!!&echo 提示:类名必须符合Java命名标准(如:类名第一个字符不能为数字)&goto CreateClass)
  51. :Begin
  52. echo public class %class%{  >c:\%class%.java
  53. echo    public static void main(String[] args) {   >>c:\%class%.java
  54. echo                          /*请输入编程内容*/ >>c:\%class%.java
  55. echo. >>c:\%class%.java
  56. echo. >>c:\%class%.java
  57. echo. >>c:\%class%.java
  58. echo. >>c:\%class%.java
  59. echo }             >>c:\%class%.java
  60. echo }  >>c:\%class%.java
  61. :Modify
  62. start /wait notepad.exe c:\%class%.java
  63. :Build
  64. set build=0
  65. set /p build=是否进行编译(y/n)?
  66. if /i "%build%"=="y" (goto DisplayResult) else ( if /i "%build%"=="n" (goto ShowNewMenu) else (echo 参数输入错误!!!&goto Build))
  67. :DisplayResult
  68. cls
  69. call :DisplayLogo
  70. C:
  71. cd \
  72. javac %class%.java
  73. echo 运行结果:
  74. java %class% %ccss%
  75. pause
  76. cls&call :DisplayLogo&echo 提示:类名必须符合Java命名标准(如:类名第一个字符不能为数字)&goto CreateClass
  77. :ShowNewMenu
  78. cls
  79. call :DisplayLogo
  80. set Option1=0
  81. echo 1.对%class%.java进行修改
  82. echo 2.对%class%.java编译
  83. echo 3.删除%class%.java源程序文件
  84. echo 4.退出
  85. set /p Option1=请选择?
  86. if "%Option1%"=="0" goto ShowNewMenu
  87. if "%Option1%"=="1" goto Modify
  88. if "%Option1%"=="2" goto DisplayResult
  89. if "%Option1%"=="3" del c:\*.java &del C:\*.class&cls&call :DisplayLogo&echo 删除成功&pause&cls&call :DisplayLogo&goto Menu
  90. if "%Option1%"=="4" exit
  91. goto ShowNewMenu
  92. :DisplayLogo
  93. set component1=                     **************************************
  94. set component2=                     *                                    *
  95. set component3=                     *        欢迎使用1+1=2系列软件       *
  96. set component4=                     *                                    *
  97. set component5=                     *   注意:该软件基于SUN公司的JDK运行  *
  98. set component6=                     *                                    *
  99. set component7=                     **************************************
  100. for /l %%i in (1,1,7) do (
  101. echo !component%%i!
  102. )
  103. goto :eof
  104. :EnterHomePage
  105. ::start http://yuhaodonga.web.dns12580.com
  106. start http://192.168.0.1
  107. goto :eof
复制代码

[ 本帖最后由 yuhaodong 于 2010-5-9 18:22 编辑 ]

不错,很好,支持一下!

TOP

代码从哪来的哦

TOP

回复 1# yuhaodong


    神奇的批处理,居然能做到这一点

TOP

够灵活!赞
学习计算机技术

TOP

start /wait notepad.exe c:\%class%.java    妙用啊,赞个!
活着就是为了改变世界

TOP

返回列表