; Simple YouTube Title Announcer v0.1 - MMX 2022
; Requires mIRC v7.56+ (because of $urlget)
ON $*:TEXT:/(https\x3a\/\/|www\.)([\S]*youtube\.com[\S]+v\=|youtu\.be\/)([\S]{11})/Si:#:{
if ($regml(3)) {
var %url $+(https://m.youtube.com/watch?persist_app=1&app=m&v=,$regml(3))
var %id $urlget(%url,gbi,&ytdata,yt_get_title $chan)
}
}
alias -l yt_get_title {
var %chan $1, %id $2
if ($bfind($urlget(%id).target,1,/title":\{"runs":\[\{"text":"(.*?)"\}/Sig).regex) {
msg %chan 01You00,04Tube: $yt_dehex($regml(1))
}
}
alias -l yt_dehex {
var %title $regsubex($1-,/\\u(.{4})/ig,$chr($base(\1,16,10)))
return $replace(%title,\",",\\,\,\\\\,\\)
}