模块化的传送员模板

meinvwudi

[@main]
#if
#act
MOV S$地图名字圣龙皇城
#CALL [\系统功能\打宝地图传送.txt] @进入地图配置读取实现
#CALL [\系统功能\打宝地图传送.txt] @传送费用字符串拼接

[@圣龙蛮荒城1号点]
#if
#act
MOV S$地图名字圣龙·蛮荒城
#CALL [\系统功能\打宝地图传送.txt] @进入地图配置读取实现
#CALL [\系统功能\打宝地图传送.txt] @地图传送模板

[@圣龙蛮荒城2号点]
#if
#act
MOV S$地图名字圣龙·蛮荒城
#CALL [\系统功能\打宝地图传送.txt] @进入地图配置读取实现
MOV S$进入坐标X 125
MOV S$进入坐标Y 158
MOV S$传送范围 3
#CALL [\系统功能\打宝地图传送.txt] @地图传送模板

meinvwudi

[@进入地图配置读取实现]
{
#if
equal S$地图名字 
#act
messagebox 进入地图条件配置错误
break

#if
#act
MOV S$进入提示 
LoadCacheIniFile  ..\QuestDiary\系统功能\游戏配置\地图进入费用.ini

ReadConfigFileItem ..\QuestDiary\系统功能\游戏配置\地图进入费用.ini <$str(S$地图名字)>   编号       S$进入地图编号
ReadConfigFileItem ..\QuestDiary\系统功能\游戏配置\地图进入费用.ini <$str(S$地图名字)>   等级          N$地图需要等级
ReadConfigFileItem ..\QuestDiary\系统功能\游戏配置\地图进入费用.ini <$str(S$地图名字)>   绑元          N$地图需要绑元
ReadConfigFileItem ..\QuestDiary\系统功能\游戏配置\地图进入费用.ini <$str(S$地图名字)>   元宝          N$地图需要元宝
ReadConfigFileItem ..\QuestDiary\系统功能\游戏配置\地图进入费用.ini <$str(S$地图名字)>   龙传          N$地图需要龙传
ReadConfigFileItem ..\QuestDiary\系统功能\游戏配置\地图进入费用.ini <$str(S$地图名字)>   元宝          N$地图需要元宝
ReadConfigFileItem ..\QuestDiary\系统功能\游戏配置\地图进入费用.ini <$str(S$地图名字)>   每次呆秒      N$地图限制时长
ReadConfigFileItem ..\QuestDiary\系统功能\游戏配置\地图进入费用.ini <$str(S$地图名字)>   开放小时      N$地图开放小时
ReadConfigFileItem ..\QuestDiary\系统功能\游戏配置\地图进入费用.ini <$str(S$地图名字)>   攻城进入      S$地图攻城进入
ReadConfigFileItem ..\QuestDiary\系统功能\游戏配置\地图进入费用.ini <$str(S$地图名字)>   进入坐标X      S$进入坐标X
ReadConfigFileItem ..\QuestDiary\系统功能\游戏配置\地图进入费用.ini <$str(S$地图名字)>   进入坐标Y      S$进入坐标Y 
ReadConfigFileItem ..\QuestDiary\系统功能\游戏配置\地图进入费用.ini <$str(S$地图名字)>   传送范围      S$传送范围 
ReadConfigFileItem ..\QuestDiary\系统功能\游戏配置\地图进入费用.ini <$str(S$地图名字)>   进入提示       S$进入提示 

sendmsg 6 --------<$str(S$进入地图编号)>------

[@地图传送模板]
#if
checklevelex < <$str(N$地图需要等级)>
#act
messagebox 你的等级没有达到<$str(N$地图需要等级)>
break

#if
equal S$地图攻城进入 否
checkunderwar 沙巴克
#act
messagebox 对不起！攻沙期间无法进入地图
BREAK

#if
equal N$地图需要龙传 1
check [002] 0
#act
messagebox 对不起！你不是龙的传人无法进入
BREAK

#if
not equal N$地图开放小时 0
not small G48 <$str(N$地图开放小时)>
#act
messagebox 当前地图只开放<$str(N$地图开放小时)>小时，已关闭！
BREAK

#if
not equal N$地图需要绑元 0
checkmoney 绑定元宝 < <$str(N$地图需要绑元)> 
#act
messagebox  你身上的绑定元宝不足：<$str(N$地图需要绑元)>,无法进入.
BREAK

#if
not equal N$地图需要元宝 0
checkmoney 元宝 < <$str(N$地图需要元宝)> 
#act
messagebox  你身上的元宝不足：<$str(N$地图需要元宝)>,无法进入.
BREAK



#if
not checkmoney 绑定元宝 < <$str(N$地图需要绑元)> 
not checkmoney 元宝 < <$str(N$地图需要元宝)> 
large N$地图限制时长 0
#act
money 绑定元宝 - <$str(N$地图需要绑元)>
money 元宝  - <$str(N$地图需要元宝)>
mapmove <$str(S$进入地图编号)> <$str(S$进入坐标X)> <$str(S$进入坐标Y)> <$str(S$传送范围)>
SENDMSG 6 ------------[<$str(S$进入坐标X)>]-[<$str(S$进入坐标Y)>]-[<$str(S$传送范围)>]------------------------
#CALL [\系统功能\基础按钮\进地图倒计时.txt] @进地图倒计时触发
guildnoticemsg 255 52 (*)玩家【<$USERNAME>】闯进了『<$maptitle>』<$str(S$进入提示)>!
break

#if
not checkmoney 绑定元宝 < <$str(N$地图需要绑元)> 
not checkmoney 元宝 < <$str(N$地图需要元宝)> 
#act
money 绑定元宝 - <$str(N$地图需要绑元)>
money 元宝  - <$str(N$地图需要元宝)>
mapmove <$str(S$进入地图编号)> <$str(S$进入坐标X)> <$str(S$进入坐标Y)> <$str(S$传送范围)>
guildnoticemsg 255 52 (*)玩家【<$USERNAME>】闯进了『<$maptitle>』<$str(S$进入提示)>
break

#elseact
messagebox 你没有进入地图需要的费用
break

[@传送费用字符串拼接]
#if
#act
MOV S$传送条件字串
MOV N$条件次数 0

#if
not equal N$地图需要绑元 0
#act
INC S$传送条件字串 绑元<$str(N$地图需要绑元)>
INC N$条件次数 1


#if
not equal N$地图需要元宝 0
equal  N$条件次数 1
#act
INC S$传送条件字串 +元宝<$str(N$地图需要元宝)>
INC N$条件次数 1

#if
not equal N$地图需要元宝 0
equal  N$条件次数 0
#act
INC S$传送条件字串 元宝<$str(N$地图需要元宝)>
INC N$条件次数 1

#if
equal N$地图需要龙传 1
LARGE N$条件次数 0
#act
INC S$传送条件字串 +龙传封号

#if
equal N$地图需要龙传 1
equal N$条件次数 0
#act
INC S$传送条件字串 龙传封号
}

meinvwudi

传送配置

[圣龙·蛮荒城]
编号=xsj
等级=55
绑元=0
元宝=3000
龙传=1
每次呆秒=3600
开放小时=
攻城进入=否
进入坐标X=100
进入坐标Y=165
传送范围=3
进入提示=里面怪物强悍!