易語言是一門以中文作為程式程式碼程式語言。以“易”著稱。創始人為吳濤。早期版本的名字為E語言。易語言最早的版本的釋出可追溯至2000年9月11日。創造易語言的初衷是進行用中文來編寫程式的實踐。從2000年至今,易語言已經發展到一定的規模,功能上、使用者數量上都十分可觀。
工具/原料
易語言任意版本
可以開啟易語言的裝置
易語言註冊軟體製作
如圖:
新建一個windows視窗程式
新增:
編輯框*2(編輯框主要是用來顯示文字的 換成標籤也可以)
標籤*3(也可以是透明標籤)
按鈕*1
如圖所示:
採用一個“資料加密”而加密的資料 是硬碟特徵字(也可以是cpu序列碼,記憶體序列碼 每個硬碟的特徵字都是不同的)
最後在編輯框1顯示出來
-----------------------程式碼---------------------------
.版本 2
.支援庫 dp1
編輯框1.內容 = 到文字 (加密資料 (到位元組集 (取硬碟特徵字 ()), 編輯框1.內容, 2))
編輯框1.禁止 = 真‘這是為了防止取到的內容被改變
回到啟動視窗
雙擊"複製"標籤【建議 尋找屬性-滑鼠左鍵被放開】
置入以下程式碼
----------------程式碼-------------
.版本 2
置剪輯板文字 (編輯框1.內容)
這樣一但 單擊 “複製”標籤 就會把編輯框1.內容複製到剪貼簿
普及一下 貼上的 就是 “取剪輯板文字 ()”
額外小功能:
新增一個“如果”來判斷 複製是否成功
--------程式碼-----------------
.版本 2
.支援庫 eAPI
.子程式 _標籤1_滑鼠左鍵被放開, 邏輯型
.引數 橫向位置, 整數型
.引數 縱向位置, 整數型
.引數 功能鍵狀態, 整數型
.判斷開始 (置剪輯板文字 (編輯框1.內容) = 真)
.如果 (資訊框 (“恭喜您,成功複製特殊字元!” + #換行符 + “是否立即進行啟用驗證?”, 4, “這裡新增彈出資訊框的標題”, ) = #是鈕)
開啟指定網址 (“這裡寫聯絡你的網址”)
.否則
.如果結束
.預設
.判斷結束
執行一下 看看效果
如果難看的話 大家可以在 啟動視窗 建立完畢 的程式下 新增一個 xp風格 【引數名稱為“風格型別”,資料型別為“整數型(int)”,所處語句為“XP風格”。註明:本引數可以為以下常量值之一: 0.#無風格; 1.#藍色風格; 2.#綠色風格; 3.#銀色風格。】
整體程式碼如下:
.版本 2
.支援庫 dp1
.支援庫 xplib
.支援庫 eAPI
.程式集 視窗程式集_啟動視窗
.子程式 __啟動視窗_建立完畢
編輯框1.內容 = 到文字 (加密資料 (到位元組集 (取硬碟特徵字 ()), 編輯框1.內容, 2))‘’取硬碟特徵字如果不會用就隨便輸入一段數字
編輯框1.禁止 = 真
XP風格 (2)
.子程式 _標籤1_滑鼠左鍵被放開, 邏輯型
.引數 橫向位置, 整數型
.引數 縱向位置, 整數型
.引數 功能鍵狀態, 整數型
.判斷開始 (置剪輯板文字 (編輯框1.內容) = 真)
.如果 (資訊框 (“恭喜您,成功複製特殊字元!” + #換行符 + “是否立即進行啟用驗證?”, 4, “這裡新增彈出資訊框的標題”, ) = #是鈕)
開啟指定網址 (“這裡寫聯絡你的網址”)
.否則
.如果結束
.預設
.判斷結束
其他的我不多說了 這個是加密的方式 其他根據自己的需要修改
按鈕還可以在新增一個
易語言軟體的註冊機
如圖:
編輯框*2
標籤*2
按鈕*1
雙擊按鈕
---------程式碼---------------------
.版本 2
.支援庫 dp1
編輯框2.內容 = 到文字 (解密資料 (到位元組集 (編輯框1.內容), “123”, 2))
前面寫了註冊軟體 把特殊字元 放在這個軟體 啟用 即可
注意事項
本人親寫經驗【請勿非法用作商業用途】