易语言能用编辑框的内容写入指定子程序代码吗

zhangli9271 · 发表于昨天 10:06

子程序名	返回值类型	公开	备注
刷新时间

变量名	类型	静态	数组	备注
现行时间	日期时间型
赋值秒数	整数型

现行时间＝取现行时间 ()
赋值秒数＝ 2
魔祭巨蛾1.等待时间＝增减时间 (现行时间, #秒, 赋值秒数)
魔祭巨蛾2.等待时间＝增减时间 (现行时间, #秒, 赋值秒数)

子程序名	返回值类型	公开	备注
计时

变量名	类型	静态	数组	备注
所有怪	文本型
怪名	文本型		0
排序	文本型
s	整数型

刷新时间 ()

判断循环首 (1 ＝ 1)

计算时间 (魔祭巨蛾1)

计算时间 (魔祭巨蛾2)

所有怪＝ “魔祭巨蛾1：” ＋魔祭巨蛾1.剩余时间＋ #换行符＋ “魔祭巨蛾2：” ＋魔祭巨蛾2.剩余时间

排序＝文本_分割文本排序_快速 (所有怪, #换行符, “：”, 2, 1, 真, 怪名)

判断循环尾 ()

计次循环首 (取数组成员数 (怪名), s)

超级列表框1.置标题 (s － 1, 0, 怪名 [s])

计次循环尾 ()

子程序名	返回值类型	公开	备注
读取文本时间

变量名	类型	静态	数组	备注
文本地址	文本型
分割	文本型		0
s	整数型
二次分割	文本型		0
i	整数型

文本地址＝到文本 (读入文件 (取运行目录 () ＋ “\刷新时间.txt”))
分割＝分割文本 (文本地址, #换行符, )

计次循环首 (取数组成员数 (分割), i)

二次分割＝分割文本 (分割 [i], “|”, )

计次循环首 (取数组成员数 (二次分割), s)

如果真 (二次分割 [s] ＝ “魔祭巨蛾1”)

魔祭巨蛾1.等待时间＝到时间 (二次分割 [2])

如果真 (二次分割 [s] ＝ “魔祭巨蛾2”)

魔祭巨蛾2.等待时间＝到时间 (二次分割 [2])

计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br />
.支持库 iext<br />
<br />
.子程序 刷新时间<br />
.局部变量 现行时间, 日期时间型<br />
.局部变量 赋值秒数, 整数型<br />
<br />
现行时间 ＝ 取现行时间 ()<br />
赋值秒数 ＝ 2<br />
魔祭巨蛾1.等待时间 ＝ 增减时间 (现行时间, #秒, 赋值秒数)<br />
魔祭巨蛾2.等待时间 ＝ 增减时间 (现行时间, #秒, 赋值秒数)<br />
<br />
.子程序 计时<br />
.局部变量 所有怪, 文本型<br />
.局部变量 怪名, 文本型, , "0"<br />
.局部变量 排序, 文本型<br />
.局部变量 s, 整数型<br />
<br />
刷新时间 ()<br />
.判断循环首 (1 ＝ 1)<br />
    计算时间 (魔祭巨蛾1)<br />
    计算时间 (魔祭巨蛾2)<br />
    所有怪 ＝ “魔祭巨蛾1：” ＋ 魔祭巨蛾1.剩余时间 ＋ #换行符 ＋ “魔祭巨蛾2：” ＋ 魔祭巨蛾2.剩余时间<br />
    排序 ＝ 文本_分割文本排序_快速 (所有怪, #换行符, “：”, 2, 1, 真, 怪名)<br />
.判断循环尾 ()<br />
.计次循环首 (取数组成员数 (怪名), s)<br />
    超级列表框1.置标题 (s － 1, 0, 怪名 <strike>)<br />
.计次循环尾 ()<br />
<br />
.子程序 读取文本时间<br />
.局部变量 文本地址, 文本型<br />
.局部变量 分割, 文本型, , "0"<br />
.局部变量 s, 整数型<br />
.局部变量 二次分割, 文本型, , "0"<br />
.局部变量 i, 整数型<br />
<br />
文本地址 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\刷新时间.txt”))<br />
分割 ＝ 分割文本 (文本地址, #换行符, )<br />
.计次循环首 (取数组成员数 (分割), i)<br />
    二次分割 ＝ 分割文本 (分割 <i>, “|”, )<br />
    .计次循环首 (取数组成员数 (二次分割), s)<br />
        .如果真 (二次分割 <strike> ＝ “魔祭巨蛾1”)<br />
            魔祭巨蛾1.等待时间 ＝ 到时间 (二次分割 [2])<br />
        .如果真结束<br />
        .如果真 (二次分割 <strike> ＝ “魔祭巨蛾2”)<br />
            魔祭巨蛾2.等待时间 ＝ 到时间 (二次分割 [2])<br />
        .如果真结束<br />
<br />
    .计次循环尾 ()<br />
.计次循环尾 ()

每次编辑读需要，先添加全局变量，设定全局变量的时间，读取文本的时间，在计时变量时间，在排序变量的时间，可不可以通过编辑框的内容自动增加这些内容，不用我一个个的去写，就是这个想法不知道可以实现。