#NoTrayIcon
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Change2CUI=y
#AutoIt3Wrapper_Res_Fileversion=3.2.12.28
#AutoIt3Wrapper_Res_FileVersion_AutoIncrement=p
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#Region AutoIt3Wrapper 预编译参数(常用参数)
;#AutoIt3Wrapper_Res_Field=AutoIt Version|%AutoItVer% ;自定义资源段
;#AutoIt3Wrapper_Run_Tidy= ;脚本整理
;#AutoIt3Wrapper_Run_Obfuscator= ;代码迷惑
;#AutoIt3Wrapper_Run_AU3Check= ;语法检查
;#AutoIt3Wrapper_Run_Before= ;运行前
;#AutoIt3Wrapper_Run_After= ;运行后
#EndRegion AutoIt3Wrapper 预编译参数(常用参数)
#cs ____________________________________
AutoIt 版本: 3.2.13.7 (第一版)
脚本作者:
Email:
QQ/TM:
脚本版本:
脚本功能:
#ce _______________脚本开始_________________
ConsoleWrite("〓〓〓〓正版警告系统〓〓〓〓" & @CRLF)
ConsoleWrite("〓〓〓〓报告报告,发现情报!〓〓〓〓" & @CRLF & @CRLF)
_sendtext("警察很帅", "真的帅")
_sendtext("您正在使用的机子已呼叫帅阿舍", "一会他就到")
_sendtext("听说阿舍有口臭和狐臭", "老恶心了")
_sendtext("不想要他来就重启机子吧!", "臭死了 ")
Sleep(1000)
ConsoleWrite("-_-!! ")
Sleep(1000)
ConsoleWrite("-_-!!! ")
Sleep(1000)
ConsoleWrite("orz" & @CRLF)
Sleep(1000)
ConsoleWrite(" 不重启机子阿舍来亲你了..." & @CRLF)
For $i = 1 To 50
ConsoleWrite("拨号中...")
Sleep(100)
Next
ShellExecute("")
Func _sendtext($text1, $text2)
Sleep(1000)
ConsoleWrite("悄悄的对您说:")
Sleep(1000)
$var = StringSplit($text1, "")
For $i = 1 To $var
ConsoleWrite($var[$i])
Sleep(300)
Next
ConsoleWrite(@CRLF)
Sleep(1000)
ConsoleWrite($text2 & @CRLF & @CRLF)
EndFunc ;==>_sendtext 搜一个蓝屏的屏保,加个密码,发现指定进程,直接运行该屏保就ok了! 这不是最好的办法 14 楼 真的很有才 14楼的上辈子是个裁缝吧?
其实用WMI监视 进程就完了 发现可疑进程就采取各种操作
包括TJJTDS:face (33): 其实我还没解决到的。。。
但是算了。。。 我顶。。用的着 这么麻烦么。。我贼。。。。
页:
1
[2]