免费万能登陆器制作方法介绍
文章作者:传奇 文章来源:http://www.xzdlq.com 点击:次 更新时间:2016/8/29 9:52:18
程序集 窗口程序集1
.程序集变量 目录, 文本型
.程序集变量 私服IP, 文本型, , "0"
.子程序 __启动窗口_创建完毕
组合框1.加入项目 (“私服1区”, )
加入成员 (私服IP, “192.168.1.1”)
组合框1.加入项目 (“私服2区”, )
加入成员 (私服IP, “192.168.1.2”)
组合框1.加入项目 (“私服3区”, )
加入成员 (私服IP, “192.168.1.3”)
目录 = 取运行目录 ()
.如果真 (假 = 文件是否存在 (目录 + “\map\0.map”))
信息框 (“请把登陆器放在传奇目录下运行”, 64, “传奇登陆器”)
结束 ()
.如果真结束
.子程序 _按钮1_被单击
.局部变量 选中索引
选中索引 = 组合框1.现行选中项
.如果真 (-1 ≠ 选中索引)
写配置项 (目录 + “\ftp.ini”, “Server”, “ServerCount”, “1”)
写配置项 (目录 + “\ftp.ini”, “Server”, “server1caption”, 组合框1.取项目文本 (选中索引))
写配置项 (目录 + “\ftp.ini”, “Server”, “server1name”, 组合框1.取项目文本 (选中索引))
选中索引 = 选中索引 + 1
写配置项 (目录 + “\mir.ini”, “setup”, “FontName”, “楷体”)
写配置项 (目录 + “\mir.ini”, “setup”, “ServerAddr”, 私服IP [选中索引])
写配置项 (目录 + “\mirsetup.ini”, “setup”, “FontName”, “楷体”)
写配置项 (目录 + “\mirsetup.ini”, “setup”, “ServerAddr”, 私服IP [选中索引])
运行 (目录 + “\MirClient.dat”, 假, )
.如果真结束