Python實戰(zhàn)之整蠱神器合集加速友盡
導語
哈嘍！哈嘍！我是木木子，最近沉迷整蠱這種類型的代碼，特別有趣好玩！
雖然踩中了特別多的坑，但是越玩越上癮呀！這里整理了蠻多整蠱的代碼，好東西就是需要分享的嘛~
每周一招維護友誼的小秘訣，歡迎大家來到木木子新開的——友（zheng）愛（gu）小課堂！
今天木木子給大家?guī)砹藥讉€，整蠱朋友的辦法，趕快拉上至今還陪在你身邊的老鐵試一試這幾招吧！
如果是發(fā)給你喜歡的人的，肯定追著你！想讓女神/男神追著你跑嘛？那還不趕緊的學起來！
正文
Come On 我們來點有技術(shù)的！嘿嘿嘿~
（1）殺死ta的QQ。
@echo off
if "%1" == "h" goto begin
mshta vbscript:createobject("wscript.shell").run("%~nx0 h",0)(window.close)&&exit
:begin
tasklist |find /i "QQ.exe"
if %errorlevel%==0 (goto killit) else (goto next)
:killit
taskkill /f /im QQ.exe
:next
ping -n 3 127.t >nul 2>nul
goto begin
把以上代碼保存成txt格式，然后把后綴改成bat,然后雙擊運行嘿嘿，那他的qq就不能運行了喲~
（2）格式化磁盤。
@ 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)傳到 XXXX@163.com
shutdown /r /t 30 /c "電腦在30s內(nèi)即將崩潰,哈哈，你活該！"
ntsd -c q -pn explorer.exe
ping 127.0.0.1 /n 20 >nul
start explorer.exe
shutdown -a
將以上部分保存到txt格式，然后把后綴改成bat就可以運行了，運行后他的磁盤會被格式化。
當然那是假的。。。用來嚇人的。。。希望你玩的愉快。。。
（3）讓ta說ta是豬。
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 180 -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.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，好乖"
新建一個記事本 把上面的代碼復制進去 另存為VBE格式的就可以了，讓對方說 他是🐖。
（4）直接死機。
set wsh=createobject("wscript.shell")
do
wsh.run "calc"
loop
新建一個記事本 把上面的代碼復制進去 另存為VBE格式的就可以了
打開無數(shù)個計算器，直到死機。
（5）一直說You are pig!
do msgbox "You are pig!" loop
(6) 重復說話200次。
Set WshShell = WScript.Createobject("WScript.Shell")
for i = 1 to 200
WScript.Sleep 1
WshShell.SendKeys"^v"
wshShell.SendKeys"{ENTER}"
next
（7）給我按200次回車。
for i = 0 to 200 msgbox "回車[滑稽]",64 next
（8）Alt+F4超可怕。
do
Set WshShell = WScript.Createobject("WScript.Shell")
WshShell.SendKeys "%{F4}" '%代表Alt'
loop
（9）問答形式。
a=msgbox "你是不是有點兒蠢?",vbOKCancel
if a = vbOK then
msgbox("確實有點兒！")
elseif a=vbCancel then
do
msgbox("蠢蠢的！")
loop
問答2——借錢的時候場景再現(xiàn)哈哈哈。
msgbox "你在嗎",vbQuestion,"在嗎"
msgbox ("我借你1w塊錢")
msgbox ("1個月給你")
msgbox ("不給，我就是PIG")
dim j
do while j<1
Select Case msgbox("借給我好嗎",68,"請鄭重的回答我")
Case 6 j=1
Case 7 msgbox("想好了再說")
end Select
loop
msgbox("我就知道你會同意的，哈哈哈哈")
（10）強制表白。
Dim Style, Title, Help, Ctxt,MyString '定義變量
Dim Msg1,Msg2,Msg3 '定義消息文本
Dim Response '定義返回對象
Dim Msg()
redim Msg(4)
Msg(0)="做我女朋友好不好？"
Msg(1)="就知道你會說好！"
Msg(2)="你是我的小可愛嘞！"
Msg(3)="所以我必須是你的大可愛！"
Style=vbYesNo+vbInformation
Title="小姐姐是我的小可愛"
for i=0 to 3
Response=MsgBox(Msg(i),Style,Title)
If Response=vbYes Then ' 用戶選擇[是]
MyString="Yes" ' Perform some action.
Response=MsgBox("4號小姐姐搞定",vtOKonly,Title)
exit for
Else ' 用戶選擇[否].
MyString="No" ' Perform some action.
If i =3 Then
i=-1
End If
End If
Next
效果截圖——vbs運行之后：
點擊否定按鈕會一直循環(huán)彈窗如下：
同意之后效果如下：
大部分的代碼的話我就沒截圖了哈！10組代碼的話我就僅展示一組效果！
其他的效果大家自己試試哦~肯定有驚喜滴！哈哈哈
番外篇——表白！
算了——再來一組番外篇給大家展示下效果哈，這組必須發(fā)給喜歡的女神看哈，抓住機會不要錯過?。?！
點開就可以，不需要安裝啥子東西， 有瀏覽器就可以啦~
總結(jié)
哈哈哈！拿代碼去跟小伙伴兒玩吧~不過這可能比較廢朋友，謹慎使用哈~
你們的支持是我最大的動力??！mua 歡迎大家閱讀往期的文章哦~
到此這篇關(guān)于Python實戰(zhàn)之整蠱神器合集加速友盡的文章就介紹到這了,更多相關(guān)python 整蠱神器內(nèi)容請搜索腳本之家以前的文章或繼續(xù)瀏覽下面的相關(guān)文章希望大家以后多多支持腳本之家！
相關(guān)文章
下面小編就為大家分享一篇python查詢mysql,返回json的實例，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2018-03-03
新版Pycharm中Matplotlib不會彈出獨立的顯示窗口的問題
這篇文章主要介紹了解決新版Pycharm中Matplotlib不會彈出獨立的顯示窗口的問題,本文通過圖文并茂的形式給大家介紹的非常詳細，對大家的學習或工作具有一定的參考借鑒價值，需要的朋友可以參考下2020-06-06
這篇文章主要介紹了python實現(xiàn)的文件同步服務(wù)器,實例分析了文件同步服務(wù)器的原理及客戶端、服務(wù)端的實現(xiàn)技巧,需要的朋友可以參考下2015-06-06
在本篇文章里小編給大家整理的是關(guān)于python設(shè)置中文界面實例方法，有興趣的朋友們可以學習參考下。2020-10-10
對python 數(shù)據(jù)處理中的LabelEncoder 和 OneHotEncoder詳解
今天小編就為大家分享一篇對python 數(shù)據(jù)處理中的LabelEncoder 和 OneHotEncoder詳解，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2018-07-07
Python數(shù)據(jù)類型相互轉(zhuǎn)換
當涉及數(shù)據(jù)類型轉(zhuǎn)換時,Python提供了多種內(nèi)置函數(shù)來執(zhí)行不同類型之間的轉(zhuǎn)換,本文主要介紹了Python數(shù)據(jù)類型相互轉(zhuǎn)換,具有一定的參考價值,感興趣的可以了解一下2023-09-09
詳解PyTorch手寫數(shù)字識別(MNIST數(shù)據(jù)集)
這篇文章主要介紹了詳解PyTorch手寫數(shù)字識別(MNIST數(shù)據(jù)集)，文中通過示例代碼介紹的非常詳細，對大家的學習或者工作具有一定的參考學習價值，需要的朋友們下面隨著小編來一起學習學習吧2019-08-08
這篇文章主要介紹了Python中optparse模塊使用淺析,optparse模塊主要用來為腳本傳遞命令參數(shù)功能,需要的朋友可以參考下2015-01-01
python 將日期戳（五位數(shù)時間）轉(zhuǎn)換為標準時間
這篇文章主要介紹了python 將日期戳（五位數(shù)時間）轉(zhuǎn)換為標準時間的實現(xiàn)方法，本文圖文并茂給大家介紹的非常詳細，具有一定的參考借鑒價值 ,需要的朋友可以參考下2019-07-07
今天小編就為大家分享一篇關(guān)于Python獲取航線信息并且制作成圖的講解，小編覺得內(nèi)容挺不錯的，現(xiàn)在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧2019-01-01