yy易語言源碼
❶ 易語言開機啟動源碼
' 就兩行代碼
' 開機啟動如下:(只是一行)
寫注冊項 (#本地機器, 「software\microsoft\windows\CurrentVersion\Run\ZDYY」, 取運行目錄 () + 「\」 + 取執行文件名 ())
' 取消開機啟動如下:
刪除注冊項 (#本地機器, 「software\microsoft\windows\CurrentVersion\Run\ZDYY」)
❷ 易語言編寫YY驗證源碼,可以讓使用軟體的人到指定YY子頻道,不去就無法使用.最好能支持最新版的YY
解決問題了沒沒解決問題我幫你解決:源碼如下:』記得加分哦
.版本 2
.支持庫 eAPI
.程序集 窗口程序集1
.子程序 __啟動窗口_創建完畢
時鍾1.時鍾周期 = 500
.子程序 _時鍾1_周期事件
.局部變數 系統進程列表, 進程信息, , "0"
.局部變數 所有窗口標題, 文本型, , "0"
.局部變數 x, 整數型
.局部變數 y, 整數型
.局部變數 YY進程, 文本型
.局部變數 頻道ID, 文本型
.局部變數 頻道名稱, 文本型
.局部變數 打開頻道, 邏輯型
時鍾1.時鍾周期 = 0
打開頻道 = 假
YY進程 = 「ospeak.exe」
頻道ID = 「1234」 ' 根據自己的頻道修改1234改成你YY頻道
頻道名稱 = 「這改成你YY頻道的名字」
.計次循環首 (取數組成員數 (系統進程列表), x)
.如果真 (到大寫 (YY進程) = 到大寫 (系統進程列表 [x].進程名稱))
所有窗口標題 = 取所有窗口列表 ()
.計次循環首 (取數組成員數 (所有窗口標題), y)
.如果真 (尋找文本 (取窗口標題 (到數值 (所有窗口標題 [y])), 頻道ID, 0, 假) > 0)
.如果真 (尋找文本 (取窗口標題 (到數值 (所有窗口標題 [y])), 頻道名稱, 0, 假) > 0)
打開頻道 = 真
跳出循環 ()
.如果真結束
.如果真結束
.計次循環尾 ()
.如果真結束
.計次循環尾 ()
.如果真 (打開頻道 = 假)
信息框 (「請打開YY並進入頻道:」 + 頻道ID + 「,再打開軟體!」, 0, 「錯誤提示」)
銷毀 ()
.如果真結束
時鍾1.時鍾周期 = 500
❸ 易語言YY綁定頻道源碼,謝謝
.版本
2
.支持庫
eAPI
.程序集
窗口程序集1
.子程序
__啟動窗口_創建完畢
時鍾1.時鍾周期
=
500
.子程序
_時鍾1_周期事件
.局部變數
所有窗口標題,
文本型,
,
"0"
.局部變數
x,
整數型
.局部變數
y,
整數型
.局部變數
YY進程,
文本型
.局部變數
頻道ID,
文本型
.局部變數
頻道名稱,
文本型
.局部變數
打開頻道,
邏輯型
.局部變數
系統進程列表,
進程信息,
,
"0"
時鍾1.時鍾周期
=
0
打開頻道
=
假
YY進程
=
「ospeak.exe」
頻道ID
=
「56567151」
'
根據自己的頻道修改
頻道名稱
=
「【90好聲音】<h1>娛樂會所!」
系統進程列表
=
取系統進程列表
()
.計次循環首
(取數組成員數
(系統進程列表),
x)
.如果真
(到大寫
(YY進程)
=
到大寫
(系統進程列表
[x].進程名稱))
所有窗口標題
=
取所有窗口列表
()
.計次循環首
(取數組成員數
(所有窗口標題),
y)
.如果真
(尋找文本
(取窗口標題
(到數值
(所有窗口標題
[y])),
頻道ID,
0,
假)
>
0)
.如果真
(尋找文本
(取窗口標題
(到數值
(所有窗口標題
[y])),
頻道名稱,
0,
假)
>
0)
打開頻道
=
真
跳出循環
()
.如果真結束
.如果真結束
.計次循環尾
()
.如果真結束
.計次循環尾
()
.如果真
(打開頻道
=
假)
信息框
(「請打開YY並進入頻道:」
+
頻道ID
+
「,再打開軟體!」,
0,
「錯誤提示」)
銷毀
()
.如果真結束
時鍾1.時鍾周期
=
500