インストールされているゴーストのリストを使う

sakura.nameではなくnameの方のリスト。
sakura.nameの方のリストを使いたい場合SAORIを使う。


ssu.dll使用。
【ゴースト名】は自分のゴースト名に置き換える。


＃-----------------------------------------------------------
＃　リスト生成
＃-----------------------------------------------------------

＊installedghostname
＄ゴーストリスト	（Ｒ０）
＄loop=１
＄ｎ	（Ｒ１）
＞installedghostname2	（変数「ｎ」の存在）
＄ｎ	
＄loop	

＊installedghostname2
＄ゴーストリスト	（ゴーストリスト）（sprintf,%c,1）（Ｒ（loop））
＄loop=（loop）+１
＄ｎ	（Ｒ（loop））
＞installedghostname2	（変数「ｎ」の存在）
＄ｎ	
＄loop	

＃-----------------------------------------------------------
＃　インストールされているゴーストの数
＃-----------------------------------------------------------

＊
：ゴーストは全部で（split，（ゴーストリスト），（sprintf,%c,1））体インストールされています。

＃-----------------------------------------------------------
＃　指定したゴーストがインストールされているかどうか確認
＃-----------------------------------------------------------

＊
＞ポストインストール済み	（count，（sprintf,%c,1）（ゴーストリスト）（sprintf,%c,1），（sprintf,%c,1）ポストと狛犬（sprintf,%c,1））
：「ポストと狛犬」はインストールされていません。


＊ポストインストール済み
：「ポストと狛犬」がインストールされています。

＃-----------------------------------------------------------
＃　インストール済みゴーストからランダム選択
＃-----------------------------------------------------------

＊
：インストールされているゴーストからランダムに一体選択します。

「（choice（sprintf,%c,1）（ゴーストリスト））」

＃-----------------------------------------------------------
＃　自分以外のインストール済みゴーストからランダム選択
＃-----------------------------------------------------------

＊
＞インストールゴーストなし	（compare，_（ゴーストリスト），_【ゴースト名】）
：私を除いたインストールされているゴーストからランダムに一体選択します。

「（choice（sprintf,%c,1）（自ゴ除外ゴーストリスト））」

＊インストールゴーストなし
：インストールされているゴーストは私以外いません。


＠自ゴ除外ゴーストリスト
（erase_first，（erase，（sprintf,%c,1）（ゴーストリスト），（sprintf,%c,1）【ゴースト名】），（sprintf,%c,1））

＃-----------------------------------------------------------