PoshCode Archive  Hex Artifact Content

Artifact a29563844911cd8f72c967bfc711ae1a5e1ba2d71bed2664d0505b29b3b8ef97:

  • File Start-BootsTimer.ps1 — part of check-in [e23b37f3ea] at 2018-06-10 12:56:19 on branch trunk — A stay-on-top (borderless window) countdown timer, with a percentage-based color progress bar as well as sizeable font … as well as audio file and voice alarms. (user: Joel Bennett size: 7115)

0000: 23 20 65 6e 63 6f 64 69 6e 67 3a 20 61 73 63 69  # encoding: asci
0010: 69 0d 0a 23 20 61 70 69 3a 20 70 6f 77 65 72 73  i..# api: powers
0020: 68 65 6c 6c 0d 0a 23 20 74 69 74 6c 65 3a 20 53  hell..# title: S
0030: 74 61 72 74 2d 42 6f 6f 74 73 54 69 6d 65 72 0d  tart-BootsTimer.
0040: 0a 23 20 64 65 73 63 72 69 70 74 69 6f 6e 3a 20  .# description: 
0050: 41 20 73 74 61 79 2d 6f 6e 2d 74 6f 70 20 28 62  A stay-on-top (b
0060: 6f 72 64 65 72 6c 65 73 73 20 77 69 6e 64 6f 77  orderless window
0070: 29 20 63 6f 75 6e 74 64 6f 77 6e 20 74 69 6d 65  ) countdown time
0080: 72 2c 20 77 69 74 68 20 61 20 70 65 72 63 65 6e  r, with a percen
0090: 74 61 67 65 2d 62 61 73 65 64 20 63 6f 6c 6f 72  tage-based color
00a0: 20 70 72 6f 67 72 65 73 73 20 62 61 72 20 61 73   progress bar as
00b0: 20 77 65 6c 6c 20 61 73 20 73 69 7a 65 61 62 6c   well as sizeabl
00c0: 65 20 66 6f 6e 74 20 e2 80 a6 20 61 73 20 77 65  e font ... as we
00d0: 6c 6c 20 61 73 20 61 75 64 69 6f 20 66 69 6c 65  ll as audio file
00e0: 20 61 6e 64 20 76 6f 69 63 65 20 61 6c 61 72 6d   and voice alarm
00f0: 73 2e 0d 0a 23 20 76 65 72 73 69 6f 6e 3a 20 31  s...# version: 1
0100: 2e 30 0d 0a 23 20 74 79 70 65 3a 20 66 75 6e 63  .0..# type: func
0110: 74 69 6f 6e 0d 0a 23 20 61 75 74 68 6f 72 3a 20  tion..# author: 
0120: 4a 6f 65 6c 20 42 65 6e 6e 65 74 74 0d 0a 23 20  Joel Bennett..# 
0130: 6c 69 63 65 6e 73 65 3a 20 43 43 30 0d 0a 23 20  license: CC0..# 
0140: 66 75 6e 63 74 69 6f 6e 3a 20 53 74 61 72 74 2d  function: Start-
0150: 42 6f 6f 74 73 54 69 6d 65 72 0d 0a 23 20 78 2d  BootsTimer..# x-
0160: 70 6f 73 68 63 6f 64 65 2d 69 64 3a 20 31 30 34  poshcode-id: 104
0170: 36 0d 0a 23 20 78 2d 61 72 63 68 69 76 65 64 3a  6..# x-archived:
0180: 20 32 30 30 39 2d 30 34 2d 32 32 54 30 38 3a 30   2009-04-22T08:0
0190: 36 3a 33 32 0d 0a 23 0d 0a 23 0d 0a 66 75 6e 63  6:32..#..#..func
01a0: 74 69 6f 6e 20 53 74 61 72 74 2d 42 6f 6f 74 73  tion Start-Boots
01b0: 54 69 6d 65 72 20 7b 0d 0a 23 2e 53 79 6e 74 61  Timer {..#.Synta
01c0: 78 0d 0a 23 20 20 43 72 65 61 74 65 73 20 61 20  x..#  Creates a 
01d0: 73 74 61 79 2d 6f 6e 2d 74 6f 70 20 63 6f 75 6e  stay-on-top coun
01e0: 74 64 6f 77 6e 20 74 69 6d 65 72 0d 0a 23 2e 44  tdown timer..#.D
01f0: 65 73 63 72 69 70 74 69 6f 6e 0d 0a 23 20 20 41  escription..#  A
0200: 20 57 50 46 20 62 6f 72 64 65 72 6c 65 73 73 20   WPF borderless 
0210: 63 6f 75 6e 74 2d 64 6f 77 6e 20 74 69 6d 65 72  count-down timer
0220: 2c 20 77 69 74 68 20 61 75 64 69 6f 2f 76 6f 69  , with audio/voi
0230: 63 65 20 61 6c 61 72 6d 73 20 61 6e 64 20 76 69  ce alarms and vi
0240: 73 75 61 6c 20 63 6f 75 6e 74 64 6f 77 6e 20 2b  sual countdown +
0250: 20 63 6f 6c 6f 72 65 64 20 70 72 6f 67 72 65 73   colored progres
0260: 73 20 69 6e 64 69 63 61 74 69 6f 6e 0d 0a 23 2e  s indication..#.
0270: 50 61 72 61 6d 65 74 65 72 20 45 6e 64 4d 65 73  Parameter EndMes
0280: 73 61 67 65 0d 0a 23 20 20 54 68 65 20 6d 65 73  sage..#  The mes
0290: 73 61 67 65 20 74 6f 20 62 65 20 73 70 6f 6b 65  sage to be spoke
02a0: 6e 20 62 79 20 61 20 76 6f 69 63 65 20 77 68 65  n by a voice whe
02b0: 6e 20 74 68 65 20 74 69 6d 65 20 69 73 20 75 70  n the time is up
02c0: 2e 2e 2e 0d 0a 23 2e 50 61 72 61 6d 65 74 65 72  .....#.Parameter
02d0: 20 53 74 61 72 74 4d 65 73 73 61 67 65 0d 0a 23   StartMessage..#
02e0: 20 20 41 20 6d 65 73 73 61 67 65 20 74 6f 20 62    A message to b
02f0: 65 20 73 70 6f 6b 65 6e 20 61 74 20 73 74 61 72  e spoken at star
0300: 74 20 75 70 20 28 6a 75 73 74 20 74 6f 20 6c 65  t up (just to le
0310: 74 20 79 6f 75 20 6b 6e 6f 77 2c 20 61 75 64 69  t you know, audi
0320: 62 6c 79 2c 20 77 68 61 74 27 73 20 75 70 29 2e  bly, what's up).
0330: 0d 0a 0d 0a 23 2e 50 61 72 61 6d 65 74 65 72 20  ....#.Parameter 
0340: 4d 69 6e 75 74 65 73 0d 0a 23 20 20 53 6f 6d 65  Minutes..#  Some
0350: 20 6d 69 6e 75 74 65 73 20 74 6f 20 61 64 64 20   minutes to add 
0360: 74 6f 20 74 68 65 20 74 69 6d 65 72 0d 0a 23 2e  to the timer..#.
0370: 50 61 72 61 6d 65 74 65 72 20 53 65 63 6f 6e 64  Parameter Second
0380: 73 0d 0a 23 20 20 53 6f 6d 65 20 73 65 63 6f 6e  s..#  Some secon
0390: 64 73 20 74 6f 20 61 64 64 20 74 6f 20 74 68 65  ds to add to the
03a0: 20 74 69 6d 65 72 0d 0a 23 2e 50 61 72 61 6d 65   timer..#.Parame
03b0: 74 65 72 20 48 6f 75 72 73 0d 0a 23 20 20 53 6f  ter Hours..#  So
03c0: 6d 65 20 68 6f 75 72 73 20 74 6f 20 61 64 64 20  me hours to add 
03d0: 74 6f 20 74 68 65 20 74 69 6d 65 72 0d 0a 0d 0a  to the timer....
03e0: 23 2e 50 61 72 61 6d 65 74 65 72 20 53 6f 75 6e  #.Parameter Soun
03f0: 64 46 69 6c 65 0d 0a 23 20 20 41 20 2e 77 61 76  dFile..#  A .wav
0400: 20 66 69 6c 65 20 74 6f 20 70 6c 61 79 20 61 73   file to play as
0410: 20 74 68 65 20 61 6c 61 72 6d 0d 0a 23 2e 50 61   the alarm..#.Pa
0420: 72 61 6d 65 74 65 72 20 46 6f 6e 74 53 69 7a 65  rameter FontSize
0430: 0d 0a 23 20 20 54 68 65 20 73 69 7a 65 20 6f 66  ..#  The size of
0440: 20 74 68 65 20 74 69 6d 65 72 20 74 65 78 74 0d   the timer text.
0450: 0a 23 2e 50 61 72 61 6d 65 74 65 72 20 53 69 6e  .#.Parameter Sin
0460: 67 6c 65 41 6c 61 72 6d 0d 0a 23 20 20 4f 6e 6c  gleAlarm..#  Onl
0470: 79 20 73 6f 75 6e 64 20 74 68 65 20 61 6c 61 72  y sound the alar
0480: 6d 20 6f 6e 63 65 0d 0a 0d 0a 23 2e 45 78 61 6d  m once....#.Exam
0490: 70 6c 65 0d 0a 23 20 20 53 74 61 72 74 2d 42 6f  ple..#  Start-Bo
04a0: 6f 74 73 54 69 6d 65 72 20 20 31 38 30 20 22 54  otsTimer  180 "T
04b0: 68 65 20 74 68 72 65 65 20 6d 69 6e 75 74 65 20  he three minute 
04c0: 65 67 67 20 69 73 20 72 65 61 64 79 21 22 0d 0a  egg is ready!"..
04d0: 23 0d 0a 23 20 20 53 74 61 72 74 73 20 61 20 74  #..#  Starts a t
04e0: 68 72 65 65 20 6d 69 6e 75 74 65 20 74 69 6d 65  hree minute time
04f0: 72 20 77 69 74 68 20 74 68 65 20 73 70 65 63 69  r with the speci
0500: 66 69 65 64 20 76 6f 69 63 65 20 61 6c 65 72 74  fied voice alert
0510: 20 61 74 20 74 68 65 20 65 6e 64 0d 0a 23 0d 0a   at the end..#..
0520: 23 2e 45 78 61 6d 70 6c 65 0d 0a 23 20 20 53 74  #.Example..#  St
0530: 61 72 74 2d 42 6f 6f 74 73 54 69 6d 65 72 20 20  art-BootsTimer  
0540: 2d 45 6e 64 20 22 54 68 65 20 74 68 72 65 65 20  -End "The three 
0550: 6d 69 6e 75 74 65 20 65 67 67 20 69 73 20 72 65  minute egg is re
0560: 61 64 79 21 22 20 2d 4d 69 6e 75 74 65 20 33 0d  ady!" -Minute 3.
0570: 0a 23 0d 0a 23 20 20 53 74 61 72 74 73 20 61 20  .#..#  Starts a 
0580: 74 68 72 65 65 20 6d 69 6e 75 74 65 20 74 69 6d  three minute tim
0590: 65 72 20 77 69 74 68 20 74 68 65 20 73 70 65 63  er with the spec
05a0: 69 66 69 65 64 20 76 6f 69 63 65 20 61 6c 65 72  ified voice aler
05b0: 74 20 61 74 20 74 68 65 20 65 6e 64 0d 0a 23 0d  t at the end..#.
05c0: 0a 23 2e 45 78 61 6d 70 6c 65 0d 0a 23 20 20 53  .#.Example..#  S
05d0: 74 61 72 74 2d 42 6f 6f 74 73 54 69 6d 65 72 20  tart-BootsTimer 
05e0: 20 22 59 6f 75 72 20 74 75 72 6e 20 69 73 20 6f   "Your turn is o
05f0: 76 65 72 21 22 20 2d 4d 69 6e 75 74 65 73 20 31  ver!" -Minutes 1
0600: 30 20 2d 53 69 6e 67 6c 65 20 2d 46 6f 6e 74 53  0 -Single -FontS
0610: 69 7a 65 20 31 38 0d 0a 23 0d 0a 23 20 20 53 74  ize 18..#..#  St
0620: 61 72 74 73 20 61 20 31 30 20 6d 69 6e 75 74 65  arts a 10 minute
0630: 20 74 69 6d 65 72 20 74 68 61 74 20 6f 6e 6c 79   timer that only
0640: 20 70 6c 61 79 73 20 74 68 65 20 61 6c 65 72 74   plays the alert
0650: 20 6f 6e 63 65 20 61 74 20 74 68 65 20 65 6e 64   once at the end
0660: 2c 20 61 6e 64 20 68 61 73 20 61 20 73 6d 61 6c  , and has a smal
0670: 6c 20 66 6f 6e 74 2c 20 77 68 69 63 68 20 77 6f  l font, which wo
0680: 75 6c 64 20 66 69 74 20 6f 76 65 72 20 74 68 65  uld fit over the
0690: 20 74 61 73 6b 20 62 61 72 20 6f 72 20 61 20 77   task bar or a w
06a0: 69 6e 64 6f 77 20 74 69 74 6c 65 20 62 61 72 2e  indow title bar.
06b0: 2e 2e 0d 0a 5b 43 6d 64 6c 65 74 42 69 6e 64 69  ....[CmdletBindi
06c0: 6e 67 28 44 65 66 61 75 6c 74 50 61 72 61 6d 65  ng(DefaultParame
06d0: 74 65 72 53 65 74 4e 61 6d 65 3d 22 54 69 6d 65  terSetName="Time
06e0: 73 22 29 5d 0d 0a 50 41 52 41 4d 28 20 0d 0a 20  s")]..PARAM( .. 
06f0: 20 20 5b 50 61 72 61 6d 65 74 65 72 28 50 6f 73    [Parameter(Pos
0700: 69 74 69 6f 6e 3d 32 2c 50 61 72 61 6d 65 74 65  ition=2,Paramete
0710: 72 53 65 74 4e 61 6d 65 3d 22 54 69 6d 65 73 22  rSetName="Times"
0720: 2c 4d 61 6e 64 61 74 6f 72 79 3d 24 66 61 6c 73  ,Mandatory=$fals
0730: 65 29 5d 0d 0a 20 20 20 5b 50 61 72 61 6d 65 74  e)]..   [Paramet
0740: 65 72 28 50 6f 73 69 74 69 6f 6e 3d 31 2c 50 61  er(Position=1,Pa
0750: 72 61 6d 65 74 65 72 53 65 74 4e 61 6d 65 3d 22  rameterSetName="
0760: 52 65 61 73 6f 6e 73 22 2c 20 4d 61 6e 64 61 74  Reasons", Mandat
0770: 6f 72 79 3d 24 74 72 75 65 29 5d 0d 0a 20 20 20  ory=$true)]..   
0780: 5b 73 74 72 69 6e 67 5d 24 45 6e 64 4d 65 73 73  [string]$EndMess
0790: 61 67 65 0d 0a 2c 20 20 0d 0a 20 20 20 5b 50 61  age..,  ..   [Pa
07a0: 72 61 6d 65 74 65 72 28 50 6f 73 69 74 69 6f 6e  rameter(Position
07b0: 3d 32 2c 50 61 72 61 6d 65 74 65 72 53 65 74 4e  =2,ParameterSetN
07c0: 61 6d 65 3d 22 52 65 61 73 6f 6e 73 22 2c 20 4d  ame="Reasons", M
07d0: 61 6e 64 61 74 6f 72 79 3d 24 66 61 6c 73 65 29  andatory=$false)
07e0: 5d 0d 0a 20 20 20 5b 73 74 72 69 6e 67 5d 24 53  ]..   [string]$S
07f0: 74 61 72 74 4d 65 73 73 61 67 65 0d 0a 2c 20 20  tartMessage..,  
0800: 0d 0a 20 20 20 5b 50 61 72 61 6d 65 74 65 72 28  ..   [Parameter(
0810: 50 6f 73 69 74 69 6f 6e 3d 33 2c 50 61 72 61 6d  Position=3,Param
0820: 65 74 65 72 53 65 74 4e 61 6d 65 3d 22 52 65 61  eterSetName="Rea
0830: 73 6f 6e 73 22 2c 20 4d 61 6e 64 61 74 6f 72 79  sons", Mandatory
0840: 3d 24 66 61 6c 73 65 29 5d 0d 0a 20 20 20 5b 69  =$false)]..   [i
0850: 6e 74 5d 24 6d 69 6e 75 74 65 73 20 20 20 3d 20  nt]$minutes   = 
0860: 30 0d 0a 2c 0d 0a 20 20 20 5b 50 61 72 61 6d 65  0..,..   [Parame
0870: 74 65 72 28 50 6f 73 69 74 69 6f 6e 3d 34 2c 50  ter(Position=4,P
0880: 61 72 61 6d 65 74 65 72 53 65 74 4e 61 6d 65 3d  arameterSetName=
0890: 22 52 65 61 73 6f 6e 73 22 2c 20 4d 61 6e 64 61  "Reasons", Manda
08a0: 74 6f 72 79 3d 24 66 61 6c 73 65 29 5d 0d 0a 20  tory=$false)].. 
08b0: 20 20 5b 50 61 72 61 6d 65 74 65 72 28 50 6f 73    [Parameter(Pos
08c0: 69 74 69 6f 6e 3d 31 2c 50 61 72 61 6d 65 74 65  ition=1,Paramete
08d0: 72 53 65 74 4e 61 6d 65 3d 22 54 69 6d 65 73 22  rSetName="Times"
08e0: 2c 20 4d 61 6e 64 61 74 6f 72 79 3d 24 74 72 75  , Mandatory=$tru
08f0: 65 29 5d 0d 0a 20 20 20 5b 69 6e 74 5d 24 73 65  e)]..   [int]$se
0900: 63 6f 6e 64 73 20 20 20 3d 20 30 0d 0a 2c 0d 0a  conds   = 0..,..
0910: 20 20 20 5b 50 61 72 61 6d 65 74 65 72 28 29 5d     [Parameter()]
0920: 0d 0a 20 20 20 5b 69 6e 74 5d 24 68 6f 75 72 73  ..   [int]$hours
0930: 20 20 20 20 20 3d 20 30 0d 0a 2c 0d 0a 20 20 20       = 0..,..   
0940: 5b 50 61 72 61 6d 65 74 65 72 28 29 5d 0d 0a 20  [Parameter()].. 
0950: 20 20 24 53 6f 75 6e 64 46 69 6c 65 20 3d 20 22    $SoundFile = "
0960: 24 65 6e 76 3a 53 79 73 74 65 6d 52 6f 6f 74 5c  $env:SystemRoot\
0970: 4d 65 64 69 61 5c 6e 6f 74 69 66 79 2e 77 61 76  Media\notify.wav
0980: 22 0d 0a 2c 0d 0a 20 20 20 5b 50 61 72 61 6d 65  "..,..   [Parame
0990: 74 65 72 28 29 5d 0d 0a 20 20 20 24 46 6f 6e 74  ter()]..   $Font
09a0: 53 69 7a 65 20 3d 20 31 32 35 0d 0a 2c 20 0d 0a  Size = 125.., ..
09b0: 20 20 20 5b 50 61 72 61 6d 65 74 65 72 28 29 5d     [Parameter()]
09c0: 0d 0a 20 20 20 5b 53 77 69 74 63 68 5d 24 53 69  ..   [Switch]$Si
09d0: 6e 67 6c 65 41 6c 61 72 6d 0d 0a 29 0d 0a 0d 0a  ngleAlarm..)....
09e0: 23 20 44 65 66 61 75 6c 74 20 74 6f 20 31 30 20  # Default to 10 
09f0: 73 65 63 6f 6e 64 73 20 2e 2e 2e 20 77 69 74 68  seconds ... with
0a00: 6f 75 74 20 61 64 64 69 6e 67 20 35 20 73 65 63  out adding 5 sec
0a10: 6f 6e 64 73 20 77 68 65 6e 20 70 65 6f 70 6c 65  onds when people
0a20: 20 73 70 65 63 69 66 79 20 6d 69 6e 75 74 65 73   specify minutes
0a30: 0d 0a 69 66 28 28 24 73 65 63 6f 6e 64 73 20 2b  ..if(($seconds +
0a40: 20 24 4d 69 6e 75 74 65 73 20 2b 20 24 68 6f 75   $Minutes + $hou
0a50: 72 73 29 20 2d 65 71 20 30 29 20 7b 20 24 73 65  rs) -eq 0) { $se
0a60: 63 6f 6e 64 73 20 3d 20 31 30 20 7d 0d 0a 0d 0a  conds = 10 }....
0a70: 24 73 74 61 72 74 20 3d 20 5b 44 61 74 65 54 69  $start = [DateTi
0a80: 6d 65 5d 3a 3a 4e 6f 77 0d 0a 23 23 20 57 65 20  me]::Now..## We 
0a90: 68 61 76 65 20 74 6f 20 73 74 6f 72 65 20 61 6c  have to store al
0aa0: 6c 20 74 68 69 73 20 73 74 75 66 66 2c 20 62 65  l this stuff, be
0ab0: 63 61 75 73 65 20 74 68 65 20 70 6f 77 65 72 62  cause the powerb
0ac0: 6f 6f 74 73 20 77 69 6e 64 6f 77 20 6c 61 73 74  oots window last
0ad0: 73 20 6c 6f 6e 67 65 72 20 74 68 61 6e 20 74 68  s longer than th
0ae0: 65 20 73 63 72 69 70 74 0d 0a 24 54 69 6d 65 72  e script..$Timer
0af0: 53 74 75 66 66 20 3d 20 40 7b 7d 0d 0a 24 54 69  Stuff = @{}..$Ti
0b00: 6d 65 72 53 74 75 66 66 5b 22 73 65 63 6f 6e 64  merStuff["second
0b10: 73 22 5d 20 3d 20 5b 4d 61 74 68 5d 3a 3a 41 62  s"] = [Math]::Ab
0b20: 73 28 24 73 65 63 6f 6e 64 73 29 20 2b 20 5b 4d  s($seconds) + [M
0b30: 61 74 68 5d 3a 3a 41 62 73 28 5b 69 6e 74 5d 28  ath]::Abs([int](
0b40: 24 6d 69 6e 75 74 65 73 2a 36 30 29 29 20 2b 20  $minutes*60)) + 
0b50: 5b 4d 61 74 68 5d 3a 3a 41 62 73 28 5b 69 6e 74  [Math]::Abs([int
0b60: 5d 28 24 68 6f 75 72 73 2a 36 30 2a 36 30 29 29  ]($hours*60*60))
0b70: 0d 0a 24 54 69 6d 65 72 53 74 75 66 66 5b 22 54  ..$TimerStuff["T
0b80: 69 6d 65 72 45 6e 64 22 5d 20 3d 20 24 73 74 61  imerEnd"] = $sta
0b90: 72 74 2e 41 64 64 53 65 63 6f 6e 64 73 28 20 24  rt.AddSeconds( $
0ba0: 54 69 6d 65 72 53 74 75 66 66 5b 22 73 65 63 6f  TimerStuff["seco
0bb0: 6e 64 73 22 5d 20 29 0d 0a 24 54 69 6d 65 72 53  nds"] )..$TimerS
0bc0: 74 75 66 66 5b 22 53 69 6e 67 6c 65 41 6c 61 72  tuff["SingleAlar
0bd0: 6d 22 5d 20 3d 20 24 53 69 6e 67 6c 65 41 6c 61  m"] = $SingleAla
0be0: 72 6d 0d 0a 0d 0a 23 23 20 54 61 6b 65 20 63 61  rm....## Take ca
0bf0: 72 65 20 6f 66 20 61 73 20 6d 75 63 68 20 6f 76  re of as much ov
0c00: 65 72 68 65 61 64 20 61 73 20 77 65 20 63 61 6e  erhead as we can
0c10: 20 62 65 66 6f 72 65 20 77 65 20 6e 65 65 64 20   before we need 
0c20: 69 74 2e 2e 2e 0d 0a 69 66 28 54 65 73 74 2d 50  it.....if(Test-P
0c30: 61 74 68 20 24 73 6f 75 6e 64 46 69 6c 65 29 20  ath $soundFile) 
0c40: 7b 0d 0a 20 20 20 24 54 69 6d 65 72 53 74 75 66  {..   $TimerStuf
0c50: 66 5b 22 53 6f 75 6e 64 22 5d 20 3d 20 6e 65 77  f["Sound"] = new
0c60: 2d 4f 62 6a 65 63 74 20 53 79 73 74 65 6d 2e 4d  -Object System.M
0c70: 65 64 69 61 2e 53 6f 75 6e 64 50 6c 61 79 65 72  edia.SoundPlayer
0c80: 0d 0a 20 20 20 24 54 69 6d 65 72 53 74 75 66 66  ..   $TimerStuff
0c90: 5b 22 53 6f 75 6e 64 22 5d 2e 53 6f 75 6e 64 4c  ["Sound"].SoundL
0ca0: 6f 63 61 74 69 6f 6e 3d 24 53 6f 75 6e 64 46 69  ocation=$SoundFi
0cb0: 6c 65 0d 0a 7d 0d 0a 69 66 28 24 45 6e 64 4d 65  le..}..if($EndMe
0cc0: 73 73 61 67 65 20 2d 6f 72 20 24 53 74 61 72 74  ssage -or $Start
0cd0: 4d 65 73 73 61 67 65 29 20 7b 0d 0a 20 20 20 24  Message) {..   $
0ce0: 54 69 6d 65 72 53 74 75 66 66 5b 22 56 6f 69 63  TimerStuff["Voic
0cf0: 65 22 5d 20 3d 20 6e 65 77 2d 6f 62 6a 65 63 74  e"] = new-object
0d00: 20 2d 63 6f 6d 20 53 41 50 49 2e 53 70 56 6f 69   -com SAPI.SpVoi
0d10: 63 65 0d 0a 7d 0d 0a 23 23 20 43 72 65 61 74 65  ce..}..## Create
0d20: 20 61 6e 64 20 73 74 6f 72 65 20 61 20 73 63 72   and store a scr
0d30: 69 70 74 62 6c 6f 63 6b 20 74 6f 20 66 69 67 75  iptblock to figu
0d40: 72 65 20 6f 75 74 20 74 68 65 20 72 65 6d 61 69  re out the remai
0d50: 6e 69 6e 67 20 74 69 6d 65 20 61 6e 64 20 66 6f  ning time and fo
0d60: 72 6d 61 74 20 69 74 0d 0a 24 54 69 6d 65 72 53  rmat it..$TimerS
0d70: 74 75 66 66 5b 22 4e 6f 77 46 75 6e 63 74 69 6f  tuff["NowFunctio
0d80: 6e 22 5d 20 3d 20 7b 20 0d 0a 20 20 20 24 64 69  n"] = { ..   $di
0d90: 66 66 20 3d 20 24 42 6f 6f 74 73 54 69 6d 65 72  ff = $BootsTimer
0da0: 2e 54 61 67 5b 22 54 69 6d 65 72 45 6e 64 22 5d  .Tag["TimerEnd"]
0db0: 20 2d 20 5b 44 61 74 65 54 69 6d 65 5d 3a 3a 4e   - [DateTime]::N
0dc0: 6f 77 3b 0d 0a 20 20 20 24 64 69 66 66 2e 54 6f  ow;..   $diff.To
0dd0: 74 61 6c 53 65 63 6f 6e 64 73 0d 0a 20 20 20 69  talSeconds..   i
0de0: 66 28 24 64 69 66 66 2e 54 69 63 6b 73 20 2d 67  f($diff.Ticks -g
0df0: 65 20 30 29 20 7b 0d 0a 20 20 20 20 20 20 28 5b  e 0) {..      ([
0e00: 44 61 74 65 54 69 6d 65 5d 24 64 69 66 66 2e 54  DateTime]$diff.T
0e10: 69 63 6b 73 29 2e 54 6f 53 74 72 69 6e 67 28 22  icks).ToString("
0e20: 20 48 48 3a 6d 6d 2e 73 73 22 29 0d 0a 20 20 20   HH:mm.ss")..   
0e30: 7d 20 65 6c 73 65 20 7b 0d 0a 20 20 20 20 20 20  } else {..      
0e40: 28 5b 44 61 74 65 54 69 6d 65 5d 5b 4d 61 74 68  ([DateTime][Math
0e50: 5d 3a 3a 41 62 73 28 24 64 69 66 66 2e 54 69 63  ]::Abs($diff.Tic
0e60: 6b 73 29 29 2e 54 6f 53 74 72 69 6e 67 28 22 2d  ks)).ToString("-
0e70: 48 48 3a 6d 6d 2e 73 73 22 29 0d 0a 20 20 20 7d  HH:mm.ss")..   }
0e80: 0d 0a 7d 0d 0a 0d 0a 23 23 20 43 72 65 61 74 65  ..}....## Create
0e90: 20 61 6e 64 20 73 74 6f 72 65 20 61 20 73 63 72   and store a scr
0ea0: 69 70 74 62 6c 6f 63 6b 20 74 6f 20 73 6f 75 6e  iptblock to soun
0eb0: 64 20 74 68 65 20 61 6c 61 72 6d 0d 0a 24 54 69  d the alarm..$Ti
0ec0: 6d 65 72 53 74 75 66 66 5b 22 41 6c 61 72 6d 46  merStuff["AlarmF
0ed0: 75 6e 63 74 69 6f 6e 22 5d 20 3d 20 7b 0d 0a 20  unction"] = {.. 
0ee0: 20 20 69 66 28 24 42 6f 6f 74 73 54 69 6d 65 72    if($BootsTimer
0ef0: 2e 54 61 67 5b 22 53 6f 75 6e 64 22 5d 29 20 7b  .Tag["Sound"]) {
0f00: 0d 0a 20 20 20 20 20 20 24 42 6f 6f 74 73 54 69  ..      $BootsTi
0f10: 6d 65 72 2e 54 61 67 5b 22 53 6f 75 6e 64 22 5d  mer.Tag["Sound"]
0f20: 2e 50 6c 61 79 28 29 0d 0a 20 20 20 7d 20 65 6c  .Play()..   } el
0f30: 73 65 20 7b 0d 0a 20 20 20 20 20 20 5b 53 79 73  se {..      [Sys
0f40: 74 65 6d 2e 4d 65 64 69 61 2e 53 79 73 74 65 6d  tem.Media.System
0f50: 53 6f 75 6e 64 73 5d 3a 3a 45 78 63 6c 61 6d 61  Sounds]::Exclama
0f60: 74 69 6f 6e 2e 50 6c 61 79 28 29 0d 0a 20 20 20  tion.Play()..   
0f70: 7d 0d 0a 20 20 20 69 66 28 24 42 6f 6f 74 73 54  }..   if($BootsT
0f80: 69 6d 65 72 2e 54 61 67 5b 22 45 6e 64 4d 65 73  imer.Tag["EndMes
0f90: 73 61 67 65 22 5d 29 20 7b 0d 0a 20 20 20 20 20  sage"]) {..     
0fa0: 20 24 6e 75 6c 6c 20 3d 20 24 42 6f 6f 74 73 54   $null = $BootsT
0fb0: 69 6d 65 72 2e 54 61 67 5b 22 56 6f 69 63 65 22  imer.Tag["Voice"
0fc0: 5d 2e 53 70 65 61 6b 28 20 24 42 6f 6f 74 73 54  ].Speak( $BootsT
0fd0: 69 6d 65 72 2e 54 61 67 5b 22 45 6e 64 4d 65 73  imer.Tag["EndMes
0fe0: 73 61 67 65 22 5d 2c 20 31 20 29 0d 0a 20 20 20  sage"], 1 )..   
0ff0: 7d 0d 0a 7d 0d 0a 0d 0a 23 23 20 53 74 6f 72 65  }..}....## Store
1000: 20 74 68 65 20 22 45 6e 64 4d 65 73 73 61 67 65   the "EndMessage
1010: 22 20 6d 65 73 73 61 67 65 0d 0a 69 66 28 24 45  " message..if($E
1020: 6e 64 4d 65 73 73 61 67 65 29 20 7b 0d 0a 20 20  ndMessage) {..  
1030: 20 24 54 69 6d 65 72 53 74 75 66 66 5b 22 45 6e   $TimerStuff["En
1040: 64 4d 65 73 73 61 67 65 22 5d 20 3d 20 24 45 6e  dMessage"] = $En
1050: 64 4d 65 73 73 61 67 65 0d 0a 7d 0d 0a 23 23 20  dMessage..}..## 
1060: 49 66 20 74 68 65 79 20 70 72 6f 76 69 64 65 64  If they provided
1070: 20 61 20 73 65 63 6f 6e 64 20 73 74 61 74 75 73   a second status
1080: 20 6d 65 73 73 61 67 65 2c 20 72 65 61 64 20 69   message, read i
1090: 74 20 6f 75 74 20 6c 6f 75 64 0d 0a 69 66 28 24  t out loud..if($
10a0: 53 74 61 72 74 4d 65 73 73 61 67 65 29 20 7b 0d  StartMessage) {.
10b0: 0a 20 20 20 24 6e 75 6c 6c 20 3d 20 24 54 69 6d  .   $null = $Tim
10c0: 65 72 53 74 75 66 66 5b 22 56 6f 69 63 65 22 5d  erStuff["Voice"]
10d0: 2e 53 70 65 61 6b 28 20 24 53 74 61 72 74 4d 65  .Speak( $StartMe
10e0: 73 73 61 67 65 2c 20 31 20 29 0d 0a 7d 0d 0a 0d  ssage, 1 )..}...
10f0: 0a 23 23 20 4d 61 6b 65 20 74 68 65 20 77 69 6e  .## Make the win
1100: 64 6f 77 20 2e 2e 2e 0d 0a 24 47 6c 6f 62 61 6c  dow .....$Global
1110: 3a 42 6f 6f 74 73 54 69 6d 65 72 20 3d 20 62 6f  :BootsTimer = bo
1120: 6f 74 73 20 2d 57 69 6e 64 6f 77 53 74 79 6c 65  ots -WindowStyle
1130: 20 4e 6f 6e 65 20 2d 41 6c 6c 6f 77 73 54 72 61   None -AllowsTra
1140: 6e 73 70 61 72 65 6e 63 79 20 24 74 72 75 65 20  nsparency $true 
1150: 2d 54 6f 70 6d 6f 73 74 20 24 74 72 75 65 20 7b  -Topmost $true {
1160: 20 0d 0a 20 20 20 54 65 78 74 42 6c 6f 63 6b 20   ..   TextBlock 
1170: 22 22 20 2d 46 6f 6e 74 53 69 7a 65 20 24 46 6f  "" -FontSize $Fo
1180: 6e 74 53 69 7a 65 20 2d 46 6f 6e 74 46 61 6d 69  ntSize -FontFami
1190: 6c 79 20 49 6d 70 61 63 74 20 2d 6d 61 72 67 69  ly Impact -margi
11a0: 6e 20 32 30 20 20 20 20 20 20 20 20 20 20 20 20  n 20            
11b0: 20 20 20 20 60 0d 0a 20 20 20 20 20 20 20 20 20      `..         
11c0: 20 20 20 2d 42 69 74 6d 61 70 45 66 66 65 63 74     -BitmapEffect
11d0: 20 24 28 4f 75 74 65 72 47 6c 6f 77 42 69 74 6d   $(OuterGlowBitm
11e0: 61 70 45 66 66 65 63 74 20 2d 47 6c 6f 77 43 6f  apEffect -GlowCo
11f0: 6c 6f 72 20 57 68 69 74 65 20 2d 47 6c 6f 77 53  lor White -GlowS
1200: 69 7a 65 20 31 35 29 20 60 0d 0a 20 20 20 20 20  ize 15) `..     
1210: 20 20 20 20 20 20 20 2d 46 6f 72 65 67 72 6f 75         -Foregrou
1220: 6e 64 20 24 28 4c 69 6e 65 61 72 47 72 61 64 69  nd $(LinearGradi
1230: 65 6e 74 42 72 75 73 68 20 2d 53 74 61 72 74 20  entBrush -Start 
1240: 22 31 2c 31 22 20 2d 45 6e 64 20 22 30 2c 31 22  "1,1" -End "0,1"
1250: 20 7b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20   {..            
1260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47                 G
1270: 72 61 64 69 65 6e 74 53 74 6f 70 20 2d 43 6f 6c  radientStop -Col
1280: 6f 72 20 42 6c 61 63 6b 20 2d 4f 66 66 73 65 74  or Black -Offset
1290: 20 30 2e 30 0d 0a 20 20 20 20 20 20 20 20 20 20   0.0..          
12a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
12b0: 20 47 72 61 64 69 65 6e 74 53 74 6f 70 20 2d 43   GradientStop -C
12c0: 6f 6c 6f 72 20 42 6c 61 63 6b 20 2d 4f 66 66 73  olor Black -Offs
12d0: 65 74 20 30 2e 39 35 0d 0a 20 20 20 20 20 20 20  et 0.95..       
12e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
12f0: 20 20 20 20 47 72 61 64 69 65 6e 74 53 74 6f 70      GradientStop
1300: 20 2d 43 6f 6c 6f 72 20 52 65 64 20 2d 4f 66 66   -Color Red -Off
1310: 73 65 74 20 31 2e 30 0d 0a 20 20 20 20 20 20 20  set 1.0..       
1320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1330: 20 20 20 20 47 72 61 64 69 65 6e 74 53 74 6f 70      GradientStop
1340: 20 2d 43 6f 6c 6f 72 20 52 65 64 20 2d 4f 66 66   -Color Red -Off
1350: 73 65 74 20 31 2e 30 0d 0a 20 20 20 20 20 20 20  set 1.0..       
1360: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1370: 20 7d 29 20 23 20 2d 54 65 78 74 44 65 63 6f 72   }) # -TextDecor
1380: 61 74 69 6f 6e 73 20 28 5b 53 79 73 74 65 6d 2e  ations ([System.
1390: 57 69 6e 64 6f 77 73 2e 54 65 78 74 44 65 63 6f  Windows.TextDeco
13a0: 72 61 74 69 6f 6e 73 5d 3a 3a 55 6e 64 65 72 6c  rations]::Underl
13b0: 69 6e 65 29 0d 0a 0d 0a 7d 20 2d 4f 6e 5f 4d 6f  ine)....} -On_Mo
13c0: 75 73 65 44 6f 77 6e 20 7b 20 0d 0a 20 20 20 69  useDown { ..   i
13d0: 66 28 24 5f 2e 43 68 61 6e 67 65 64 42 75 74 74  f($_.ChangedButt
13e0: 6f 6e 20 2d 65 71 20 22 4c 65 66 74 22 29 20 7b  on -eq "Left") {
13f0: 20 24 74 68 69 73 2e 44 72 61 67 4d 6f 76 65 28   $this.DragMove(
1400: 29 20 20 7d 0d 0a 7d 20 2d 4f 6e 5f 43 6c 6f 73  )  }..} -On_Clos
1410: 65 20 7b 0d 0a 20 20 20 24 74 68 69 73 2e 54 61  e {..   $this.Ta
1420: 67 5b 22 54 69 6d 65 72 22 5d 2e 53 74 6f 70 28  g["Timer"].Stop(
1430: 29 0d 0a 20 20 20 52 65 6d 6f 76 65 2d 42 6f 6f  )..   Remove-Boo
1440: 74 73 57 69 6e 64 6f 77 20 24 74 68 69 73 0d 0a  tsWindow $this..
1450: 7d 20 2d 41 73 79 6e 63 20 2d 50 6f 70 75 70 20  } -Async -Popup 
1460: 2d 50 61 73 73 74 68 72 75 20 2d 42 61 63 6b 67  -Passthru -Backg
1470: 72 6f 75 6e 64 20 54 72 61 6e 73 70 61 72 65 6e  round Transparen
1480: 74 20 2d 53 68 6f 77 49 6e 54 61 73 6b 62 61 72  t -ShowInTaskbar
1490: 20 24 46 61 6c 73 65 20 2d 54 61 67 20 24 54 69   $False -Tag $Ti
14a0: 6d 65 72 53 74 75 66 66 20 0d 0a 0d 0a 23 23 20  merStuff ....## 
14b0: 4e 6f 77 20 77 65 20 6e 65 65 64 20 74 6f 20 63  Now we need to c
14c0: 61 6c 6c 20 74 68 61 74 20 73 63 72 69 70 74 62  all that scriptb
14d0: 6c 6f 63 6b 20 6f 6e 20 61 20 74 69 6d 65 72 2e  lock on a timer.
14e0: 20 54 68 61 74 27 73 20 65 61 73 79 2c 20 62 75   That's easy, bu
14f0: 74 20 69 74 0d 0a 23 23 20 6d 75 73 74 20 62 65  t it..## must be
1500: 20 64 6f 6e 65 20 6f 6e 20 74 68 65 20 77 69 6e   done on the win
1510: 64 6f 77 27 73 20 74 68 72 65 61 64 2c 20 73 6f  dow's thread, so
1520: 20 77 65 20 75 73 65 20 49 6e 76 6f 6b 65 2d 42   we use Invoke-B
1530: 6f 6f 74 73 57 69 6e 64 6f 77 2e 0d 0a 23 23 20  ootsWindow...## 
1540: 4e 6f 74 69 63 65 20 74 68 65 20 66 69 72 73 74  Notice the first
1550: 20 61 72 67 75 6d 65 6e 74 20 69 73 20 74 68 65   argument is the
1560: 20 77 69 6e 64 6f 77 20 77 65 20 77 61 6e 74 20   window we want 
1570: 74 6f 20 72 75 6e 20 74 68 65 20 73 63 72 69 70  to run the scrip
1580: 74 20 69 6e 0d 0a 49 6e 76 6f 6b 65 2d 42 6f 6f  t in..Invoke-Boo
1590: 74 73 57 69 6e 64 6f 77 20 24 42 6f 6f 74 73 54  tsWindow $BootsT
15a0: 69 6d 65 72 20 7b 0d 0a 20 20 20 23 23 20 57 65  imer {..   ## We
15b0: 27 6c 6c 20 63 72 65 61 74 65 20 61 20 74 69 6d  'll create a tim
15c0: 65 72 0d 0a 20 20 20 24 42 6f 6f 74 73 54 69 6d  er..   $BootsTim
15d0: 65 72 2e 54 61 67 5b 22 54 69 6d 65 72 22 5d 20  er.Tag["Timer"] 
15e0: 3d 20 6e 65 77 2d 6f 62 6a 65 63 74 20 53 79 73  = new-object Sys
15f0: 74 65 6d 2e 57 69 6e 64 6f 77 73 2e 54 68 72 65  tem.Windows.Thre
1600: 61 64 69 6e 67 2e 44 69 73 70 61 74 63 68 65 72  ading.Dispatcher
1610: 54 69 6d 65 72 0d 0a 20 20 20 24 42 6f 6f 74 73  Timer..   $Boots
1620: 54 69 6d 65 72 2e 54 61 67 5b 22 54 69 6d 65 72  Timer.Tag["Timer
1630: 22 5d 2e 49 6e 74 65 72 76 61 6c 20 3d 20 5b 54  "].Interval = [T
1640: 69 6d 65 53 70 61 6e 5d 22 30 3a 30 3a 30 2e 30  imeSpan]"0:0:0.0
1650: 35 22 0d 0a 20 20 20 23 23 20 41 6e 64 20 77 69  5"..   ## And wi
1660: 6c 6c 20 69 6e 76 6f 6b 65 20 74 68 65 20 24 75  ll invoke the $u
1670: 70 64 61 74 65 42 6c 6f 63 6b 0d 0a 20 20 20 24  pdateBlock..   $
1680: 42 6f 6f 74 73 54 69 6d 65 72 2e 54 61 67 5b 22  BootsTimer.Tag["
1690: 54 69 6d 65 72 22 5d 2e 41 64 64 5f 54 69 63 6b  Timer"].Add_Tick
16a0: 28 20 7b 20 0d 0a 20 20 20 20 20 20 74 72 61 70  ( { ..      trap
16b0: 20 7b 20 0d 0a 20 20 20 20 20 20 20 20 20 77 72   { ..         wr
16c0: 69 74 65 2d 68 6f 73 74 20 22 45 72 72 6f 72 3a  ite-host "Error:
16d0: 20 24 5f 22 20 2d 66 6f 72 65 20 52 65 64 20 0d   $_" -fore Red .
16e0: 0a 20 20 20 20 20 20 20 20 20 77 72 69 74 65 2d  .         write-
16f0: 68 6f 73 74 20 24 28 24 5f 2e 45 78 63 65 70 74  host $($_.Except
1700: 69 6f 6e 2e 53 74 61 63 6b 54 72 61 63 65 20 7c  ion.StackTrace |
1710: 20 4f 75 74 2d 53 74 72 69 6e 67 29 20 2d 66 6f   Out-String) -fo
1720: 72 65 20 52 65 64 20 0d 0a 20 20 20 20 20 20 7d  re Red ..      }
1730: 0d 0a 20 20 20 20 20 20 24 72 65 6d 61 69 6e 2c  ..      $remain,
1740: 20 24 42 6f 6f 74 73 54 69 6d 65 72 2e 43 6f 6e   $BootsTimer.Con
1750: 74 65 6e 74 2e 54 65 78 74 20 3d 20 26 20 24 42  tent.Text = & $B
1760: 6f 6f 74 73 54 69 6d 65 72 2e 54 61 67 5b 22 4e  ootsTimer.Tag["N
1770: 6f 77 46 75 6e 63 74 69 6f 6e 22 5d 20 0d 0a 20  owFunction"] .. 
1780: 20 20 20 20 20 24 72 65 6d 61 69 6e 20 3d 20 24       $remain = $
1790: 72 65 6d 61 69 6e 20 2f 20 24 42 6f 6f 74 73 54  remain / $BootsT
17a0: 69 6d 65 72 2e 54 61 67 5b 22 73 65 63 6f 6e 64  imer.Tag["second
17b0: 73 22 5d 0d 0a 20 20 20 20 20 20 23 23 20 4d 6f  s"]..      ## Mo
17c0: 76 65 20 74 68 65 20 67 72 61 64 69 65 6e 74 20  ve the gradient 
17d0: 61 20 6c 69 74 74 6c 65 20 62 69 74 20 65 61 63  a little bit eac
17e0: 68 20 74 69 6d 65 2e 0d 0a 20 20 20 20 20 20 24  h time...      $
17f0: 42 6f 6f 74 73 54 69 6d 65 72 2e 43 6f 6e 74 65  BootsTimer.Conte
1800: 6e 74 2e 46 6f 72 65 67 72 6f 75 6e 64 2e 47 72  nt.Foreground.Gr
1810: 61 64 69 65 6e 74 53 74 6f 70 73 5b 32 5d 2e 4f  adientStops[2].O
1820: 66 66 73 65 74 20 3d 20 5b 4d 61 74 68 5d 3a 3a  ffset = [Math]::
1830: 4d 61 78 28 30 2e 30 2c 20 24 72 65 6d 61 69 6e  Max(0.0, $remain
1840: 29 0d 0a 20 20 20 20 20 20 24 42 6f 6f 74 73 54  )..      $BootsT
1850: 69 6d 65 72 2e 43 6f 6e 74 65 6e 74 2e 46 6f 72  imer.Content.For
1860: 65 67 72 6f 75 6e 64 2e 47 72 61 64 69 65 6e 74  eground.Gradient
1870: 53 74 6f 70 73 5b 31 5d 2e 4f 66 66 73 65 74 20  Stops[1].Offset 
1880: 3d 20 5b 4d 61 74 68 5d 3a 3a 4d 61 78 28 30 2e  = [Math]::Max(0.
1890: 30 2c 20 24 72 65 6d 61 69 6e 20 2d 20 30 2e 30  0, $remain - 0.0
18a0: 35 29 0d 0a 20 20 20 20 20 20 23 23 20 57 68 65  5)..      ## Whe
18b0: 6e 20 77 65 20 67 65 74 20 74 6f 20 74 68 65 20  n we get to the 
18c0: 65 6e 64 20 2e 2e 2e 20 6d 61 6b 65 20 61 20 66  end ... make a f
18d0: 65 77 20 63 68 61 6e 67 65 73 0d 0a 20 20 20 20  ew changes..    
18e0: 20 20 69 66 28 24 72 65 6d 61 69 6e 20 2d 6c 65    if($remain -le
18f0: 20 30 29 20 7b 0d 0a 20 20 20 20 20 20 20 20 20   0) {..         
1900: 23 23 20 54 68 65 20 66 69 72 73 74 20 74 69 6d  ## The first tim
1910: 65 20 77 65 20 68 69 74 20 74 68 65 20 65 6e 64  e we hit the end
1920: 2c 20 77 65 20 77 61 6e 74 20 74 6f 20 61 64 64  , we want to add
1930: 20 61 20 6d 6f 75 73 65 20 63 6c 69 63 6b 20 68   a mouse click h
1940: 61 6e 64 6c 65 72 2e 2e 2e 0d 0a 20 20 20 20 20  andler.....     
1950: 20 20 20 20 69 66 28 24 74 68 69 73 2e 49 6e 74      if($this.Int
1960: 65 72 76 61 6c 2e 53 65 63 6f 6e 64 73 20 2d 65  erval.Seconds -e
1970: 71 20 30 29 20 7b 0d 0a 20 20 20 20 20 20 20 20  q 0) {..        
1980: 20 20 20 20 23 23 20 57 68 69 63 68 20 77 69 6c      ## Which wil
1990: 6c 20 6e 6f 77 20 6f 6e 6c 79 20 66 69 72 65 20  l now only fire 
19a0: 65 76 65 72 79 20 66 65 77 20 73 65 63 6f 6e 64  every few second
19b0: 73 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 23  s..            #
19c0: 23 20 53 6f 20 69 74 27 73 20 65 61 73 69 65 72  # So it's easier
19d0: 20 74 6f 20 63 6c 6f 73 65 20 74 68 65 20 77 69   to close the wi
19e0: 6e 64 6f 77 20 3b 29 0d 0a 20 20 20 20 20 20 20  ndow ;)..       
19f0: 20 20 20 20 20 24 74 68 69 73 2e 49 6e 74 65 72       $this.Inter
1a00: 76 61 6c 20 3d 20 5b 54 69 6d 65 53 70 61 6e 5d  val = [TimeSpan]
1a10: 22 30 3a 30 3a 32 22 0d 0a 20 20 20 20 20 20 20  "0:0:2"..       
1a20: 20 20 20 20 20 23 23 20 49 66 20 79 6f 75 20 63       ## If you c
1a30: 6c 69 63 6b 20 6f 6e 20 74 68 65 20 66 69 6e 69  lick on the fini
1a40: 73 68 65 64 20 77 69 6e 64 6f 77 2c 20 69 74 20  shed window, it 
1a50: 6a 75 73 74 20 67 6f 65 73 20 61 77 61 79 0d 0a  just goes away..
1a60: 20 20 20 20 20 20 20 20 20 20 20 20 24 42 6f 6f              $Boo
1a70: 74 73 54 69 6d 65 72 2e 41 64 64 5f 4d 6f 75 73  tsTimer.Add_Mous
1a80: 65 44 6f 77 6e 28 20 7b 20 24 42 6f 6f 74 73 54  eDown( { $BootsT
1a90: 69 6d 65 72 2e 43 6c 6f 73 65 28 29 20 7d 20 29  imer.Close() } )
1aa0: 20 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 23   ..            #
1ab0: 23 20 42 75 74 20 69 66 20 74 68 65 79 20 63 68  # But if they ch
1ac0: 6f 73 65 20 2d 53 69 6e 67 6c 65 41 6c 61 72 6d  ose -SingleAlarm
1ad0: 2c 20 74 68 65 79 20 64 6f 6e 27 74 20 6e 65 65  , they don't nee
1ae0: 74 6f 20 62 6f 74 68 65 72 0d 0a 20 20 20 20 20  to bother..     
1af0: 20 20 20 20 20 20 20 69 66 28 24 42 6f 6f 74 73         if($Boots
1b00: 54 69 6d 65 72 2e 54 61 67 5b 22 53 69 6e 67 6c  Timer.Tag["Singl
1b10: 65 41 6c 61 72 6d 22 5d 29 20 7b 20 24 42 6f 6f  eAlarm"]) { $Boo
1b20: 74 73 54 69 6d 65 72 2e 43 6c 6f 73 65 28 29 20  tsTimer.Close() 
1b30: 7d 0d 0a 20 20 20 20 20 20 20 20 20 7d 0d 0a 20  }..         }.. 
1b40: 20 20 20 20 20 20 20 20 26 20 24 42 6f 6f 74 73          & $Boots
1b50: 54 69 6d 65 72 2e 54 61 67 5b 22 41 6c 61 72 6d  Timer.Tag["Alarm
1b60: 46 75 6e 63 74 69 6f 6e 22 5d 0d 0a 20 20 20 20  Function"]..    
1b70: 20 20 7d 0d 0a 20 20 20 7d 20 29 0d 0a 20 20 20    }..   } )..   
1b80: 23 23 20 4e 6f 77 20 73 74 61 72 74 20 74 68 65  ## Now start the
1b90: 20 74 69 6d 65 72 20 72 75 6e 6e 69 6e 67 0d 0a   timer running..
1ba0: 20 20 20 24 42 6f 6f 74 73 54 69 6d 65 72 2e 54     $BootsTimer.T
1bb0: 61 67 5b 22 54 69 6d 65 72 22 5d 2e 53 74 61 72  ag["Timer"].Star
1bc0: 74 28 29 0d 0a 7d 0d 0a 7d 0d 0a                 t()..}..}..