Bildschirm aufnehmen

Siehe auch XVidCap.

Aufnehmen

 perl -e 'use Time::HiRes qw(usleep);print "Click the window you would like to record.\n";open(winid,"xwininfo -int|");while(<winid>){if(/xwininfo: Window id: ([[0-9]+)/){$id=$1}};$i=0;while(usleep(4000)){system("xwd -silent -id $id >| shot_".(sprintf("%08d", $i)).".xwd");$i++;}'

Konvertieren

for each in `ls shot*xwd`;do convert $each $each.jpg;done;mencoder  "mf://shot*xwd.jpg"  -mf  fps=25  -o  output.avi   -ovc   lavc   -lavcopts  vcodec=mpeg4 && rm -f shot*xwd shot*xwd.jpg

Einzeiler (zuletzt geändert am 2007-12-23 22:46:24 durch localhost)