[游戏娱乐] 批处理读搞笑高考作文

batman

文章是从网上得来的，写下这段代码也是为了好玩：

::   我在这个世界上生活了十几年，虽总在加
:: 强情操的培养，但是有的时候，仍然很难做一
:: 些性命悠关的大决定。生存，还是毁灭，这是
:: 个问题。莎士比亚的这个疑问困扰了古代无数
:: 的哲人。
::   他人的利益重要，还是自己的利益重要？
:: 为了祖国是不是该牺牲个人的利益？为人民服
:: 务的宗旨是不是要坚持？这是我们的品德教育
:: 用了十年，才使我们彻底弄清的问题。革命先
:: 烈用八年抗战，为我们做出了最好的回答。我
:: 们这代人是跨世纪的一代，将来会面对更多的
:: 诱惑。正因为如此，我们必须从小就树立一切
:: 为了他人的崇高信念。
::   生命是人最宝贵的财富，但是在重要的时
:: 候，个人利益必须牺牲。罗胜教在刺骨的冰水
:: 中救孩子，这是他心灵的选择。他牺牲自己，
:: 让孩子的生命得到延续。而在我们的生活中，
:: 大多没有这么极端的情况。但也不能有一点危
:: 险就屁滚尿流。做出牺牲自己的选择，不只是
:: 象用眼睛看来那么简单的。我们必须时时反省
:: 自己，只有时刻严格要求自己，才可能成为一
:: 个完整的人。
::   个人的利益首先还要服从集体利益，就像
:: 当年一个人再怎么成功，其力量也不能改变国
:: 家孱弱的现实。个人的智慧再强大，也比不上
:: 集体智慧。是全中国人民集体才改变了我国一
:: 穷二白的面貌，是千千万万劳动中国人民艰苦
:: 奋斗痴心不悔，才建成了我们的国家，有人说
:: 雷锋傻，我们就要做革命的傻子，每天用雷锋
:: 事迹逼迫自己努力向上。但这其实非常难，人
:: 不是神，做出牺牲自己的决定，内心斗争是必
:: 然要经历的。这是，我们必须提高觉悟，尽量
:: 排除病态的极端个人主义思想干扰，严格要求
:: 自己，做出正确的心灵选择。
::   一个人的力量微不足道，经常无法实现宏
:: 伟目标。所以如果想要社会进步，我们必需要
:: 时刻准备，甚至不惜牺牲自己的个人利益，不
:: 能象猪一样，只知享乐。而是要象革命先烈那
:: 样抛头颅，洒热血，为人民的共同利益，牺牲
:: 自己。只有人人都这样，我国才能真正富强，
:: 才能还我国以强国本色，我们大家才能过得更
:: 好。不过，让人人都这么想这么做的确很难，
:: 但是如果我们都能严格要求自己，切切实实做
:: 到从我做起，这个宏伟的目标终究有一天是会
:: 实现的。
::   大的理想，如果能从小事入手，从小事做
:: 起，便容易成功很多。所以，如果没有行动，
:: 只是有崇高的理想是没有用的。我们需要随时
:: 保持头脑的清醒，对自己不能放松，道德要求
:: 铭记脑海。大家都能这样，我们的祖国怎能不
:: 强大呢？
@echo off&color 1f&mode con cols=45 lines=20
setlocal enabledelayedexpansion
:begin
cls&set select=&echo.&set /p select=请选择阅读方式：(1.正常阅读 2.搞笑阅读)
if "%select%" neq "1" if "%select%" neq "2" cls&echo.&echo 请正确选择。&ping /n 2 127.1>nul&goto begin
cls&echo.
if %select% equ 2 echo 现在阅读原文每行第三个字，每段空出的行头算两个字。&ping /n 3 127.1>nul&cls&echo.
for /f "delims=:" %%i in (%~fs0) do (
    set str=%%i&set /a n+=1
    if !n! lss 52 (
       if %select% equ 1 (
          call :lp
          ) else (
          set /p=!str:~3,1!<nul
          call :delay
          set /a m+=1
          if !m! equ 20 set m=0&echo.&echo.
)))
pause>nul&goto :eof
:delay
for /l %%i in (1,1,200) do vol>nul
goto :eof
:lp
set a=%str:~,1%
set /p=%a%<nul
call :delay
if "%str:~1%" neq "" set str=%str:~1%&goto lp
echo.&echo.
复制代码

杨风

好---好 0--------好！！高手就是不一样！无聊了，连批处理也可以当成娱乐工具了！！！

骚鸡

怎么把文字一个一个的显示出来啊？

hpdwz8695pcl

酷！！！！！！！！！真酷！！！！！！！！！！！！！

cyfw

afdsfdsafdsa

tjtchly

收藏，慢慢研究，谢了。

forthelichking

顶顶顶顶顶顶顶顶顶顶顶顶

beck1321

呵呵 是手动编的把，否则谁写的作文能那么巧

学好bat

顶
要顶
必须顶
不得不顶
用尽全力顶
再加上千斤顶
总之把它顶到顶
接着使出葵花宝顶
就算顶到史前也要顶
老子看了会用道德经顶
孔子亲自拜你为师天天顶
秦始皇站在阿房宫上使劲顶
汉高祖挥师杀向东罗马为你顶
吕布抛弃了貂禅而选择了帮你顶
张三丰见了后用太极拳九式全力顶
左冷禅召开武林盟主大会商讨如何顶
西门吹雪从此学会了最强一招剑神一顶
龙剑飞的如来神掌最后一式改为万佛朝顶
陆小凤从此再也不管闲事了而专门来为你顶
四大名捕四面出击看天下还有没有人敢不在顶

mildforest

太佩服了，学习一下！

zhan5257

我想问以下   我就把你的选择1 留下了   怎么显示不出来啊？？？？？

lhjoanna

大家来看一下这个，在楼主基础上改编的，嘿~~~

::   我在这个世界上生活了十几年，虽总在加
:: 强情操的培养，但是有的时候，仍然很难做一
:: 些性命悠关的大决定。生存，还是毁灭，这是
:: 个问题。莎士比亚的这个疑问困扰了古代无数
:: 的哲人。
::   他人的利益重要，还是自己的利益重要？
:: 为了祖国是不是该牺牲个人的利益？为人民服
:: 务的宗旨是不是要坚持？这是我们的品德教育
:: 用了十年，才使我们彻底弄清的问题。革命先
:: 烈用八年抗战，为我们做出了最好的回答。我
:: 们这代人是跨世纪的一代，将来会面对更多的
:: 诱惑。正因为如此，我们必须从小就树立一切
:: 为了他人的崇高信念。
::   生命是人最宝贵的财富，但是在重要的时
:: 候，个人利益必须牺牲。罗胜教在刺骨的冰水
:: 中救孩子，这是他心灵的选择。他牺牲自己，
:: 让孩子的生命得到延续。而在我们的生活中，
:: 大多没有这么极端的情况。但也不能有一点危
:: 险就屁滚尿流。做出牺牲自己的选择，不只是
:: 象用眼睛看来那么简单的。我们必须时时反省
:: 自己，只有时刻严格要求自己，才可能成为一
:: 个完整的人。
::   个人的利益首先还要服从集体利益，就像
:: 当年一个人再怎么成功，其力量也不能改变国
:: 家孱弱的现实。个人的智慧再强大，也比不上
:: 集体智慧。是全中国人民集体才改变了我国一
:: 穷二白的面貌，是千千万万劳动中国人民艰苦
:: 奋斗痴心不悔，才建成了我们的国家，有人说
:: 雷锋傻，我们就要做革命的傻子，每天用雷锋
:: 事迹逼迫自己努力向上。但这其实非常难，人
:: 不是神，做出牺牲自己的决定，内心斗争是必
:: 然要经历的。这是，我们必须提高觉悟，尽量
:: 排除病态的极端个人主义思想干扰，严格要求
:: 自己，做出正确的心灵选择。
::   一个人的力量微不足道，经常无法实现宏
:: 伟目标。所以如果想要社会进步，我们必需要
:: 时刻准备，甚至不惜牺牲自己的个人利益，不
:: 能象猪一样，只知享乐。而是要象革命先烈那
:: 样抛头颅，洒热血，为人民的共同利益，牺牲
:: 自己。只有人人都这样，我国才能真正富强，
:: 才能还我国以强国本色，我们大家才能过得更
:: 好。不过，让人人都这么想这么做的确很难，
:: 但是如果我们都能严格要求自己，切切实实做
:: 到从我做起，这个宏伟的目标终究有一天是会
:: 实现的。
::   大的理想，如果能从小事入手，从小事做
:: 起，便容易成功很多。所以，如果没有行动，
:: 只是有崇高的理想是没有用的。我们需要随时
:: 保持头脑的清醒，对自己不能放松，道德要求
:: 铭记脑海。大家都能这样，我们的祖国怎能不
:: 强大呢？
@echo off&color 1f&mode con cols=50 lines=20
setlocal enabledelayedexpansion
for /f "delims=:" %%i in (%~fs0) do (
   set str1=%%i
   set str2=%%i
   set /a n+=1
   if !n! lss 52 call :loop1
)
pause>nul&exit
:loop1
 set /p=!str2:~3,1!  <nul
 ping -n 1 127.1>nul 
:loop2
 set a=!str1:~,1!
 set /p=!a!<nul
 ping -n 1 127.1>nul
 if "!str1:~1!" neq "" set str1=!str1:~1!&goto loop2 
 echo.
复制代码

ljl

高手啊全是高手我现在什么都不会谁能做我的老师啊

Batcher

教程就是最好的老师
建议到“批处理教学&资料”多看教程

Peking007

高手呀～高手～
佩服！！！！