Param($ip,$count,$email)
# Send Email Function
function Send-Mail{
    Param($msg,$relay,$from,$to,$subject,[switch]$html)
    $SmtpClient = new-object system.net.mail.smtpClient 
    $MailMessage = New-Object system.net.mail.mailmessage 
    $SmtpClient.Host = $relay
    $mailmessage.from = $from 
    $mailmessage.To.add($to) 
    $mailmessage.Subject = $subject
    if($html)
    {
        $mailmessage.IsBodyHtml = 1 
        $mailmessage.Body = $msg
    }
    else
    {
        $mailmessage.Body = $msg
    }
    $smtpclient.Send($mailmessage)
}
# Counter for Pings. Will ping 4 times per go.
for($i = 0;$i -lt $count;$i++)
{
    # Capture ping output in $result
    $result = ping.exe $ip
    # Send email... need to fill this out with your info
    Send-Mail -msg $result -relay -from -to -subject
    # Sleep for a Second
    Start-Sleep 1
}

Param($list = (Throw "List is required"),$count=4,$email)
# Send Email Function
function Send-Mail{
    Param($msg,$relay,$from,$to,$subject,[switch]$html)
    $SmtpClient = new-object system.net.mail.smtpClient 
    $MailMessage = New-Object system.net.mail.mailmessage 
    $SmtpClient.Host = $relay
    $mailmessage.from = $from 
    $mailmessage.To.add($to) 
    $mailmessage.Subject = $subject
    if($html)
    {
        $mailmessage.IsBodyHtml = 1 
        $mailmessage.Body = $msg
    }
    else
    {
        $mailmessage.Body = $msg
    }
    $smtpclient.Send($mailmessage)
}
function Ping-Server {
   Param([string]$server)
   $pingresult = Get-WmiObject win32_pingstatus -f "address='$Server'"
   if($pingresult.statuscode -eq 0) {$true} else {$false}
}

while($true)
{
    foreach($server in (get-Content $list))
    {
        $x = 0
        for($i=0;$i -lt 4;$i++)
        {
            $result = Ping-Server $Server
            if(!$result)
            {
                $x++
                if($x -eq 4){Send-Mail -msg "Server Failed Ping" -relay -from -to -subject}
            }
        }
    }
}

Param($list = $(Throw "List is required"),$count=4,$email,[switch]$Verbose)
# Send Email Function
function Send-Mail{
    Param($msg,$relay,$from,$to,$subject,[switch]$html)
    $SmtpClient = new-object system.net.mail.smtpClient 
    $MailMessage = New-Object system.net.mail.mailmessage 
    $SmtpClient.Host = $relay
    $mailmessage.from = $from 
    $mailmessage.To.add($to) 
    $mailmessage.Subject = $subject
    if($html)
    {
        $mailmessage.IsBodyHtml = 1 
        $mailmessage.Body = $msg
    }
    else
    {
        $mailmessage.Body = $msg
    }
    $smtpclient.Send($mailmessage)
}
function Ping-Server {
   Param([string]$server)
   $pingresult = Get-WmiObject win32_pingstatus -f "address='$Server'"
   if($pingresult.statuscode -eq 0) {$true} else {$false}
}
if($Verbose){$VerbosePreference  = "Continue"}
$status = @{}
while($true)
{
    foreach($server in (get-Content $list))
    {
        $x = 0
        Write-Verbose "Processing Server $Server"
        for($i=0;$i -lt 4;$i++)
        {
            Write-Verbose "  Ping Count $i"
            $result = Ping-Server $Server
            if(!$result)
            {
                Write-Verbose '  Ping Failed Upping $x'
                $x++
                if($x -gt 3)
                {
                    if($status.$Server -ne "Dead")
                    {
                        Write-Verbose "Setting Server Status to Dead"
                        $Status.$Server = "Dead"
                        #Send-Mail -msg "Server Change Status to Dead" -relay -from -to -subject
                    }
                }
            }
            else
            {
                if($status.$Server -ne "Alive")
                {
                    Write-Verbose "Setting Server Status to Alive"
                    $Status.$Server = "Alive"
                    #Send-Mail -msg "Server Change Status to Alive" -relay -from -to -subject
                }
            }
        }
    }
    start-Sleep 30
}

$status = @{}    # Create Hash Table
if(!$status.$server){$status.add($server,'state')}
else{$status.$server = "New State"}