@echo off

set /p name=name: 

set quality=best
set dir=D:\Records
set seconds=30

:loop
cls

for /f "delims=" %%a in ('curl -ksS https://api-edge.myfreecams.com/usernameLookup/%name%') do set page=%%a
echo %page% >nul

for /f "delims=" %%a in ('echo %%page%% ^| jq -r .result.user.id') do set user_id=%%a
for /f "delims=" %%a in ('echo %%page%% ^| jq -r .result.user.access_level') do set access_level=%%a
for /f "delims=" %%a in ('echo %%page%% ^| jq -r .result.user.last_login') do set last_login=%%a
for /f "delims=" %%a in ('echo %%page%% ^| jq -r .result.user.vs') do set status=%%a

if "%user_id%"=="null" (
    echo %name% - Nickname incorrect
    echo.
    pause
    exit
)

if %access_level% neq 4 (
    echo %name% - Not model
    echo.
    pause
    exit
)

echo %name% --- MyFreeCams
echo ===========================
echo Model ID - %user_id%
echo.

if %status% equ null (
    title %name% - offline
    echo offline
    echo Last login - %last_login%
    timeout %seconds%
    goto loop
)

if %status% neq 0 (
    title %name% - private, group, away
    echo private, group, away
    timeout %seconds%
    goto loop
)

set index=0
:check_sessions

for /f "delims=" %%a in ('echo %%page%% ^| jq -r .result.user.sessions[%index%].session_id') do set session_id=%%a
for /f "delims=" %%a in ('echo %%page%% ^| jq -r .result.user.sessions[%index%].server_name') do set server_name=%%a
for /f "delims=" %%a in ('echo %%page%% ^| jq -r .result.user.sessions[%index%].phase') do set phase=%%a

if not "%server_name%"=="" (
    if not "%server_name%"=="null" (
        goto work
    )
)

if "%session_id%"=="null" (
    goto no_more_sessions
)

set /a index+=1
goto check_sessions

:no_more_sessions

echo No valid sessions found
timeout %seconds%
goto loop

:work

echo %name% - online
echo.

set server=%server_name:~5%
set /a stream_id=%user_id%+100000000

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=MFC_%name%_%datetime%.ts
title Rec - %name%_%datetime%

streamlink --stream-segment-threads 3 https://edgevideo.myfreecams.com/hls/NxServer/%server%/ngrp:mfc_%phase%%stream_id%.f4v_mobile/playlist.m3u8 %quality% -o "%dir%\%file%"

timeout %seconds%
goto loop

@echo off

set /p name=name: 

set quality=best
set dir=D:\Records
set seconds=30

curl -ksS https://profiles.myfreecams.com/%name% -o "%name%_prof.html"
findstr /c:"This profile is currently unavailable for public viewing" "%name%_prof.html" > nul

if %errorlevel%==0 (
    set geo_status=***** GeoBlock *****
) else (
    set geo_status=free
)

del "%name%_prof.html"

:loop
cls

for /f "delims=" %%a in ('curl -ksS https://api-edge.myfreecams.com/usernameLookup/%name%') do set page=%%a
echo %page% >nul

for /f "delims=" %%a in ('echo %%page%% ^| jq -r .result.user.id') do set user_id=%%a
for /f "delims=" %%a in ('echo %%page%% ^| jq -r .result.user.access_level') do set access_level=%%a
for /f "delims=" %%a in ('echo %%page%% ^| jq -r .result.user.last_login') do set last_login=%%a
for /f "delims=" %%a in ('echo %%page%% ^| jq -r .result.user.vs') do set status=%%a

if "%user_id%"=="null" (
    echo %name% - Nickname incorrect
    echo.
    pause
    exit
)

if %access_level% neq 4 (
    echo %name% - Not model
    echo.
    pause
    exit
)

echo %name% --- MyFreeCams
echo ===========================
echo Model ID - %user_id%
echo %geo_status%
echo.

if %status% equ null (
    title %name% - offline
    echo offline
    echo Last login - %last_login%
    timeout %seconds%
    goto loop
)

if %status% neq 0 (
    title %name% - private, group, away
    echo private, group, away
    timeout %seconds%
    goto loop
)

set index=0
:check_sessions

for /f "delims=" %%a in ('echo %%page%% ^| jq -r .result.user.sessions[%index%].session_id') do set session_id=%%a
for /f "delims=" %%a in ('echo %%page%% ^| jq -r .result.user.sessions[%index%].server_name') do set server_name=%%a
for /f "delims=" %%a in ('echo %%page%% ^| jq -r .result.user.sessions[%index%].phase') do set phase=%%a

if not "%server_name%"=="" (
    if not "%server_name%"=="null" (
        goto work
    )
)

if "%session_id%"=="null" (
    goto no_more_sessions
)

set /a index+=1
goto check_sessions

:no_more_sessions

echo No valid sessions found
timeout %seconds%
goto loop

:work

echo %name% - online
echo.

set server=%server_name:~5%
set /a stream_id=%user_id%+100000000

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=MFC_%name%_%datetime%.ts
title Rec - %name%_%datetime%

streamlink --stream-segment-threads 3 https://edgevideo.myfreecams.com/hls/NxServer/%server%/ngrp:mfc_%phase%%stream_id%.f4v_mobile/playlist.m3u8 %quality% -o "%dir%\%file%"

timeout %seconds%
goto loop

"sessions": [
  {
    "session_id": 509752942,
    "vstate": 90,
    "room_count": 0,
    "vidserver_id": 0,
    "room_topic": "",
    "platform_id": 1,
    "continent": "EU",
    "server_name": "",
    "server_type": null,
    "fcapp_type": null,
    "phase": "",
    "snap_url": "https://snap.mfcimg.com/snapimg//853x480/mfc_100000000"
  },
  {
    "session_id": 509541825,
    "vstate": 0,
    "room_count": 24,
    "vidserver_id": 1234,
    "room_topic": "Hi Guys! 999 till TEASE! LUSH ON! Fav vibes 75/ 130/ 244/ 307/ 440/ 523  /ass-95 /tits-115 Tip 100/1000 for push rank! All your help is very appreciable :*",
    "platform_id": 1,
    "continent": "EU",
    "server_name": "video734",
    "server_type": "v",
    "fcapp_type": 501,
    "video_server_type": "video",
    "server_is_webrtc": true,
    "phase": "",
    "snap_url": "https://snap.mfcimg.com/snapimg/734/853x480/mfc_100000000"
  }
],