最近、2byte情報を配列に書き込んでいるのですが
その2byte情報の元の文字列を分割したら
2byte情報の配列も分割しなきゃなーと思い書きました

FILE名：FILE_array_opr.hsp
#module array_opr
//	引数の配列beforeを配列afterにコピーする
//	注：afterの配列のsizeは
//	　　beforeの配列のsizeに変更されます
#deffunc copy_array_at_array_opr array after,array before
tmp=length(before)
dim after,tmp
foreach before
after.cnt=before.cnt
loop
return
//	引数の配列beforeの
//	firstから_endまでの要素を配列afterにコピーする
//	注：afterの配列のsizeは
//	　　コピーするsizeに変更されます
#deffunc sep_array_at_array_opr int first,int _end,array after,array before
if first>_end{
logmes "sep_array_at_array_opr内のerror"
logmes "引数_endが引数firstより大きいです"
logmes "first："+first+" _end："+_end
return
}
l=_end-first
dim after,l
repeat l
after.cnt=before(cnt+first)
loop
return
#global
/*	TESTコード　コメントアウト
dim a,8
dim b,4
a=1,2,3,4,5,6,7,8
copy_array_at_array_opr b,a
dim c,8
dim d,4
c=1,2,3,4,5,6,7,8
sep_array_at_array_opr 2,6,d,c
stop*/