2017-04-19

(Excel VBA) 選択範囲、選択シートに対する処理の定型的書き方

VBA(Excel)

f:id:dz_dzone:20170724134148j:plain

選択範囲

Sub Sample1()
    ' ** 選択範囲に対する処理 **
    Dim CL As Range
    For Each CL In Selection
        ' ここで、
        ' Selection = 選択範囲の全てのセル
        ' CL = 選択範囲の個々のセル
        ' を示す。
        ' CLに対する処理を書くとFor Each～Nextでループして全ての選択セル
        ' に対する処理となる。
    Next CL
End Sub

選択シート

Sub Sample2()
    ' ** 選択シートに対する処理 **
    Dim WS As Worksheet
    For Each WS In ActiveWindows.SelectedSheets
        ' ここで、
        ' ActiveWindows.SelectedSheets = 選択シートの全てのシート
        ' WS = 選択シートの個々のシート
        ' を示す。
        ' WSに対する処理を書くとFor Each～Nextでループして全ての選択シート
        ' に対する処理となる。
    Next WS

全てのシート

データ集計をやっていると全てのシートに適用させたい場合が多々出てきます。この場合は、

Sub Sample3()
    ' ** 全シートに対する処理 **
    Dim WS As Worksheet
    For Each WS In Worksheets
        ' ここで、
        ' Worksheets = 全てのワークシート
        ' WS = 個々のシート
        ' を示す。
        ' WSに対する処理を書くとFor Each～Nextでループして全てのシート
        ' に対する処理となる。
    Next WS
End Sub

2017-04-17

(Excel VBA) セルのコメントを一括で表示・非表示にする

VBA(Excel)

f:id:dz_dzone:20170724134148j:plain

(追記) 気付いたんだけど、校閲タブのコメントグループにボタンがあった

これについては全くの見落としでしたが、よく見たら校閲タブのコメントグループに完全にこれ！っていうボタンが用意してありました。
f:id:dz_dzone:20170819144921j:plain

コメントの表示/非表示　：セル単位でのトグルボタン
全てのコメントの表示　：シート単位でのトグルボタン

それはそれとしてマクロでやる場合の記事が以下になります。

セルのコメントを一括表示する

はじめに

セルのコンテキストメニュー（右クリックメニュー）にある「セルの表示/非表示」はセル単位でしか働かず、複数セルを選択していてもあくまで現在のセルにしか効果はありません。

選択範囲のセルのコメントを一括で表示にする

Sub AllCommentVisibleTrue()
    Dim c As Range    
    For Each c In Selection
        c.Comment.Visible = True
    Next c
End Sub

選択範囲のセルが全てコメントを含んでいればうまく動きますが、選択範囲にコメントが含まれていないセルがあるとエラーになります。ならばエラーを無視すればいいのでは？

    On Error Resume Next

これをDim行の上に入れることで動きました。この行の意味は「エラーが起きたら無視して次へ進め」です。

アクティブシートに含まれるコメントを一括で表示にする

それではセルの選択なしにアクティブシートのコメントを一括で表示する場合はどうなるでしょう。先ほどまではセルに対するcommentオブジェクトを操作していますが、こちらではワークシートに対するcommentsコレクションを操作します。

Sub SheetCommentVisibleTrue()
    ' ** アクティブシートのコメントを一括で表示にする **
    For i = 1 To ActiveSheet.Comments.Count
        ActiveSheet.Comments(i).Visible = True
    Next i
End Sub

非表示の場合

commentオブジェクトやcommenntsコレクションのVisibleプロパティに
表示  ：True
非表示：False
を設定する

以上。

2017-04-14

Simeji for Android用のユーザー辞書ファイルをWindows版Excelで作成するシートを公開します

Simeji IM(日本語入力)

f:id:dz_dzone:20170724134242j:plain

概要

MS-IME, GoogleIME, ATOKなど主要な日本語入力アプリのユーザー辞書ファイルにはタブ区切りテキストファイルが使われていることが多いです。Baidu IMEも同様です。ところが、Simeji for Androidのユーザー辞書ファイルはこれらとはまったく書式の異なるものになっています。そこでWindows版Excelを使って一般的な形式をSimeji for Android形式に変換するExcelマクロを作ってみました。

Simeji for Android用ユーザー辞書ファイルの書式

Simeji for Android用ユーザー辞書ファイルの書式は一般的な辞書ファイルとは全く違う構成で、改行が全くなく、1行目にすべてが記載されています。

{"EN_KEY":[],"EN_VALUE":[],"JAJP_VALUE":["単語1","単語2",……],"JAJP_KEY":["読み1","読み2",……]}

単語のセクションと読みのセクションが離れているため対になっているものを比較するのが難しいです。なお、品詞やコメントはありません。

辞書ファイルを作成するExcelシート

ダウンロード

ExcelでSimeji for Android用のユーザー辞書ファイルを作成するシート
ファイル名：Excel2Simeji.xlsm
ダウンロード：Excel2Simeji.zip (zip形式圧縮)
動作確認：Excel2010, Excel2013 (どちらもWindows版)で確認しています。Excel for Macでは動きません(エラーが出ます)。

使い方

ファイルをダウンロードしたら、適当なフォルダに解凍してください。
f:id:dz_dzone:20170414115054j:plain

Excel2Simeji.xlsmファイルを開きます。この時にセキュリティの警告が出た場合は「コンテンツの有効化」ボタンをクリックしてください。
f:id:dz_dzone:20170414114827j:plain

設定画面です。ここでは「変換元シート名」を変更することが出来ます。
f:id:dz_dzone:20170414114207j:plain

「変換元シート名」で設定した名前のシートに移動します。ここでは「Sample」シート。
A列に"読み(ひらがな)"、B列に"単語"を入力します。別のタブ区切りテキスト形式の辞書(ATOK, MS-IME, Google日本語入力など)からコピーしてきても構いません。
f:id:dz_dzone:20170414133200j:plain

"設定"シートに戻り、"Simeji辞書作成"ボタンをクリックすると変換開始します。
f:id:dz_dzone:20170414114207j:plain

既存の辞書ファイルがある場合上書きされる旨の確認ダイアログが出ます。
f:id:dz_dzone:20170414133822j:plain

設定シートの「変換元シート名」のシートがもし存在しない場合、警告ダイアログが出ます。
f:id:dz_dzone:20170414133927j:plain

うまく変換されると確認ダイアログが出ます。
f:id:dz_dzone:20170414133957j:plain

エクセルファイルと同じフォルダに"simeji_user_dic.txt"が作成されました。
f:id:dz_dzone:20170414134051j:plain

出力された内容です。

{"EN_KEY":[],"EN_VALUE":[],"JAJP_VALUE":["マリア様がみてる","マリみて","今野緖雪","ひびき玲音","リリアン女学園","リリアン","山百合会","薔薇の館","白薔薇","紅薔薇","黄薔薇","紅薔薇","ロサ・ギガンティア","ロサ・キネンシス","ロサ・フェティダ","アン・ブゥトン","プティスール","グランスール","スール"],"JAJP_KEY":["まりあさまがみてる","まりみて","こんのおゆき","ひびきれいね","りりあんじょがくえん","りりあん","やまゆりかい","ばらのやかた","しろばら","べにばら","きばら","あかばら","ろさぎがんてぃあ","ろさきねんしす","ろさふぇてぃだ","あんぶーとん","ぷちすーる","ぐらんすーる","すーる"]}

あとはスマホにファイルを移してSimejiに取り込みます。

dz11.hatenadiary.jp

2017-04-13

Microsoft IMEのユーザー辞書の一時退避方法と復元方法

MS-IME IM(日本語入力)

f:id:dz_dzone:20170724134529p:plain

概要

Microsoft IMEで、「システム辞書(専門辞書)を作りたいけど既にユーザー辞書に結構登録しちゃってるんだけど……」という場合は常にあると思います。ここでは現在登録されているユーザー辞書を一時退避する方法および復元する（戻す）方法を解説します。

ユーザー辞書の一時退避(エクスポート)

ユーザー辞書の一時退避方法

ユーザー辞書ツールを開きます。

f:id:dz_dzone:20170413151013j:plain

f:id:dz_dzone:20170413151044j:plain

ツール＞一覧の出力　を選択します。

f:id:dz_dzone:20170413151124j:plain

Microsoft IME形式のTXT辞書ファイルが出力されます。

f:id:dz_dzone:20170413151419j:plain

f:id:dz_dzone:20170413151429j:plain

ユーザー辞書の一括削除方法

今出力したTXTファイルで一時的なユーザー辞書の削除もできます。

ツール＞テキストファイルで削除　を選択します。

f:id:dz_dzone:20170413151530j:plain

さきほど一時退避したファイル（ここでは output1.txt）を開きます。

f:id:dz_dzone:20170413151546j:plain

f:id:dz_dzone:20170413151633j:plain

削除されました。

f:id:dz_dzone:20170413151709j:plain

ユーザー辞書の復元(インポート)

ユーザー辞書の復元方法

ユーザー辞書ツールで、　ツール＞テキストファイルからの登録　を選択します。

f:id:dz_dzone:20170413152434j:plain

一時退避していたファイル（ここでは output1.txt）を開きます。

f:id:dz_dzone:20170413152519j:plain

f:id:dz_dzone:20170413152529j:plain

ユーザー辞書が復元されました。

f:id:dz_dzone:20170413152550j:plain

以上。

2017-04-13

ATOK for Windows / Macを買ったらまず設定しておきたいたった一つの項目

ATOK IM(日本語入力)

f:id:dz_dzone:20170724130822p:plain

はじめに

ATOK、変換が賢いのはとっても好きなんですけど、デフォルトの設定で使っているとユーザー辞書があっという間にアホというか馬鹿というかめちゃくちゃになっていきます。

下の画像は、私が2014年まで使っていたATOKのたぶん10年分くらいのユーザー辞書データの頭の方です。こんなのが全部で8136件入っています。もうね、何が何だかわかんないでしょ。（画像注：単語種類が"登録単語”になってますが、実際は"自動登録単語"として登録されたものです）

f:id:dz_dzone:20170412171617j:plain

こんなのがユーザー辞書に入っていても実質的に使えないので、こうならないための設定をします。

設定方法

ATOKメニューを開きます。

f:id:dz_dzone:20170412172204j:plain

f:id:dz_dzone:20170412172222j:plain

プロパティ(環境設定)を開きます。

f:id:dz_dzone:20170412172507j:plain

"辞書・学習"タブを開き、"学習"の"詳細設定"をクリックします。

f:id:dz_dzone:20170412172638j:plain

デフォルトの設定項目と内容

"学習・登録詳細設定"が開きます。

f:id:dz_dzone:20170412173019j:plain

何も設定を変えていない場合の初期値が上記画像になります。
自動登録がほとんど"する(強)"になっています。この設定が一番最初に示しためちゃくちゃなユーザー辞書を作成します。ちなみに設定はこの3つのレベルから選択できます。

f:id:dz_dzone:20170412173559j:plain

新しく設定する項目と内容

そこで、この設定を次のように変更します。

f:id:dz_dzone:20170412173702j:plain

ほとんどの設定を"一時”にします。

おわりに

これでユーザー辞書が勝手に自動登録単語で埋まっていくことがなくなります。

私の場合、本当に必要な単語は手動で単語登録しています。

2017-04-12

(VBScript) XLSTARTフォルダを開く (無い場合は作成して開く)

VBScript VBA(Excel)

f:id:dz_dzone:20170725083601j:plain
Excelで個人用マクロファイル(Personal.xlsb)を作るなど、XLSTARTフォルダを開かせる場合があると思いますが、ユーザープロファイルの奥なのでちょっとややこしいですよね。そこでVBScriptで開くようにしてみました。

追記(2017.7.13)：フォルダが存在しないときに親フォルダが表示されてしまうので、XLSTARTフォルが存在しない場合はフォルダを作成するようにしました。

'** XLSTARTフォルダを開くスクリプト（無ければ作成） **
Dim WshShell
Dim objShell
Dim objFSO
Dim strFldr

Set WshShell = WScript.CreateObject("WScript.Shell")
Set objShell = WScript.CreateObject("Shell.Application")
Set objFSO = WScript.CreateObject("Scripting.FileSystemObject")

' ユーザープロファイルフォルダをパスに展開してXLSTARTまでのパスを追加
strFldr = WshShell.ExpandEnvironmentStrings("%USERPROFILE%") & _
				"\AppData\Roaming\Microsoft\Excel\XLSTART"

' XLSTARTフォルダの存在を確認。なければ作成する
If objFSO.FolderExists(strFldr) = False Then
	objFSO.CreateFolder(strFldr)
	Msgbox strFldr & vbcrlf & "上記フォルダを作成しました。", vbOKOnly + VbInformation, "報告"
End If

' エクスプローラで開く
objShell.Explore strFldr

これをテキストエディタ(Notepadなど)に貼り付けて"適当な名前.vbs"で保存してダブルクリックすれば開きます。

スクリプトファイルのダウンロードはこちら→ OpenXLSTART.zip(XLSTARTを開く.vbs)

2017-04-11

追記あり (Excel VBA) 選択範囲の全角スペースおよび半角スペースを一括で削除する

VBA(Excel) 備忘録

注意点 (2017.7.18追記)

2017年4月の追記以降、しばらく運用してみたんですが、原因は不明なんですけど、やっぱりどうしても選択範囲だけじゃなくてワークシート全体のスペースが一括で削除されてしまうことが多いので、もうちょっと考えた方がいいのかなと思いました。
そういうことがあるという前提でこの記事を読んで下さい。申し訳ありませんが宜しくお願い致します。

全・半角スペースを削除する

削除は置換

文字を削除するときにはReplaceメソッドを使います。削除というか、""に置換する訳です。そして、選択範囲の全角スペースおよび半角スペースを削除する場合は、Selectionに対してReplaceを適用します。

Sub DelSpaces()
    ' ** 選択範囲の全・半角スペースを削除 **
    Selection.Replace "　", "" ' <--- スペースは全角で入力
    Selection.Replace " ", ""
End Sub

または、キャラクターコードで記述して

Sub DelSpaces()
    ' ** 選択範囲の全・半角スペースを削除 **
    Selection.Replace Chr(-32448), ""
    Selection.Replace Chr(32), ""
End Sub

VBAではアンドゥ(UnDo)が使えない

注意点として、VBAで操作した場合はアンドゥが使えませんので、あらかじめ保存しておくとかMsgboxで注意を促すような処理を入れるのがよいでしょう。

    Msgbox "はじめに上書き保存します。", vbOKOnly + vbExclamation
    ActiveWorkbook.Save

[ 2017.4.26追記 ]

選択範囲外のスペースも削除されてしまうことがある！

しばらく上記のコードで運用していたところ、"選択範囲を指定しているにもかかわらず、選択範囲以外の全てのセルでスペースが削除されてしまう"場合が何回も発生しました。

そこで、コードを改良することにしました。

選択範囲は取得されてるのか？

最初に思ったのは、このSelectionは本当に取得されているのか？

Sub CheckSelection()
    Dim R1, R2, C1, C2, cnt
    cnt = Selection.Count
    R1 = Selection(1).Row
    C1 = Selection(1).Column
    R2 = Selection(cnt).Row
    C2 = Selection(cnt).Column

    MsgBox R1 & "," & C1 & "-" & R2 & "," & C2
End Sub

結果は、取得されているようです。
f:id:dz_dzone:20170426094955j:plain
ならばと、改良コードその1

Sub DelSpaceV2()
    ' ** 選択範囲の全・半角スペースを削除 **
    Dim R1, R2, C1, C2, cnt
    cnt = Selection.Count
    R1 = Selection(1).Row
    C1 = Selection(1).Column
    R2 = Selection(cnt).Row
    C2 = Selection(cnt).Column
    
    For r = R1 To R2
        For c = C1 To C2
            Cells(r, c).Replace Chr(-32448), ""
            Cells(r, c).Replace Chr(32), ""
        Next c
    Next r
End Sub

ただ、上記コードだと単一の矩形範囲しか選択できませんよね。ということで、改良コードその2

Sub DelSpaceV3()
    ' ** 選択範囲の全・半角スペースを削除 **
    Dim CL As Range
    For Each CL In Selection
        CL.Replace Chr(-32448), ""
        CL.Replace Chr(32), ""
    Next CL
End Sub

とりあえずこれでまたしばらく運用してみることにします。

2017-04-07

(Excel VBA) 選択範囲の全角半角変換

VBA(Excel)

はてな記法の練習も兼ねて。＞
はてな記法一覧 - はてなダイアリーのヘルプ

趣味と実益を兼ねたVBA。仕事を楽にするために一応使ってる。
今回は全角→半角変換。まあ基本と言えば基本だが……

Sub W2N1()
    ' ★★ 選択範囲：全角→半角 ★★
    Dim i, j As Long
    '選択範囲
    For i = Selection(1).Row To Selection(Selection.Count).Row
        For j = Selection(1).Column To Selection(Selection.Count).Column
            Cells(i, j) = StrConv(Cells(i, j), vbNarrow)
        Next j
    Next i
End Sub

よりも、下記の方がスマート。

Sub W2N2()
    ' ★★ 選択範囲：全角→半角 ★★
    Dim SR As Range
    For Each SR In Selection
        SR.Value = StrConv(SR.Value, vbNarrow)
    Next SR
End Sub

スマートというのもあるが、不定形の選択範囲（飛び飛びだったり）ではこちらでないとうまくうごかない。

2017-03-30

ATOKのユーザー辞書テキストの書式について

ATOK IM(日本語入力)

f:id:dz_dzone:20170724130822p:plain

概要

この記事では、ATOK for Windows, Mac, Android, iOSでインポート可能なユーザー辞書テキストファイルの書式について解説します。

ATOKのユーザー辞書テキストファイルの書式

1. ATOKユーザー辞書の基本構成

ファイル形式等

ファイル形式：タブ区切りテキストファイル ( *.txt )
文字エンコード：Unicode ( UTF-16 )
改行コード：CR/LF

ファイル名

ATOK for iOSの場合： user_word.txt
その他のATOK：任意の名前.txt

ファイルの内容

f:id:dz_dzone:20170314213728j:plain

サンプル：atok_dic_sample_01.txt (zip圧縮)

!!ATOK_TANGO_TEXT_HEADER_1
!!
じんが	迅牙	固有名詞

この構成の辞書ファイルが使えるATOK

すべてのATOKシリーズ

注意点：単語と読み(ひらがな)の長さ

単語：ATOK for Windows ＝全角・半角問わず100文字以内
単語：ATOK for Android ＝全角25文字以内、半角50文字以内
読み(ひらがな)：ATOK for Windows, Mac, iOS ＝ 32文字以内
読み(ひらがな)：ATOK for Android ＝ 16文字以内
ただし、全角文字の場合、濁点・半濁点は2文字に換算する

2. 基本構成＋コメント＋置換候補

デスクトップ版(Windows, Mac)のATOKでは、一つのコメントにつき最大5つの置換候補が利用できる。

ファイルの内容

f:id:dz_dzone:20170314215824j:plain

サンプル

!!ATOK_TANGO_TEXT_HEADER_1
!!
じんが	迅牙	固有名詞	標準型/二脚/四条重工	しない	迅牙・甲	迅牙・真	迅牙・飛天
ぜっと	Z.t.	固有名詞	軽量型/二脚/ナクシャトラ	しない	Z.t.-Λ	Z.t.-Σ	Z.t.-Φ

この構成の辞書ファイルが使えるATOK

ATOK for Windows
ATOK for Mac

使用例

文字入力時(1)：推測候補ウィンドウが出る
　
文字入力時(2)：推測候補ウィンドウに登録単語が出てくる
スペースキーを1回押して変換（まだ未確定）
スペースキーをもう1回押すと置換候補が出てくる
文字確定

以上です。

2017-03-30

BORDERBREAK、結局どのマップの曲がどのサントラに収録されてるの？

BORDER_BREAK ゲーム音楽

f:id:dz_dzone:20180326164135j:plain

ボーダーブレイクのサントラが販売、配信、イベント限定配布、ゲーム内ポイント交換アイテムとして世に出回っていることは以前書きましたが、それで「結局どのマップの曲やユニオンバトルやスクランブルバトルの曲がどのサントラに収録されてるの？」というのがなかなかサントラだけ眺めていても把握できないのでまとめてみました。

PDF版はこちら＞
http://dzone.sakura.ne.jp/blog/game/borderbreak/borderbreak_music_soundtracks.pdf

プレイリストの作成などの参考にして頂けると幸いです。

2017-03-07

BORDERBREAK 自主録BGM集

BORDER_BREAK ゲーム音楽

f:id:dz_dzone:20170828095230j:plain

BORDERBREAKとは
BORDERBREAKのサウンドトラックについて
自主録音の手法
自主録音の方法
- 録音方法(1)：ラウンドワンの録画システムを使う方法
- 録音方法(2)：ヘッドホン端子から録音する方法
おわりに
BORDERBREAK BGM集
- (Updated!) 2017.4.20現在の収録リスト

BORDERBREAKとは

BORDERBREAKはセガのアーケードTPSロボットシューティング。幅広いカスタマイズでマニアックです。ロボット好きな人におすすめ。

borderbreak.com

BORDERBREAKのサウンドトラックについて

サントラは初期のものはCDで販売(2枚)、中期のものは有料配信(4枚)されていますが、比較的最近のものはスペシャルディスクみたいな形で物理CDではありますが非売品となっています。イベントで配ったり、ゲーム内でポイントを貯めて交換したりです。非売品のうち最初の奴を持ってなくて、それに収録されている曲を聴きたいと思ったのが自主録の動機です。

BORDERBREAK Original Soundtrack (CD販売)
BORDERBREAK AirBurst Original Soundtrack (CD販売)
BORDERBREAK AirBurst Original Soundtrack 2 (配信)
BORDERBREAK UNION Original Soundtrack EUST (配信)
BORDERBREAK UNION Original Soundtrack GRF (配信)
BORDERBREAK SCRAMBLE Original Soundtrack (配信)
BORDERBREAK SCRAMBLE SPECIAL FAN DISC (CD・イベント配布)
BORDERBREAK X SPECIAL FAN DISC EUST (ゲーム内ポイント交換)
BORDERBREAK X SPECIAL FAN DISC GRF (ゲーム内ポイント交換)
BORDERBREAK XZERO SPECIAL FAN DISC (ゲーム内ポイント交換)

自主録音の手法

現在、公式の連動サイト(BORDERBREAK.NET)でプレミアム会員になるとゲーム内のBGMが変更できるサービスをやっています。これは全国対戦のほか、個人演習／店内演習にも適用されるため、これを利用してBGMを録音しています。個人演習でやるのは、他人に迷惑がかからないのもありますが、余計な効果音を可能な限りなくすのが一番の理由です。

自主録音の方法

録音方法(1)：ラウンドワンの録画システムを使う方法

USBメモリを挿すと動画が録画できます。あとは音声を抽出するだけです。お手軽です……が、これには落とし穴がありました。機器の録音レベルがものすごく小さいのです。曲の中でもともとレベルが小さい箇所が途切れてしまうのです。音声ファイルの音量(ゲイン)を上げても「無いものは上がりようがない」訳で途切れたままになります。たとえば「BB.NETプレミアム会員限定BGM(1)」の♪Partisanの出だし2～3秒のあたりで左チャンネルが途切れてるのが分かると思います。あるいは1:20～1:25あたりはもっと顕著に分かります。

www.youtube.com

録音方法(2)：ヘッドホン端子から録音する方法

いきなりアナログ的にはなりますが確実な方法です。録音機材はテレコでも何でも良いのですが、最終的にデジタルデータにするために今回はPCMレコーダーを購入しました。

筐体のヘッドホン端子とPCMレコーダーを接続します。また、音声がモニタできるようにPCMレコーダーを設定しておくと、ヘッドホンでモニターすることも出来ます。

録音したデータはPC上で編集して動画化しました。

おわりに

はじめは持ってない曲だけ自主録したらやめるつもりだったのですが、自主録すると最長7分くらいの曲が録音でき、CDなどのループよりも長く聴けるため、録れるものは全部録ってしまおうみたいな感じになりました(笑

現在、週に2マップ分計4曲を録音しています。

BORDERBREAK BGM集

www.youtube.com

(Updated!) 2017.4.20現在の収録リスト

スクランブルバトル BGM (メインBGM～優勢BGM)
スカービ渓谷 ( MIRAGE / 揺曳 )
放棄区画D51 ( Rush Tactics / 光環 )
ウーハイ産業港 ( Beginning of the End / 焔 )
城塞都市バレリオ ( Flash Flood / 鬼会 )
極洋基地ベルスク ( Pole Shift / 襲 )
アドラ火山連峰 ( A Drying Oven / 梅花皮 )
オルグレン湖水基地 ( Terraforming / 蛟 )
デ・ネブラ大落片 ( Curved Dimensions / 弩 )
第19号高層サイト ( Z.Z.E / 瓶覗 )
ナヴァル岩石砂漠 ( Illusory Perception / 朧 )
マデルロンド大空洞 ( Hollow Out / 纏 )
ゲルベルク要塞跡 ( Lost cluster / 石蒜 )
ロンシャ深山 ( The invisible / 叢濃 )
ホープサイド市街地 ( Organs / 瀝青 )
キニシュ砂岸 ( Sunny Hades / 淘金 )
ネソス島実験ドーム ( Tectorium / 息壌 )
マリナセドナ大雪山 ( Varying Hare / 颪 )
ベネヴィス高原地帯 ( Highlander / 徒跣 )
極地観測所セクター9 ( Escape from the presence / 矰繳 )
マグメル機体試験場 ( Cell-fish gene / 常世神 )
第5再開発島ラナクア ( Epicurean pleasures / 火鑽 )
マグメル操練場 ( Evolute Revolute / 砌 )
エイオース内部禁域 ( Distorted Prospect / 滅紫 )
BB.NETプレミアム会員限定BGM(1) ( Partisan / 反閇 )
BB.NETプレミアム会員限定BGM(2) ( STAIRWAY TO GENERATION EUSTy / 同 GRFy )
CLIMAX BGM TypeC EUST Side ( 優勢: Shoot 'em Up / 僅差: On the Horizon / 劣勢: Silly Walks )
CLIMAX BGM TypeC GRF Side ( 優勢: 捫蝨 / 僅差: 淑均 / 劣勢: 蒼惶 )
EUST リザルトBGM TypeC ( 勝利: Noisy and Revelry / 敗北: The Empty Sky )
GRF リザルトBGM TypeC ( 勝利: 剔抉 / 敗北: 涅 )

2017-02-26

2017.2.26 プラボ秋田から移転してきた駅前ナムコゲーセン、フォーラス改装に巻き込まれて閉店

ナムコ

f:id:dz_dzone:20170724160255j:plain

再開発のため2016年8月28日に閉店したナムコのゲームセンタープラボ秋田、翌週の9月3日にはなんとか秋田駅前のフォーラスに移転してきたのも束の間、わずか半年で今度はフォーラスの改装のためにまたもや閉店してしまいました。

かつて広小路にあったキャロットハウス秋田店に始まるナムコ直営のゲームセンターがとうとう秋田市から無くなってしまいました。またいつか秋田市に戻ってきてくれるといいなぁと願います。

f:id:dz_dzone:20170718153442j:plain

f:id:dz_dzone:20170718153457j:plain

f:id:dz_dzone:20170718153510j:plain

f:id:dz_dzone:20170718153523j:plain

f:id:dz_dzone:20170718153535j:plain

f:id:dz_dzone:20170718153551j:plain

f:id:dz_dzone:20170718153603j:plain

f:id:dz_dzone:20170718153616j:plain

2017-02-13

【雑記】BORDERBREAKの自主録をしてきました

BORDER_BREAK

www.youtube.com

自主録とは……、なんての書こうと思ったけどやめたｗ

要はサントラが出てくれない（出てるけど非売品でイベント会場限定配布で持ってないし入手も難しい）のでゲームから自分で録音することです。効果音とかどうしても入ってしまうのをいかに少なくBGMだけ録音するかがポイントですｗ

録音したもの

今回録音してきたのはこちらに収録されている曲のうち録れるものを。（写真は公式ツイッターから）

【ブレちゃん】そして、数量限定な来場者特典！
こちらのスペシャルファンディスクも実物をゲット！
これまでのサントラに未収録な全10曲入りですよー！#sega_bbac pic.twitter.com/9hxLPN6va8
— 【公式】ボーダーブレイク (@SEGABB) 2015年9月11日

f:id:dz_dzone:20170213225438j:plain

左上の部分を拡大すると

f:id:dz_dzone:20170213225959j:plain

ネソス島実験ドーム、ベネヴィス高原地帯、マリナセドナ大雪山、？？？？（これはセクター９と判明しています）の４箇所の各陣営です。　一番下にある「ぼく牛マン」とかいう謎のやつは無理です。気になるけどなｗｗ

録音方法

今回はラウンドワンの録画システムを使いました。最初ヘッドホン端子から抵抗入りケーブルでPCMレコーダーかMDレコーダーにつないで録ろうかと思ってましたが、こっちの方が圧倒的に簡単で楽なので。USBメモリ挿すだけ。

個人演習を利用します。何しろ余計な雑音を入れないために何もしませんから。放置です。他人様にご迷惑のかからない個人演習に決まっています。

あ、あと上の曲の他に「マグメル繰練場」というマップの曲も録りました。ついでに最新マップの「エイオース～内部禁域～」も。全部で12曲ですね。出だしを削除したり終わりの方をフェードアウトさせるため少し長めに1曲あたり6分程度です。2ループ半くらいです。

その他

ああそう忘れてました。BB.NETのプレミアム会員になるとBGM変更機能というのが使えるようになり、それを利用しています。プレミアム会員は月額900円くらいです。あと、BGM変更ではプレイリスト（一つにつき5曲まで）が作れるので楽でしたが、プレイリストを選択後カードを筐体に挿すことでそのプレイリストが順番に聞けます。別のプレイリストにするときはカード抜かないとだめなんですよね。何が言いたいかっていうと面倒くさいってことだけですｗ　あ、お金は結局1800円くらいかかりました。アーケードゲームですから。

以上です。

2017-01-05

ユーザー辞書の一括登録方法～iOS連絡先編 Web版iCloudを使う～

iOS IM(日本語入力)

概要

iOS連絡先の一括登録方法はいくつかありますが、ここではWeb版 iCloud.com を使って登録する方法を解説します。この方法では、iPhoneなどの端末の他にパソコンが必要です。ただし母艦である必要はありません。ブラウザが動けばよいのでWindowsやMac以外のLinuxでも出来ると思います。また、インターネット環境が必要です。

iOS連絡先の一括登録～Web版 iCloudを使う～

iOS連絡先の一括登録方法はいくつかありますが、ここではWeb版 iCloud.com を使って登録する方法を書きます。

前提条件

iCloudを設定済み (※メールは取得していなくても可)
Webブラウザを実行できるインターネットに繋がったPCがある (※iPhone, iPod touchなどの小型端末のブラウザでは画面が小さいため不可。PCは自宅以外でも可能　例_会社・ホテル・ネットカフェ)
自宅以外のPCでは、USBメモリ等のファイルを保存できる領域も必須
Webブラウザの種類は問わない
Apple IDで2ファクタ認証している場合はiOS端末もその場に必要