rathena/npc/sample/npc_test_array.txt
Valaris 2178a86317 AS OF SVN REV. 5901, WE ARE NOW USING TRUNK. ALL UNTESTED BUGFIXES/FEATURES GO INTO TRUNK.
IF YOU HAVE A WORKING AND TESTED BUGFIX PUT IT INTO STABLE AS WELL AS TRUNK.  EVERYTHING ELSE
GOES INTO TRUNK AND WILL BE MERGED INTO STABLE BY VALARIS AND WIZPUTER. -- VALARIS


git-svn-id: https://svn.code.sf.net/p/rathena/svn/trunk@5094 54d463be-8e91-2dee-dedb-b68131a5f0ec
2006-01-29 16:10:48 +00:00

36 lines
862 B
Plaintext

// 配列のテスト
prontera.gat,164,190,1 script 配列テスト 112,{
set @hoge[0],1;
set @hoge[1],5;
mes "hoge[2]を入力してください";
next;
input @hoge[2];
mes "hoge => " + @hoge;
mes "hoge[0]=> " + @hoge[0];
mes "hoge[1]=> " + @hoge[1];
mes "hoge[2]=> " + @hoge[2];
next;
setarray @hoge[1],2,3,4,5;
mes "true: 5,1,2,3,4";
mes "hoge size = "+ getarraysize(@hoge);
mes "hoge[0]=> " + @hoge[0];
mes "hoge[1]=> " + @hoge[1];
mes "hoge[2]=> " + @hoge[2];
mes "hoge[3]=> " + @hoge[3];
next;
copyarray @fuga[0],@hoge[2],2;
mes "true: 3,4,0";
mes "fuga[0]=> " + @fuga[0];
mes "fuga[1]=> " + @fuga[1];
mes "fuga[2]=> " + @fuga[2];
next;
deletearray @hoge[1],2;
mes "true: 1,4,5,0";
mes "hoge[0]=> " + @hoge[0];
mes "hoge[1]=> " + @hoge[1];
mes "hoge[2]=> " + @hoge[2];
mes "hoge[3]=> " + @hoge[3];
close;
}