易語言搶紅包源碼

⑴ 易語言如何寫電腦版搶紅包軟體，原理是什麼

雲播放的原理就太復雜了，，，只會易語言是很難做出一個純雲播放器，，你只能考慮第三方雲播放調用。。。。你要是用VC我到是可以提供一些思路

⑵ 求一款易語言抽獎源碼，最好是圖片抽獎，或者自行放入對方提供的頭像。

.版本 2
.支持庫 xplib
.支持庫 iext
.程序集 窗口程序集1
.程序集變數 b, 文本型
.程序集變數 圖片框, 圖片框
.程序集變數 開始音樂, 位元組集
.程序集變數 結束音樂, 位元組集
.程序集變數 人數, 整數型
.程序集變數 人數數組, 文本型, , "0"
.程序集變數 n, 整數型
.程序集變數 圖片文件數組, 文本型, , "0"
.子程序 __啟動窗口_創建完畢

XP風格 (#藍色風格)
選擇夾.左邊 ＝ (取屏幕寬度 () － 選擇夾.寬度) ÷ 2
選擇夾.頂邊 ＝ (取屏幕高度 () － 選擇夾.高度) ÷ 2
圖片框1.標記 ＝ 「1」
圖片框2.標記 ＝ 「2」
圖片框3.標記 ＝ 「3」
圖片框4.標記 ＝ 「4」
圖片框5.標記 ＝ 「5」
圖片框6.標記 ＝ 「6」
選擇夾.現行子夾 ＝ 1
透明標簽1.左邊 ＝ (取屏幕寬度 () － 透明標簽1.寬度) ÷ 2
選擇夾2.頂邊 ＝ 選擇夾.高度 ＋ 選擇夾.頂邊
選擇夾2.左邊 ＝ (取屏幕寬度 () － 選擇夾2.寬度) ÷ 2
初始化 ()
人數 ＝ 取數組成員數 (圖片文件數組)
_一個人_被選擇 ()
注冊熱鍵程序 (_啟動窗口.取窗口句柄 (), 0, #F1鍵, &配置設置)
注冊熱鍵程序 (_啟動窗口.取窗口句柄 (), 0, #回車鍵, &子程序1)
注冊熱鍵程序 (_啟動窗口.取窗口句柄 (), 0, #鍵1, &_一個人_被選擇)
注冊熱鍵程序 (_啟動窗口.取窗口句柄 (), 0, #鍵2, &_二個人_被選擇)
注冊熱鍵程序 (_啟動窗口.取窗口句柄 (), 0, #鍵3, &_三個人_被選擇)
注冊熱鍵程序 (_啟動窗口.取窗口句柄 (), 0, #鍵4, &_四個人_被選擇)
注冊熱鍵程序 (_啟動窗口.取窗口句柄 (), 0, #鍵5, &_五個人_被選擇)
注冊熱鍵程序 (_啟動窗口.取窗口句柄 (), 0, #鍵6, &_六個人_被選擇)
注冊熱鍵程序 (_啟動窗口.取窗口句柄 (), 0, #Esc鍵, &_退出_被選擇)

.子程序 子程序1
n ＝ n ＋ 1
.如果 (n ％ 2 ＝ 0)
_按鈕2_被單擊 ()
.否則
_按鈕1_被單擊 ()
.如果結束
.子程序 配置設置
載入 (系統設置窗口, , 真)
系統設置窗口.可視 ＝ 真

.子程序 _時鍾1_周期事件
置隨機數種子 ()
圖片框1.圖片 ＝ 讀入文件 (圖片文件數組 [取隨機數 (1, 人數)])

.子程序 抽獎停
.局部變數 a, 整數型
.局部變數 i, 整數型
b ＝ 「」
置隨機數種子 ()
.計次循環首 (6, i)
a ＝ 取隨機數 (1, 人數)
.判斷循環首 (尋找文本 (b, 到文本 (a), 1, 假) ≠ -1)
a ＝ 取隨機數 (1, 人數)
.判斷循環尾 ()
圖片框 ＝ 取標記組件 (i)
圖片框.圖片 ＝ 讀入文件 (圖片文件數組 [a])
b ＝ b ＋ 「,」 ＋ 到文本 (a)
.計次循環尾 ()

.子程序 _一個人_被選擇
圖片初始化 ()
n ＝ 0
按鈕1.禁止 ＝ 假
按鈕1.獲取焦點 ()
圖片框1.可視 ＝ 真
圖片框2.可視 ＝ 假
圖片框3.可視 ＝ 假
圖片框4.可視 ＝ 假
圖片框5.可視 ＝ 假
圖片框6.可視 ＝ 假
圖片框1.左邊 ＝ (選擇夾.寬度 － 圖片框1.寬度) ÷ 2
.子程序 _二個人_被選擇
圖片初始化 ()
n ＝ 0
按鈕1.禁止 ＝ 假
按鈕1.獲取焦點 ()
圖片框1.可視 ＝ 真
圖片框2.可視 ＝ 真
圖片框3.可視 ＝ 假
圖片框4.可視 ＝ 假
圖片框5.可視 ＝ 假
圖片框6.可視 ＝ 假
圖片框1.左邊 ＝ (選擇夾.寬度 － 圖片框1.寬度 × 2 － 5) ÷ 2
圖片框2.左邊 ＝ 圖片框1.左邊 ＋ 圖片框1.寬度 ＋ 5
.子程序 _三個人_被選擇
圖片初始化 ()
n ＝ 0
按鈕1.禁止 ＝ 假
按鈕1.獲取焦點 ()
圖片框1.可視 ＝ 真
圖片框2.可視 ＝ 真
圖片框3.可視 ＝ 真
圖片框4.可視 ＝ 假
圖片框5.可視 ＝ 假
圖片框6.可視 ＝ 假
圖片框1.左邊 ＝ 0
圖片框2.左邊 ＝ 325
圖片框3.左邊 ＝ 651

.子程序 _四個人_被選擇
圖片初始化 ()
n ＝ 0
按鈕1.禁止 ＝ 假
按鈕1.獲取焦點 ()
圖片框1.可視 ＝ 真
圖片框2.可視 ＝ 真
圖片框3.可視 ＝ 真
圖片框4.可視 ＝ 真
圖片框5.可視 ＝ 假
圖片框6.可視 ＝ 假
圖片框1.左邊 ＝ 0
圖片框2.左邊 ＝ 325
圖片框3.左邊 ＝ 651

.子程序 _五個人_被選擇
圖片初始化 ()
n ＝ 0
按鈕1.禁止 ＝ 假
按鈕1.獲取焦點 ()
圖片框1.可視 ＝ 真
圖片框2.可視 ＝ 真
圖片框3.可視 ＝ 真
圖片框4.可視 ＝ 真
圖片框5.可視 ＝ 真
圖片框6.可視 ＝ 假
圖片框1.左邊 ＝ 0
圖片框2.左邊 ＝ 325
圖片框3.左邊 ＝ 651

.子程序 _六個人_被選擇
圖片初始化 ()
n ＝ 0
按鈕1.禁止 ＝ 假
按鈕1.獲取焦點 ()
圖片框1.可視 ＝ 真
圖片框2.可視 ＝ 真
圖片框3.可視 ＝ 真
圖片框4.可視 ＝ 真
圖片框5.可視 ＝ 真
圖片框6.可視 ＝ 真
圖片框1.左邊 ＝ 0
圖片框2.左邊 ＝ 325
圖片框3.左邊 ＝ 651

.子程序 圖片初始化
.局部變數 k, 整數型
選擇夾.現行子夾 ＝ 1
選擇夾.現行子夾 ＝ 0
時鍾1.時鍾周期 ＝ 0
時鍾2.時鍾周期 ＝ 0
時鍾3.時鍾周期 ＝ 0
時鍾4.時鍾周期 ＝ 0
時鍾5.時鍾周期 ＝ 0
時鍾6.時鍾周期 ＝ 0
_啟動窗口.背景音樂 ＝ 到位元組集 (0)
.計次循環首 (6, k)
圖片框 ＝ 取標記組件 (k)
圖片框.圖片 ＝ #圖片
.計次循環尾 ()
.子程序 _標題_被選擇
.局部變數 wb, 文本型
圖片初始化 ()
輸入框 (「請輸入標題內容」, , , wb, )
透明標簽1.標題 ＝ wb
寫配置項 (取運行目錄 () ＋ 「\config.ini」, 「標題」, 「標題1」, wb)

.子程序 _設定轉獎聲音_被選擇
圖片初始化 ()
通用對話框1.過濾器 ＝ 「WAV文件|*.wav」
通用對話框1.打開 ()
開始音樂 ＝ 讀入文件 (通用對話框1.文件名)
寫配置項 (取運行目錄 () ＋ 「\config.ini」, 「聲音」, 「轉獎聲音」, 通用對話框1.文件名)

.子程序 _設定中獎聲音_被選擇
圖片初始化 ()
通用對話框1.過濾器 ＝ 「WAV文件|*.wav」
通用對話框1.打開 ()
結束音樂 ＝ 讀入文件 (通用對話框1.文件名)
寫配置項 (取運行目錄 () ＋ 「\config.ini」, 「聲音」, 「中獎聲音」, 通用對話框1.文件名)

.子程序 _關閉音樂_被選擇
圖片初始化 ()
_啟動窗口.背景音樂 ＝ 到位元組集 (0)

.子程序 初始化
.局部變數 d, 整數型
_啟動窗口.底圖 ＝ 讀入文件 (讀配置項 (取運行目錄 () ＋ 「\config.ini」, 「圖片」, 「背景圖片」, 取運行目錄 () ＋ 「\Wallpaper\1024.jpg」))
開始音樂 ＝ 讀入文件 (讀配置項 (取運行目錄 () ＋ 「\config.ini」, 「聲音」, 「轉獎聲音」, 取運行目錄 () ＋ 「\sound\musi.wav」))
結束音樂 ＝ 讀入文件 (讀配置項 (取運行目錄 () ＋ 「\config.ini」, 「聲音」, 「中獎聲音」, 取運行目錄 () ＋ 「\sound\finish.wav」))
透明標簽1.標題 ＝ 讀配置項 (取運行目錄 () ＋ 「\config.ini」, 「標題」, 「標題1」, 「XX公司幸運抽獎」)
.計次循環首 (6, d)
圖片框 ＝ 取標記組件 (d)
圖片框.圖片 ＝ 讀入文件 (讀配置項 (取運行目錄 () ＋ 「\config.ini」, 「圖片」, 「抽獎圖片」, 取運行目錄 () ＋ 「\Wallpaper\cj.jpg」))
.計次循環尾 ()
查找文件 (圖片文件數組, 取運行目錄 () ＋ 「\Photos\」, 「*.jpg」, )
查找文件 (圖片文件數組, 取運行目錄 () ＋ 「\Photos\」, 「*.bmp」, )
.如果真 (取數組成員數 (圖片文件數組) ＜ 6)
信息框 (「請把圖片文件放到[Photots]文件夾下後重啟軟體！」 ＋ #換行符 ＋ 「圖片文件格式支持[jpg bmp]」, 64, 「提示：」)
結束 ()
.如果真結束

.子程序 _抽獎圖片_被選擇
.局部變數 a, 整數型
圖片初始化 ()
通用對話框1.過濾器 ＝ 「圖片文件|*.jpg;*.bmp」
通用對話框1.打開 ()
.計次循環首 (6, a)
圖片框 ＝ 取標記組件 (a)
圖片框.圖片 ＝ 讀入文件 (通用對話框1.文件名)
.計次循環尾 ()
寫配置項 (取運行目錄 () ＋ 「\config.ini」, 「圖片」, 「抽獎圖片」, 通用對話框1.文件名)

.子程序 _時鍾2_周期事件
置隨機數種子 ()
圖片框2.圖片 ＝ 讀入文件 (圖片文件數組 [取隨機數 (1, 人數)])

.子程序 _時鍾3_周期事件
置隨機數種子 ()
圖片框3.圖片 ＝ 讀入文件 (圖片文件數組 [取隨機數 (1, 人數)])

.子程序 _時鍾4_周期事件
置隨機數種子 ()
圖片框4.圖片 ＝ 讀入文件 (圖片文件數組 [取隨機數 (1, 人數)])

.子程序 _時鍾5_周期事件
置隨機數種子 ()
圖片框5.圖片 ＝ 讀入文件 (圖片文件數組 [取隨機數 (1, 人數)])

.子程序 _時鍾6_周期事件
置隨機數種子 ()
圖片框6.圖片 ＝ 讀入文件 (圖片文件數組 [取隨機數 (1, 人數)])

.子程序 _退出_被選擇
結束 ()

.子程序 _時鍾7_周期事件
' 如果 (取滑鼠垂直位置 () ＜ 10)
系統設定.可視 ＝ 真
設定抽獎人數.可視 ＝ 真
' 系統設定.可視 ＝ 假
' 設定抽獎人數.可視 ＝ 假
.子程序 _按鈕1_被單擊, 邏輯型
.如果真 (選擇夾.現行子夾 ＝ 1)
選擇夾.現行子夾 ＝ 0
.如果真結束
_啟動窗口.背景音樂 ＝ 開始音樂
_啟動窗口.播放次數 ＝ 0
時鍾1.時鍾周期 ＝ 100
時鍾2.時鍾周期 ＝ 100
時鍾3.時鍾周期 ＝ 100
時鍾4.時鍾周期 ＝ 100
時鍾5.時鍾周期 ＝ 100
時鍾6.時鍾周期 ＝ 100
按鈕2.禁止 ＝ 假
按鈕1.禁止 ＝ 真
按鈕2.獲取焦點 ()
返回 (真)

.子程序 _按鈕2_被單擊
抽獎停 ()
_啟動窗口.背景音樂 ＝ 結束音樂
_啟動窗口.播放次數 ＝ 1
時鍾1.時鍾周期 ＝ 0
時鍾2.時鍾周期 ＝ 0
時鍾3.時鍾周期 ＝ 0
時鍾4.時鍾周期 ＝ 0
時鍾5.時鍾周期 ＝ 0
時鍾6.時鍾周期 ＝ 0
按鈕2.禁止 ＝ 真
按鈕1.禁止 ＝ 假
按鈕1.獲取焦點 ()

⑶ 求易語言抽獎源碼,懸賞分20,要的就來！是轉盤的

.版本2

.子程序 __啟動窗口_首次激活

置隨機數種子（）

.如果（取隨機數（1,100）=46）
信息框（「你中獎了」）
.否則
信息框（「你失敗了」）

.
詳細的源碼明天你回復一下就給你，今天似乎不可以使用pc。。。
那個轉盤手機無法解釋 。。。

⑷ 易語言製作qq紅包手機源碼

這個可以在課本中看到

⑸ 哪位老哥會易語言寫腳本啊關於微視搶紅包的可以的話有大紅包不低於三位數

哪位老哥會易語言寫腳本啊？關於微視搶紅包的可以的話有大紅包不低於三位數哪位老哥會易語言寫腳本啊？關於微視搶紅包的可以的話有大紅包不低於三位數哪位老哥會易語言寫腳本啊？關於微視搶紅包的可以的話有大紅包不低於三位數

⑹ 易語言抽獎軟體源碼

.版本 2

.程序集 窗口程序集1
.程序集變數 位數, 整數型

.子程序 _按鈕1_被單擊

編輯框2.內容 ＝ 「」
.如果 (編輯框1.內容 ＝ 「」)
位數 ＝ 取隨機數 (1, 10)
.否則
位數 ＝ 到整數 (編輯框1.內容)
.如果結束
.計次循環首 (位數, )
編輯框2.加入文本 (到文本 (取隨機數 (0, 9)))
延時 (100)
.計次循環尾 ()

⑺ 怎麼用易語言做一個搶購軟體，最好能給我個源碼或者思路

源碼不可能有人給你。但是可以給你思路。
第一步，模擬登錄，去**網站點擊登錄 游覽器右鍵查看源代碼 或者審核元素 推薦審核元素。
獲取到登錄的form表單信息。提交一次。F12開發者工具監聽post的地址和參數 。獲取返回的信息和存儲cookie。這樣第一步模擬登錄完成。
第二步，游覽器右鍵查看源代碼 或者審核元素 推薦審核元素。找到關鍵參數 http讀文件獲取到參數的信息。點擊搶購。F12開發者工具監聽post的地址和參數 。獲取返回的信息。
這樣 你需要的搶購軟體就基本成形了 。
第三步,完善軟體 啟動多線程搶購模式。
到此軟體完成

⑻ 額，求一個易語言抽獎的源碼，就是可以輸入一些人的名字，再隨機抽出單個，或者多個。

給分。。。。。。