易語言激活碼源碼

⑴ 易語言機器碼源碼

可以的，可以根據硬碟號生成隨即機器碼

也可以在機器碼基礎上反算出硬碟號

謝了一個簡單的，QQ發給你

其實沒必要隨機的，固定的就行了，因為隨機的最後你最後還是要還原到回來才能驗證

這個程序只是簡單的！根據硬碟號使用簡單演算法生成20位16進制機器碼

.版本2

.程序集窗口程序集1

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

.局部變數隨即記錄,文本型

.局部變數隨即數,整數型

.局部變數硬碟特徵字,文本型

.局部變數機器碼,文本型

.局部變數循環,整數型

.局部變數變數1,整數型

硬碟特徵字＝到文本(取硬碟特徵字())

編輯框硬碟號.內容＝硬碟特徵字

隨即記錄＝「」

機器碼＝「」

.計次循環首(10,循環)

變數1＝到數值(取文本中間(硬碟特徵字,循環,1))

.如果(變數1＜6)

隨即數＝取隨機數(0,9)

.否則

隨即數＝取隨機數(0,6)

.如果結束

隨即記錄＝隨即記錄＋到文本(隨即數)

變數1＝變數1＋隨即數

機器碼＝機器碼＋取文本中間(「0123456789ABCDEF」,變數1＋1,1)

變數1＝變數1＋隨即數

.如果真(變數1＞15)

變數1＝變數1－15

.如果真結束

機器碼＝機器碼＋取文本中間(「0123456789ABCDEF」,變數1＋1,1)

.計次循環尾()

編輯框補碼.內容＝到文本(隨即記錄)

編輯框機器碼.內容＝機器碼

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

.局部變數硬碟特徵字,文本型

.局部變數機器碼,文本型

.局部變數循環,整數型

.局部變數變數1,整數型

.局部變數變數2,整數型

.局部變數變數3,整數型

.局部變數變數4,整數型

機器碼＝編輯框機器碼.內容

硬碟特徵字＝「」

.計次循環首(10,循環)

變數1＝尋找文本(「0123456789ABCDEF」,取文本中間(機器碼,循環×2－1,1),,真)

變數2＝尋找文本(「0123456789ABCDEF」,取文本中間(機器碼,循環×2,1),,真)

.如果(變數1＞0且變數2＞0)

變數1＝變數1－1

變數2＝變數2－1

.如果(變數1＞變數2)

變數3＝變數2＋15－變數1

.否則

變數3＝變數2－變數1

.如果結束

變數3＝變數1－變數3

硬碟特徵字＝硬碟特徵字＋到文本(變數3)

.否則

編輯框反算.內容＝「解碼失敗」

跳出循環()

.如果結束

.計次循環尾()

編輯框反算.內容＝硬碟特徵字

⑵ 求易語言掛機鎖源碼

.版本
2.支持庫
shellEx.支持庫
iext
.
子程序
_窗口1_創建完畢
窗口1.左邊
＝
0窗口1.
頂邊
＝
0窗口1.高度
＝
取屏幕高度
()
'
這些代碼能看得懂吧!試一下效果!窗口1.寬度
＝
取屏幕寬度
()a
＝
注冊熱鍵
(取
窗口句柄
(),
標簽1.取窗口句柄
(),
4,
#F4鍵)
'
4就是功能鍵alt鍵了.b
＝
注冊熱鍵
(取窗口句柄
(),
標簽1.取窗口句柄
(),
4,
#
Tab鍵
)
'
現在來禁止
win鍵
.用一個模塊來禁止.'
屏蔽win鍵
()
'
就這樣就行了.哈哈
.子程序
_按鈕1_被單擊
.判斷開始
(編輯框1.內容
≠
_啟動窗口.編輯框1.內容)
'
意思是窗口1的編輯框的內容不等於_啟動窗口的編輯框的內容則出現信息框.
信息框
(「解鎖密碼錯誤,請重新輸入!」,
#錯誤圖標,
「提示:」).默認
銷毀
()
'
否則關閉窗口1.判斷結束
.子程序
_窗口1_尺寸被改變,
,
,
這個之前我也有做過一個動畫大家可以去看看.
透明標簽2.左邊
＝
窗口1.寬度
÷
2
－
透明標簽2.寬度
÷
2
'
窗口1.寬度
÷
2說明左邊是在窗口的一半.
那當然
不對了.應該是要中間在窗口中的一半.所以還要減去透明標簽2.寬度的一半.透明標簽2.頂邊
＝
窗口1.高度
÷
2
－
透明標簽2.高度
÷
2
'
高度的意思和寬度的意思一樣.透明標簽1.左邊
＝
窗口1.寬度
－
透明標簽1.寬度
×
2
'
透明標簽1.左邊在窗口1的寬-兩個透明標簽的寬度那裡透明標簽1.頂邊
＝
窗口1.高度
－
8
－
編輯框1.高度
－
32
'
透明標簽1.頂邊在窗口1的高-8再減編輯框的高度.再減去32.大家都有看到一個一個的
小黑點
了吧.他們之間的距離就是8了.
圖片框
1.左邊
＝
透明標簽1.左邊
'
以下的都
明白了吧
.圖片框1.頂邊
＝
透明標簽1.頂邊
＋
透明標簽1.高度
＋
8連續賦值
(圖片框1.頂邊,
編輯框1.頂邊,
按鈕1.頂邊)
'
這個連續賦值的意思是說編輯框1.頂邊,
按鈕1.頂邊都和圖片框1.頂邊一樣.編輯框1.左邊
＝
圖片框1.左邊
＋
圖片框1.寬度
＋
8按鈕1.左邊
＝
編輯框1.左邊
＋
編輯框1.寬度
＋
8'
基本是這樣了.我們來試試.有點錯誤.檢查一下.這樣效果不錯了.現在來說一說.在網路上找的

⑶ 易語言取機器碼源碼

方法/步驟

1、在程序窗口分別添加一個分組框、編輯框。如圖所示

⑷ 一個編好的易語言程序怎樣查看源代碼

如果還沒有編譯生成軟體，而是*.e源碼的話， 可以到http://www.eyuyan.com/pdown.htm下載易語言打開查看。

如果編譯生成軟體了，那麼就無法簡單的查看源碼了。

⑸ 易語言寫的軟體開啟時需要輸入激活碼，第二次開啟時就不用輸入了。要怎麼辦

.版本 2
.支持庫 script
.支持庫 eAPI

.程序集 窗口程序集1, , , 為了方便省事，我把注冊機也寫在一起，自己測試吧
.程序集變數 注冊碼, 文本型, , , 用於正常軟體
.程序集變數 是否注冊, 邏輯型, , , 用於正常軟體

.子程序 __啟動窗口_創建完畢, , , 用於正常軟體

編輯框1.內容 ＝ 到文本 (取絕對值 (取硬碟特徵字 ()) ＋ 20100714) ' 20100714 這個你可以自己該數值
注冊判斷 () ' 檢查是否注冊 賦值給 變數：是否注冊
.判斷開始 (是否注冊 ＝ 真) ' 這個判斷可以用在你想要限制的地方
_啟動窗口.標題 ＝ 「軟體已注冊」
.默認
_啟動窗口.標題 ＝ 「軟體未注冊」
.判斷結束

.子程序 注冊判斷, , , 用於正常軟體

腳本組件1.執行 (#md5)
.如果 (注冊項是否存在 (3, 「Softwaremysoftconfig」) ＝ 真)
注冊碼 ＝ 取文本注冊項 (3, 「Softwaremysoftconfig」, )
.如果 (注冊碼 ＝ 到大寫 (腳本組件1.運行 (「md5」, 編輯框1.內容)))
是否注冊 ＝ 真
.否則
是否注冊 ＝ 假
.如果結束

.否則
是否注冊 ＝ 假
.如果結束

.子程序 _注冊按鈕_被單擊, , , 用於正常軟體

.如果 (編輯框2.內容 ＝ 注冊計算 ())
信息框 (「注冊成功，重新打開軟體即可！」, 0, )
寫注冊項 (3, 「Softwaremysoftconfig」, 編輯框2.內容)
銷毀 ()
.否則
信息框 (「注冊失敗」, 0, )
.如果結束

.子程序 注冊計算, 文本型, , 用於正常軟體

腳本組件1.執行 (#md5)
返回 (到大寫 (腳本組件1.運行 (「md5」, 編輯框1.內容)))

.子程序 _按鈕1_被單擊, , , 用於注冊機

腳本組件1.執行 (#md5)
編輯框4.內容 ＝ 到大寫 (腳本組件1.運行 (「md5」, 編輯框3.內容))