＃分割くん辞書
＃（call,分割くん,分割する文字列[,区切文字列[,最大分割数[,空要素分割可否]]]）

＃・splitと違うところ
＃空要素分割を有効にしたとき、該当する結果にあたる変数がクリアされた状態になる
＃（split,あ★★い,★,0,1）の（S1）は存在が1でlengthが0
＃（call,あ★★い,★,0,1）の（S1）は存在が0でlengthが0

＃事前設定
＠分割くん_結果接頭辞
分割結果
＃[通常は変更不要]
＃結果が（【文字列】の数）、（【文字列】０）、（【文字列】0）～に入る
＃分割くん使用後にこれを変えると「分割くん」使用時に前の結果が自動で消されない
＃適宜（call,分割くん_結果消去_本体,【消したい変数名の接頭辞】）をしてください

＠分割くん_一時変数名
分割くん_一時変数
＃[通常は変更不要]
＃同じ名前の変数があると中身が消され、同じ名前が＊や＠にあると誤動作します

＊テスト表示
：\_q\b[2]%property[baseware.version]
里々 （里々のバージョン）

\f[bold,1]試験内容\f[bold,0]
（試験内容）

\f[bold,1]split\f[bold,0]
返り値: （split,（試験内容））
（times,（Sの数）,S（C0）:（S（C0））\n）
\f[bold,1]分割くん\f[bold,0]
返り値: （call,分割くん,（試験内容））
（times,（（分割くん_結果接頭辞）の数）,（分割くん_結果接頭辞）（C0）:（（分割くん_結果接頭辞）（C0））\n）

＠試験内容
焼きイカ風味カルビ味ソイソース,イカ,0,1

＠分割くん
（when,（Aの数）==0,引数の個数が正しくありません。,
（nop,（分割くん_準備））（（分割くん_結果接頭辞）の数）（vncall,set,（分割くん_一時変数名）,nop、）
）

＊分割くん_準備
＄（分割くん_一時変数名）＝（分割くん_結果消去）
＄（分割くん_部品Ａ）【タブ】0
＄（分割くん_部品Ｂ）【タブ】（A0）
＄（分割くん_部品Ｃ）【タブ】（分割くん_部品Ｂ）
＞分割くん_終了【タブ】（vncall,length,A0）==0
＄（分割くん_部品Ｂ）【タブ】
＄（分割くん_部品Ｃ）【タブ】
＞分割くん_本体Ａ【タブ】（変数「A1」の存在）==0
＞分割くん_本体Ａ【タブ】（vncall,length,A1）==0
＞分割くん_本体Ｂ

＊分割くん_本体Ａ
＄（分割くん_一時変数名）【タブ】（分割くん_繰り返し１）
＞分割くん_終了

＊分割くん_本体Ｂ
＄（分割くん_一時変数名）【タブ】（分割くん_繰り返し２）
＄（分割くん_一時変数名）【タブ】（分割くん_部品Ｄ）
＞分割くん_終了

＊分割くん_終了
＄（分割くん_結果接頭辞）の数【タブ】（calc,（（分割くん_結果接頭辞）の数）+1）

＠分割くん_繰り返し１
（while,（vncall,length,A0）>（C0）,
（vncall,set,分割くん_部品Ｅ,分割くん_部品Ｆ）φ
（vncall,set,分割くん_部品Ａ,C0）
）

＠分割くん_繰り返し２
（while,（分割くん_部品Ｇ）&&（C0）<（vncall,length,A0）,
（when,（分割くん_部品Ｈ）==0,
（分割くん_部品Ｉ）,
（when,（変数「A3」の存在）==0||（A3）!=0,
（分割くん_部品Ｊ）,
（when,（分割くん_部品Ｋ）==0&&（length,（分割くん_部品Ｌ））>0,
（分割くん_部品Ｊ）
）
）
）
（vncall,set,分割くん_一時変数名,C0）
）（（分割くん_一時変数名））

＠分割くん_部品Ａ
（分割くん_結果接頭辞）の数
＠分割くん_部品Ｂ
（分割くん_結果接頭辞）（（分割くん_結果接頭辞）の数）
＠分割くん_部品Ｃ
（分割くん_結果接頭辞）（han2zen,（（分割くん_結果接頭辞）の数））
＠分割くん_部品Ｄ
（when,（A2）!=0&&（vncall,length,A2）>0,（vncall,set,分割くん_部品Ｂ,分割くん_部品Ｍ））
＠分割くん_部品Ｅ
（分割くん_結果接頭辞）（C0）
＠分割くん_部品Ｆ
（vncall,at,A0,C0）
＠分割くん_部品Ｇ
（when,（A2）!=0,（calc,（（分割くん_結果接頭辞）の数）+1<（A2））,1）
＠分割くん_部品Ｈ
（vncall,count,A1,分割くん_部品Ｆ）
＠分割くん_部品Ｉ
（vncall,set,分割くん_部品Ｂ,分割くん_部品Ｎ）（vncall,set,分割くん_部品Ｃ,（分割くん_部品Ｂ））
＠分割くん_部品Ｊ
（vncall,set,分割くん_部品Ａ,分割くん_部品Ｏ）
＠分割くん_部品Ｋ
（vncall,count,A1,分割くん_部品Ｌ）
＠分割くん_部品Ｌ
（vncall,at,A0,分割くん_部品Ｐ）
＠分割くん_部品Ｍ
（when,（vncall,count,A1,分割くん_部品Ｑ）==1&&（A3）!=0,（vncall,substr,A0,分割くん_部品Ｒ）,（vncall,substr,A0,（分割くん_一時変数名）））
＠分割くん_部品Ｎ
（分割くん_部品Ｓ）（分割くん_部品Ｆ）
＠分割くん_部品Ｏ
（calc,（（分割くん_結果接頭辞）の数）+1）
＠分割くん_部品Ｐ
（calc,（C0）+1）
＠分割くん_部品Ｑ
（vncall,at,A0,（分割くん_一時変数名））
＠分割くん_部品Ｒ
（calc,（（分割くん_一時変数名））+1）
＠分割くん_部品Ｓ
（when,（変数「（分割くん_部品Ｂ）」の存在）==1,（vncall,substr,（分割くん_部品Ｂ）））

＠分割くん_結果消去
（vncall,分割くん_結果消去_本体,分割くん_結果接頭辞）
＠分割くん_結果消去_本体
（times,（（A0）の数）,
（vncall,set,分割くん_結果消去_部品１,nop、）φ
（vncall,set,分割くん_結果消去_部品２,nop、））φ
（vncall,set,分割くん_結果消去_部品３,nop、）
＠分割くん_結果消去_部品１
（A0）（C0）
＠分割くん_結果消去_部品２
（A0）（han2zen,（C0））
＠分割くん_結果消去_部品３
（A0）の数