马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
代码如下:功能 逻辑型 传送(string 原地图)//返回真为地图相符,假为不符
int x,y
int n=0,m=1,a=0,计数
string[] Cmap=string[5]
string[][] map=string[4][7]
//曙光前哨站传送机能到达的地图,map[][0]用于判断传送机地图
map[0][0]="曙光前哨站"
map[0][1]="太阳城"
//太阳城传送机能到达的地图
map[1][0]="太阳城"
map[1][1]="曙光前哨站"
map[1][2]="迷雾湿地"
map[1][3]="寂灭荒原"
map[1][4]="巨龙谷"
map[1][5]="叹息之地"
map[1][6]="风暴城"
//叹息之地传送机能到达的地图
map[2][0]="叹息之地"
map[2][1]="太阳城"
map[2][2]="寂灭荒原"
map[2][3]="巨龙谷"
map[2][4]="陨石旷野"
map[2][5]="风暴城"
//风暴城传送机能到达的地图
map[3][0]="风暴城"
map[3][1]="太阳城"
map[3][2]="叹息之地"
map[3][3]="陨石旷野"
map[3][4]="毒液废墟"
map[3][5]="烈日血原"
map[3][6]="极北口岸"
string 副地图,现地图=Dm.GetWords(865,6,974,24,"fcfcfc-202020",1.0)
计数=Dm.GetWordResultCount(现地图)
副地图=Dm.GetWordResultStr(现地图,计数-1)
help.messagebox(副地图)
if(str.strcompare(副地图,现地图)!=0) //如果不是目标地图执行以下代码
while(n<4)
while(str.strcompare(map[n][m]," ")!=0&& m<7 && str.strcompare(副地图,现地图)!=0)
if(str.strcompare(副地图,map[n][m])==0)
Cmap[a]=map[n][m]
副地图=map[n][0]
help.messagebox(map[n][m])
else
m=m+1
endif
endwhile
n=n+1
m=1
endwhile
endif
返回 真
功能结束
程序运行后提示:数组调用超过越界
|