2020年11月8日日曜日

PowerShell 筋肉量計算

 筋肉量を計算するPowerShellを組んだ。

# 体重と体脂肪率の入力

$iWeight = Read-Host "体重(㎏)  "
$iSibou = Read-Host  "体脂肪率(%)"

$Sibou=1* $iSibou
$Weight=1* $iWeight

$SibouRyou=$Weight * ($Sibou/100)


$jyosiboutaijyuu = $Weight - $SibouRyou
$KinnikuRyou = $jyosiboutaijyuu /2
$KinnikuRitu = $KinnikuRyou / $Weight *100

# 30.9%以下は低い
# 31.0~34.9%は標準
# 35.0~38.9%はやや高い
# 39.0%以上は高い

$kMark = "低い"
$kColor = "Red"
if (( $KinnikuRitu -ge 31 ) -and ( $KinnikuRitu -lt 35 ))
{
    $kMark = "標準"
    $kColor = "White"
}
if (( $KinnikuRitu -ge 35 ) -and ( $KinnikuRitu -lt 39 ))
{
    $kMark = "やや高い"
    $kColor = "Green"
}
if ( $KinnikuRitu -ge 39 ) 
{
    $kMark = "高い"
    $kColor = "Blue"
}

write-host "体脂肪量  = " $SibouRyou "Kg"
write-host "除脂肪体重 = " $jyosiboutaijyuu "Kg"
write-host "筋肉量   = " $KinnikuRyou "Kg"
write-host "筋肉率   = " $KinnikuRitu "%" $kMark -ForegroundColor $kColor

実行結果
 







本日の河上選手:お休み
 11/11~ 住之江