This commit was generated by cvs2svn to compensate for changes in r542,
[elisp/tm.git] / methods / csh / tm-mpeg
1 #!/bin/csh -f
2
3 if (! $?TM_TMP_DIR) then
4     setenv TM_TMP_DIR /tmp
5 endif
6
7 if( $5 == "" ) then
8         set filename = $TM_TMP_DIR/mime$$.mpg
9 else
10         set filename = $TM_TMP_DIR/$5
11 endif
12
13 echo "$2; $3 -> $filename"
14
15 tmdecode $3 $1 $filename
16
17 switch( $4 )
18 case "play":
19         if (! $?VIDEO_DITHER) then
20                 setenv VIDEO_DITHER gray
21         endif
22         
23         mpeg_play -dither $VIDEO_DITHER $filename >& /dev/null
24         /bin/rm $filename
25         breaksw
26 case "extract":
27         echo "extrtact to $filename"
28         breaksw
29 endsw