＃ iSing4u対応テンプレート Ver 0.0.1

＃ここからカプセル化対象
＃内容はわかる人しか弄らないように

＊OnMusicPlayEx
＃変数を削除
＄アルバム名	
＄ジャンル名	
＄マイレート	
＄再生回数	
＄作曲者名	
＄曲の長さ	
＄ソース名	
＄プレイリスト名	
＄プレイリスト曲数	
＄プレイリスト種類	
＄プレイリスト再生時間	
＃初期値設定
＄項目カウンタ	２
＄Ｂ１	（sprintf,%c,1）
＄曲名	（Ｒ０）
＄アーティスト名	（Ｒ１）
＃ノーマライズ用
＄Ｂ２	（sprintf,%c,2）
＄引数区切り追加	（Ｂ２）
＞音楽情報取得

＊音楽情報取得
＄情報	（split（Ｂ２）（Ｒ（項目カウンタ））（Ｂ２）（Ｂ１））
＞アルバム名取得	（compare（Ｂ１）（Ｓ０）（Ｂ１）album）
＞ジャンル名取得	（compare（Ｂ１）（Ｓ０）（Ｂ１）genre）
＞マイレート取得	（compare（Ｂ１）（Ｓ０）（Ｂ１）rating）
＞再生回数取得	（compare（Ｂ１）（Ｓ０）（Ｂ１）playcount）
＞作曲者名取得	（compare（Ｂ１）（Ｓ０）（Ｂ１）composer）
＞曲の長さ取得	（compare（Ｂ１）（Ｓ０）（Ｂ１）duration）
＞プレイリスト取得	（compare（Ｂ１）（Ｓ０）（Ｂ１）playlist）
＞音楽情報取得ループ

＊アルバム名取得
＄アルバム名	（Ｓ１）
＞音楽情報取得ループ

＊ジャンル名取得
＄ジャンル名	（Ｓ１）
＞音楽情報取得ループ

＊マイレート取得
＄マイレート	（Ｓ１）
＞音楽情報取得ループ

＊再生回数取得
＄再生回数名	（Ｓ１）
＞音楽情報取得ループ

＊作曲者名取得
＄作曲者名	（Ｓ１）
＞音楽情報取得ループ

＊曲の長さ取得
＄曲の長さ	（Ｓ１）
＞音楽情報取得ループ

＊プレイリスト取得
＄ソース名	（Ｓ１）
＄プレイリスト名	（Ｓ２）
＄プレイリスト曲数	（Ｓ３）
＄プレイリスト種類	（Ｓ４）
＄プレイリスト再生時間	（Ｓ５）
＞音楽情報取得ループ

＊音楽情報取得ループ
＄項目カウンタ＝（項目カウンタ）＋１
＞音楽情報取得	（length（Ｂ１）（Ｒ（項目カウンタ）））！＝０
＃ノーマライズ終了
＄引数区切り削除	（Ｂ２）
＞音楽情報取得完了

＃カプセル化対象区間終了

＊音楽情報取得完了
：φ
（if（Ｂ１）（変数「曲名」の存在）（Ｂ１）（曲名）\n）φ
（if（Ｂ１）（変数「アーティスト名」の存在）（Ｂ１）（アーティスト名）\n）φ
（if（Ｂ１）（変数「アルバム名」の存在）（Ｂ１）（アルバム名）\n）φ
（if（Ｂ１）（変数「ジャンル名」の存在）（Ｂ１）（ジャンル名）\n）φ
（if（Ｂ１）（変数「マイレート」の存在）（Ｂ１）（マイレート）\n）φ
（if（Ｂ１）（変数「再生回数」の存在）（Ｂ１）（再生回数）回\n）φ
（if（Ｂ１）（変数「作曲者名」の存在）（Ｂ１）（作曲者名）\n）φ
（if（Ｂ１）（変数「曲の長さ」の存在）（Ｂ１）（曲の長さ）秒\n）φ
（if（Ｂ１）（変数「プレイリスト名」の存在）（Ｂ１）（プレイリスト名））