易语言通过路径来判断是不是在压缩包内运行的代码

.版本 2
.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
.局部变量 运行目录, 文本型
.局部变量 解压名称, 文本型
.局部变量 开始位置, 整数型
.局部变量 结束位置, 整数型
运行目录 ＝ 取运行目录 ()
开始位置 ＝ 倒找文本 (运行目录, “$”, , 假)
结束位置 ＝ 倒找文本 (运行目录, “\”, 开始位置, 假) ＋ 1
解压名称 ＝ 到小写 (取文本中间 (运行目录, 结束位置, 开始位置 － 结束位置))
.如果 (解压名称 ≠ “”)
  .如果真 (解压名称 ＝ “hz”)
    解压名称 ＝ “好压”
  .如果真结束
  .如果真 (解压名称 ＝ “rar”)
    解压名称 ＝ “WinRar”
  .如果真结束
  .如果真 (解压名称 ＝ “360”)
    解压名称 ＝ “360压缩”
  .如果真结束
  判断标签.标题 ＝ “在” ＋ 解压名称 ＋ “内”
.否则
  判断标签.标题 ＝ “不在压缩包内”
.如果结束