Find RaspberryPi's on local network from Windows

CopyPaste.ps1

# Powershell script
$nic=gwmi -computer . -class "win32_networkadapterconfiguration"|Where-Object{$_.defaultIPGateway -ne $null}
$IP=$nic.ipaddress|select-object -first 1;$Mask=$nic.ipsubnet|select-object -first 1;$IPInt=([Net.IPAddress]$IP).Address;$MaskInt=([Net.IPAddress]$Mask).Address;$start=($IPInt -band $MaskInt);$end=($IPInt -bor(-bnot [uint32]$MaskInt))-16777216;
Write-Host "Scanning $IP/$Mask...";while($start -lt $end){$start += 16777216;Test-Connection (new-object System.Net.IPAddress $start).ToString() -Count 1 -AsJob|Out-Null};Start-Sleep 1;
Write-Host "Looking up hostnames..";Get-NetNeighbor|Where-Object{$_.LinkLayerAddress.StartsWith("B8-27-EB")}|ForEacH {  [PSCustomObject]@{IP = $_.IPAddress; MAC = $_.LinkLayerAddress; Host = [System.Net.Dns]::GetHostByAddress($_.IPAddress).HostName}}

Expanded.ps1

# find local IP with default gateway
$nic=gwmi -computer . -class "win32_networkadapterconfiguration" | Where-Object{$_.defaultIPGateway -ne $null}
# get IP and subnet mask
$IP=$nic.ipaddress|select-object -first 1;
$Mask=$nic.ipsubnet|select-object -first 1;

# Note: uses obsolete and weird .NET IPAddress integer math
$IPInt=([Net.IPAddress]$IP).Address;
$MaskInt=([Net.IPAddress]$Mask).Address;
$start=($IPInt -band $MaskInt);
$end=($IPInt -bor(-bnot [uint32]$MaskInt))-16777216;

# ping each IP
Write-Host "Scanning $IP/$Mask...";
while($start -lt $end) {
    $start += 16777216;
    Test-Connection (new-object System.Net.IPAddress $start).ToString() -Count 1 -AsJob|Out-Null
};
# wait a second to ensure ARP tables get populated 
Start-Sleep 1;

# look through ARP cache 
Write-Host "Looking up hostnames..";
Get-NetNeighbor | Where-Object{$_.LinkLayerAddress.StartsWith("B8-27-EB")} | ForEacH {  
    [PSCustomObject]@{
        IP = $_.IPAddress; 
        MAC = $_.LinkLayerAddress; 
        # look up hostname
        Host = [System.Net.Dns]::GetHostByAddress($_.IPAddress).HostName
    }
}