易语言取中间文本，取文本中间

易语言取中间文本，取文本中间。

源码 

.版本 2

.子程序 取中间文本, 文本型, 公开

.参数 寻找文本, 文本型

.参数 左标识, 文本型

.参数 右标识, 文本型

.参数 倒找内容, 逻辑型, 可空, 先找右标识再找左标识.

.局部变量 临时文本, 文本型

.如果 (倒找内容)

    .如果真 (倒找文本 (寻找文本, 右标识, , 假) ≠ -1)

        临时文本 ＝ 取文本左边 (寻找文本, 倒找文本 (寻找文本, 右标识, , 假) － 1)

        返回 (取文本右边 (临时文本, 取文本长度 (临时文本) － 倒找文本 (临时文本, 左标识, , 假) － 取文本长度 (左标识) ＋ 1))

    .如果真结束

.否则

    .如果真 (寻找文本 (寻找文本, 左标识, , 假) ≠ -1)

        临时文本 ＝ 取文本右边 (寻找文本, 取文本长度 (寻找文本) － 寻找文本 (寻找文本, 左标识, , 假) － 取文本长度 (左标识) ＋ 1)

        返回 (取文本左边 (临时文本, 寻找文本 (临时文本, 右标识, , 假) － 1))

    .如果真结束

.如果结束

返回 (“”)