易语言汇编版 寻找文本所在行 可以设置文本寻找位置

.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕
.局部变量 a, 文本型
.局部变量 t, 整数型
.局部变量 g1, 整数型
.局部变量 g2, 整数型
.局部变量 b, 文本型
.局部变量 i, 整数型

a ＝ “纯汇编算法编写” ＋ #换行符 ＋ “作者cf2006a” ＋ #换行符 ＋ “作者cf2006a” ＋ #换行符 ＋ “作者cf2006a”
b ＝ “纯汇编算法编写作者cf2006a”
t ＝ 取启动时间 ()
.计次循环首 (1000000, i)
    g1 ＝ _文本所在行_自编_ASM (b, “作者cf2006a”, 0)
    g2 ＝ _文本所在行_自编_ASM (a, “作者cf2006a”, 41)

.计次循环尾 ()
t ＝ 取启动时间 () － t
调试输出 (t, g1, g2)

.子程序 _文本所在行_自编_ASM, 整数型, 公开, 纯汇编算法编写作者cf2006a  返回所在行 默认没找到文本的话也是返回1
.参数 文本, 文本型
.参数 要找的文本, 文本型
.参数 开始位置, 整数型, , 寻找文本起始位置

置入代码 ({ 139, 125, 8, 139, 93, 12, 139, 117, 16, 139, 63, 139, 27, 1, 254, 49, 192, 64, 49, 210, 58, 12, 19, 116, 19, 138, 15, 128, 249, 0, 116, 27, 71, 128, 249, 10, 117, 1, 64, 58, 12, 19, 117, 230, 66, 128, 60, 19, 0, 116, 2, 235, 228, 49, 210, 57, 247, 114, 215, 201, 194, 12, 0 })
返回 (0)

@cf2006a