游客您好
第三方账号登陆
  • 点击联系客服

    在线时间:9:00-17:00

    联系QQ

    3543403617

    电子邮件

    3543403617@QQ.com
  • PKhuo手机版

    GM资源教程随时查询

  • 扫描二维码

    进传奇GM资源交流群

Lv.9 管理员
1号会员,0活跃值,2021.07.08 加入
  • 98306发帖
  • 94343主题
  • 0关注
  • 1粉丝
这个人很懒,什么也没有留下。
最新源码 更多>
游戏视频 更多>
脚本教程 更多>

[GEE引擎] GEE传奇一条龙认证商行脚本,传奇开区时怎么设置商行教程

[复制链接]
pkhuo 发表于 2021-8-11 00:43:04 | 显示全部楼层 |阅读模式 打印 上一主题 下一主题
(@@InPutInteger,@@InPutString)
[@认证商行]
{

#Or
        ISONMAP mima
        ISONMAP mima2
        ISONMAP XINR1
#Act
        Messagebox \\对不起此地图不允许使用此功能!
Break
#If
        Equal        P0        0
#Act
        Mov        P0        1
        Mov        N0        0
        Mov        S$商人列表
        Mov        S$商人信息        开始读取
        Goto        @读取商人信息
Break
#ElseSay
\ \
\ \
<所有商行排行不分先后,请认准商人封号,谨防上当受骗/SCOLOR=253>  <关闭窗口/@exit>\\
<$STR(S$商人列表)>

[@读取商人信息]
#If
        Equal        S$商人信息
#Act
        OpenBigDialogBox 4 402
Break
#Say
\ \
\ \
<所有商行排行不分先后,请认准商人封号,谨防上当受骗/SCOLOR=253>  <关闭窗口/@exit>\\
<$STR(S$商人列表)>
#Elseact
        GetListString        ..\QuestDiary\管理机器码\商人信息.txt        <$STR(N0)>        S$商人信息        S$临时信息
#If
        Not        Equal        S$商人信息
#Act
        ANSIREPLACETEXT        <$STR(S$商人信息)>        :        :
        Inc        S$商人列表        <$STR(S$商人信息)>\
        Inc        N0        1
        Goto        @读取商人信息
Break
#Elseact
        Inc        N0        1
        Goto        @读取商人信息
Break
}
回复

使用道具 举报

懒得打字嘛,点击右侧快捷回复 【右侧内容,后台自定义】
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

PKhuo论坛手机版

扫一扫二维码

传奇最全教程基地

Powered by PKhuo!X3.4 ©2001-2013 Comsenz Inc. 湘ICP备15015719号-5 |网站地图|友链申请