dhwukils 发表于 2009-2-23 10:46:28

保护计费程序啊

mcknight1013 发表于 2009-2-24 07:03:11

发个我在用的给你,是用论坛里的高人编写的《au3模拟windows2000启动》改的!
#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

king8462 发表于 2009-2-25 12:34:35

搜一个蓝屏的屏保,加个密码,发现指定进程,直接运行该屏保就ok了!

jinghai 发表于 2009-2-25 14:05:28

这不是最好的办法

vipxin1987 发表于 2009-2-25 17:17:36

14 楼 真的很有才

xrbenbeba 发表于 2009-2-25 17:19:31

14楼的上辈子是个裁缝吧?

其实用WMI监视 进程就完了 发现可疑进程就采取各种操作

包括TJJTDS:face (33):

laojikelly 发表于 2009-3-1 02:18:50

其实我还没解决到的。。。
但是算了。。。

秀秀 发表于 2009-3-1 09:22:01

我顶。。用的着 这么麻烦么。。我贼。。。。
页: 1 [2]
查看完整版本: AU3制造蓝屏