|
地板

楼主 |
发表于 2014-8-24 09:04:23
|
只看该作者
功能 获取当前地图层数_1(下标)
变量 intX, intY
dm数组[下标].UseDict(8) //使用地图字库
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"轩","21de0c-303030",1.0,intX,intY) >= 0)
返回 "轩辕城"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"谷一","feb828-303030",1.0,intX,intY) >= 0)
返回 "兽王谷一层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"谷二","feb828-303030",1.0,intX,intY) >= 0)
返回 "兽王谷二层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"谷三","feb828-303030",1.0,intX,intY) >= 0)
返回 "兽王谷三层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"谷四","feb828-303030",1.0,intX,intY) >= 0)
返回 "兽王谷四层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"谷五","feb828-303030",1.0,intX,intY) >= 0)
返回 "兽王谷五层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"谷六","feb828-303030",1.0,intX,intY) >= 0)
返回 "兽王谷六层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindPic(830, 4, 1022, 27,"谷七.bmp|谷七1.bmp","000000",0.9,0,intX,intY) >= 0)
返回 "兽王谷七层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"海一","feb828-303030",1.0,intX,intY) >= 0)
返回 "苍穹海一层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"海二","feb828-303030",1.0,intX,intY) >= 0)
返回 "苍穹海二层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"海三","feb828-303030",1.0,intX,intY) >= 0)
返回 "苍穹海三层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"海四","feb828-303030",1.0,intX,intY) >= 0)
返回 "苍穹海四层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"海五","feb828-303030",1.0,intX,intY) >= 0)
返回 "苍穹海五层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"海六","feb828-303030",1.0,intX,intY) >= 0)
返回 "苍穹海六层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindPic(830, 4, 1022, 27,"海七.bmp|海七1.bmp","000000",0.9,0,intX,intY) >= 0)
返回 "苍穹海七层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"洞一","feb828-303030",1.0,intX,intY) >= 0)
返回 "灵蛇洞一层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"洞二","feb828-303030",1.0,intX,intY) >= 0)
返回 "灵蛇洞二层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"洞三","feb828-303030",1.0,intX,intY) >= 0)
返回 "灵蛇洞三层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindPic(830, 4, 1022, 27,"洞四.bmp|洞四1.bmp","000000",0.9,0,intX,intY) >= 0)
返回 "灵蛇洞四层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindPic(830, 4, 1022, 27,"洞五.bmp|洞五1.bmp","000000",0.9,0,intX,intY) >= 0)
返回 "灵蛇洞五层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"墟一","feb828-303030",1.0,intX,intY) >= 0)
返回 "昆仑虚一层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"墟二","feb828-303030",1.0,intX,intY) >= 0)
返回 "昆仑虚二层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindStrFast(830, 4, 1022, 27,"墟三","feb828-303030",1.0,intX,intY) >= 0)
返回 "昆仑虚三层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindPic(830, 4, 1022, 27,"墟四.bmp|墟四1.bmp","000000",0.9,0,intX,intY) >= 0)
返回 "昆仑虚四层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindPic(830, 4, 1022, 27,"墟五.bmp|墟五1.bmp","000000",0.9,0,intX,intY) >= 0)
返回 "昆仑虚五层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindPic(830, 4, 1022, 27,"囚一.bmp|囚一1.bmp","000000",0.9,0,intX,intY) >= 0)
返回 "孽龙囚一层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindPic(830, 4, 1022, 27,"囚二.bmp|囚二1.bmp","000000",0.9,0,intX,intY) >= 0)
返回 "孽龙囚二层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindPic(830, 4, 1022, 27,"囚三.bmp|囚三1.bmp","000000",0.9,0,intX,intY) >= 0)
返回 "孽龙囚三层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindPic(830, 4, 1022, 27,"囚四.bmp|囚四1.bmp","000000",0.9,0,intX,intY) >= 0)
返回 "孽龙囚四层"
否则
dm数组[下标].UseDict(8)
如果(dm数组[下标].FindPic(830, 4, 1022, 27,"囚五.bmp|囚五1.bmp","000000",0.9,0,intX,intY) >= 0)
返回 "孽龙囚五层"
否则
返回 "未知"
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
如果结束
功能结束 |
|