【ポケモンGO】バトルレジェンド銀メダルゲット!(2017/10/30)



いつの間にかメダルの種類が増えていました。

伝説ポケモンとレイドバトルで勝利するとバトルレジェンドのメダルが貰えますが、レイドバトルと同様、1000回勝利すると、金メダルゲットとなります。

2017年11月末までエンテイがレイドボスとして登場する期間だから日々ゲットできますが、それが終了したら、果たしてレイドボスに伝説ポケモンは どの程度POPするんだろう(?_?)


カテゴリー: ポケモンGO | コメントする

【新聞記事】おたふくかぜによる難聴



2017年9月6日の新聞記事より。

予防接種をするべきか否か・・・予防接種による副作用の例もあり非常に悩むところです。

予防接種があるという事は、その病気が発病したら、それなりの症状が出るから・・と考えると、副作用も怖いですが、それ以上にその病気が発病する事の方が怖いものです。

記事にもあるように、先進国の中で日本だけが定期接種ではなく任意接種となっており、接種せずに発病した場合、難聴の恐れがあるおたふくかぜ。


カテゴリー: 健康, 新聞記事 | コメントする

【映画】モータル・コンバット(原題:Mortal Kombat)



監督:ポール・W・S・アンダーソン
出演者:ロビン・ショウ(リュウ・カン(劉鋼) 役)
    クリストファー・ランバート(ライデン(雷電) 役)
    リンデン・アシュビー(ジョニー・ケイジ 役)
    ブリジット・ウィルソン(ソニア・ブレイド 役)

----------------------------------------

あらすじ・感想(ネタバレ):

アメリカの格闘ゲーム「モータル・コンバット」を映画化したもので、管理人は そのゲームをやった事がなく事前知識が無かったので、この映画を観ていても状況が良く分からなかった。映画自体余りストーリー性が無く、格闘シーンもイマイチな気がしました。


リュウ・カンの弟が魔界のエンペラーの手下であるシャン・ツンによって殺されるシーンから始まる。

シャン・ツンは、ソニア・ブレイドの相棒の敵であるカノウを追ってモータル・コンバットに参加するように仕向ける。

ジョニー・ケイジは映画俳優だがカンフーの腕前は一人前。余り乗り気ではない映画撮影にウンザリして途中で投げ出したところ、師匠(シャン・ツンが化けている)が訪ねてきて試合に出るようにそそのかす。

リュウ・カンは、モータル・コンバットの存在を聞かされていたが信じていなかったが、弟の敵を討つためモータル・コンバットに出る事を決意する。

モータルコンバットとは、魔界と人間が戦い、勝利を収める事で人間界に一時的に平和が訪れるが、10連敗すれば魔界に併合される事を決める試合であり、既に9連敗中。

リュウ・カン、ソニア・ブレイド、ジョニー・ケイジは試合会場に向かうため船に乗り込んだ。雷の神、人間界の守護神ライデンも付いてくるが魔界では本来の力が発揮できず3人に助言を与える。

ソニア・ブレードは、ライデンに「強い者は他にいるが、何故自分たちが選ばれたのか?」と問うと「魂を比較した結果、この3人がモータル・コンバットの試合に選ばれた」と答える。でも、シャン・ツンが仕組んだのでは?という疑問も湧く。

ちなみに魔界の者といっても人間と外見は変わらないような気がするが、あるシーンでは顔を剥ぐとガイコツだった事もあり、実態が良く分からない。

意図はイマイチ分からないが、シャン・ツンはエンペラーの王女キタナとリュウ・カンを会わせないようにする。

第一試合、リュウ・カンの試合は、リュウ・カンが圧勝。負けた方はシャン・ツンに魂を奪われ死ぬ。

第二試合は、ソニア・ブレイドとカノウの試合。ソニアが負けていたが、一瞬のスキにソニアが勝利。

その頃、ジョニー・ケイジは魔界の者と森で戦って勝利する。

第三試合(?)は、リュウ・カンとキタナ王女との戦い。キタナ王女はリュウ・カンと組み合った時に命の源を使うことを助言する。それを見たシャン・ツンは試合を途中で止めさせる。

第四試合は手が4本あるゴロウと人間の戦いで、ゴロウに対して全く攻撃が効かず殺される。

第五試合、ジョニー・ケイジはシャン・ツンにゴロウと対戦するように依頼した。最終戦はシャン・ツンが場所・対戦相手を自由に決められる事を条件に承諾した。

さて、ジョニー・ケイジ対ゴロウ戦だが、ジョニー・ケイジは、まず急所を狙って、相手が痛がっている最中にその場から逃げ去る。シャン・ツンに命令され、ゴロウがジョニー・ケイジを追うが、ジョニー・ケイジが身を潜め、不意打ちをつく事でゴロウに打ち勝った。

シャン・ツンはソニア・ブレードをと最終決戦するため、さらって魔界へ向かう。リュウ・カンとジョニー・ケイジは後を追う。途中、キタナ王女が導く。道中、キタナが魔界との戦いに敗れ、両親を殺され、エンペラーの後継者として養女とされたことを伝える。

シャン・ツンはソニア・ブレードに最終決戦を申し込むが断られる。その場には、既にリュウ・カン、ジョニー・ケイジ、キタナ王女が居合わせ、リュウ・カンがシャン・ツンに試合を申し込み、最終決戦となる。

始めはリュウ・カンが優勢だったが、シャン・ツンが喰らった魂が実体を持ち複数の敵と戦い勝利する。シャン・ツンの前に駆け寄ると、シャン・ツンが弟の姿に変え、リュウ・カンの心を乱そうとするが、リュウ・カンは自分に打ち勝ち、シャン・ツンが現れる。そして、あっけなくシャン・ツンが破られ、人類に平和が訪れる。

但し、最後に魔界のエンペラーが登場し魔の手が忍び寄るところで終わる。

カテゴリー: アクション, 映画 | コメントする

【Excelマクロ(VBa)】IEの操作(チェックボックス)

IE起動~終了までは述べたので、起動後のIEの操作をExcelマクロ(VBa)で行います。尚、コーディングするにあたっては、多少htmlの知識が必要です。(読めないと記述できません)

操作するページは引き続きYahooの乗換案内です。(サンプルソース)


   チェックボックス


Yahoo乗換案内のチェックボックスは手段の欄に【空路】【新幹線】【有料特急】【高速バス】【路線/連絡バス】【フェリー】があります。



それぞれのソースコードは下記の通りで、注目はid=~です。タグにidが設定されている場合は、getElementById("~") を使う事で操作できます。

そして、チェックボックスにチェックを入れる場合は、
objIE.document.getElementById(idの値).Checked = True
チェックを外す場合は、
objIE.document.getElementById(idの値).Checked = False
で操作します。

【空路】
  <乗換案内html>
<input type="checkbox" name="al" id="air" value="1" checked><label for="air">空路</label>

  <Excelマクロ(VBa)>
  ▽チェックを入れる場合(True)
objIE.document.getElementById("air").Checked = True

  ▽チェックを外す場合(False)
objIE.document.getElementById("air").Checked = False

【新幹線】
  <乗換案内html>
<input type="checkbox" name="shin" id="sexp" value="1" checked><label for="sexp">新幹線</label>

  <Excelマクロ(VBa)>
  ▽チェックを入れる場合(True)
objIE.document.getElementById("sexp").Checked = True

  ▽チェックを外す場合(False)
objIE.document.getElementById("sexp").Checked = False

【有料特急】
  <乗換案内html>
<input type="checkbox" name="ex" id="exp" value="1" checked><label for="exp">有料特急</label>

  <Excelマクロ(VBa)>
  ▽チェックを入れる場合(True)
objIE.document.getElementById("exp").Checked = True

  ▽チェックを外す場合(False)
objIE.document.getElementById("exp").Checked = False

【高速バス】
  <乗換案内html>
<input type="checkbox" name="hb" id="hbus" value="1" checked><label for="hbus">高速バス</label>

  <Excelマクロ(VBa)>
  ▽チェックを入れる場合(True)
objIE.document.getElementById("hbus").Checked = True

  ▽チェックを外す場合(False)
objIE.document.getElementById("hbus").Checked = False

【路線/連絡バス】
  <乗換案内html>
<input type="checkbox" name="lb" id="bus" value="1" checked><label for="bus">路線/連絡バス</label>

  <Excelマクロ(VBa)>
  ▽チェックを入れる場合(True)
objIE.document.getElementById("bus").Checked = True

  ▽チェックを外す場合(False)
objIE.document.getElementById("bus").Checked = False

【フェリー】
  <乗換案内html>
<input type="checkbox" name="sr" id="fer" value="1" checked><label for="fer">フェリー</label>

  <Excelマクロ(VBa)>
  ▽チェックを入れる場合(True)
objIE.document.getElementById("fer").Checked = True

  ▽チェックを外す場合(False)
objIE.document.getElementById("air").Checked = False

カテゴリー: VBa(Excelマクロ), システム開発 | コメントする

【ポケモンGO】レイドボスの種類が増えた(2017/11/05)



レイドボスチェックをすると、ポリゴンがいました!

他にも、今までレイドボスとして見たことがないポケモンもチラホラと・・・

かつては、ポリゴンをゲットするため、(今は亡き)サーチアプリを使い、散々車を走らせゲットしたポケモンが・・・バレンタインイベントで大量に湧き、今度は大量にレイドボスで見かけるようになりました。

と言っても、個体値の高いポリゴンは欲しいので、早速バトルです!



ソロで倒せるかなぁ?!という強さですが、今回は4人も参加してくれたので余裕で討伐しゲットです!

ここ数カ月伝説ポケモンとしかレイドボス戦をしていないので、ポリゴンがこうもあっさりゲット出来ると、いかに伝説ポケモンの討伐が難しくゲットしにくいか、改めて痛感します。

カテゴリー: ポケモンGO | コメントする