欢迎访问 中变传奇_中变传奇网站_中变传奇发布网_中变传奇版本_新开中变传奇网站

haosf刚开一秒 夺宝传世私服 单职业超变迷失传奇sf 热血传奇176 传奇sf怪物
中变传奇

当前位置: > 传奇新闻> 正文

传奇战歌网如何使用静态数组和动态数组脚本范例

发布时间:2020-5-19 21:10:46 来源:http://www.eshibojinxun.com 作者:

战士180复古合击职业雷霆一击技能使用攻略

unit UnitArray;inte**ce uses SysUtils;const JobNames: array[0..4] of String=(战士, 法师, 道士, 刺客, 弓箭手); //这是一个静态数组,运行期不需要改变,所以定义为constvar Job_AddAbility: array of array of Integer; //这是动态数组 procedure Main(Npc: TNormNPC; Player: TPlayObject; Args: TArgs);implementationprocedure Main(Npc: T电信私服NormNPC; Player: TPlayObject; Args: TArgs);begin Player.Say(IntToStr(Job_AddAbility[0][1])); //访问数组数据end;procedure InitArry;var I: Integer;begin //定义数组大小 SetLength(Job_AddAbility, 5); for I := 0 to 4 do SetLength(Job_AddAbility[I176复古传奇], 3); //赋值 Job_AddAbility[0] := [12,13,14,15]; Job_AddAbi龙行天下传奇lity[1] := [10,6,10,4]; Job_AddAbility[2] := [10,12,20,8]; Job_AddAbility[3] := [10,18,30,12]; Job_AddAbility[4] := [10,30,50,20];end;procedure FinaArry;begin FillChar(Job_AddAbility, SizeOf(Job_AddAbility), #0);end;initialization InitArry; //单元初始化的时候执行数组初始化(M2退出或重加载脚本)finalization FinaArry; //单元初始化的时候执行数组初始化(M2退出或重加载脚本)end.

Tags:传奇私服金牛版新开网 新开传奇私服176 天乙传奇 十二生肖传 新开传奇世界私服连击 稳定传奇私服网站新开网

猜你喜欢