$name = Read-Host "nickname"
$quality = "best"
$dir = "D:\Records"
$waiting = 30
$serverA = "https://3.livacha.com/hls"
$serverB = "https://5.livacha.com/hls"
$url = "https://livacha.com/chat/$name"
$cookies = @{
    "Cookie" = "livacha=XXXXXXXXXX"
}

while ($true) {
	Clear-Host
	$html = $null
	try {
		$html = Invoke-WebRequest -UseBasicParsing -Uri $url -Headers $cookies
	} catch {
		Write-Host "$name"
		Write-Host "Nickname is incorrect." -ForegroundColor Red
		Read-Host "Press Enter to exit"
		exit
	}
	$alias = ($html.Content) | Select-String -Pattern 'app_data.{2}room.*?,"id".*?"alias":"([a-zA-Z0-9_-]+)"' -AllMatches | Foreach {$_.Matches} | Foreach {$_.Groups[1].Value}
	$id1 = ($html.Content) | Select-String -Pattern 'app_data.{2}room.*?"owner_id":(\d+)' -AllMatches | Foreach {$_.Matches} | Foreach {$_.Groups[1].Value}
	$id2 = ($html.Content) | Select-String -Pattern 'app_data.{2}room.*?,"id":(\d+)' -AllMatches | Foreach {$_.Matches} | Foreach {$_.Groups[1].Value}
	$datetime = Get-Date -format yyyy-MM-dd_HH-mm-ss
	$file = "{0}_Livacha_{1}.ts" -f $alias, $datetime
	Write-Host "$alias" -ForegroundColor Cyan
	Write-Host "Livacha"
	Write-Host "==============="
	$Host.UI.RawUI.WindowTitle = "Rec - $file"
	$link = "$serverA/$alias" + "_" + "$id1" + "_" + "$id2.m3u8"
	streamlink.exe --stream-segment-threads 3 --url $link --default-stream $quality --output "$dir\$file"
	if ($LASTEXITCODE -ne 0) {
		$datetime = Get-Date -format yyyy-MM-dd_HH-mm-ss
		$file = "{0}_Livacha_{1}.ts" -f $alias, $datetime
		$Host.UI.RawUI.WindowTitle = "Rec - $file"
		$link = "$serverB/$alias" + "_" + "$id1" + "_" + "$id2.m3u8"
		Write-Host ""
		streamlink.exe --stream-segment-threads 3 --url $link --default-stream $quality --output "$dir\$file"
	}
	Write-Host ""
	Write-Host "Timeout $waiting seconds" -ForegroundColor Yellow
	Write-Host "Press Escape to break timeout" -ForegroundColor Green
	$timer = New-Object System.Diagnostics.Stopwatch
	$timer.Start()
	while ($timer.Elapsed.TotalSeconds -lt $waiting) {
		if ([System.Console]::KeyAvailable) {
			$key = [System.Console]::ReadKey($true)
			if ($key.Key -eq "Escape") {
				break
			}
		}
		Start-Sleep -Milliseconds 100
	}
	$timer.Stop()
}

echo off

set quality=best
set dir=D:zapisi\
set seconds=59

:loop
cls

set datetime=%date:~6,4%-%date:~3,2%-%date:~0,2%-%time:~0,2%-%time:~3,2%-%time:~6,2%
set datetime=%datetime: =0%
set file=lipakorova-%datetime%.ts
title %file%

streamlink --stream-segment-threads 3 https://5.livacha.com/hls/lipakorova_73909_108488.m3u8 %quality% -o "%dir%\%file%"

timeout %seconds%
goto loop