Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- remove-item -path C:\VMS\cfl*
- $INTER=(Invoke-WebRequest -Uri 'https://reddit.com/r/cflstreams').Links.href | select-string -pattern http |select-string -pattern game_thread
- # write-host $INTER
- foreach ($i in $INTER)
- {
- $i = [string] $i
- write-host $i
- # Find out type of string
- # $i.GetType().FullName
- $YOUTUBE=(Invoke-WebRequest -Uri $i).Links.href | select-string -pattern youtube | select-string -pattern http | select-string -pattern watch
- #write-host $YOUTUBE
- $x=1
- foreach ( $YT in $YOUTUBE )
- {
- $YT = [string] $YT
- $YTURL,$ADDON=$YT.split("=")
- # write-host $ADDON
- $SPLITLINE=$i -split "/"
- $FILENAME=$SPLITLINE[7]
- # write-host $FILENAME
- $OUTPUT="plugin://plugin.video.youtube/?path=/root/video\&action=play_video&videoid="+$ADDON.substring(0,11)
- # write-host $OUTPUT
- $OUTPUT | out-file c:\VMs\cfl+youtube+$FILENAME+$x.strm
- write-host "https://www.youtube.com/watch?v=$ADDON"
- $x=$x+1
- }
- $YOUTUBE=(Invoke-WebRequest -Uri $i).Links.href | select-string -pattern youtu.be | select-string -pattern http
- #write-host $YOUTUBE
- foreach ( $YT in $YOUTUBE )
- {
- $YT = [string] $YT
- $YTSPLIT= $YT -split "/"
- $ADDON=$YTSPLIT[3]
- # write-host $ADDON
- $SPLITLINE=$i -split "/"
- $FILENAME=$SPLITLINE[7]
- # write-host $FILENAME
- $OUTPUT="plugin://plugin.video.youtube/?path=/root/video\&action=play_video&videoid="+$ADDON.substring(0,11)
- # write-host $OUTPUT
- $OUTPUT | out-file c:\VMs\cfl+youtube+$FILENAME+$x.strm
- write-host "https://www.youtube.com/watch?v=$ADDON"
- $x=$x+1
- }
- $GRANDMA=(Invoke-WebRequest -Uri $i).Links.href | select-string -pattern grandma.press
- # write-host $GRANDMA
- foreach ( $Y in $GRANDMA )
- {
- $Y = [string] $Y
- $SPLITLINE=$i -split "/"
- $FILENAME=$SPLITLINE[7]
- # This just tells invoke-webrequest to ignore misformatted webpages (grandma.press is guilty of this)
- $netAssembly = [Reflection.Assembly]::GetAssembly([System.Net.Configuration.SettingsSection])
- if($netAssembly)
- {
- $bindingFlags = [Reflection.BindingFlags] "Static,GetProperty,NonPublic"
- $settingsType = $netAssembly.GetType("System.Net.Configuration.SettingsSectionInternal")
- $instance = $settingsType.InvokeMember("Section", $bindingFlags, $null, $null, @())
- if($instance)
- {
- $bindingFlags = "NonPublic","Instance"
- $useUnsafeHeaderParsingField = $settingsType.GetField("useUnsafeHeaderParsing", $bindingFlags)
- if($useUnsafeHeaderParsingField)
- {
- $useUnsafeHeaderParsingField.SetValue($instance, $true)
- }
- }
- }
- # end section for bad format webpages
- $GRANDMAYOUTUBE=(Invoke-WebRequest -Uri $Y)
- $YT=$GRANDMAYOUTUBE.tostring() -split "[`r`n]" | select-string "youtube"
- $YT= [string] $YT
- $YTURL,$THEREST=$YT.split("?")
- $ADDON=$YTURL.Substring($YTURL.Length - 11)
- write-host "https://www.youtube.com/watch?v=$ADDON"
- $OUTPUT="plugin://plugin.video.youtube/?path=/root/video\&action=play_video&videoid="+$ADDON
- # write-host $OUTPUT
- $OUTPUT | out-file c:\VMs\cfl+youtube+$FILENAME+$x.strm
- $x=$x+1
- }
- $M3U8=(Invoke-WebRequest -Uri $i).Links.href | select-string -pattern m3u8
- $x=1
- foreach ( $Y in $M3U8 )
- {
- $SPLITLINE=$i -split "/"
- $FILENAME=$SPLITLINE[7]
- $Y | out-file c:\VMs\cfl+m3u8+$FILENAME+$x.strm
- write-host $Y
- $x=$x+1
- }
- # $i="https://www.reddit.com/r/soccerstreams/comments/71cseu/1900_gmt_manchester_united_vs_burton_albion/"
- $CFLACERAW=(Invoke-WebRequest -Uri $i)
- $CFLACE=$CFLACERAW.tostring() -split "[`r`n]" | select-string "acestream://"
- # write-host $CFLACE
- $x=1
- foreach ( $Y in $CFLACE )
- {
- $SPLITLINE=$i -split "/"
- $FILENAME=$SPLITLINE[7]
- $Y = [string] $Y
- $CFLACESTREAM=($Y -split "acestream://")[-1]
- # $THEREST1,$THEREST2,$CFLACESTREAMRAW=$Y.split("/")
- # $CFLACESTREAM=($CFLACESTREAMRAW.Split(" "))[0]
- # write-host "CFLACESTREAM= " $CFLACESTREAM
- if ($CFLACESTREAM.length -ge 39)
- {
- $CFLACESTREAM=$CFLACESTREAM.substring(0,40)
- $OUTPUT="plugin://program.plexus/?mode=1&url=acestream://"+$CFLACESTREAM
- # write-host $OUTPUT
- write-host "acestream://$CFLACESTREAM"
- $OUTPUT | out-file c:\VMs\cfl+acestream+$FILENAME+$x.strm
- }
- $x=$x+1
- }
- # $CFLACERAW=(Invoke-WebRequest -Uri $i)
- # write-host $CFLACERAW
- # $CFLACE=$CFLACERAW.tostring() -split "[`r`n]" | select-string "Acestream" -casesensitive # -Context 0,4 # | select-string -pattern "code"
- # write-host "CFLACE= " $CFLACE
- write-host ""
- write-host ""
- }
- Write-Host "Press any key to continue ..."
- $x = $host.UI.RawUI.ReadKey("NoEcho,IncludeKeyDown")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement