mpv.eng.inc.pl

   1 use utf8;
   2
   3 my $legacy = do 'mplayer.eng.inc.pl' or die $@;
   4
   5 {
   6 key => { %{ $legacy->{key} },
   7         ',' => "step backward<>s",
   8         'Q' => "save and quit",
   9         '_' => "cycle video tr<>ack<>s",
  10         '+' => "audio delay +<>.1s", # +ctrl in mpv
  11         '-' => "audio delay -<>.1s", # +ctrl in mpv
  12         'o' => "osd state switch",
  13         'O' => "osd mode toggle",
  14         'd' => "deint<>erlace",
  15         'j' => "next sub<>title",
  16         'J' => "prev<>ious sub<>title",
  17         'A' => "aspect override",
  18         'u' => "subtitle style",
  19         'V' => "subtitle aspect",
  20         'l' => "A-B loop",
  21         'L' => "infinite looping",
  22         'S' => "record screen<>shot<>s\n-vf screenshot", # mpv?
  23         '^s'=> "actual screen<>shot",
  24         '5' => "gamma decrease",
  25         '6' => "gamma increase",
  26 },
  27
  28 mode => $legacy->{mode},
  29
  30 flag => { %{ $legacy->{flag} },
  31         new => ["mpv"      => "Introduced in <em>mpv</em>, not supported in original MPlayer"],
  32 },
  33
  34 def => {
  35         '' => { %{ $legacy->{def}->{''} },
  36                 'b' => undef,
  37                 'g' => undef,
  38                 'y' => undef,
  39                 'F' => undef,
  40                 'a' => undef,
  41                 'c' => undef,
  42                 'n' => undef,
  43                 'I' => undef,
  44                 ',' => 'g7 new',
  45                 '_' => 'g4 new',
  46                 'Q' => 'g9 new',
  47                 'O' => 'g1 new',
  48                 'P' => '=o new',
  49                 'J' => 'g2 new',
  50                 'A' => 'g4 new',
  51                 'u' => 'g2 new',
  52                 'V' => 'g2 new',
  53                 'l' => 'g7 new',
  54                 'L' => 'g7 new',
  55                 '^s'=> 'g9 ext new',
  56         },
  57 },
  58 }