2019年2月26日火曜日

PowerShell ファイル操作

---  ソース  ---

# YYYYMMDDのフォルダーの有無確認
# 存在しない時には作成する。
# 作成したフォルダーに移動して、テキストファイルを作成する。

# Workに移動
Set-Location  D:\work

# YYYYMMDDを取得
$formatted_date = (Get-Date).ToString("yyyyMMdd")

# パスの存在チェック
if( Test-Path ".\$formatted_date" )
{
    echo "OK"
}
else
{
    echo " Directory 作成"
    New-Item  ".\$formatted_date" -itemType Directory

 }

# Location 移動
Set-Location  ".\$formatted_date"

#ファイル作成
New-Item ".\test.txt"

---   実行結果  ---

PS D:\> D:\work\FileSample.ps1
 Directory 作成


    ディレクトリ: D:\work


Mode                LastWriteTime         Length Name
----                -------------         ------ ----
d-----       2019/02/26     10:59                20190226


    ディレクトリ: D:\work\20190226


Mode                LastWriteTime         Length Name
----                -------------         ------ ----
-a----       2019/02/26     10:59              0 test.txt



PS D:\work\20190226>

本日の河上選手:若松 2日目
  3R 5号艇
     ➁の小川が外に出て、⑥の赤岩が入って、1436/52の進入
     結果はドベ!

  10R 2号艇 2コース進入
     外勢の捲りで、あえなく5着


     
 

2019年2月22日金曜日

PowerShell SortとPSObject

CSVから取り込んでソートするのは、簡単にできた。

-- a.txt -----
No,Speed,Distance
N0,200,600
N500,260,250
N700,280,500
N100,220,400


これを、「Distance 」の降順にした。

--  sortSample.ps1 ----

$CSVDATA=""
$CSVData =Import-Csv "X:\XXXXXXXXXXXXXX\a.txt"
$tScoreSort = $CSVData  | Sort-Object   Distance -Descending

$tScoreSort

--  結果 ----

NAME SPEED Distance
----       -----     --------
N0       200       600
N700   280       500
N100   220       400
N500   260       250


CSVではなく、ソース内で完結したいのだが、どうもうまくいかない。
配列を色々試してみたが、
  「デバッグ: "Sort-Object" - "Distance" が "InputObject" にありません。
と、なんだか要素をうまく引き渡せてない。
最終的に、PSObjectを使って何とか動かした。


-- sortSample3.ps1 -----

$tbl =  ,@("N0",200,600)
$tbl += ,@("N500",260,250)
$tbl += ,@("N700",280,500)
$tbl += ,@("N100",220,400)


$PsDatas = @()


for( $jj =0 ;$jj -lt $tbl.Length;$jj++)
{
    $PsData = New-Object PSObject | Select-Object No, Speed, Distance

    $PsData.No =$tbl[$jj][0]
    $PsData.Speed =$tbl[$jj][1]
    $PsData.Distance =$tbl[$jj][2]

    $PsDatas += $PsData
}

$tScoreSort = $PsDatas  | Sort-Object   "Distance" -Descending

$tScoreSort


--  結果 ----

NAME SPEED Distance
----       -----     --------
N0       200       600
N700   280       500
N100   220       400
N500   260       250



本日の河上選手:お休み
   2/25 ~ 若松

2019年2月21日木曜日

テレボートモニター 景品 「パイロット フリクションボールペン」

パイロット フリクションボールペン が送られてきた。
「Queens Climax」のノベルティー






箱がちゃんとしているし、安っぽくないからそれなりのものだと思う。



本日の河上選手:お休み
   2/25 ~ 若松

2019年2月18日月曜日

コンテック 双眼めがねルーペ LP22P

工作をするのに、ちょっとルーペが欲しい
卓上型も考えたが、クリップ式のこれを買った。

コンテック  双眼めがねルーペ LP22P

Bicのポイントで買った。







まだ、使ってないから何とも言えないが、パッケージの「これ読めますか?」の字がくっきり見える。
実質タダだし、用は足してくれそうなので
 ★★★★★



本日の河上選手:お休み
   2/25 ~ 若松

2019年2月12日火曜日

PowerShell Write-HostとRead-Host

PowerShellの基本的なことを忘れていたので、備忘録

Write-Hostで、改行をしないようにする。
  Write-Host -NoNewline

Read-Hostは、DOSのPAUSE同様の動きする。

Sample Source

 Write-Host "#1 "
 Write-Host "#2 "
 Write-Host "#3 "

 Write-Host "これを、改行しないようにするには、「-NoNewline」を付加する”

 Write-Host -NoNewline "#1 "
 Write-Host -NoNewline "#2 "
 Write-Host  "#3 "

 Write-Host -NoNewline "#1 "
 Write-Host  "#2 "
 Write-Host  "#3 "

 Write-Output "DOSのPAUSEを実現するには、「Read-Host」を使う。”
 Read-Host "Enter"

結果
 #1
 #2
 #3
 これを、改行しないようにするには、「-NoNewline」を付加する
 #1 #2 #3
 #1 #2
 #3
 DOSのPAUSEを実現するには、「Read-Host」を使う。
 Enter:


本日の河上選手:お休み
  2/25 ~ 若松

2019年2月10日日曜日

今節の河上選手

下関 創刊70周年記念スポニチ金杯争奪戦 
               2/6~2/10 5日間シリーズ

初日
 4R 5号艇 5コース進入 
    22のドベスタートだったが、1Mでは3番手の競り合いだったが、
    周回を重ねるたびに、ズルズルおちて、結局5着

 9R 4号艇 2コース進入
    珍しく前付けをしたが、いいとこなしで結局ドベ

 モータが悪いのか、ターンが全然ダメダメ!腕がポンコツなのか?!


2日目
 4R 1号艇 一応1号艇なので、124のBOX
       2号艇にあっけなく差された上に、ズルズル番手を落として4着
       何をやっているのか!

3日目
 1R 2号艇 2コース進入で2着
 8R 6号艇 6コース進入でドベ

4日目
 1R 3号艇 3コース進入
    やっと、3着に入って、\6,560
    何とか、持たせる足になってきたのか?!

5日目
 5R 2号艇 2コース進入 進入固定だから当たり前
    2周1M までは、2番手だったが、最後に4号艇にやられて
    3着だ!と喜ぶところだが、1番人気で、550円

 9R 6号艇 6コース進入
    12のトップスタートだったが、1Mで揉まれて、結局5着


今節の成績
   5642633
  
次節
 2/25 ~ 若松
  若松夜王S第5戦BOATBoyカップ個性派王決定戦
  小川、澤、阿波の大外野郎がそろい踏み

  同じ番組で走ってほしい
  それも、
   1号艇 澤
   2号艇 小川
   3号艇 阿波
   4号艇 河上
   5号艇 間嶋
   6号艇 高橋次郎
   
   
    


 
        

2019年2月5日火曜日

ammoon トランスミッタ

ammoon ポータブルワイヤレスオーディオ トランスミッタ 受信機システム エレクトリックギター用 ベースエレクトリック・ヴァイオリン楽器用

AMAZONで、¥ 2,365で購入

さっき見たら、販売元が変わって、¥ 3,882 になっていた、
最近、AMAZONでは、買った後に値が下がるというマジックに晒されていたが、今回は助かった。

パッケージは、それなり。


レビューにあった通り、説明書はない。(必要ないけど)


本体*2、アンテナ*2、変換プラグとケーブル。



手に取っての第一印象「チャチィ」
100均で売っている工作用電池BOXに、基盤とプラグを付けた感じである。

電池BOXの裏ブタを少しスライドさせて外すのだが、送信側はスライドしない。
ドライバーを隙間に入れて何とか外した。
成型がちゃんとされておらず突起ができていて邪魔している。
電池BOXの構造が悪くてプラグ側がプラスとなる方は、かなり入れづらい。




アンテナはネジ式だが、送信側は、レビューにもあったが、2/3程は入ったがその先は入らない。
もう一方のアンテナでも試したが、同じ。
しょうがないので、ちょと細工して突っ込んだ。
受信側は、素直に入った。


とりあえず、CASINOとTHRを繋いだら、すんなり音は出た。





音質
 「高音が多少細いかなー!?」ってレベルで、はっきり言ってわからない。
 CASINOから直接THRに繋ぐ分には、気になるノイズは発生しなかった。
 CASINO・ボード間で使用して、歪系を掛けるとなんだかノイズが入る。
 「音圧が上がるとノイズが発生したが、ニッカドを、アルカリに替えたら治まった」
 というレビューがあったので、アルカリにしてみたが、どうも、いまいちだった。

音量
 調整はできないが、普通に使えるレベルと思う。

取り回し
 本体もデカいのだが、アンテナが邪魔。
 電池が2本入るので、ギターに付けるとちょっと重く感じる。

遅延
 ほぼ感じない。

耐久性
 「ありそう」とは言えない。

価格が価格なのでこんなもんだという評価で、

  ★★★★☆

「シールドから解放されるのは、最高」という多くのレビューが納得できた。

本日の河上選手:お休み
  明日から下関


2019年2月2日土曜日

Sinjimoru 手帳型カード入れケース  ブラック

Sinjimoru  手帳型カード入れケース  ブラック

手帳型のケースを使っていたが、ボロくなってきたので買い替える
同じ手帳型を探したが、買った時の倍の値段になっていた。
対応するケースも、少なくなっていて選択の余地がない。
とりあえず、付属のプラケースでもいいのだが、カード類を一緒に持ち歩きたい。
探してみると、スマホに付けるカードケースがたくさんあった。
「Sinjimoru 背面携帯ケース Card Zip」を買ってみた。




カード2枚と眼鏡クリーンを一個入れてちょうど良い感じになった。



2週間ほど使っての感想は、厚みが少しあって、邪魔かと思ったがケースに入れていたころよりは薄くなったので、邪魔という感覚はなく、この厚みでスマホが持ちやすい。
概ね使い心地は、いい。
ただ、割引後の¥836という価格はちょっと高い気がするので、-1の評価。

★★★★☆

本日の河上選手:お休み
 2/6 ~ 下関