Hoe beste prog.opnemen om dag later te kijken op mediaplayer

[Tennisbal]

Allereerst excuus als dit topic fout staat, ik weet niet goed waar hij moet.

Ik ben bezig met lifefhacking en een van de projecten daarvan is het volgende.

Ik heb s' avonds meestal geen tijd/zin meer om Pauw en Witteman te kijken. Nu leek het me een goed idee om deze uitzending een dag later via mijn portable mediaplayer (Archos 605) in de auto te kijken (lees luisteren) terwijl ik auto rijd naar mijn werk (ongeveer 1 uur file rijden).

Hoe zorg ik ervoor dat dit proces zo optimaal mogelijk verloopt? en welke tools kan ik hiervoor het beste gebruiken? Ik heb het volgende proces uitgedacht:

1. Mbv media center (windows 7 editie) een programma opnemen, in dit geval pauw en witteman. Pc moet dus aan staan.

2. Het bestand automatisch laten opslaan als divx (nog niet uitgezocht of mc hier een standaard modus voor heeft, anders plugin en in het uiterste geval mbv een job die na het programma draait divx-en).

3. Job inplannen die na de opname het bestand automatisch copiert naar mijn mediaplayer die natuurlijk wel aan dmv usb met de pc verbonden moet zijn.

4. s'morgens de mediaplayer meenemen en in de auto aan radio koppelen voor surround geluid.

Dit is het proces in stappen. Nu de uitwerking. Stel dat ik een keer de mediaplayer vergeet eraan te hangen dan moet er natuurlijk niks gecopy't worden. Ik neem aan dat dit simpel is in te stellen?

Is het proces zo omslachtig? en zijn er betere methoden? Zijn er toevallig tweakers die een soortgelijk project hebben lopen?

Ben benieuwd naar jullie input! uiteraard laat ik hier weten wat het resultaat is. graag feedback!


edit: en ja ik zal vooral luisteren en niet als een idioot het programma gaan bekijken terwijl ik rijd veel programma's lenen zich hier prima voor.,

[ Voor 4% gewijzigd door Tennisbal op 23-12-2009 13:54 ]

[alt-92]

tennisbal schreef op woensdag 23 december 2009 @ 13:53:

2. Het bestand automatisch laten opslaan als divx (nog niet uitgezocht of mc hier een standaard modus voor heeft, anders plugin en in het uiterste geval mbv een job die na het programma draait divx-en).

3. Job inplannen die na de opname het bestand automatisch copiert naar mijn mediaplayer die natuurlijk wel aan dmv usb met de pc verbonden moet zijn.

3 mag je zelf weten, maar voor 2 zou ik naar DVRMStoolbox (voor je WTV/DVR-MS to Mpeg conversie) en VirtualDub of GK (of een andere mpeg naar gewenste codec).

Kwestie van wat handig scripten en zo...

[Tennisbal]

alt-92 schreef op woensdag 23 december 2009 @ 14:51:
[...]


3 mag je zelf weten, maar voor 2 zou ik naar DVRMStoolbox (voor je WTV/DVR-MS to Mpeg conversie) en VirtualDub of GK (of een andere mpeg naar gewenste codec).

Kwestie van wat handig scripten en zo...

welke scripting tool kan je het best gebruiken? ik heb het idee dat de jobs van window 7 behoorlijk krachtig zijn, heb me er nog niet goed in verdiept. alleen een simpel script gemaakt om total commander standaard als admin te laten draaien zonder uac vraag.

[alt-92]

VBscript, PowerShell, batch, of een mix van die drie (net wat het beste past bij je toepassing).

VB voorbeeldje van een DVRMS transcode van TV opname naar Mpeg:

Visual Basic:

Const CONVERT_TO_LOCAL_TIME = True
Const OverwriteExisting = TRUE

Set dtmStart = CreateObject("WbemScripting.SWbemDateTime")
dtmStart.SetVarDate Now, CONVERT_TO_LOCAL_TIME

strComputer = "."
strCmd = chr(34) & "C:\Program Files\DVRMSToolbox\DVRMStoMPEG.exe" & chr(34)
strParam1 = " /if="
strParam2 = " /of="
strParam3 =  " /act=ffmpeg /p=32" 
Set objShell = CreateObject("Wscript.Shell")
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")  
Set ObjFSO = CreateObject("scripting.FileSystemObject")
strDate = Left(dtmStart,12)
'==========================================================================================
'Zo, alle parameters zo'n beetje gezet, nu gaan we aan het werk.
'Maak de logfile aan en roep de hoofdfunctie aan.
'==========================================================================================
 Set objLogFile = objFSO.CreateTextFile _
    ("c:\scripts\status_" & strDate &".txt", ForAppending, True) 

 Call RecodeFiles       


'==========================================================================================
'Recode de opgenomen TV meuk in de opgegeven folder naar mpeg en zet die in de geconverteerd folder
'==========================================================================================

Function RecodeFiles      
Set colFiles = objWMIService.ExecQuery _
    ("ASSOCIATORS OF {Win32_Directory.Name='E:\media\DVRMS'} Where " _
        & "ResultClass = CIM_DataFile")

For Each objFile In colFiles
If objFile.Extension = "dvr-ms" Then
strDvrmsFilename = objFile.Name
strMpegFilename = "E:\Media\ConvertedTV\" & objFile.FileName & ".mpg"

objShell.run(strCmd & strParam1 & Chr(34) & strDvrmsFilename &_
 Chr(34) & strParam2 & Chr(34) & strMpegFilename & Chr(34) & strParam3),1,true

objLogFile.WriteLine  strMpegFilename
End If
WScript.Sleep(10000)
Next
Call CheckProcess
End Function

'==========================================================================================
'Are we still running?
'==========================================================================================

Sub CheckProcess
Set objWMIService = GetObject _
    ("winmgmts:\\" & strComputer & "\root\cimv2")
Do While TRUE
    Set colProcesses = objWMIService.ExecQuery _
        ("Select * from Win32_Process Where Name = 'ffmpeg_MPGMUX.exe'")
    If colProcesses.Count = 0 Then
    'MsgBox "CleanUp"
     Call CleanUp
    'Exit Loop
    End If
    Wscript.Sleep 20000
Loop
End Sub
'==========================================================================================
'Ruim de boel op en verplaats de originelen naar een archief
'==========================================================================================


Function CleanUp
On Error Resume Next
objFSO.MoveFile "E:\Media\DVRMS\*.dvr-ms" , "E:\Media\Archief\"
'Set objLogFile = objFSO.CreateTextFile _
'    ("c:\scripts\status_" & strDate &".txt", ForAppending, True)
    objLogFile.WriteLine ("DVR-MS to MPEG conversie klaar")
    ObjLogFile.Close
WScript.Quit
End Function

En qua scheduled tasks engine van Windows Vista & 7:
Als ik je vertel dat ik een job kan schedulen die op basis van een EventID uit het eventlog (DHCP ip adres) en als criteria of ik in mijn eigen thuisdomain aanmeldt mijn logonscript laat lopen zodat ik mijn drivemappings krijg, dan heb je ongeveer al een idee wat de mogelijkheden zijn (veel!).

Experimenteer en leef je uit.

[ Voor 7% gewijzigd door alt-92 op 23-12-2009 21:33 ]

[Tennisbal]

cool ziet er zeer interessant uit allemaal. nu alleen nog tijd zoeken om te experimenteren. Wordt vervolgd. thanks alvast!