@echo off
setlocal enabledelayedexpansion

set /p name=name:
set quality=best
set dir=D:\
set proxy_list=proxy-ok.txt
set call_curl="curl -s -S https://chaturbate.com/api/chatvideocontext/!name!/"
set seconds=30

for /f %%a in ('!call_curl! -w %%{content_type} -o nul') do (
  if not "%%a"=="application/json" (
    echo HTTP 404
    pause
    exit /b
  )
)

:start

set "code="
set "detail="
set "room_status="
set "hls_source="

for /f "delims=" %%a in ('!call_curl! ^| jq -r .code') do @set code=%%a

if "!code!"=="password-required" (
  cls
  title !name! - This room requires a password.
  echo Broadcaster username: !name!
  echo Code: !code!
  echo Detail: This room requires a password.
  timeout !seconds!
  goto start
)

if "!code!"=="access-denied" (

  for /f "delims=" %%a in ('!call_curl! ^| jq -r .detail') do @set detail=%%a

  if "!detail!"=="This room has been banned." (
    cls
    title !name! - !detail!
    echo Broadcaster username: !name!
    echo Code: !code!
    echo Detail: !detail!
    pause
    exit /b
  )

  if "!detail!"=="This room is not available to your region or gender." (
    cls
    title !name! - !detail!
    echo Broadcaster username: !name!
    echo Code: !code!
    echo Detail: !detail!

    if not exist %proxy_list% (
      echo %proxy_list% not found
      pause
      exit /b
    )

    for /f "usebackq delims=" %%i in ("!proxy_list!") do (
      title !name! - connecting...
      echo Connecting to proxy: %%i

      for /f "delims=" %%a in ('!call_curl! -x %%i --connect-timeout 3 ^| jq -r .room_status') do @set room_status=%%a

      if "!room_status!"=="null" (

        for /f "delims=" %%a in ('!call_curl! -x %%i ^| jq -r .code') do @set code=%%a

        if "!code!"=="password-required" (
          cls
          title !name! - This room requires a password.
          echo Broadcaster username: !name!
          echo Code: !code!
          echo Detail: This room requires a password.
          timeout !seconds!
          goto start
        ) 
      )

      if not "!room_status!"=="" (
        if not "!room_status!"=="public" (	  
          title !name! - !room_status!
          echo Room status: !room_status!
          timeout !seconds!
          goto start	  
	  
        ) else (

          echo Room status: !room_status!

          for /f "delims=" %%i in ('!call_curl! -x %%i ^| jq -r .hls_source') do @set hls_source=%%i

          if not "!hls_source!"=="" (
            set date_time=!date:~6,4!-!date:~3,2!-!date:~0,2!_!time:~0,2!-!time:~3,2!-!time:~6,2!
            set date_time=!date_time: =0!
            title !name! - recording
            streamlink --hls-segment-threads 3 !hls_source! !quality! -o "!dir!chaturbate-!name!-!date_time!.ts"
          )
        )
      )
    )

  timeout !seconds!
  goto start

  )

) else (

  for /f "delims=" %%a in ('!call_curl! ^| jq -r .room_status') do @set room_status=%%a

  if not "!room_status!"=="public" (
    cls
    title !name! - !room_status!
    echo Broadcaster username: !name!
    echo Room status: !room_status!
    timeout !seconds!
    goto start

  ) else (

    for /f "delims=" %%a in ('!call_curl! ^| jq -r .hls_source') do @set hls_source=%%a

    cls
    echo Broadcaster username: !name!
    echo Room status: !room_status!

    set date_time=!date:~6,4!-!date:~3,2!-!date:~0,2!_!time:~0,2!-!time:~3,2!-!time:~6,2!
    set date_time=!date_time: =0!
    title !name! - recording
    streamlink --hls-segment-threads 3 !hls_source! !quality! -o "!dir!chaturbate-!name!-!date_time!.ts"
    timeout !seconds!
    goto start
  )
)