PC相談員。ニュースサイトより造船や橋梁関係からのコメントを出していきます。たまにPCネタを
闘病は苦しく「携帯なんて絶対触れない。テレビもみられない。音も聞きたくない。ご飯も食べない。それが２週間続いたので。もう寝返りうつのもしんどかったし、そういう状況だったので、数千倍どころじゃない、人が感じる苦しいというレベルが違う苦しさなんだろうなと思いました。人によって苦しさの度合いは違うんだろうけど、こんな経験は２度としたくない」と思い出し、「一番しんどいときは死にたいと思いました。こんなに苦しい思いをするんだったら死んだ方がまし」と、本音を吐露した。
経由: 池江璃花子 白血病公表以降初のテレビ出演 闘病生活に「死んだ方がましと思った」（デイリースポーツ） – Yahoo!ニュース
スポーツ選手にそういわれると、自分ががんになった時死んだほうがマシかも知れない。と思ってしまいます。
水泳は自分も努力したことがあったので、応援しています。
見積もり段階です。高くて。
そもそも目的は撮影ロケ地メモです。iPhone使ってるのでパノラマ撮影したのを投稿できるようにするだけでいいような気がしますが、そうはGさんが許しません。
今のところ360度写真をインポートするときの制限は3840*1920以上、アスペクト比2:1 。それっぽく撮ったiPhoneのパノラマ写真ではOKでした。
気になるのは360度カメラが方向を検知してくれるのかどうかです。方位磁針でもないぞうされていれば、カメラの向きとNSが固定されるんですが。
Googleさんから
360° 写真を複数枚作成する際のヒント
- スマートフォンが完全に充電されており、撮影した写真を保存できるだけの空きメモリがあることをご確認ください。
- 一脚、三脚、またはヘルメットにカメラを取り付け、1.2～1.8 m の高さにカメラを固定します。
- 一脚: 頭より高い位置で一脚が動かないように支え、（写真に写り込まないよう）頭を下げて撮影します。
- 三脚: その場を離れてから写真を撮影します。
- ヘルメット: 写真を撮影するときは、頭を動かさないように注意します。
と頭を動かすなとあります。
Golgleさんからアプリに対応するカメラのリストは出ています。
その中で比較的安そうなのをピックアップ。
RICOH THETA V INSTA360 ONE 360FLY 4K および 4K PRO YI 360 VR RICOH THETA S および SC
画質は特に気にしていないので、入手性ですね。
Photo: 2048×1024 video:1920×1080/15fps
3K (3040×1520)
固定ページ https://blackninja.home.blog/visual-studio-basic-%e3%83%a1%e3%83%a2/
不調なUSB hubがあり、何が原因か探ろうとイベントビューアを見たが、Windows10では記録されていない。
役に立ったのが、ネットエージェクト社のUSBメモリとレジストリ(https://www.netagent.co.jp/study/blog/ganso/51471411.html)であり、USBメモリの追跡の仕方が書いてある。
■USBメモリの初回使用日の把握
みなさんご存知のように、WindowsはユーザーがUSBデバイスをマシンに初めて挿入したときに、対応するデバイスドライバのインストールを自動的に行ってくれるのですが、実はこのとき、Windowsはインストールされたデバイスドライバの情報を日付や時刻とともにログファイルに記録します。よって、このログファイルを調べることで、そのマシン上で初めてデバイスを使用した日時をあとから追跡することができます。
一般的なUSBメモリのデバイスドライバがインストールされたときのログファイルの場所は、Windows XP と Windows Vista および Windows 7 とでそれぞれ異なり、XP では %SystemRoot%\setupapi.log に、Vista および 7 では %SystemRoot%\Inf\setupapi.dev.log になります（%SystemRoot%は一般的なPCでは C:\Windows を指しています）。■USBメモリの最終使用日の把握
reg2Windowsでは、USBメモリなどのストレージデバイスがマウントされドライブレターが割り当てられると、レジストリのHKEY_USERS\<ユーザSID>\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2
および
HKEY_USERS\<ユーザSID>\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\CPC\Volume
以下にデバイスごとの接続情報が記録されます。
reg1右図のうち、例えば {4dad2e2a-d14e-11dd-82f9-005056c00008} というキーをさらにレジストリエディタで検索してみると HKEY_LOCAL_MACHINE\SYSTEM\MountedDevices の下に \?\Volume{4dad2e2a-d14e-11dd-82f9-005056c00008} というバイナリデータが保存されているのを発見できます。
reg3このバイナリデータの中身を見てみると、「Disk&Ven_I-O_DATA&Prod_USB_Flash_Disk&Rev…」というUnicode文字列を見つけることができます。これは、前節で述べたI/Oデータ製のUSBメモリですので、このUSBメモリをマウントしたときの情報が HKEY_USERS\<ユーザSID>\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2{4dad2e2a-d14e-11dd-82f9-005056c00008} に記録されているということになります。
さて、あまり知られていないのですが、レジストリはキーごとに最終書き込み日時のタイムスタンプを保持しています。ですので、この HKEY_USERS\<ユーザSID>\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2{4dad2e2a-d14e-11dd-82f9-005056c00008} というキーのタイムスタンプを調べれば、このI/Oデータ製USBメモリを最後にマウントした日時も把握できる、ということです。
reg4レジストリのタイムスタンプは、RegEnumKeyEx や RegQueryInfoKey といったAPIを使用すれば取得することができます
難しいので後で調べよう。
http://siroshitsuji.blog.fc2.com/blog-entry-19.htmlx
を参考にVisual Studio 2017 で作ってみた。元のプログラムはPaSoLiの検出を目的としてたので少しだけ手を加え、全体を出力するようになっている。
フォームにテキストボックスをD&Dで乗っける。
(Name) txtWMI Multiline True Readonly True Dock Fill
ソリューションエクスプローラでFrom1を選択
下記プログラムをまるっと上書張り付け
'**
' PaSoRiが抜き差しされたタイミングで詳細情報を取得します。
'------------------------------------------------------------------------
' (1) WndProc() でUSBデバイスの抜き差しを検知します。
' --> Windowsメッセージが WM_DEVICECHANGE の場合に処理
' (2) 別スレッドでPaSoRiの情報を取得します。
' --> WMI(Windows Management Instrumentation)を使用
' WMIの情報取得に多少時間がかかるため、別スレッドで実行します。
' (3) 別スレッドから画面のコントロールを操作します。
' --> Delegateを宣言、Invokeで呼び出す
'------------------------------------------------------------------------
' VB.NETのマルチスレッドに関しては下記URLに具体的なサンプルがございます。
' http://codezine.jp/article/detail/135?p=1
'
' WMIに関しては下記URLを参考にしました。
' http://www.wmifun.net/library/win32_pnpentity.html
'**
Imports System.Threading
Imports System.Management
Public Class Form1
'================ ' Win32 API 定数 '================ Private Const WM_DEVICECHANGE As Integer = &H219 'USBに抜き差しを検知 '================ ' フォームロード '================ Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load '------------------------------------- ' PaSoRi が接続済みの場合は情報を取得 '------------------------------------- thread_GetWMI() End Sub '================================================ ' 別スレッドから関数を呼び出すためのDelegate宣言 '================================================ Delegate Sub txtWMI_Clear_Delegate() Delegate Sub txtWMI_Show_Delegate(ByVal msg As String) '=================================================== '【関数名】txtWMI_Clear '【引 数】なし '【戻り値】なし '--------------------------------------------------- ' txtWMI.Text に表示されているメッセージを消去する。 '=================================================== Private Sub txtWMI_Clear() txtWMI.Text = "" End Sub '=========================================== '【関数名】txtWMI_Show '【引 数】[in] String 表示するメッセージ '【戻り値】なし '------------------------------------------- ' txtWMI.Text に指定のメッセージを表示する。 '=========================================== Private Sub txtWMI_Show(ByVal msg As String) txtWMI.Text = msg End Sub '======================================================================== '【関数名】WndProc '【引 数】System.Windows.Forms.Message OSから送られたWindowsメッセージ '【戻り値】なし '------------------------------------------------------------------------ ' Windowsメッセージを処理します。 '======================================================================== Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message) '-------------------- ' デバイス変更の検知 '-------------------- If m.Msg = WM_DEVICECHANGE Then '時間のかかる処理を別スレッドで実行 Dim th As New Thread(New ThreadStart(AddressOf thread_GetWMI)) th.Start() Return End If '---------------------------------------- ' 上記以外の場合はメッセージを処理しない '---------------------------------------- MyBase.WndProc(m) End Sub '=============================================================================== '【関数名】thread_GetWMI '【引 数】なし '【戻り値】なし '------------------------------------------------------------------------------- ' WMIの情報を取得して、txtWMI.Textに表示する。 ' デバイス名に PaSoRi が含まれていて、正常に動作しているものだけを抜き出します。 '=============================================================================== Private Sub thread_GetWMI() Try '-------------------------------- ' Delegate宣言した関数の使用準備 '-------------------------------- Dim txtWMIClear As New txtWMI_Clear_Delegate(AddressOf txtWMI_Clear) Dim txtWMIShow As New txtWMI_Show_Delegate(AddressOf txtWMI_Show) '-------------------------------- ' テキストボックスの情報をクリア '-------------------------------- Invoke(txtWMIClear) '-------------------- ' デバイス情報を取得 '-------------------- Dim oms As New ManagementObjectSearcher Dim omc As ManagementObjectCollection 'デバイス名に PaSoRi が含まれていて、正常に動作しているものを検索する ' 2020-02-20 PaSoRiの他のデバイスをリストするため、コメントアウト oms.Query.QueryString = "select * from Win32_PnPEntity " ' & _ ' "where Name like '%PaSoRi%' and ConfigManagerErrorCode = 0" omc = oms.Get() Dim msg As String = "" For Each mo As ManagementObject In omc Dim list_CompatibleID As String() Dim list_HardwareID As String() Dim dt As New DateTime 'Availability Select Case mo.Item("Availability") Case 3 msg &= "Availability：[3] 電力 - 通常" Case 4 msg &= "Availability：[4] 電力 - 警告" Case 5 msg &= "Availability：[5] 電力 - テスト中" Case 10 msg &= "Availability：[10] 電力 - 低下" Case 13 msg &= "Availability：[13] 省電力 - 不明" Case 14 msg &= "Availability：[14] 省電力 - 低電力モード" Case 15 msg &= "Availability：[15] 省電力 - スタンバイ" Case 17 msg &= "Availability：[17] 省電力 - 警告" Case Else msg &= "Availability：" End Select msg &= vbNewLine 'Caption msg &= "Caption：" & mo.Item("Caption") & vbNewLine 'ClassGuid msg &= "ClassGuid：" & mo.Item("ClassGuid") & vbNewLine 'CompatibleID msg &= "CompatibleID：" If mo.Item("CompatibleID") IsNot Nothing Then list_CompatibleID = mo.Item("CompatibleID") For I As Integer = 0 To list_CompatibleID.Length() - 1 msg &= list_CompatibleID(I) If I <> list_CompatibleID.Length() - 1 Then msg &= ", " End If Next End If msg &= vbNewLine 'ConfigManagerErrorCode Select Case mo.Item("ConfigManagerErrorCode") Case 0 msg &= "ConfigManagerErrorCode：[0] " & _ "このデバイスは正常に動作しています。" Case 1 msg &= "ConfigManagerErrorCode：[1] " & _ "このデバイスは正しく構成されていません。" Case 2 msg &= "ConfigManagerErrorCode：[2] " & _ "このデバイスのドライバーを読み込めません。" Case 3 msg &= "ConfigManagerErrorCode：[3] " & _ "このデバイスのドライバーは壊れているか、" & _ "あるいはメモリまたは他のリソースが不足している状態で" & _ "システムが実行されている可能性があります。" Case 4 msg &= "ConfigManagerErrorCode：[4] " & _ "このデバイスは正常に動作していません。" & _ "ドライバーまたはレジストリが壊れている可能性があります。" Case 5 msg &= "ConfigManagerErrorCode：[5] " & _ "このデバイスのドライバーには Windows が管理できないリソースが必要です。" Case 6 msg &= "ConfigManagerErrorCode：[6] " & _ "このデバイスのブート構成が他のデバイスと競合しています。" Case 7 msg &= "ConfigManagerErrorCode：[7] " & _ "フィルター処理できません。" Case 8 msg &= "ConfigManagerErrorCode：[8] " & _ "デバイスのドライバー ローダーが見つかりません。" Case 9 msg &= "ConfigManagerErrorCode：[9] " & _ "このデバイスを制御するファームウェアからリソースが正しく報告されないため、" & _ "このデバイスは正常に動作していません。" Case 10 msg &= "ConfigManagerErrorCode：[10] " & _ "このデバイスを開始できません。" Case 11 msg &= "ConfigManagerErrorCode：[11] " & _ "このデバイスはエラーで停止しました。" Case 12 msg &= "ConfigManagerErrorCode：[12] " & _ "このデバイスで使用できる十分な空きリソースが見つかりません。" Case 13 msg &= "ConfigManagerErrorCode：[13] " & _ "このデバイスのリソースを確認できません。" Case 14 msg &= "ConfigManagerErrorCode：[14] " & _ "コンピューターを再起動するまでこのデバイスは正常に動作しません。" Case 15 msg &= "ConfigManagerErrorCode：[15] " & _ "このデバイスは、再列挙に問題が発生している可能性があり、" & _ "正常に動作していません。" Case 16 msg &= "ConfigManagerErrorCode：[16] " & _ "このデバイスで使用される一部のリソースを認識できません。" Case 17 msg &= "ConfigManagerErrorCode：[17] " & _ "このデバイスは不明なリソースの種類を要求しています。" Case 18 msg &= "ConfigManagerErrorCode：[18] " & _ "このデバイスのドライバーを再インストールしてください。" Case 19 msg &= "ConfigManagerErrorCode：[19] " & _ "レジストリが壊れている可能性があります。" Case 20 msg &= "ConfigManagerErrorCode：[20] " & _ "VxD ローダーの使用に失敗しました。" Case 21 msg &= "ConfigManagerErrorCode：[21] " & _ "システム エラー: このデバイスのドライバーを変更してみてください。" & _ "うまくいかない場合はハードウェアのマニュアルを参照してください。" & _ "このデバイスは削除されます。" Case 22 msg &= "ConfigManagerErrorCode：[22] " & _ "このデバイスは無効になっています。" Case 23 msg &= "ConfigManagerErrorCode：[23] " & _ "システム障害: このデバイスのドライバーを変更してみてください。" & _ "うまくいかない場合はハードウェアのマニュアルを参照してください。" Case 24 msg &= "ConfigManagerErrorCode：[24] " & _ "このデバイスは存在しないか、正常に動作していないか、" & _ "または一部のドライバーがインストールされていません。" Case 25 msg &= "ConfigManagerErrorCode：[25] " & _ "このデバイスはまだセットアップ処理中です。" Case 26 msg &= "ConfigManagerErrorCode：[26] " & _ "このデバイスはまだセットアップ処理中です。" Case 27 msg &= "ConfigManagerErrorCode：[27] " & _ "このデバイスに有効なログ構成がありません。" Case 28 msg &= "ConfigManagerErrorCode：[28] " & _ "このデバイスのドライバーはインストールされていません。" Case 29 msg &= "ConfigManagerErrorCode：[29] " & _ "このデバイスは、必要なリソースがデバイスのファームウェアから" & _ "提供されなかったため無効になっています。" Case 30 msg &= "ConfigManagerErrorCode：[30] " & _ "このデバイスは、他のデバイスが使用している" & _ "割り込み要求 (IRQ) リソースを使用しています。" Case 31 msg &= "ConfigManagerErrorCode：[31] " & _ "このデバイスは、このデバイスに必要なドライバーを" & _ "読み込めないため正常に動作していません。" Case Else msg &= "ConfigManagerErrorCode：" End Select msg &= vbNewLine 'ConfigManagerUserConfig If mo.Item("ConfigManagerUserConfig") Then msg &= "ConfigManagerUserConfig：[TRUE] " & _ "デバイスがユーザー定義の構成を使用しています。" Else msg &= "ConfigManagerUserConfig：[FALSE] " & _ "デバイスがユーザー定義の構成を使用していません。" End If msg &= vbNewLine 'CreationClassName msg &= "CreationClassName：" & mo.Item("CreationClassName") & vbNewLine 'Description msg &= "Description：" & mo.Item("Description") & vbNewLine 'DeviceID msg &= "DeviceID：" & mo.Item("DeviceID") & vbNewLine 'ErrorCleared If mo.Item("ErrorCleared") Then msg &= "ErrorCleared：[TRUE] " & _ "LastErrorCode プロパティで報告されたエラーが現在解決されています。" Else msg &= "ErrorCleared：[FALSE] " & _ "LastErrorCode プロパティで報告されたエラーが現在解決されていません。" End If msg &= vbNewLine 'ErrorDescription msg &= "ErrorDescription：" & mo.Item("ErrorDescription") & vbNewLine 'HardwareID msg &= "HardwareID：" If mo.Item("HardwareID") IsNot Nothing Then list_HardwareID = mo.Item("HardwareID") For I As Integer = 0 To list_HardwareID.Length() - 1 msg &= list_HardwareID(I) If I <> list_HardwareID.Length() - 1 Then msg &= ", " End If Next End If msg &= vbNewLine 'InstallDate If mo.Item("InstallDate") Is Nothing Then msg &= "InstallDate：" Else dt = mo.Item("InstallDate") msg &= "InstallDate：" & _ String.Format("{0:0000}/{1:00}/{2:00} {3:00}:{4:00}:{5:00}", _ dt.Year, dt.Month, dt.Day, dt.Hour, dt.Minute, dt.Second) End If msg &= vbNewLine 'LastErrorCode msg &= "LastErrorCode：" & CStr(mo.Item("LastErrorCode")) & vbNewLine 'Manufacturer msg &= "Manufacturer：" & mo.Item("Manufacturer") & vbNewLine 'Name msg &= "Name：" & mo.Item("Name") & vbNewLine 'PNPDeviceID msg &= "PNPDeviceID：" & mo.Item("PNPDeviceID") & vbNewLine 'PowerManagementCapabilities Select Case mo.Item("PowerManagementCapabilities") Case 0 msg &= "PowerManagementCapabilities：[0] 不明" Case 1 msg &= "PowerManagementCapabilities：[1] サポートされていません" Case 2 msg &= "PowerManagementCapabilities：[2] 無効" Case 3 msg &= "PowerManagementCapabilities：[3] 有効" Case 4 msg &= "PowerManagementCapabilities：[4] 自動省電力モード" Case 5 msg &= "PowerManagementCapabilities：[5] 電源の状態設定可能" Case 6 msg &= "PowerManagementCapabilities：[6] 電源サイクル サポート" Case 7 msg &= "PowerManagementCapabilities：[7] 時刻指定電源オン サポート" Case Else msg &= "PowerManagementCapabilities：" End Select msg &= vbNewLine 'PowerManagementSupported If mo.Item("PowerManagementSupported") Then msg &= "PowerManagementSupported：[TRUE] " & _ "デバイスの電源管理が可能。" Else msg &= "PowerManagementSupported：[FALSE] " & _ "デバイスの電源管理がサポートされていません。" End If msg &= vbNewLine 'Service msg &= "Service：" & mo.Item("Service") & vbNewLine 'Status msg &= "Status：" & mo.Item("Status") & vbNewLine 'StatusInfo Select Case mo.Item("StatusInfo") Case 1 msg &= "StatusInfo：[1]その他の状態" Case 2 msg &= "StatusInfo：[2]不明な状態" Case 3 msg &= "StatusInfo：[3]論理デバイスが有効" Case 4 msg &= "StatusInfo：[4]無効" Case 5 msg &= "StatusInfo：[5]該当なし" Case Else msg &= "StatusInfo：" End Select msg &= vbNewLine 'SystemCreationClassName msg &= "SystemCreationClassName：" & mo.Item("SystemCreationClassName") & vbNewLine 'SystemName msg &= "SystemName：" & mo.Item("SystemName") & vbNewLine msg &= vbNewLine Next '------------------ ' 画面に情報を表示 '------------------ Invoke(txtWMIShow, New Object() {msg}) Catch ex As Exception MessageBox.Show(ex.Message, Me.Text, MessageBoxButtons.OK, MessageBoxIcon.Exclamation) End Try End Sub
End Class
米疾病対策センター（CDC）幹部は14日、新型コロナウイルスによる肺炎に関する電話会見で、横浜港に停泊するクルーズ船「ダイヤモンド・プリンセス」について「日本からのデータは船内の人々の（感染）リスクがより高いことを示唆しており心配だ」と述べた。
— 読み進める headlines.yahoo.co.jp/hl
男子中学生複数が盗撮疑い、奈良 LINEで画像共有
2/10(月) 16:03配信共同通信
奈良県生駒市の市立中学校で、複数の中学2年の男子生徒が同級生の女子を繰り返し盗撮したとして、学校側が聞き取り調査をしていることが10日、市教育委員会への取材で分かった。20人ほどが被害を訴えている。男子たちは無料通信アプリLINE（ライン）で画像を共有し合い、その過程で金銭のやりとりがあった可能性もあるという。市教委によると、少なくとも6、7人の男子生徒が昨年秋以降、校内でスマートフォンを使い、女子のスカートの中などを盗撮していたとみられる。
女子の1人から7日、「からかいを受けている」と担任の教諭に相談があり、生徒らに聞き取りをする中で発覚した。
せっかく台北に来たんだから少し上ってみようかしらと行って入場料に驚いた方はいませんか？大人であれば600元（約2100円）！ほかにも回りたい観光地があるのでこれははなかなか痛いなという方にお勧めです。通常101台北タワーは、101のショッピングモール階を抜けるとオフィス階になりそれ以上の階に行こうとすると入場料を払わないと上がれないのですが、35階の「スターバックス」と85階の「欣葉101食藝軒」、86階の「頂鮮101美食美景餐廳」には予約さえすれば入場料なしで上がれてしまいます。
特に35階の「スターバックス」はコーヒー代200元程（約730円）だけで景色とドリンクが楽しめちゃうのでとてもお勧めです。窓際の席に座ればゆったりと台北の景色を楽しめるのでハイキング等運動量の多い観光をした後にでも101台北タワーの「スターバックス」を予約すればちょっとしたおしゃれな休憩タイムも味わえますよ。
経由: 【PR】台北の宿泊施設「4plus hostel」 台北101のご紹介 ｜ 保守速報
一度は登りました。台北の夜景がきれいで金額は気になりませんでしたが、何度でも楽しみたい方法ですね。
展望台も360度見れますし良いところですが。
特定地域への滞在を理由にした一連の入国拒否は、日本では初めてのケースとなる。政府関係者によると、法務省は当初、法的根拠がないと反対。これを首相官邸などが押し切ったという。
根拠としたのが出入国管理法５条１項１４号だ。５条１項は外国人の入国を拒否できるケースを列挙し、１４号は「日本国の利益または公安を害する行為を行う恐れがある」場合を規定する。本来はテロリストなどへの対応を想定したもので、感染症が疑われる外国人への適用はいわば「禁じ手」（政府関係者）だ。
経由: 政府、水際対策で異例の措置 入国拒否、厳格化要求も―新型肺炎：時事ドットコム
つまり、内閣と官邸の方が法律知っているという事ですね。
クルーズ船客が政府に手紙 全員検査し「無菌保証」要望
https://www.sankei.com/affairs/news/200212/afr2002120002-n1.html
＜大黒ふ頭に停泊中のクルーズ船「ダイヤモンド・プリンセス」＞新型コロナウイルスの集団感染が問題となっているクルーズ船「ダイヤモンド・プリンセス」の乗客が１２日までに、乗客全員の検査を求める手紙を加藤勝信厚生労働相や武田良太防災担当相ら宛てに出した。「乗客全員の不安や、下船後の周囲の不安をなくすため、『保菌者』でないことの保証が欲しい」と訴えている。
手紙を出したのは大阪市生野区の団体役員平沢保人さん（６４）。乗員が対応で疲労困憊している点も指摘し「保菌が疑われる乗員もケアされるべき存在だ」などとしている。手紙は大阪市のＮＰＯ法人を通じて送った。
平沢さんは船内の状況について、医薬品以外に歯磨き粉や紙おむつ、尿漏れパッド、生理用品といった日用品が不足していると指摘。乗客乗員には真っ先に検疫結果などの情報を知らせることを求めている。
平沢さんは取材に「１０日に６５人の感染者が新たに分かり、本当に安心して下船できるのか不安で書いた。２週間待機する努力を無駄にしたくない」と話した。
大阪平和人権センター理事長の米田彰男さん
米田 彰男「大阪府教職員 平成24年5月1日 ~ 平成26年4月30日
米田彰男氏（戦争をさせない1000人委員会・大阪共同代表、大阪平和人権センター理事長）
https://ameblo.jp/nihonkaigi-yachiyo/entry-12574781298.html
日中民衆による連帯を
広範な国民連合訪中団・報告会
https://www.rentai-union.com/head_line/2015/10/2015.10.23/2015.10.23.html７月２７日、弁天町ＯＲＣ生涯学習センターで広範な国民連合・大阪運営委員主催の第三次訪中報告会が開催されました。
多彩なメンバーが参加して訪中報告会で意見交換
この報告会には関西から今回の訪中団に参加した大阪府高退協会長の米田彰男氏、大阪市教員会館理事長・元日教組中央執行委員の平沢保人氏と関生支部の2名が招かれ、日本と中国が抱える問題についての活発な意見交換を行いました。
（中略）
対米従属から脱却して真の平和と民主主義を
戦後７０年は、中国にとっては抗日戦勝利７０年であり、アジア諸国から見れば解放７０年になります。
しかし、日本は戦後７０年間、外交・安全保障・経済といった重要な政策の全てを米国に依存し、従属国のように振る舞ってきました。福島第一原発の惨事や沖縄の民意を無視した辺野古新基地建設を見ても、民主主義の実現にはほど遠い現実があります。
私たちが真の平和と民主主義を勝ち取るためには、安倍が進める「中国脅威論」に反対し、「打倒安倍政権」の旗の下で国際連帯し、共に闘うことが必要です。 この日の討論でもそうした共通課題を確認し合いました。
虫歯の痛みが激しくなり、歯医者に向かう。レントゲンを撮った後口の中を歯科医が見て、「ああ、これは神経をとるしかありませんね」と宣告される。その後数か月にわたり毎週歯科に通っては、問題の歯にあけられた穴に針のようなものを通し、痛い思いをする。もちろん、毎回数千円を支払う―多くの方に同じような経験があるはずだ。
だが、その治療法が全て間違いだったとしたらどうか。この治療が「痛い」こと自体がおかしいとしたらどうか。ここからお伝えするのは、日本の歯科治療がいかに遅れているか、そして「まともな」国でどのような歯科治療を行っているかという実態の報告である。
最初に一言。日本の歯科治療は、タイの足元にも及ばない。いや、この表現ではタイに失礼だ。「足元」では少なくとも同じ土壌に二者が立っていることになるからだ。天と地、マリアナ海溝と冥王星くらい離れているといっても過言ではない。
動かぬ証拠が、筆者自身である。上記の「神経をとる治療」を正式には「根管治療」（英語名：Root Canal Treatment、以下“RCT”と表記）という。日本のRCTでひどい目にあい、バンコクで再治療したが、一週間弱で完治してしまった。
LCCなら帰省するより安上がり
以来、日本の歯科は一切信用できないため、年に二回程度バンコクに通い、定期検診を受けている。「贅沢」という方がおられるかもしれないが、いまどきLCCで往復二万円弱で行くことも可能である。地元に帰省するより安上がりなのである。
筆者は普段車に乗らず、自宅兼事務所でひたすら原稿を書き続け、港区に行くのも月に一度あるかないかである。港区女子など、未だに一度もデートしたことがない。そういう生活なら、バンコク歯科検診は決して高い出費ではない。最近は、筆者の話を聞いてタイの歯科に興味を持った友人を何人か連れて行くことも増えてきた。
その中でも、日泰の歯科格差が最も浮き彫りになるのがこのRCTである。筆者が常々周囲に伝えているのは、「歯科治療は全てタイでやるほうがいいですよ。しかし、どうしてもすべてが無理と言うなら、RCTだけはタイでやらなければなりません」である。
冒頭の写真をご覧いただきたい。この一枚で、日泰の格差が全て浮き彫りにされている。
第一に、「口に張られている緑のシート」である。これを「ラバーダム」とよぶ。
そもそも論からいって、口腔内は不潔である。常に高温多湿で、細菌の数は大便より多い。ラバーダム使用の目的は、問題となる歯を一本だけ出し唾液等が患部に入るのを防ぎ、二次感染を未然に予防すること、そして消毒用薬品等を呑み込まないようにすることだ。
ラバーダムを使用せずにRCTを行うのは、ドブ河につかりながら開腹手術するのと同じである。
日本において、ラバーダムを使用しない理由は簡単である。「保険でラバーダム費用がカバーされない」からだ。
つまり、使用する場合は歯科医の持ち出しになってしまうのだ。要は正直者が馬鹿を見る仕組みになってしまっているということだ。
顕微鏡使用によりノーペイン、ノーストレス
第二に「顕微鏡」である。俗にいう歯の中の神経が通っている部分を「歯髄」と呼ぶ。RCTが必要になるのは、この歯髄に感染が広がる場合である。
その際に感染部分を取り除く必要があり、例の「針のようなものを突き刺してチクチクする」のはこのときである。歯髄の枝分かれのしかたは個人差があり、それを全て肉眼で見分けられるはずがない。
そこで必要になるのが顕微鏡である。顕微鏡により、正確に歯髄の形を見分け、感染部分とそうでない部分を切り分ける。日本のように、顕微鏡を使わないRCTなど本来あってはならないのだ。
日本人は手先が器用というが、あんな肉眼で見えない小さい穴の中を手先だけでどうこうできるはずがない。顕微鏡を使わないから痛い部分をつつくことになり、取り残しが出て、それが要再治療の原因となるわけだ。
顕微鏡が導入されない理由は簡単で、お馴染みの「保険適用ではない」からだ。
顕微鏡を使用するとどうなるか。RCTの施術中、ずっと寝ていられる。痛みは一切ない。日本でRCTをやった人なら誰でも、いつ次の痛みがくるのかびくびくし続け、寝るなどもってのほかだったはずだ。
長期間痛い思いをした上に不完全な治療がいいか、一週間内に二回の通院で寝ている間に完全な治療が終わるか、どちらがいいだろうか。
第三に、これは写真を一目見ただけではわかりようがないが、写真の担当医は単なる歯科医ではなく”RCT専門医“である。つまり、彼女は虫歯治療や親知らずの抜歯、入れ歯作成その他諸々の治療は一切行わず、RCTのみに特化している。
ほかの診療なら「内科」「泌尿器科」「呼吸器科」などと分かれているのが当たり前だろう（註：筆者に言わせればなぜ”手の指専門の整形外科“と”腰専門の整形外科“が分かれていないのか未だに不思議だが本題と外れるので割愛）。
RCT専門医がRCTばかりやっていれば上手くなるのは当然である。日本の歯科医は「何でも屋」にならざるをえないから数々の矛盾を引き起こしているのだ。
治療費は、タイも日本も実はそんなに変わらない
第四に、RCTに限らず筆者一同が通うタイの歯科においては全て個室で治療が行われるということだ。
もう一度強調するが、口の中は不潔である。どこの病院に行っても、虫垂炎のとき同じ手術室で三人同時に開腹することはないだろう。
なぜ歯科なら同じ部屋で三人同時治療してもいいのか。そんな常識以下のことが今もまかり通っているのが21世紀日本の実態である。今までHIVをはじめ院内感染がおきていなかったのが不思議である。
第五に、時間である。日本のRCTで何度も通わされる理由は簡単で、短時間で人数をこなさないと保険点数を稼げないからだ。タイの場合、通院は一週間で二回、集中してやってくれる。一度の治療時間は二時間近くに及ぶ。だから二回で全てが終わってしまうのだ。
気になる値段だが、HPに明示されている。前歯なら9000バーツ、奥歯15000バーツである。現在の1バーツ3.6円のレートで計算すると、それぞれ32400円、54000円である。
一見高く見えるが、週に一度二千円、半年間払い続けるとすると、2000×24で48000円、実は大して変わらないのである。かたや無痛で一週間弱、もう片方は「有痛」「不潔」「下手くそ」「再発あり」で半年間、どちらがいいかもはや議論の余地は全くない。
もはや、日本の保険証でまともな歯科治療を受けることは不可能である。安すぎるゆえに制度疲労が起きてしまっている。次回から、筆者自身とこの写真の女性の治療歴に基づいて、どれほど日本とタイで格差が起きているのか詳述していきたい。
菅義偉官房長官は１３日午前の記者会見で、韓国の民間団体が東京五輪・パラリンピックを東京電力福島第１原発と結び付けて揶揄するポスターを制作するなど、大会の安全性を問題視するような動きが韓国内であることについて「現実とは全く異なる。あってはならないことだ」と強く非難した。「政府としては、そうしたことが二度とないように、ありとあらゆる手段の中で強く抗議をしている」とも語った。
経由: 菅官房長官「現実とは全く異なる」 韓国の五輪揶揄ポスターを非難
いいですね。というか国として当たり前の対応が取れるようになったのですね。
本業設計!! 