本文目录一览：
求一段易语言个人记事本的源码
.版本 2
.程序集 启动窗口程序集.程序集变量 现行文件名, 文本型.程序集变量 当前被搜寻文本, 文本型.程序集变量 是否区分大小写, 逻辑型.程序集变量 常用文件名, 文本型, , "3".程序集变量 常用文件菜单项, 菜单, , "3", 成员数目必须与“常用文件名”相等
.子程序 __启动窗口_尺寸被改变
编辑框.移动 (5, 5, 取用户区宽度 () － 10, 取用户区高度 () － 10)
.子程序 _新建_被选择
.如果真 (询问保存文档 () ＝ 假) 编辑框.内容 ＝ “” 标题 ＝ “E 语言记事本” 设置修改状态 (假) 现行文件名 ＝ “”.如果真结束
.子程序 _打开_被选择.局部变量 文件号, 整数型
.如果真 (询问保存文档 () ＝ 假) 通用对话框1.标题 ＝ “请输入欲打开的文本文件名：” 通用对话框1.类型 ＝ 0 .如果真 (通用对话框1.打开 () ＝ 真) .如果真 (打开并读入文件 (通用对话框1.文件名)) 加入常用文件名 (通用对话框1.文件名) .如果真结束
.如果真结束
.如果真结束
.子程序 _常用文件1_被选择.局部变量 变量1, 整数型.局部变量 当前菜单项, 菜单
.如果真 (询问保存文档 () ＝ 真) 返回 ().如果真结束当前菜单项 ＝ 取事件组件 ().计次循环首 (取数组成员数 (常用文件菜单项), 变量1) .如果真 (常用文件菜单项 [变量1] ＝ 当前菜单项 且 常用文件名 [变量1] ≠ “”) 打开并读入文件 (常用文件名 [变量1]) .如果真结束
.计次循环尾 ()
.子程序 打开并读入文件, 逻辑型, , 成功返回真，失败返回假.参数 文件名, 文本型.局部变量 窗口标题, 文本型.局部变量 文件号, 整数型.局部变量 是否读入成功, 逻辑型
编辑框.内容 ＝ “”设置修改状态 (假)窗口标题 ＝ “E 语言记事本”现行文件名 ＝ “”
文件号 ＝ 打开文件 (文件名, #读入, ).如果 (文件号 ≠ 0) 编辑框.内容 ＝ 读入文本 (文件号, ) 关闭文件 (文件号) 现行文件名 ＝ 文件名 窗口标题 ＝ 窗口标题 ＋ “ - ” ＋ 现行文件名 是否读入成功 ＝ 真.否则 信息框 (“打开文件失败！”, #错误图标, “错误”).如果结束标题 ＝ 窗口标题返回 (是否读入成功)
.子程序 _保存_被选择
保存文档 ()
.子程序 _另存为_被选择
通用对话框1.标题 ＝ “请输入欲另存到的文本文件名：”通用对话框1.类型 ＝ 1.如果真 (通用对话框1.打开 () ＝ 真) 保存文档 (通用对话框1.文件名).如果真结束
.子程序 _打印_被选择
.如果真 (打印机1.开始打印 (, ) ＝ 真) 打印机1.写文本行 (编辑框.内容) ' “写文本行”命令会自动换行及换页 打印机1.结束打印 ().如果真结束
.子程序 _退出_被选择
.如果真 (询问保存文档 () ＝ 假) 销毁 () ' 通过销毁主窗口退出程序.如果真结束
.子程序 _撤消_被选择
编辑框.发送信息 (199, 0, 0)
.子程序 _剪切_被选择
编辑框.发送信息 (768, 0, 0)
.子程序 _复制_被选择
编辑框.发送信息 (769, 0, 0)
.子程序 _粘贴_被选择
编辑框.发送信息 (770, 0, 0)
.子程序 _全选_被选择
编辑框.发送信息 (177, 0, -1)
.子程序 _日期_被选择
编辑框.被选择文本 ＝ 时间到文本 (取现行时间 (), #日期部分)
.子程序 _时间_被选择
编辑框.被选择文本 ＝ 时间到文本 (取现行时间 (), #时间部分)
.子程序 _设置字体_被选择.局部变量 新字体, 字体
通用对话框1.类型 ＝ 2.如果真 (通用对话框1.打开 () ＝ 假) 返回 ().如果真结束新字体.加粗 ＝ 通用对话框1.加粗新字体.倾斜 ＝ 通用对话框1.倾斜新字体.删除线 ＝ 通用对话框1.删除线新字体.下划线 ＝ 通用对话框1.下划线新字体.字体名称 ＝ 通用对话框1.字体名称新字体.字体大小 ＝ 通用对话框1.字体大小编辑框.字体 ＝ 新字体编辑框.文本颜色 ＝ 通用对话框1.字体颜色
.子程序 _查找_被选择
载入 (搜寻窗口, _启动窗口, 假)
.子程序 _关于_被选择
载入 (关于窗口, , 真)
.子程序 是否已被修改, 逻辑型
返回 (编辑框.发送信息 (184, 0, 0) ≠ 0)
.子程序 设置修改状态.参数 是否已被修改, 逻辑型, 可空, 默认为设置成被修改
编辑框.发送信息 (185, 选择 (是否为空 (是否已被修改) ＝ 真 或 是否已被修改 ＝ 真, 1, 0), 0)
.子程序 __启动窗口_可否被关闭, 逻辑型
返回 (取反 (询问保存文档 ()))
.子程序 询问保存文档, 逻辑型, , 返回真表示用户选择了中止.局部变量 询问返回, 整数型
.如果真 (是否已被修改 () ＝ 真) 询问返回 ＝ 信息框 (“文件已经被修改，是否保存？”, #取消是否钮 ＋ #询问图标, “询问”) .如果真 (询问返回 ＝ #取消钮) 返回 (真) .如果真结束 .如果真 (询问返回 ＝ #是钮) .如果真 (保存文档 () ＝ 真) 返回 (真) .如果真结束
.如果真结束
.如果真结束返回 (假)
.子程序 保存文档, 逻辑型, , 返回真表示用户选择了中止.参数 文件名, 文本型, 可空.局部变量 保存文件名, 文本型.局部变量 文件号, 整数型
保存文件名 ＝ 选择 (是否为空 (文件名), 现行文件名, 文件名).如果真 (保存文件名 ＝ “”) 通用对话框1.标题 ＝ “请输入欲保存到的文本文件名：” 通用对话框1.类型 ＝ 1 .如果真 (通用对话框1.打开 () ＝ 假) 返回 (真) .如果真结束 保存文件名 ＝ 通用对话框1.文件名.如果真结束设置修改状态 (假)文件号 ＝ 打开文件 (保存文件名, #重写, ).如果真 (文件号 ≠ 0) .如果 (写出文本 (文件号, 编辑框.内容) ＝ 真) 关闭文件 (文件号) 现行文件名 ＝ 保存文件名 标题 ＝ “E 语言记事本 - ” ＋ 现行文件名 加入常用文件名 (保存文件名) 返回 (假) .否则 关闭文件 (文件号) .如果结束
.如果真结束信息框 (“保存文件失败！”, #错误图标, “错误”)返回 (假)
.子程序 _查找上一个_被选择
搜寻 (假)
.子程序 _查找下一个_被选择
搜寻 (真)
.子程序 搜寻.参数 是否为搜寻下一个, 逻辑型.局部变量 搜寻位置, 整数型
.如果真 (当前被搜寻文本 ＝ “”) 返回 ().如果真结束搜寻位置 ＝ 编辑框.起始选择位置 ＋ 1 ' 搜寻位置应该从 1 开始，而编辑框的“起始选择位置”属性值是从 0 开始。.如果真 (是否为搜寻下一个) 搜寻位置 ＝ 搜寻位置 ＋ 编辑框.被选择字符数.如果真结束.如果 (是否为搜寻下一个) 搜寻位置 ＝ 寻找文本 (编辑框.内容, 当前被搜寻文本, 搜寻位置, 是否区分大小写).否则 搜寻位置 ＝ 倒找文本 (编辑框.内容, 当前被搜寻文本, 搜寻位置, 是否区分大小写).如果结束.如果 (搜寻位置 ＝ -1) 信息框 (“未找到指定文本” ＋ #左引号 ＋ 当前被搜寻文本 ＋ #右引号, #错误图标, “错误”).否则 编辑框.起始选择位置 ＝ 搜寻位置 － 1 ' 转换回编辑框的“起始选择位置”属性值。 编辑框.被选择字符数 ＝ 取文本长度 (当前被搜寻文本).如果结束
.子程序 __启动窗口_创建完毕.局部变量 变量1, 整数型
载入常用文件 ()常用文件菜单项 [1] ＝ 常用文件1常用文件菜单项 [2] ＝ 常用文件2常用文件菜单项 [3] ＝ 常用文件3.计次循环首 (取数组成员数 (常用文件菜单项), 变量1) 常用文件菜单项 [变量1].标题 ＝ “” ＋ 到文本 (变量1) ＋ “. ” ＋ 常用文件名 [变量1].计次循环尾 ().计次循环首 (取数组成员数 (常用文件菜单项) － 1, 变量1) 事件转移 (常用文件菜单项 [变量1 ＋ 1], 常用文件1).计次循环尾 ()显示常用菜单项 ()
.子程序 显示常用菜单项.局部变量 变量1, 整数型
.如果真 (常用文件名 [1] ＝ “”) 返回 ().如果真结束连续赋值 (真, 常用文件分隔条.可视, 常用文件菜单项 [1].可视).计次循环首 (取数组成员数 (常用文件菜单项) － 1, 变量1) .如果真 (常用文件名 [变量1 ＋ 1] ≠ “”) 常用文件菜单项 [变量1 ＋ 1].可视 ＝ 真 .如果真结束
.计次循环尾 ()
.子程序 加入常用文件名.参数 欲加入文件名, 文本型.局部变量 变量1, 整数型.局部变量 数组成员数目, 整数型
检查 (欲加入文件名 ≠ “”)数组成员数目 ＝ 取数组成员数 (常用文件菜单项).计次循环首 (数组成员数目, 变量1) .如果真 (常用文件名 [变量1] ＝ “”) 跳出循环 () ' 找到一个空白菜单项 .如果真结束 .如果真 (文本比较 (常用文件名 [变量1], 欲加入文件名, 假) ＝ 0) 返回 () ' 该常用文件菜单项已经存在 .如果真结束
.计次循环尾 ().如果真 (变量1 ＞ 数组成员数目) ' 如果已经没有了空白菜单项位置，则将第一个菜单项推出 .计次循环首 (数组成员数目 － 1, 变量1) 常用文件名 [变量1] ＝ 常用文件名 [变量1 ＋ 1] 常用文件菜单项 [变量1].标题 ＝ “” ＋ 到文本 (变量1) ＋ “. ” ＋ 常用文件名 [变量1] .计次循环尾 () 变量1 ＝ 数组成员数目 ' 置为指向最后一个菜单项的位置.如果真结束常用文件名 [变量1] ＝ 欲加入文件名常用文件菜单项 [变量1].标题 ＝ “” ＋ 到文本 (变量1) ＋ “. ” ＋ 欲加入文件名显示常用菜单项 ()
.子程序 读入常用文件列表, 文本型.参数 读入序号, 整数型
检查 (读入序号 ≥ 1 且 读入序号 ≤ 取数组成员数 (常用文件菜单项))返回 (取文本注册表项 (“E 记事本”, “常用文件”, 到文本 (读入序号), ))
.子程序 写出常用文件.参数 写出序号, 整数型
检查 (写出序号 ≥ 1 且 写出序号 ≤ 取数组成员数 (常用文件菜单项))写注册表项 (“E 记事本”, “常用文件”, 到文本 (写出序号), 常用文件名 [写出序号])
.子程序 载入常用文件.局部变量 变量1, 整数型
.计次循环首 (取数组成员数 (常用文件菜单项), 变量1) 常用文件名 [变量1] ＝ 读入常用文件列表 (变量1).计次循环尾 ()
.子程序 保存常用文件列表.局部变量 变量1, 整数型
.计次循环首 (取数组成员数 (常用文件名), 变量1) 写出常用文件 (变量1).计次循环尾 ()
.子程序 __启动窗口_将被销毁
保存常用文件列表 ()
求易语言记事本代码
原型：
int
WINAPI
icePub_encryptFile(char
*strFilename,
char
*strOutputFilename,
char
*strKey)
输入：strFilename
待加密文件名
strOutputFilename
加密后文件名
strKey
密钥串，任意长度
输出：
返回码:
原型：
int
WINAPI
icePub_decryptFile(char
*strFilename,
char
*strOutputFilename,
char
*strKey)
输入：strFilename
加密文件名
strOutputFilename
解密后文件名
strKey
密钥串，任意长度
输出：
返回码:
文档里有icePubDLL.dll下载
易语言记事本加密解密代码
原型：
int WINAPI icePub_encryptFile(char *strFilename, char *strOutputFilename, char *strKey)
输入：strFilename 待加密文件名
strOutputFilename 加密后文件名
strKey 密钥串，任意长度
输出：
返回码:
原型：
int WINAPI icePub_decryptFile(char *strFilename, char *strOutputFilename, char *strKey)
输入：strFilename 加密文件名
strOutputFilename 解密后文件名
strKey 密钥串，任意长度
输出：
返回码:
文档里有icePubDLL.dll下载
易语言,写个记事本的程序,保存的代码怎么写
添加一个通用对话框
.版本 2
.程序集 窗口程序集_启动窗口
.子程序 _保存_被选择
.如果真 (通用对话框1.打开 () ＝ 真)
写到文件 (通用对话框1.文件名, 到字节集 (编辑框1.内容))
. 如果真结束
易语言教程
IT9网络学院vip之零基础学习易语言教程（完整打包）
《易语言远程控制技术教程》
一切从零开始易语言辅助教程 荐
世宝易语言教程 荐
世恒易语言教程
中华隐士易语言全套高清课程【全套20课】完美收藏版
之乎者也易语言POST系列教程合集
仓库管理系统制作系列教程【全套1-11课】-全套打包下载易语言实战教程
华中红客基地易语言系列教程
天都吧易语言全套课程【共50课时】-史上最经典的易语言入门到精通课程【解压密码k9z6a3.b51..k】
技术海VIP课程易语言零基础到精通，特别好的最新教程！共2.27G！强烈推荐(1)
时光论坛易语言全套教程【易语言零基础+易语言抓包+易语言填表】完整版
易语言3D游戏开发视频教程+全套源码
易语言Hook从入门到精通
易语言VIP教程45课
易语言WEB QQ协议分析教程，实现各种QQ软件应用操作很不错的教程【共15课】 载很好的教程
易语言外挂初级【1-15】CE教程大全
易语言所有支持库 非静态库186个,静态库107个
易语言极品优秀源码
易语言正则表达式教程【精易论坛出品共12课时】-高清高速
易语言源码
易语言编程系统pdf 含详细目录
易语言网络编程
星缘正则表达式系列教程
甲壳虫vip之易语言培训班
精易论坛VIP-POST填表全套全套教程
觅风易语言教程
道德网安-易语言基本教程（共4章节）
集中营易语言百集学习视频（1·80集）
驱动级的一个应用实例（易语言，C++）语音教程
魔鬼作坊易语言外挂教程
黑手安全网VIP之易语言系列教程（打包)
黑猫论坛易语教程【共32课时】-很不错的HK易语言教程
黑鹰易语言教程 - -
独立团--VIP工具包.rar
易友编程助手源码.rar 2.86 MB
易语言2D游戏开发引擎最终版.rar 1.75 MB
易语言3D射击游戏源码.rar 28.95 MB
易语言DNF源码.rar 4.52 MB 2013-07-21
易语言nes模拟器源码.rar 211.11 KB
易语言Win8界面风格源码.rar 1.43 MB
易语言XP虚拟操作系统.rar 8.09 MB
易语言下载自绘界面.rar 833.22 KB
易语言仿iPhone4s源码.rar 2.32 MB
易语言天龙八部Flash窗口.rar 2.25 MB
易语言情人节礼物源码.rar 10.02 MB
易语言拳皇格斗游戏源码.rar 227.34 KB
易语言桌面版酷狗音乐.rar 383.84 KB
易语言梦想逍遥游整套源码.rar 38.15 MB
易语言模仿QQ2013登陆.rar 826.76 K
易语言炫彩界面库.rar 7.04 MB
易语言简单网络游戏.rar 1.22 MB
易语言绿盾杀毒软件源码.rar 1.66 MB
易语言网络游戏源码.zip 3.47 MB
易语言超酷启动界面.rar 4.47 MB
易语言酷炫界面引擎.rar 1.28 MB
易语言金山毒霸界面源码.rar 1.44 MB
易语言黑客记事本.rar
..............................
跪求易语言记事本源码。
.版本 2
.支持库 iext2
.支持库 iext
.支持库 eAPI
.程序集 窗口程序集1
.程序集变量 文件路径, 文本型
.程序集变量 当前是否正在打字, 逻辑型
.子程序 _超级编辑框1_内容被改变, , , 更改超级编辑框的颜色
.局部变量 颜色, 字符格式
颜色.文本颜色 ＝ 取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), 取随机数 (0, 255))
超级编辑框1.置选择区字符格式 (颜色)
状态条1.置文本 (0, “行 ” ＋ 到文本 (超级编辑框1.取行数 ()) ＋ “ 文本长度 ” ＋ 到文本 (超级编辑框1.取文本长度 ()))
.子程序 __启动窗口_创建完毕, , , 设置通用对话框
通用对话框1.过滤器 ＝ “txt|*.txt”
通用对话框1.默认文件后缀 ＝ “txt”
通用对话框1.标题 ＝ “传说记事本保存对话框...”
_时间日期_被选择 ()
_炫银皮肤_被选择 ()
备忘录提醒 ()
.子程序 __启动窗口_位置被改变, , , 位置被改变后超级编辑框也跟着改变(按钮1也跟着改变)
.如果真 (_启动窗口.位置 ＝ 3)
超级编辑框1.宽度 ＝ 取屏幕宽度 () － 3
超级编辑框1.高度 ＝ 取屏幕高度 () － 80 － 按钮1.高度 － 10
按钮1.顶边 ＝ 取屏幕高度 () － 状态条1.高度 － 100
按钮1.宽度 ＝ 取屏幕宽度 () － 5
按钮1.高度 ＝ 状态条1.高度 ＋ 10
.如果真结束
.如果真 (_启动窗口.位置 ＝ 0)
超级编辑框1.宽度 ＝ _启动窗口.宽度 － 10
超级编辑框1.高度 ＝ _启动窗口.高度 － 55 － 按钮1.高度 － 10
按钮1.顶边 ＝ 200
按钮1.宽度 ＝ 560
.如果真结束
.子程序 _新建_被选择, , , New文件
.如果真 (超级编辑框1.内容 ≠ “”)
.如果真 (信息框 (“您还没保存!请问您要进行保存吗?”, 4, ) ＝ #是钮)
通用对话框1.类型 ＝ 1
通用对话框1.打开 ()
写到文件 (通用对话框1.文件名, 到字节集 (超级编辑框1.内容))
.如果真结束
.如果真结束
.子程序 _打开_被选择, , , Open文件
通用对话框1.类型 ＝ 0
通用对话框1.打开 ()
.如果真 (通用对话框1.文件名 ≠ “”)
超级编辑框1.内容 ＝ 到文本 (读入文件 (通用对话框1.文件名))
文件路径 ＝ 通用对话框1.文件名
.如果真结束
.子程序 _保存_被选择, , , Save文件
.如果真 (文件路径 ＝ “”)
通用对话框1.类型 ＝ 1
通用对话框1.打开 ()
写到文件 (通用对话框1.文件名, 到字节集 (超级编辑框1.内容))
.如果真结束
.如果真 (文件路径 ≠ “”)
写到文件 (文件路径, 到字节集 (超级编辑框1.内容))
.如果真结束
.子程序 _保存到_被选择, , , Save As文件
通用对话框1.类型 ＝ 1
通用对话框1.打开 ()
.如果真 (通用对话框1.文件名 ≠ “”)
写到文件 (通用对话框1.文件名, 到字节集 (超级编辑框1.内容))
.如果真结束
.子程序 _撤销_被选择, , , Undo 文本
超级编辑框1.撤消 ()
.子程序 _剪切_被选择, , , Cut 文本
超级编辑框1.剪切 ()
.子程序 _复制_被选择, , , Copy 文本
超级编辑框1.复制 ()
.子程序 _粘连_被选择, , , Paste文本
超级编辑框1.粘贴 ()
.子程序 _删除_被选择, , , Delete文本
超级编辑框1.删除 ()
超级编辑框1.内容 ＝ 取文本左边 (超级编辑框1.内容, 取文本长度 (超级编辑框1.内容) － 1)
.子程序 _寻找_被选择, , , Find文本
载入 (Find窗口, , 真)
.子程序 _寻找下一个_被选择, , , 还没解决好
.子程序 _文本替换_被选择, , , 文本替换
载入 (文本替换窗口, , 真)
.子程序 _跳到_被选择, , , 还没解决好
载入 (跳到窗口, , 真)
.子程序 _全选_被选择, , , Select All文本
超级编辑框1.被选择字符数 ＝ 取文本长度 (超级编辑框1.内容)
.子程序 _时间日期_被选择, , , Time-Date
.局部变量 小时, 文本型
.局部变量 分钟, 文本型
.局部变量 日期, 文本型
.局部变量 年份, 文本型
.局部变量 月份, 文本型
.局部变量 日份, 文本型
小时 ＝ 到文本 (取小时 (取现行时间 ()))
分钟 ＝ 到文本 (取分钟 (取现行时间 ()))
年份 ＝ 到文本 (取年份 (取现行时间 ()))
月份 ＝ 到文本 (取月份 (取现行时间 ()))
日份 ＝ 到文本 (取日 (取现行时间 ()))
状态条1.置文本 (1, 小时 ＋ “:” ＋ 分钟 ＋ “ ” ＋ 年份 ＋ “-” ＋ 月份 ＋ “-” ＋ 日份)
.子程序 _传说记事本v13_被选择, , , About Notepad
信息框 (“软件作者:古老的传说” ＋ #换行符 ＋ “QQ:1041750677” ＋ #换行符 ＋ “MSN:thum_wai_lun@hotmail.com” ＋ #换行符 ＋ “编写工具:易语言” ＋ #换行符 ＋ “软件版本:1.3” ＋ #换行符, 0, )
.子程序 _密码保管_被选择, , , Password Protect
载入 (密码窗口, , 真)
.子程序 _备忘录_被选择, , , 载入备忘录窗口
载入 (备忘录窗口, , 真)
.子程序 备忘录提醒, , , 备忘录提醒
.局部变量 分割文本, 文本型, , "0"
.局部变量 今天日期, 文本型
.局部变量 分割今天日期, 文本型, , "0"
分割文本 ＝ 分割文本 (读配置项 (取运行目录 () ＋ “\备忘录.ini”, “备忘录”, “提示日期”, ), “日”, )
今天日期 ＝ 到文本 (取日期 (取现行时间 ()))
分割今天日期 ＝ 分割文本 (今天日期, “日”, )
.如果真 (取数组成员数 (分割文本) ＝ 1 或 取数组成员数 (分割文本) ＞ 1)
.如果真 (分割文本 [1] ＝ 分割今天日期 [1])
状态条1.置文本 (2, “您今天有一份备忘录噢^_^”)
.如果真结束
.如果真结束
.子程序 _银白皮肤_被选择, , , 银白皮肤
更换新皮肤 (1)
.子程序 _浅白皮肤_被选择, , , 浅白皮肤
更换新皮肤 (10)
.子程序 _浅灰皮肤_被选择, , , 浅灰皮肤
更换新皮肤 (13)
.子程序 _浅蓝皮肤_被选择, , , 浅蓝皮肤
更换新皮肤 (19)
.子程序 _浅黑皮肤_被选择, , , 浅黑皮肤
更换新皮肤 (5)
.子程序 _炫银皮肤_被选择, , , 炫银皮肤
更换新皮肤 (2)
.子程序 _炫白皮肤_被选择, , , 炫白皮肤
更换新皮肤 (15)
.子程序 _炫蓝皮肤_被选择, , , 炫蓝皮肤
更换新皮肤 (18)
.子程序 _深黑皮肤_被选择, , , 深黑皮肤
更换新皮肤 (14)
.子程序 __启动窗口_可否被关闭, 逻辑型, , 透明显示最小化运行
.局部变量 变量1, 整数型
变量1 ＝ 255
.计次循环首 (255, )
设置窗口透明度 (_启动窗口.取窗口句柄 (), 变量1)
变量1 ＝ 变量1 － 1
.如果真 (变量1 ＝ 1)
置托盘图标 (#程序图标, “古老的传说记事本v1.2”)
_启动窗口.可视 ＝ 假
.如果真结束
.计次循环尾 ()
返回 (假)
.子程序 __启动窗口_托盘事件, , , 透明显示_启动窗口
.参数 操作类型, 整数型
.局部变量 变量1, 整数型
.如果真 (操作类型 ＝ 1)
_启动窗口.可视 ＝ 真
.计次循环首 (255, 变量1)
设置窗口透明度 (_启动窗口.取窗口句柄 (), 变量1)
.计次循环尾 ()
.如果真结束
.如果真 (操作类型 ＝ 3)
弹出菜单 (图标菜单, 取鼠标水平位置 (), 取鼠标垂直位置 ())
.如果真结束
.子程序 __启动窗口_将被销毁, , , 销毁任务栏图标
置托盘图标 ({ }, )
.子程序 _打开传说记事本_被选择, , , _启动窗口.可视=真
__启动窗口_托盘事件 (1)
.子程序 _销毁_被选择, , , 销毁软件
销毁 ()
.子程序 _超级编辑框1_按下某键, 逻辑型, , 正在打字中...
.参数 键代码, 整数型
.参数 功能键状态, 整数型
当前是否正在打字 ＝ 真
按钮1.标题 ＝ “正在打字中...”
时钟1.时钟周期 ＝ 800
返回 (真)
.子程序 _超级编辑框1_放开某键, 逻辑型, , 暂停打字中...
.参数 键代码, 整数型
.参数 功能键状态, 整数型
当前是否正在打字 ＝ 假
返回 (真)
.子程序 _时钟1_周期事件, , , 暂停打字中...
.如果真 (当前是否正在打字 ＝ 假)
按钮1.标题 ＝ “暂停打字中...”
.如果真结束
.子程序 _超级编辑框1_选择区被改变, , , 超级编辑框1.滚动
超级编辑框1.滚动 (1)