MasterMaarten

Wauw, dankjewel. Dit zat al een tijdje bij mij te etteren.

Had ook even bij mij geduurd, maar al snel kwam ik erachter dat dit de oplossing was... ;-)

Voor de BDM en VrijMiBo heb je geen geluid nodig toch

En in Safari, op de iPhone ?

De meeste kans op veel kudo's (en het topreaguursel) heb je door als één van de eerste op een nieuw filmpje te reageren.
Ik heb een powershell-scriptje gemaakt die om de zoveel tijd (instelbaar) controleert of er nieuwe filmpjes geplaatst zijn.

Wat moet je doen?
Maak een nieuw tekst bestand en plak hier onderstaande code in. Sla het bestand vervolgens op met de extentie ps1 (bijvoorbeeld: dumpert.ps1 )
Klik met de rechtermuisknop op het bestand en kies 'Run with Powershell'

That's it! Veel plezier ermee!


#Hieronder de code die in het .ps1 bestand moet komen:

Add-Type -AssemblyName Microsoft.VisualBasic #Import tbv MessageBox
$init = "TRUE"
$history = ""
$vernieuwen = 60 #Hoevaak refreshen? Tijd is in seconden.
$url = "https://www.dumpert.nl"

while(1)
{
[Net.ServicePointManager]::SecurityProtocol = [Net.SecurityProtocolType]::Tls12
$data = (Invoke-WebRequest -Uri $url -Headers @{"Cache-Control"="no-cache"} -UseBasicParsing).Content
$zoek_string = '<div class="details">' #De tekst die ALTIJD voor de eerste item staat
$skip_aantal = 28 #Het aanteal te skippen posities na de gevonden string
$karakternr = $data.IndexOf($zoek_string) + $skip_aantal #Zoek in de bron naar de beginpositie van de zoekstring en tel het skipaantal erbij op
$extract = $data.Substring($karakternr,50)
$knip_einde = '</h1>' #De tekst die na het item staat ervanaf knippen zodat alleen de titel van het filmpje overblijft
$knip_aantal = $extract.IndexOf($knip_einde) #
$laatste_item = $extract.Substring(0,$knip_aantal)

$timestamp = Get-Date -f T
Write-Host $timestamp "- Laatst geplaatste titel op Dumpert:" $laatste_item

IF ($laatste_item -ne $history -and $init -eq "FALSE") {
$msg = $timestamp + " - Er is een nieuw item op Dumpert geplaatst: " + $laatste_item
Write-Host $msg
[System.Media.SystemSounds]::Hand.play()
sleep 2
[Microsoft.VisualBasic.Interaction]::MsgBox($msg,'OKonly,SystemModal,Information', 'Dumpert')
}

start-sleep -seconds $vernieuwen
$history = $laatste_item
$init = "FALSE"
}

Maar dan heb je geen NSFW