# 有趣的项目--脚本程序（vbs+bat） **Repository Path**: lsy_zhiyu/funny_script ## Basic Information - **Project Name**: 有趣的项目--脚本程序（vbs+bat） - **Description**: 本仓库用于存放我制作过的各种与【vbs、bat等脚本程序】有关的有趣项目。 第一次让我踏进程序员领域的，是脚本程序。玩耍了很多好玩、有用的脚本程序，跟大家分享一下。 欢迎大家来探讨交流，提出更多有趣的项目。 本仓库使用AGPL开源协议，请大家遵循协议。 - **Primary Language**: 其他 - **License**: AGPL-3.0 - **Default Branch**: master - **Homepage**: None - **GVP Project**: No ## Statistics - **Stars**: 1 - **Forks**: 1 - **Created**: 2021-10-26 - **Last Updated**: 2024-07-06 ## Categories & Tags **Categories**: Uncategorized **Tags**: None ## README # 有趣的项目--脚本程序（vbs+bat） #### 介绍 - 本仓库用于存放我制作过的各种与【vbs、bat等脚本程序】有关的有趣项目。 - 第一次让我踏进程序员领域的，是脚本程序，从初中就开始接触了。虽然那时目的是为了玩。。。（2012年至xxx） - 玩耍了很多好玩、有用的脚本程序，当然也有恶搞的，跟大家分享一下。 - 欢迎大家来探讨交流，提出更多有趣的项目。 - 本仓库使用AGPL开源协议，请大家遵循协议。 #### 软件架构 - 使用电脑的 记事本 就可以编写修改代码了，写完更改后缀为.vbs/.vbe/.bat等，就可以直接运行。 - 由于是多年后整理的，有些就可能没讲那么细。 ## 各项目简介 ### 一、bat (dos纯代码) - 有黑框，不能后台运行搞事情，这就后来学习vbs的原因。 #### 1、替换硬件删除声音 - 电脑删除文件会有特效声，这里就是利用其声音文件进行替换的。bat中代码是后台强制将处理后的特效声覆盖到电脑的那个文件。 - 其实是以前恶搞教室电脑的，文件放我u盘，直接运行.bat即可，好像还要注销一下，效果就是老师删除了文件，电脑就会播放灰太狼的“我一定会回来的”那个声音。爆笑全场。 #### 2、文件文字藏在图片中 - 可以根据“b - 最终合成.jpg”图片进行操作体验一把，也可以看 测试最终效果 的文件夹。就是一个嵌套的过程，多张加上不同文字的图片压缩文件并入jpg嵌套，最后的一张jpg中还并入了文本文字。当时觉得特别好玩，给好朋友“阿宝”制作发给他的。 - 具体的流程体验一下就清楚了，也留有处理并入内容分的源代码，大家可以试一试。 - 这个呢，其实一开始不是用来展示目的的，而是初中电脑课，大家都没怎么听课，想玩游戏（老师断网）。带上u盘又可能被老师上交。那如何不带u盘能玩一下flash小游戏呢？ - 那就是把游戏藏到图片中，而图片又是老师要求当堂作业上交到ftp服务器上的，那么有趣的事情就来了：上交成功后，以后不带u盘，只需下载ftp那张图片，改后缀解压就得到了游戏，这种隐秘的方式老师一直没查出来，就这样我们悄悄玩了一学期哈哈哈，其实嘛，我们也是在做完课堂作业才玩的~ #### 其他 - 倒计时关机也就用到了shutdown这个命令，解除关机计划用到 -a参数。 这个后续结合vbs用到。 - 也有网上收集的建立一个删不掉的隐藏文件夹，这个其实就是教室电脑用来隐藏我存放的一些小游戏，方便放学、课后玩一玩，别人不知道，老师更是查不出来，嘿嘿 ### 二、vbs&vbe 脚本代码 - 因为能后台调用bat，达到隐藏运行的效果，所以经常组合运行。功能还挺多的。 #### 1、eg 放u盘随时可后台定时运行 - “1”文件夹：包含了复制搞事情的文件夹到电脑c盘，快捷方式可直接运行对应的，也能设置多少分钟后运行搞事情。执行后就是间隔几秒运行不同的恶搞效果，轰炸。 有提示50s关机、关不掉的弹窗 写着尴尬的提示、播放随机字母的发音（乱发音）、不断打开我的电脑、删除东西（因为教室电脑是有装还原系统，不怕文件丢失）、弹窗系统崩溃、提示关机 5分钟后再打开等。 轰炸满满，因为那时某位老师过份了，撕了同学课本。。。所以搞他。没想到的是老师被整蒙了，在这轰炸他阻止不了，最后还关机了，重点是还是老实地等了几分钟后再开电脑。。。 看老师这个样子，我们也不再搞他了。 - “3”文件夹：包含了复制、一键运行可设置几分钟后运行的脚本（可在某节课上自动运行）。搞事情是：播放分段的绘画版的江南stray视频（防止关闭），后续无限的弹窗。 也是某位老师的“不听话”。课中运行后，弹出暴风影音播放视频，声音还挺high的，大家都笑乐了，然后我预想到的，暴风影音肯定被关掉了，这就是我分段播放的原因，隔几秒又播放接下来的片段，哈哈哈，老师只好继续关，因为多段，所以后面就不理了，哈哈哈，知道弹窗卡死电脑，只好重启。 高中时也有整一个人，不过挺机灵的：关两次暴风影音后，选择直接卸载！！！倒是解决了，后续的无限弹窗也是直接选择重启，不到半分钟就结束了表演。。。 - “Dont Sleep”文件夹：里边有两个软件能阻止电脑睡眠、关机、重启的，悄悄后台运行，可以让教室电脑无法那啥，嘿嘿 - “唱歌 音乐”文件夹：里边有很多分类的音乐，有动物唱歌的、一些歌曲的、甚至是广告的、主题曲的。有复制到电脑、然后定时运行，执行后台播放MP3 音乐，不会弹出任何窗口。 也是偶尔搞事情一下，或是让下课时放点声音~ 不过有些人选择关闭音响，就没办法了。 - “好玩”文件夹：里边有多种搞事情的：有不断模拟键盘发送alt+f4的，效果就是打开任何窗口都会被关闭、有打开无限个文件夹的、有搜索打开所有的ppt doc文件、不断运行自己占用电脑资源、不断模拟键盘发送回车键的、打开无数个计算器导致卡机的、建立无数个txt文件等等。都是些基础的，这些虽然准备了，但没有去搞过谁，， - “其他”文件夹：好像是结合 模拟精灵 软件的，就是直接运行之前录制的电脑操作。我也忘了是什么操作了。 - 其实呢，我也有背着父母去网吧的，谁说去网吧就是不爱学习，我是去测试代码的，万一电脑崩了重启一下就好了是吧？在家测试的话准被骂死。。。 #### 2、f1刷新 - 这个是使用模拟键盘操作，发送f5进行刷新的，通过快捷方式把它改为f1. 这个没啥作用，就是之前老师跟我打赌说实现不了用f1按键进行刷新，最后我还是想到办法解决了。 #### 3、抽号软件替换 - 做这个的故事背景：某位老师为了我们的英语提高，经常在课堂用抽号软件来抽同学背诵短文、回答问题、上去做题目等，现在想起来确实是为了我们。可那时的我就没这个觉悟了，为了能避免被抽到，下了一些功夫，嘿嘿。先是了解什么抽号软件，也刚好有个抽号软件的数字是可以修改的，就想到了悄悄替换软件，当然，如果我趁老师不在替换电脑的抽号软件，肯定被识破，而且原来的能用，为何会选择不认识的呢？所以，需要做个假象来表演。 - 于是这个代码就出现了，利用vbs窗口能区分确认取消，就先不断的扫描任务进程有无现在在用的软件，有就结束掉，然后弹窗说出问题，是否使用备份软件，一步步引导点确认，然后提示在处理，最后后台把原软件删除，顺理成章替换为我处理过的软件，我和好朋友就不会被抽到啦。 - 正如我想的，老师打开抽号软件，点抽号还没出结果就被结束了，弹窗提示。老师不相信，关掉重新打开，还是被结束掉，多次后，下面知情和不知情的同学都说点确认退回备份版本吧，老师说不会成功的，还是点了，接下来假安装提示，最后成功。我的好朋友们都笑趴了，都好兴奋。就这样，一整学期，没有抽到我们。 - 所以我的英语就一般般，也许就是这个原因吧。。。 英语呢，还是要好好学滴。 #### 4、对话关机 - 这个呢，是以前网上找的，也是我还没学的时候，别人发给我的，激起了我想学习的欲望。才有了后面很多故事，很多搞事情~ - 其实它就是启动倒计时60s关机计划，然后输入框提示匹配输入信息，只有输入匹配对了，才会执行去掉关机的指令。我也改过代码，发给别人玩，别人以为吓唬，然后真的关机了，他家的监控就得重启了，被他家长说了一下，哈哈哈 - 也有想过能做个真的吓唬的代码，就不会有损失了，但由于输入框会阻塞运行，所以需要2个脚本完成。那时没想到解决方法，就没有尝试。 #### 5、复制课件ppt - 这个的故事背景呢，是因为高中老师上完课就删课件，不留给我们，我那时偷偷买了MP4，游戏不怎么好玩，就用来看ppt，是ppt转化为图片看的。至少先得有ppt到手是吧？那怎么办呢？只好自学代码，找到方法：可以根据电脑开启的最近文档浏览记录，得到真正文件的路径，然后后台悄悄去复制到某个地方，我再把它拷贝出来转图片，就完美了。 - 说干就干，根据快捷方式能筛选复制ppt后，在我自己电脑测试没问题，就增加些辅助的，比如在复制的目标文件夹设置为删不掉正常打不开的文件夹，这样就只有我知道ppt了，其次是每节课也就不到一小时，那我就设置它每小时运行一次吧，周期检测，保证生科ppt打开期间能扫描后台复制一次。然后在电脑用快捷方式放到启动项里，改了个名“安全保护”，最后呢，如何在大家眼皮底下复制ppt呢？又不能让他们知道，那就用vbs后台复制到我u盘文件夹，这样就一切顺利啦。 - 搞完这一切，老师还乐呵呵说课件不留，上课好好听。谁知我早已暗度陈仓把ppt要到了。分享一些给好朋友，就这样，估计有两年了，都是静悄悄得到ppt的。也有时能提前拿到后几天的课件，这样，课堂回答课件问题就能直接看到答案了，咳咳。。。还是要多动脑哈 #### 6、酷狗延时放歌 - 这个呢，目的是为了酷狗自动放歌的。脚本延时一段时间，然后打开mp3文件，只不过是利用打开而打开酷狗软件，播放的声音是静音。这样酷狗就会自动切换到下一首，自然而然的播放随机音乐了，为什么要这么麻烦呢？因为老师不让在课间放歌，嘿嘿，那这样一来，大家都会说是电脑自动弹出来的，没人点。既能听歌，又不会怪罪谁，完美~ #### 7、其他 - 表白三连：也就是三行话循环弹出，重点是话的内容。 - 电脑发音：来搞笑的，提示你将音量开最大，然后它播放合成声音“你是猪” - 哼再见：跟表白三连类似，最后弹出嫁给我吗？选否的话就倒计时2min关机 - 幻灯片jpg改名：这个呢，是因为ppt转为图片后，图片名字后数字不是固定位数，导致我的MP4不能很好排序，就写了脚本让jpg文件名的数字固定位数。 - 添加删除右键新建vbs：这个运行后能在鼠标右键-新建中增加 新建vbs选项的功能。 - 删除右键新建vbs：跟上一个相反，移除鼠标右键-新建中增加 新建vbs选项的功能。 - 一小时提示：这个是因为以前看电脑一激动（学代码）就经常超过1个钟没休息，怕对眼睛不好，于是就写代码来提示，每隔1h都会提醒一次，而简单的弹窗提醒，往往会点关闭后继续（我一定要把bug搞定），于是呢，为了强迫休息，就弹窗60个，也就是1min内，这样就够轰炸了。但多了之后，懒得点，但不会自动跳过，那就找资料使用Popup来提示，超时时间1s，所以即使我出去休息了，电脑也能自动提示完。 - 自动朗读机：弹出输入框，输入文字，确定后，就能根据输入的内容进行语音合成播放出来。 ### 三、组合 - 这个是结合bat和vbs一起执行的，利用vbs后台调用bat使不显示黑框。bat代码有些比vbs强大。 #### bmp随机换桌面背景 - 这个是想让电脑能间隔固定时间更换我挑选的壁纸，那时网上的软件好像没有这种，所以自己搞了。 - 重要代码也是网上参考别人的，然后进行修改，最后能够根据指定的路径进行更换桌面背景。确定是需要BMP格式的图片。不过还好，有工具可以批量转换，这样就方便多了，不过bmp图片比jpg的大很多。然后就是写代码进行间隔时间运行，在家了测试成功，设置为1h运行一次。 - 后续是因为教室里的电脑桌面太单调了，就想搞一搞，没节下课能看不一样的桌面图片。也收集了很多，有动漫的、风景照、猫狗动物、电影剧情等，还根据同学反馈增加些新的。效果也是很好，惹得隔壁班级都羡慕了。 - 高考倒计时之前，我也弄了软件进行显示倒计时天数，为高考奋斗加油。 #### 快捷方式复制课件 - 这个在前边也有讲，就是间隔扫描在打开文件记录中的快捷方式指向文件为ppt、doc存在时，将其后台复制到指定文件夹，下课后我就可以插u盘，运行vbs后台复制课件到我u盘，这样谁也不知我得到了ppt~ - - - - 对了，我高中是电教员，嘿嘿，懂我意思吧？所以教室电脑我能很好的搞事情。同时也了解了很多传染型的木马病毒，遇到情况也能很好的处理和恢复文件了。很多都是把真正文件夹隐藏起来，然后木马自己伪装成那个文件夹图标和名字，后缀肯定是被隐藏的。对于我就很好辨识，不多很多人都是双击它，于是木马传染又开始了。很多人说杀毒软件没用，其实不是，3x0还是挺有用的，但需要设置好，会自动拦截查杀，帮你恢复。 - 我也遇到些奇怪的病毒，控制电脑不让你关机，长按开机键都没用，鼠标还没限制在屏幕中央区域，只能玩它提供的游戏，称过两关才解除限制。任务管理器快捷键按不出来。倔强的我最后只能拔掉电脑电源。。。。 #### 参与贡献 1. Fork 本仓库 2. 新建 Feat_xxx 分支 3. 提交代码 4. 新建 Pull Request #### 特技 1. 使用 Readme\_XXX.md 来支持不同的语言，例如 Readme\_en.md, Readme\_zh.md 2. Gitee 官方博客 [blog.gitee.com](https://blog.gitee.com) 3. 你可以 [https://gitee.com/explore](https://gitee.com/explore) 这个地址来了解 Gitee 上的优秀开源项目 4. [GVP](https://gitee.com/gvp) 全称是 Gitee 最有价值开源项目，是综合评定出的优秀开源项目 5. Gitee 官方提供的使用手册 [https://gitee.com/help](https://gitee.com/help) 6. Gitee 封面人物是一档用来展示 Gitee 会员风采的栏目 [https://gitee.com/gitee-stars/](https://gitee.com/gitee-stars/)