Rosetta Code

Nautical bell: Difference between revisions

Page Discussion

Nautical bell (view source)

Revision as of 23:02, 7 July 2016

665 bytes removed ,  7 years ago
→‎{{header|PowerShell}}
No edit summary
Line 755:
end nautical;
</lang>
 
 
=={{header|PowerShell}}==
Line 825 ⟶ 826:
}
 
Write-Host "Local UTC Time Bells`n----- --- -----`n"
 
1..12 | ForEach-Object {
 
$date = Get-Date -Hour $_ -Minute 0
Write-Host -NoNewline ("{0}:{1} {2}:{3} " -f $date.Hour.ToString("00"), $date.Minute.ToString("00"))
$date.Minute.ToString("00"),
$date.ToUniversalTime().Hour.ToString("00"),
$date.ToUniversalTime().Minute.ToString("00"))
Get-Bell -Hour $_ -Minute 0
 
$date = $date.AddMinutes(30)
Write-Host -NoNewline ("{0}:{1} {2}:{3} " -f $date.Hour.ToString("00"), $date.Minute.ToString("00"))
$date.Minute.ToString("00"),
$date.ToUniversalTime().Hour.ToString("00"),
$date.ToUniversalTime().Minute.ToString("00"))
Get-Bell -Hour $_ -Minute 30
}
Line 846 ⟶ 841:
{{Out}}
<pre>
Local UTC Time Bells
----- --- -----
 
01:00 08:00 ♪♪
01:30 08:30 ♪♪ ♪
02:00 09:00 ♪♪ ♪♪
02:30 09:30 ♪♪ ♪♪ ♪
03:00 10:00 ♪♪ ♪♪ ♪♪
03:30 10:30 ♪♪ ♪♪ ♪♪ ♪
04:00 11:00 ♪♪ ♪♪ ♪♪ ♪♪
04:30 11:30 ♪
05:00 12:00 ♪♪
05:30 12:30 ♪♪ ♪
06:00 13:00 ♪♪ ♪♪
06:30 13:30 ♪♪ ♪♪ ♪
07:00 14:00 ♪♪ ♪♪ ♪♪
07:30 14:30 ♪♪ ♪♪ ♪♪ ♪
08:00 15:00 ♪♪ ♪♪ ♪♪ ♪♪
08:30 15:30 ♪
09:00 16:00 ♪♪
09:30 16:30 ♪♪ ♪
10:00 17:00 ♪♪ ♪♪
10:30 17:30 ♪♪ ♪♪ ♪
11:00 18:00 ♪♪ ♪♪ ♪♪
11:30 18:30 ♪♪ ♪♪ ♪♪ ♪
12:00 19:00 ♪♪ ♪♪ ♪♪ ♪♪
12:30 19:30 ♪
</pre>
 
Blue
308

edits

Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/226454"