配列を引数に

というのをやってみたくて、作ってみた。

受け渡し元関数:
# 受け渡したい配列
Local テスト配列
# 配列の添字のリスト
Local Array_Attach
# 配列の中身のリスト
Local Array_Gut

テスト配列[1] = "テストいち"
テスト配列[2] = "テストに"
テスト配列[3] = "テストさん"

ForEach 添字 In テスト配列
	Array_Attach = Array_Attach & " " & 添字
	Array_Gut = Array_Gut & " " & テスト配列[添字] 
Next

受け渡し先関数 Array_Attach Array_Gut
Return

受け渡し先関数:
# 渡された配列のデータを格納する配列
Local テスト配列

For i = 1 to LLength(Args(1))
	テスト配列[LIndex(Args(1),i)] = LIndex(Args(2),i)
Next

Return

※1/14 10:22 一部修正
インクルードを作ったりするときに、他のインクルードの変数と競合が起きないか、僕は結構気になるんでちょっと作ってみた。
しかしその性質上、ライブラリという形にできないのが、なんとも虚しいかな。
ま、所詮はただの覚書。気にしないでおこう。