1 files changed, 43 insertions, 0 deletions
diff --git a/doc/sample/npc_test_array.txt b/doc/sample/npc_test_array.txt
new file mode 100644
index 000000000..97aa5baf0
--- /dev/null
+++ b/doc/sample/npc_test_array.txt
@@ -0,0 +1,43 @@
+//===== rAthena Script =======================================
+//= Sample: Array Test
+//===== By: ==================================================
+//= rAthena Dev Team
+//===== Current Version: =====================================
+//= 20090206
+//===== Description: ========================================= 
+//= Demonstrates array commands.
+//============================================================
+
+prontera,164,190,1	script	Array Test	112,{
+	set @hoge[0],1;
+	set @hoge[1],5;
+	mes "Please enter a value for 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;
+}
+\ No newline at end of file