TCPMessage4OBS_server.ps1

#############
#
# Variables
#
#############

$Global:OBSCommand = "$($PSScriptRoot)\..\OBSCommand\OBSCommand.exe"

#############
#
# Functions
#
#############


Function Receive-TCPMessage {
    Param ( 
        [Parameter(Mandatory=$true, Position=0)]
        [ValidateNotNullOrEmpty()] 
        [int] $Port
    ) 
    Process {
        Try { 
            # Set up endpoint and start listening
            $endpoint = new-object System.Net.IPEndPoint([ipaddress]::any,$port) 
            $listener = new-object System.Net.Sockets.TcpListener $EndPoint
            $listener.start() 
 
            # Wait for an incoming connection 
            $data = $listener.AcceptTcpClient() 
        
            # Stream setup
            $stream = $data.GetStream() 
            $bytes = New-Object System.Byte[] 1024

            # Read data from stream and write it to host
            while (($i = $stream.Read($bytes,0,$bytes.Length)) -ne 0){
                $EncodedText = New-Object System.Text.ASCIIEncoding
                $data = $EncodedText.GetString($bytes,0, $i)
                
                if ($data -match '=.+' -and $data -notlike "*ok*"){
                    Invoke-OBSCommand $data
                }
            }
         
            # Close TCP connection and stop listening
            $stream.close()
            $listener.stop()
        }
        Catch {
            "Receive Message failed with: `n" + $Error[0]
        }
    }
}

function Invoke-OBSCommand {
    param (
        [Parameter(Mandatory=$true, Position=0)]
        [ValidateNotNullOrEmpty()]
        [string]$command
    )
    $command = $command.Replace("`r`n",'')

    & $Global:OBSCommand  "/command$($command)"
}

#############
#
# Script
#
#############

while($true){
    Receive-TCPMessage -Port 29800
}