Changes of Revision 6

xt7-player-mpv.changes Changed
x
 
1
@@ -1,4 +1,10 @@
2
 -------------------------------------------------------------------
3
+Sun Apr  3 13:51:11 UTC 2016 - avvissu@yandex.by
4
+
5
+- Update to 0.16.384:
6
+  * see: /usr/share/doc/packages/xt7-player-mpv/CHANGELOG_GIT
7
+
8
+-------------------------------------------------------------------
9
 Thu Feb  4 12:41:02 UTC 2016 - avvissu@yandex.ru
10
 
11
 - Update to 0.14.384:
12
xt7-player-mpv.spec Changed
19
 
1
@@ -17,7 +17,7 @@
2
 
3
 
4
 Name:           xt7-player-mpv
5
-Version:        0.14.384
6
+Version:        0.16.384
7
 Release:        0
8
 Summary:        Qt/Gambas gui to mpv
9
 License:        GPL-2.0+
10
@@ -116,7 +116,7 @@
11
 %files
12
 %defattr(-,root,root)
13
 %dir %{_datadir}/appdata
14
-%doc COPYING CHANGELOG_GIT LICENSE*
15
+%doc CHANGELOG_GIT LICENSE*
16
 %{_bindir}/%{name}.gambas
17
 %{_datadir}/pixmaps/%{name}.png
18
 %{_datadir}/applications/%{name}.desktop
19
xt7-player-mpv-0.14.384.tar.gz/COPYING Deleted
201
 
1
@@ -1,340 +0,0 @@
2
-        GNU GENERAL PUBLIC LICENSE
3
-           Version 2, June 1991
4
-
5
- Copyright (C) 1989, 1991 Free Software Foundation, Inc.
6
-                 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA
7
- Everyone is permitted to copy and distribute verbatim copies
8
- of this license document, but changing it is not allowed.
9
-
10
-          Preamble
11
-
12
-  The licenses for most software are designed to take away your
13
-freedom to share and change it.  By contrast, the GNU General Public
14
-License is intended to guarantee your freedom to share and change free
15
-software--to make sure the software is free for all its users.  This
16
-General Public License applies to most of the Free Software
17
-Foundation's software and to any other program whose authors commit to
18
-using it.  (Some other Free Software Foundation software is covered by
19
-the GNU Library General Public License instead.)  You can apply it to
20
-your programs, too.
21
-
22
-  When we speak of free software, we are referring to freedom, not
23
-price.  Our General Public Licenses are designed to make sure that you
24
-have the freedom to distribute copies of free software (and charge for
25
-this service if you wish), that you receive source code or can get it
26
-if you want it, that you can change the software or use pieces of it
27
-in new free programs; and that you know you can do these things.
28
-
29
-  To protect your rights, we need to make restrictions that forbid
30
-anyone to deny you these rights or to ask you to surrender the rights.
31
-These restrictions translate to certain responsibilities for you if you
32
-distribute copies of the software, or if you modify it.
33
-
34
-  For example, if you distribute copies of such a program, whether
35
-gratis or for a fee, you must give the recipients all the rights that
36
-you have.  You must make sure that they, too, receive or can get the
37
-source code.  And you must show them these terms so they know their
38
-rights.
39
-
40
-  We protect your rights with two steps: (1) copyright the software, and
41
-(2) offer you this license which gives you legal permission to copy,
42
-distribute and/or modify the software.
43
-
44
-  Also, for each author's protection and ours, we want to make certain
45
-that everyone understands that there is no warranty for this free
46
-software.  If the software is modified by someone else and passed on, we
47
-want its recipients to know that what they have is not the original, so
48
-that any problems introduced by others will not reflect on the original
49
-authors' reputations.
50
-
51
-  Finally, any free program is threatened constantly by software
52
-patents.  We wish to avoid the danger that redistributors of a free
53
-program will individually obtain patent licenses, in effect making the
54
-program proprietary.  To prevent this, we have made it clear that any
55
-patent must be licensed for everyone's free use or not licensed at all.
56
-
57
-  The precise terms and conditions for copying, distribution and
58
-modification follow.
59
- 
60
-        GNU GENERAL PUBLIC LICENSE
61
-   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
62
-
63
-  0. This License applies to any program or other work which contains
64
-a notice placed by the copyright holder saying it may be distributed
65
-under the terms of this General Public License.  The "Program", below,
66
-refers to any such program or work, and a "work based on the Program"
67
-means either the Program or any derivative work under copyright law:
68
-that is to say, a work containing the Program or a portion of it,
69
-either verbatim or with modifications and/or translated into another
70
-language.  (Hereinafter, translation is included without limitation in
71
-the term "modification".)  Each licensee is addressed as "you".
72
-
73
-Activities other than copying, distribution and modification are not
74
-covered by this License; they are outside its scope.  The act of
75
-running the Program is not restricted, and the output from the Program
76
-is covered only if its contents constitute a work based on the
77
-Program (independent of having been made by running the Program).
78
-Whether that is true depends on what the Program does.
79
-
80
-  1. You may copy and distribute verbatim copies of the Program's
81
-source code as you receive it, in any medium, provided that you
82
-conspicuously and appropriately publish on each copy an appropriate
83
-copyright notice and disclaimer of warranty; keep intact all the
84
-notices that refer to this License and to the absence of any warranty;
85
-and give any other recipients of the Program a copy of this License
86
-along with the Program.
87
-
88
-You may charge a fee for the physical act of transferring a copy, and
89
-you may at your option offer warranty protection in exchange for a fee.
90
-
91
-  2. You may modify your copy or copies of the Program or any portion
92
-of it, thus forming a work based on the Program, and copy and
93
-distribute such modifications or work under the terms of Section 1
94
-above, provided that you also meet all of these conditions:
95
-
96
-    a) You must cause the modified files to carry prominent notices
97
-    stating that you changed the files and the date of any change.
98
-
99
-    b) You must cause any work that you distribute or publish, that in
100
-    whole or in part contains or is derived from the Program or any
101
-    part thereof, to be licensed as a whole at no charge to all third
102
-    parties under the terms of this License.
103
-
104
-    c) If the modified program normally reads commands interactively
105
-    when run, you must cause it, when started running for such
106
-    interactive use in the most ordinary way, to print or display an
107
-    announcement including an appropriate copyright notice and a
108
-    notice that there is no warranty (or else, saying that you provide
109
-    a warranty) and that users may redistribute the program under
110
-    these conditions, and telling the user how to view a copy of this
111
-    License.  (Exception: if the Program itself is interactive but
112
-    does not normally print such an announcement, your work based on
113
-    the Program is not required to print an announcement.)
114
- 
115
-These requirements apply to the modified work as a whole.  If
116
-identifiable sections of that work are not derived from the Program,
117
-and can be reasonably considered independent and separate works in
118
-themselves, then this License, and its terms, do not apply to those
119
-sections when you distribute them as separate works.  But when you
120
-distribute the same sections as part of a whole which is a work based
121
-on the Program, the distribution of the whole must be on the terms of
122
-this License, whose permissions for other licensees extend to the
123
-entire whole, and thus to each and every part regardless of who wrote it.
124
-
125
-Thus, it is not the intent of this section to claim rights or contest
126
-your rights to work written entirely by you; rather, the intent is to
127
-exercise the right to control the distribution of derivative or
128
-collective works based on the Program.
129
-
130
-In addition, mere aggregation of another work not based on the Program
131
-with the Program (or with a work based on the Program) on a volume of
132
-a storage or distribution medium does not bring the other work under
133
-the scope of this License.
134
-
135
-  3. You may copy and distribute the Program (or a work based on it,
136
-under Section 2) in object code or executable form under the terms of
137
-Sections 1 and 2 above provided that you also do one of the following:
138
-
139
-    a) Accompany it with the complete corresponding machine-readable
140
-    source code, which must be distributed under the terms of Sections
141
-    1 and 2 above on a medium customarily used for software interchange; or,
142
-
143
-    b) Accompany it with a written offer, valid for at least three
144
-    years, to give any third party, for a charge no more than your
145
-    cost of physically performing source distribution, a complete
146
-    machine-readable copy of the corresponding source code, to be
147
-    distributed under the terms of Sections 1 and 2 above on a medium
148
-    customarily used for software interchange; or,
149
-
150
-    c) Accompany it with the information you received as to the offer
151
-    to distribute corresponding source code.  (This alternative is
152
-    allowed only for noncommercial distribution and only if you
153
-    received the program in object code or executable form with such
154
-    an offer, in accord with Subsection b above.)
155
-
156
-The source code for a work means the preferred form of the work for
157
-making modifications to it.  For an executable work, complete source
158
-code means all the source code for all modules it contains, plus any
159
-associated interface definition files, plus the scripts used to
160
-control compilation and installation of the executable.  However, as a
161
-special exception, the source code distributed need not include
162
-anything that is normally distributed (in either source or binary
163
-form) with the major components (compiler, kernel, and so on) of the
164
-operating system on which the executable runs, unless that component
165
-itself accompanies the executable.
166
-
167
-If distribution of executable or object code is made by offering
168
-access to copy from a designated place, then offering equivalent
169
-access to copy the source code from the same place counts as
170
-distribution of the source code, even though third parties are not
171
-compelled to copy the source along with the object code.
172
- 
173
-  4. You may not copy, modify, sublicense, or distribute the Program
174
-except as expressly provided under this License.  Any attempt
175
-otherwise to copy, modify, sublicense or distribute the Program is
176
-void, and will automatically terminate your rights under this License.
177
-However, parties who have received copies, or rights, from you under
178
-this License will not have their licenses terminated so long as such
179
-parties remain in full compliance.
180
-
181
-  5. You are not required to accept this License, since you have not
182
-signed it.  However, nothing else grants you permission to modify or
183
-distribute the Program or its derivative works.  These actions are
184
-prohibited by law if you do not accept this License.  Therefore, by
185
-modifying or distributing the Program (or any work based on the
186
-Program), you indicate your acceptance of this License to do so, and
187
-all its terms and conditions for copying, distributing or modifying
188
-the Program or works based on it.
189
-
190
-  6. Each time you redistribute the Program (or any work based on the
191
-Program), the recipient automatically receives a license from the
192
-original licensor to copy, distribute or modify the Program subject to
193
-these terms and conditions.  You may not impose any further
194
-restrictions on the recipients' exercise of the rights granted herein.
195
-You are not responsible for enforcing compliance by third parties to
196
-this License.
197
-
198
-  7. If, as a consequence of a court judgment or allegation of patent
199
-infringement or for any other reason (not limited to patent issues),
200
-conditions are imposed on you (whether by court order, agreement or
201
xt7-player-mpv-0.14.384.tar.gz/shade1.png Deleted
xt7-player-mpv-0.14.384.tar.gz/.icon.png -> xt7-player-mpv-0.16.384.tar.gz/.icon.png Changed
xt7-player-mpv-0.14.384.tar.gz/.lang/it.mo -> xt7-player-mpv-0.16.384.tar.gz/.lang/it.mo Changed
xt7-player-mpv-0.14.384.tar.gz/.lang/it.po -> xt7-player-mpv-0.16.384.tar.gz/.lang/it.po Changed
201
 
1
@@ -2,7 +2,7 @@
2
 msgid ""
3
 msgstr ""
4
 "Project-Id-Version: xt7-player-mpv 3.8.4\n"
5
-"PO-Revision-Date: 2016-01-15 13:45 UTC\n"
6
+"PO-Revision-Date: 2016-03-07 14:12 UTC\n"
7
 "Last-Translator: kokoko3k <kokoko3k@gmail.com>\n"
8
 "Language: it\n"
9
 "MIME-Version: 1.0\n"
10
@@ -29,7 +29,7 @@
11
 msgid "Click for a list of URI prefixes"
12
 msgstr "Mostra la lista dei prefissi per le URI"
13
 
14
-#: AddUriForm.form:51 FMain.class:8837
15
+#: AddUriForm.form:51 FMain.class:8907
16
 msgid "cdda://"
17
 msgstr "-"
18
 
19
@@ -169,7 +169,7 @@
20
 msgid "Add the selected URI to Collection and/or Playlist"
21
 msgstr "Aggiungi l'URI selezionata alla collezione/playlist"
22
 
23
-#: AddUriForm.form:152 FMain.class:9323 GeneralOptions.form:1059
24
+#: AddUriForm.form:152 FMain.class:9393 GeneralOptions.form:1065
25
 msgid "Add"
26
 msgstr "Aggiungi"
27
 
28
@@ -177,7 +177,7 @@
29
 msgid "Close"
30
 msgstr "Chiudi"
31
 
32
-#: AlbumView.class:92 FMain.class:1329
33
+#: AlbumView.class:92 FMain.class:1358
34
 msgid "Unknown"
35
 msgstr "Sconosciuto"
36
 
37
@@ -233,7 +233,7 @@
38
 msgid "Title"
39
 msgstr "Titolo"
40
 
41
-#: AudioConvert.class:94 FMain.class:9811
42
+#: AudioConvert.class:94 FMain.class:9881
43
 msgid "Unable to get the real stream url"
44
 msgstr "Non posso recuperare l'url reale del flusso"
45
 
46
@@ -305,35 +305,27 @@
47
 msgid "Start"
48
 msgstr "Avvia"
49
 
50
-#: AudioForm.class:147
51
-msgid "Missing Artist and/or Song information"
52
-msgstr "Mancano informazioni su artista e/o titolo."
53
-
54
-#: AudioForm.form:139
55
-msgid "Media Info "
56
-msgstr "Media Info"
57
-
58
-#: AudioForm.form:188 FMain.form:690 FormLyrics.form:91 Searchfields.form:58
59
+#: AudioForm.class:12 FMain.form:690 FormLyrics.form:91 Searchfields.form:58
60
 msgid "Artist"
61
 msgstr "Artista"
62
 
63
-#: AudioForm.form:199 FMain.form:686 Searchfields.form:66
64
+#: AudioForm.class:13 FMain.form:686 Searchfields.form:66
65
 msgid "Album"
66
 msgstr "Album"
67
 
68
-#: AudioForm.form:210 FMain.form:2671 Searchfields.form:90
69
+#: AudioForm.class:14 FMain.form:2671 Searchfields.form:90
70
 msgid "Year"
71
 msgstr "Anno"
72
 
73
-#: AudioForm.form:232 FMain.form:2739 Searchfields.form:119
74
+#: AudioForm.class:16 FMain.form:2739 Searchfields.form:119
75
 msgid "Comment"
76
 msgstr "Commento"
77
 
78
-#: AudioForm.form:249
79
+#: AudioForm.class:17
80
 msgid "Lyrics"
81
 msgstr "Testi"
82
 
83
-#: AudioForm.form:355 FMain.form:2207
84
+#: AudioForm.class:24 FMain.form:2207
85
 msgid "Radio"
86
 msgstr "Radio"
87
 
88
@@ -341,18 +333,26 @@
89
 msgid "Name"
90
 msgstr "Nome"
91
 
92
-#: AudioForm.form:375 FMain.class:8826 Searchfields.form:104
93
+#: AudioForm.class:26 FMain.class:8896 Searchfields.form:104
94
 msgid "Length"
95
 msgstr "Durata"
96
 
97
-#: AudioForm.form:385
98
-msgid "FileSize"
99
+#: AudioForm.class:27 SubAndOsd.form:250
100
+msgid "Size"
101
 msgstr "Dimensione"
102
 
103
-#: AudioForm.form:395
104
+#: AudioForm.class:28
105
 msgid "Audio Info"
106
 msgstr "Audio Info"
107
 
108
+#: AudioForm.class:163
109
+msgid "Missing Artist and/or Song information"
110
+msgstr "Mancano informazioni su artista e/o titolo."
111
+
112
+#: AudioForm.form:47
113
+msgid "Media Info "
114
+msgstr "Media Info"
115
+
116
 #: BugReport.form:17
117
 msgid "Bug Report"
118
 msgstr "Segnalazione bug"
119
@@ -381,7 +381,7 @@
120
 msgid ":"
121
 msgstr "-"
122
 
123
-#: ChooseAspect.form:53 GeneralOptions.form:2395
124
+#: ChooseAspect.form:53 GeneralOptions.form:2429
125
 msgid "="
126
 msgstr "-"
127
 
128
@@ -397,7 +397,7 @@
129
 msgid "ShutDown CountDown..."
130
 msgstr "Conto alla rovescia per lo spegnimento."
131
 
132
-#: CountDown.form:17 NewChains.class:451
133
+#: CountDown.form:17 NewChains.class:466
134
 msgid "Abort"
135
 msgstr "Annulla"
136
 
137
@@ -441,11 +441,11 @@
138
 msgid "Error while loading the picture"
139
 msgstr "Errore durante il caricamento dell' immagine"
140
 
141
-#: CoverManager.class:961 FMain.class:7696
142
+#: CoverManager.class:961 FMain.class:7831
143
 msgid "\nso you are going to set a cover for this particular file/stream"
144
 msgstr "\nQuindi la copertina che imposterai sarà solo per questo file o stream"
145
 
146
-#: CoverManager.class:962 FMain.class:7697
147
+#: CoverManager.class:962 FMain.class:7832
148
 msgid "Artist Or Album tag information are required to set a cover"
149
 msgstr "Le tag artista o album sono necessarie per impostare una copertina"
150
 
151
@@ -477,11 +477,11 @@
152
 msgid "Load cover"
153
 msgstr "Carica da disco"
154
 
155
-#: CoverManager.form:178 GeneralOptions.form:2779
156
+#: CoverManager.form:178 GeneralOptions.form:2813
157
 msgid "128"
158
 msgstr "-"
159
 
160
-#: CoverManager.form:178 GeneralOptions.form:2779
161
+#: CoverManager.form:178 GeneralOptions.form:2813
162
 msgid "160"
163
 msgstr "-"
164
 
165
@@ -509,7 +509,7 @@
166
 msgid "Set Cover"
167
 msgstr "Imposta"
168
 
169
-#: DVBTuner.class:53 FMain.form:1761 GeneralOptions.form:1398
170
+#: DVBTuner.class:53 FMain.form:1761 GeneralOptions.form:1404
171
 msgid "DVB-T"
172
 msgstr "-"
173
 
174
@@ -553,7 +553,7 @@
175
 msgid "Import"
176
 msgstr "Importa"
177
 
178
-#: DVBTuner.form:90 GeneralOptions.form:1966
179
+#: DVBTuner.form:90 GeneralOptions.form:1986
180
 msgid "Card #"
181
 msgstr "Scheda #"
182
 
183
@@ -657,215 +657,215 @@
184
 msgid "Scan All"
185
 msgstr "Aggiorna tutto"
186
 
187
-#: FMain.class:627
188
+#: FMain.class:653
189
 msgid "Couldn't clear the history!"
190
 msgstr "Impossibile cancellare la cronologia!"
191
 
192
-#: FMain.class:1334 Searchfields.form:161
193
+#: FMain.class:1363 Searchfields.form:161
194
 msgid "Channels"
195
 msgstr "Canali"
196
 
197
-#: FMain.class:1335
198
+#: FMain.class:1364
199
 msgid "Rate"
200
 msgstr "Frequenza"
201
xt7-player-mpv-0.14.384.tar.gz/.project -> xt7-player-mpv-0.16.384.tar.gz/.project Changed
10
 
1
@@ -3,7 +3,7 @@
2
 Title=xt7-player
3
 Startup=StartClass
4
 Icon=xt7-player-mpv.png
5
-Version=0.12.383
6
+Version=0.16.384
7
 Component=gb.args
8
 Component=gb.image
9
 Component=gb.qt4
10
xt7-player-mpv-0.14.384.tar.gz/.settings -> xt7-player-mpv-0.16.384.tar.gz/.settings Changed
201
 
1
@@ -1,5 +1,5 @@
2
 [Bookmarks]
3
-FMain=[7687]
4
+FMain=[7697]
5
 GeneralOptions=[1251]
6
 
7
 [Breakpoints]
8
@@ -8,6 +8,9 @@
9
 [DebugWindow]
10
 Count=0
11
 
12
+[DebugWindow/(Dir(Directory, "*.BMP"))]
13
+Geometry=[45,0,224,280]
14
+
15
 [DebugWindow/AC3s]
16
 Geometry=[928,154,344,344]
17
 
18
@@ -177,6 +180,9 @@
19
 [DebugWindow/Dialog.filter]
20
 Geometry=[0,35,344,344]
21
 
22
+[DebugWindow/Dir(DirToAdd).Sort()]
23
+Geometry=[47,0,588,465]
24
+
25
 [DebugWindow/Dir(Directory, "*.MP3")]
26
 Geometry=[1280,0,210,210]
27
 
28
@@ -231,6 +237,12 @@
29
 [DebugWindow/FMain]
30
 Geometry=[48,268,776,554]
31
 
32
+[DebugWindow/FMain.OuterBox]
33
+Geometry=[45,0,224,280]
34
+
35
+[DebugWindow/FMain.OuterBox.Parent]
36
+Geometry=[45,307,224,280]
37
+
38
 [DebugWindow/FMain.mplayer.GetListOf("ao")]
39
 Geometry=[52,0,222,507]
40
 
41
@@ -408,6 +420,9 @@
42
 [DebugWindow/LAST.next.NEXT.next]
43
 Geometry=[0,0,344,344]
44
 
45
+[DebugWindow/Label2]
46
+Geometry=[45,0,224,280]
47
+
48
 [DebugWindow/Last]
49
 Geometry=[681,124,482,602]
50
 
51
@@ -483,6 +498,9 @@
52
 [DebugWindow/MpLines]
53
 Geometry=[44,-3,210,210]
54
 
55
+[DebugWindow/MplayerTag]
56
+Geometry=[47,0,224,280]
57
+
58
 [DebugWindow/MpvOption]
59
 Geometry=[44,0,210,210]
60
 
61
@@ -814,7 +832,7 @@
62
 Geometry=[1280,-3,210,210]
63
 
64
 [DebugWindow/Split(history, "\n", "", True)]
65
-Geometry=[52,0,210,210]
66
+Geometry=[1623,198,725,475]
67
 
68
 [DebugWindow/Split(linea, "\"")]
69
 Geometry=[0,0,344,344]
70
@@ -934,11 +952,14 @@
71
 Geometry=[0,0,210,210]
72
 
73
 [DebugWindow/TheComboBox]
74
-Geometry=[0,0,301,301]
75
+Geometry=[1519,528,301,301]
76
 
77
 [DebugWindow/TheComboBox.List]
78
 Geometry=[44,-3,528,697]
79
 
80
+[DebugWindow/TheComboBox[0]]
81
+Geometry=[1820,528,301,301]
82
+
83
 [DebugWindow/TheComboBox[i]]
84
 Geometry=[44,0,1008,404]
85
 
86
@@ -1181,7 +1202,10 @@
87
 Geometry=[0,0,344,344]
88
 
89
 [DebugWindow/audioform.AudioPanel.Parent]
90
-Geometry=[1280,0,210,210]
91
+Geometry=[1280,0,224,645]
92
+
93
+[DebugWindow/audioform.GridUp.Font]
94
+Geometry=[45,0,297,439]
95
 
96
 [DebugWindow/audios]
97
 Geometry=[1525,157,777,754]
98
@@ -1234,6 +1258,12 @@
99
 [DebugWindow/blackbox]
100
 Geometry=[794,22,315,922]
101
 
102
+[DebugWindow/blurred.Stretch(1, 3)]
103
+Geometry=[45,0,224,280]
104
+
105
+[DebugWindow/blurred.Stretch(1, 3).Pixels]
106
+Geometry=[59,14,224,280]
107
+
108
 [DebugWindow/bottomvbox.parent.Parent]
109
 Geometry=[1280,0,467,521]
110
 
111
@@ -1558,7 +1588,7 @@
112
 Geometry=[1280,0,210,210]
113
 
114
 [DebugWindow/historyarray]
115
-Geometry=[52,0,758,210]
116
+Geometry=[52,0,758,280]
117
 
118
 [DebugWindow/hsplit1.Layout]
119
 Geometry=[47,0,210,210]
120
@@ -2040,6 +2070,12 @@
121
 [DebugWindow/picture[global.IconfileOf["browse"]]]
122
 Geometry=[61,256,344,344]
123
 
124
+[DebugWindow/pictureback]
125
+Geometry=[45,0,224,280]
126
+
127
+[DebugWindow/pictureback.Picture]
128
+Geometry=[45,0,224,280]
129
+
130
 [DebugWindow/playerprocess]
131
 Geometry=[588,61,301,301]
132
 
133
@@ -2077,16 +2113,19 @@
134
 Geometry=[1280,-3,224,280]
135
 
136
 [DebugWindow/prop]
137
-Geometry=[507,410,714,317]
138
+Geometry=[1789,289,643,481]
139
 
140
 [DebugWindow/prop["audiotracks"]]
141
 Geometry=[1390,192,397,476]
142
 
143
+[DebugWindow/prop_time]
144
+Geometry=[1513,514,356,280]
145
+
146
 [DebugWindow/properties]
147
 Geometry=[1280,0,224,280]
148
 
149
 [DebugWindow/properties_changed_runtime]
150
-Geometry=[44,0,210,210]
151
+Geometry=[45,0,224,280]
152
 
153
 [DebugWindow/properties_changed_runtime_old_datas]
154
 Geometry=[1280,0,210,210]
155
@@ -2122,7 +2161,7 @@
156
 Geometry=[0,41,344,344]
157
 
158
 [DebugWindow/s]
159
-Geometry=[1280,0,210,210]
160
+Geometry=[1280,0,224,280]
161
 
162
 [DebugWindow/samples]
163
 Geometry=[47,0,210,210]
164
@@ -2202,6 +2241,9 @@
165
 [DebugWindow/supported_domains]
166
 Geometry=[47,0,224,280]
167
 
168
+[DebugWindow/t]
169
+Geometry=[45,0,224,280]
170
+
171
 [DebugWindow/tArea]
172
 Geometry=[1280,0,210,745]
173
 
174
@@ -2400,54 +2442,65 @@
175
 
176
 [OpenFile]
177
 File[1]=".src/Form/FMain.form"
178
-File[2]=".src/Form/FMain.class:8.8392"
179
-Active=2
180
-Count=47
181
+File[2]=".src/Form/FMain.class:0.7311"
182
+Active=5
183
+Count=58
184
 File[3]=".src/Form/HotKeys.form"
185
-File[4]=".src/Form/HotKeys.class:24.465"
186
+File[4]=".src/Form/HotKeys.class:7.406"
187
 File[5]=".src/Form/GeneralOptions.form"
188
-File[6]=".src/Form/GeneralOptions.class:38.287"
189
-File[7]=".src/0_Moduli/Global.module:18.1212"
190
+File[6]=".src/Form/GeneralOptions.class:10.1004"
191
+File[7]=".src/0_Moduli/Global.module:14.1182"
192
 File[8]=".src/Form/AddUriForm.form"
193
 File[9]=".src/Form/AddUriForm.class:2.58"
194
 File[10]=".src/Form/RealtimeForm.form"
195
 File[11]=".src/Form/DVBTuner.form"
196
 File[12]=".src/Form/DVBTuner.class:2.67"
197
 File[13]=".src/Form/EpgForm.form"
198
-File[14]=".src/Form/CoverManager.class:8.1031"
199
+File[14]=".src/Form/CoverManager.class:12.1178"
200
 File[15]=".src/Form/NewChains.form"
201
xt7-player-mpv-0.14.384.tar.gz/.src/0_Moduli/Global.module -> xt7-player-mpv-0.16.384.tar.gz/.src/0_Moduli/Global.module Changed
19
 
1
@@ -10,6 +10,8 @@
2
 Public UncommonAudiofilters As String
3
 Public Audiofilter As String
4
 Public audiofiltername As String
5
+Public Multimediafilter As String
6
+Public Multimediafiltername As String
7
 Public imgfilters As String
8
 Public Slowmedia As String 
9
 Public NonTaggableMedia As String
10
@@ -72,6 +74,8 @@
11
   UncommonAudiofilters = "*.wma;*.ram;*.ac3;*.wav;*.aiff;*.aiffc;*.aac;*.8svx;*.pls;*.dts;*.cue"
12
   Audiofilter = "*.mp3;*.ogg;*.aac;*.flac;*.mpc;*.ac3;"
13
   audiofiltername = ("Common Audio Files")
14
+  Multimediafilter = Videofilter & UncommonVideoFilters & Audiofilter & UncommonAudiofilters
15
+  Multimediafiltername = ("Multimedia files")
16
   imgfilters = ("*.jpg;*.jpeg;*.bmp;*.png;")
17
   Slowmedia = "cddb:// cdda:// mms:// http:// http_proxy:// rtp:// rtsp:// ftp:// udp:// smb:// "  'we'll get tag information on user prefs
18
   NonTaggableMedia = "tv:// radio:// cdda:// cddb:// mf:// pvr:// dvb:// unsv:// sdp:// mpst:// tivo://"
19
xt7-player-mpv-0.14.384.tar.gz/.src/Classi/MplayerClass.class -> xt7-player-mpv-0.16.384.tar.gz/.src/Classi/MplayerClass.class Changed
201
 
1
@@ -98,65 +98,33 @@
2
 Public osdlevel As String = ""
3
 
4
 
5
-Public Function old_FillMultitracks()
6
-  Dim T, Tcount As Integer
7
-  Dim Type As String
8
-  Dim id, name, lang, tmp, codec As String
9
-  Dim properties As New String[]
10
-  Dim video_ok As Boolean = False
11
-
12
-  If getP("fullpath") = "" Then Return
13
-  
14
-  Try prop["audiotracks"].Clear
15
-  Try prop["subtitletracks"].Clear
16
-  Try Tcount = CInt(get_property_mpv("track-list/count"))
17
-  If Error Then
18
-    global.myDebug("WW", "unable to get track count")
19
-    Return
20
-  Endif
21
-
22
-  For T = 0 To Tcount - 1
23
-    properties.Clear()
24
-    properties.add("track-list/" & T & "/id")
25
-    properties.add("track-list/" & T & "/title")
26
-    properties.add("track-list/" & T & "/lang")
27
-    properties.add("track-list/" & T & "/type")
28
-    properties.add("track-list/" & T & "/codec")
29
-    get_properties_mpv(properties)
30
-    id = getP("track-list/" & T & "/id") 
31
-    name = getP("track-list/" & T & "/title") 
32
-    lang = getP("track-list/" & T & "/lang") 
33
-    Type = getP("track-list/" & T & "/type") 
34
-    codec = getP("track-list/" & T & "/codec") 
35
-    tmp = (ID & " - " & NAME & " - " & LANG & " - " & CODEC)
36
-    Select Case Type
37
-      Case "audio"
38
-        prop["audiotracks"].Add(Replace(tmp, unavailable_str, "*"))
39
-      ' Case "video"
40
-        'multiple video tracks unsupported by xt7
41
-      Case "sub"
42
-        prop["subtitletracks"].Add(Replace(tmp, unavailable_str, "*"))
43
-    End Select
44
-  Next
45
-
46
-  video_ok = (get_property_mpv("vo-configured") = "yes")
47
-  video_ok = video_ok And (get_property_mpv("current-vo") <> "(unavailable)")
48
-  setP("audioonly", (Not video_ok))
49
-End
50
 
51
-
52
-Public Function FillMultitracks()
53
+Public Function FillMultitracks(Optional force_audio_only As Boolean = False)
54
   Dim T, Tcount As Integer
55
   Dim Type As String
56
   Dim id, name, lang, tmp, codec As String
57
   Dim properties As New String[]
58
   Dim video_ok As Boolean = False
59
+  Dim t0 As Float
60
+  Dim timeout As Integer = 1 'seconds
61
+  Dim videotracks As Integer = 0
62
 
63
   If getP("fullpath") = "" Then Return
64
   
65
   Try prop["audiotracks"].Clear
66
   Try prop["subtitletracks"].Clear
67
   Try Tcount = CInt(get_property_mpv("track-list/count"))
68
+  ' If Tcount = 0 Then
69
+  '   '0 tracks is unlikely; probably mpv is not answering correctly
70
+  '   'keep asking till the timeout or a real answer
71
+  '   t0 = Timer()
72
+  '   Repeat
73
+  '     global.myDebug("0 tracks is unlikely, reasking")
74
+  '     Wait 0.01
75
+  '     Try Tcount = CInt(get_property_mpv("track-list/count"))
76
+  '   Until Tcount <> 0 Or (Timer() - t0) > timeout
77
+  ' Endif
78
+
79
   If Error Then
80
     global.myDebug("WW", "unable to get track count")
81
     Return
82
@@ -190,15 +158,40 @@
83
         'multiple video tracks unsupported by xt7
84
       Case "sub"
85
         prop["subtitletracks"].Add(Replace(tmp, unavailable_str, "*"))
86
+      Case "video"
87
+        videotracks += 1
88
     End Select
89
   Next
90
 
91
   video_ok = getP("vo-configured") = "yes"
92
   video_ok = video_ok And (getP("current-vo") <> "(unavailable)")
93
-  
94
-  ' video_ok = (get_property_mpv("vo-configured") = "yes")
95
-  ' video_ok = video_ok And (get_property_mpv("current-vo") <> "(unavailable)")
96
-  setP("audioonly", (Not video_ok))
97
+
98
+  If (Not video_ok) And (videotracks > 0) Then 'something is not right...
99
+    If idleplaying Then
100
+      t0 = Timer()
101
+      Repeat
102
+        Wait 0.01
103
+        video_ok = getP("vo-configured") = "yes"
104
+        video_ok = video_ok And (getP("current-vo") <> "(unavailable)")
105
+      Until video_ok Or (Timer() - t0) > timeout
106
+      If (Timer() - t0) > timeout Then
107
+        global.myDebug("?? video_ok is false but there are video tracks ??")
108
+        'at least we tried.
109
+        'since we are in idleplaying, there is no need to wait for vo-configured and current-vo.
110
+      Endif
111
+    Endif
112
+  Endif
113
+  If Not force_audio_only Then
114
+    If idleplaying Then
115
+      setP("audioonly", (videotracks = 0))
116
+        Else
117
+      setP("audioonly", (Not video_ok))
118
+    Endif
119
+      Else
120
+    setP("audioonly", True)
121
+  Endif
122
+  ' If global.IsVideoFile(getP("fullpath")) And (Not video_ok) Then Stop
123
+  ' If getP("audioonly") = True Then Stop
124
 End
125
 
126
 Public Function get_length() As String
127
@@ -250,6 +243,7 @@
128
 End
129
 
130
 Public Sub playerprocess_error(err As String)
131
+  'global.mydebug(err)
132
   stderr &= err & "\n"
133
   If err Like "*" & play_initialized_str & "*" Then 
134
     'catch statusline with the message player initialized
135
@@ -266,8 +260,7 @@
136
 
137
 Public Function SupportsLadspa() As Boolean
138
   Dim out As String
139
-  'Shell executable() & " -af help | grep 'ladspa '" To out
140
-  Shell "ffmpeg -filters | grep ladspa" To out
141
+  Exec ["sh", "-c", "ffmpeg -filters | grep ladspa"] To out
142
   Return Trim(out) <> ""
143
 End
144
 
145
@@ -374,12 +367,17 @@
146
   Dim data As String
147
   'handle corner cases where an option could conflict with another
148
   For Each data In return_opts
149
-    If data Like "*lavcac3enc*" Then
150
+    If data Like "*lavcac3enc*" Then 'unset audio-channels when encoding ac3 streams
151
       If return_opts.Key Like "*af*" Then
152
         Print "found audio filter lavcac3enc; searching and unsetting --audio-channels"
153
         Print
154
         unset_option("audio-channels", return_opts)
155
       Endif
156
+        Else If return_opts.Key = "vo" Then
157
+          If data Like "*opengl:*interpolation*" Then
158
+            Print "It seems that user requested opengl temporal interpolation; setting --video-sync=display-vdrop" 
159
+            set_option("video-sync", "display-vdrop")
160
+          Endif
161
     Endif
162
   Next
163
   Return return_opts
164
@@ -399,26 +397,35 @@
165
 Public Function waitplayback(timeoutcentisecs As Integer) As Boolean
166
   Dim play_initialized As Boolean = False
167
   Dim idling As Boolean
168
+  Dim tc As Integer = 0
169
+  Dim waittime As Float = 0.01
170
   setP("idle", "no")
171
 
172
   Repeat
173
     If Not ProcessRunningOvr() Then Return False
174
-    Wait 0.01
175
-    timeoutcentisecs -= 1
176
+    Wait waittime
177
+    timeoutcentisecs -= CInt(waittime * 100)
178
     If IsInteger(CStr(timeoutcentisecs / 100)) Then 'check if playback is idle (eg: no file playing) every second
179
       global.myDebug("check if idle")
180
       get_property_mpv("=idle", False)
181
     Endif
182
-  play_initialized = (getP("play_initialized") = "yes")
183
-  'play_initialized is set by playerprocess_error through the hack
184
-  'of setting the statusline to a value recognized by playerprocess_error
185
-  'Hopefully, when the statusline is initialized, the playback is initialized too.
186
-  'In case of problems, the core-idle property may come handy (but slower), see:
187
-  'https://github.com/mpv-player/mpv/commit/8d414e2fe7f79f1bbf9158e8aa034e9ac9cf2222#commitcomment-13950548
188
+    play_initialized = (getP("play_initialized") = "yes")
189
+    'play_initialized is set by playerprocess_error through the hack
190
+    'of setting the statusline to a value recognized by playerprocess_error
191
+    'Hopefully, when the statusline is initialized, the playback is initialized too.
192
+    'In case of problems, the core-idle property may come handy (but slower), see:
193
+    'https://github.com/mpv-player/mpv/commit/8d414e2fe7f79f1bbf9158e8aa034e9ac9cf2222#commitcomment-13950548
194
+    
195
+    '...however sometimes the track count is still 0, so use track-list/count too.
196
+    Try tc = get_property_mpv("track-list/count", True, 10, False)
197
+    play_initialized = play_initialized And (tc <> 0)
198
+    waittime += 0.01
199
+    If waittime >= 0.2 Then waittime = 0.2
200
   Until play_initialized Or (timeoutcentisecs <= 0) Or (getP("=idle") = "yes")
201
xt7-player-mpv-0.14.384.tar.gz/.src/Classi/StartClass.class -> xt7-player-mpv-0.16.384.tar.gz/.src/Classi/StartClass.class Changed
13
 
1
@@ -18,8 +18,11 @@
2
 
3
 ' 
4
 Static Public Sub Application_error()
5
+
6
   Dim bt As String[]
7
   Dim et As String
8
+  
9
+  Return
10
   If BugReport.Already_shown Then Return
11
   bt = Error.Backtrace
12
   et = Error.Text
13
xt7-player-mpv-0.14.384.tar.gz/.src/Classi/dvbsnoop_class.class -> xt7-player-mpv-0.16.384.tar.gz/.src/Classi/dvbsnoop_class.class Changed
35
 
1
@@ -71,8 +71,7 @@
2
   Dim options As String = " -s sec -nohexdumpbuffer 0x12 |grep --binary-files=text 'Service_ID^|Table_ID^|===^|Event_ID^|Start_time^|Duration^|Free_CA_mode^|Content_nibble_level_^|event_name^|text_char'"
3
   Dim options2 As String = " -s sec -nohexdumpbuffer 0x11|grep --binary-files=text -i 'service_id:^|service_name:'"
4
   Dim state As Integer = 999
5
-'  StartitUfficio()
6
-'  Return
7
+
8
   
9
   
10
   'Dim options As String = " -s sec -nohexdumpbuffer 0x12"
11
@@ -96,23 +95,6 @@
12
 End
13
 
14
 
15
-Public Sub StartitUfficio()
16
-  Dim options As String = " |grep 'Service_ID^|Table_ID^|===^|Event_ID^|Start_time^|Duration^|Free_CA_mode^|event_name^|Content_nibble_level_^|text_char'"
17
-  Dim options2 As String = " |grep -i 'service_id:^|service_name:'"
18
-  'Dim options As String = " -s sec -nohexdumpbuffer 0x12"
19
-  InitSidChanTable()
20
-  options = Replace(options, "^", Chr(92))
21
-  options2 = Replace(options2, "^", Chr(92))
22
-  'dvbsnoop = Shell dvbsnoopexe For Input As "dvbsnoop"
23
-  'dvbsnoop = Shell dvbsnoopexe & " -s sec -nohexdumpbuffer 0x12" For Input As "dvbsnoop"
24
-  'dvbsnoop = Shell dvbsnoopexe & " -s sec -nohexdumpbuffer 0x12" For Input As "dvbsnoop"
25
-
26
-  dvbsnoopcMap = Shell "/root/Desktop2_kde4/dvbsnoop2" & options2 For Input As "dvbsnoopcMap"
27
-  Wait 0.1
28
-  dvbsnoop = Shell "/root/Desktop2_kde4/dvbsnoop1" & options For Input As "dvbsnoop"
29
-
30
-End
31
-
32
 
33
 
34
 Public Sub Stopit()
35
xt7-player-mpv-0.14.384.tar.gz/.src/Form/AudioForm.class -> xt7-player-mpv-0.16.384.tar.gz/.src/Form/AudioForm.class Changed
201
 
1
@@ -1,13 +1,48 @@
2
 ' Gambas class file
3
 
4
 
5
-Public CoverSize As Integer = 160
6
+Public CoverSize As Integer = 180
7
 Public CSTEP As Integer = 8
8
 
9
-Public Sub UpdateLength(length As String)
10
+
11
+Public Sub init()
12
+
13
+  GridUp.columns.count = 2
14
+  GridUp.rows.count = 6
15
+  GridUp[0, 0].text = ("Artist")
16
+  GridUp[1, 0].text = ("Album")
17
+  GridUp[2, 0].text = ("Year")
18
+  GridUp[3, 0].text = ("Title")
19
+  GridUp[4, 0].text = ("Comment")
20
+  GridUp[5, 0].text = ("Lyrics")
21
+  GridUp[5, 1].picture = Picture["icon:/22/microphone"]
22
+  GridUp.Columns[0].w = -1
23
+  GridUp.Columns[1].w = -1
24
+  
25
+  GridDown.columns.count = 2
26
+  GridDown.rows.count = 5
27
+  GridDown[0, 0].text = ("Radio")
28
+  GridDown[1, 0].text = ("Name")
29
+  GridDown[2, 0].text = ("Length")
30
+  GridDown[3, 0].text = ("Size")
31
+  GridDown[4, 0].text = ("Audio Info")
32
   
33
-  Label19.text = length
34
+  GridDown.Columns[0].w = -1
35
+  GridDown.Columns[1].w = -1
36
   
37
+  coversize = CInt(audioform.gridup.Rows[0].Height * GridUp.Rows.Count * 1.2)
38
+  coverpanel.w = coversize
39
+  CoverBox.h = CoverBox.w 
40
+  
41
+  MakeGridShadow(audioform.gridupShadow, GridUp)
42
+  MakeGridShadow(audioform.griddownShadow, GridDown)
43
+End
44
+
45
+
46
+
47
+
48
+Public Sub UpdateLength(length As String)
49
+  audioform.UpdateCell(audioform.griddown, 2, 1, length)
50
 End
51
 
52
 Public Sub AudioAreaGroup_Drop()
53
@@ -33,9 +68,7 @@
54
 End
55
 
56
 Public Sub AudioAreaGroup_MouseUp()
57
-  
58
   FMain.VideoAreaGroup_MouseUp()
59
-  
60
 End
61
 
62
 Public Sub AudioAreaGroup_MouseWheel()
63
@@ -114,27 +147,10 @@
64
 End
65
 
66
 Public Sub cutstrings()
67
-  audioform.RadioLabel.text = cutstring(audioform.RadioLabel.text, 50)
68
+  Audioform.UpdateCell(audioform.griddown, 0, 1, cutstring(audioform.GridDown[0, 1].text, 50))
69
 End
70
 
71
 
72
-Public Sub Form_Open()
73
-
74
-  
75
-
76
-End
77
-
78
-Public Sub AudioAreaGroup_MouseMove()
79
-
80
-  FMain.VideoAreaGroup_MouseMove()
81
-
82
-End
83
-
84
-'mpv 0.11 removed af_export filter :(
85
-' Public Sub BarBox_MouseDown()
86
-'   Try FMain.mymeters.nextvis()
87
-' End
88
-
89
 Public Sub PictureBox2_Enter()
90
   
91
 End
92
@@ -155,3 +171,235 @@
93
 Public Sub Label17_MouseDown()
94
   PictureBox2_MouseDown()
95
 End
96
+
97
+
98
+
99
+
100
+Public Sub AudioAreaGroup_Arrange()
101
+Dim w As Integer = Last.w
102
+  If Last = audiopanel Then
103
+    If GridDown[0, 1].text = "" Then 
104
+      GridDown.Rows[0].h = 0
105
+        Else
106
+      GridDown.Rows[0].h = Griddown.Rows.H
107
+    Endif
108
+  
109
+    pictureback.lower
110
+    If Left(GeneralOptions.NoParseVisType2.text) = 0 Then
111
+      picturebox1.Background = Color.Transparent
112
+      pictureback.Move(0, 0, audiopanel.w, AudioPanel.h)
113
+        Else
114
+      picturebox1.Background = Color.black
115
+      pictureback.Move(0, 0, audiopanel.w, AudioPanel.h - picturebox1.h)
116
+    Endif
117
+    Return
118
+  Endif
119
+  
120
+  If Last = gridup Then 
121
+    MakeGridShadow(audioform.gridupShadow, GridUp)
122
+    Return
123
+  Endif
124
+  If Last = griddown Then 
125
+    MakeGridShadow(audioform.griddownShadow, GridDown)
126
+    Return
127
+  Endif
128
+  
129
+
130
+
131
+End
132
+
133
+Private Sub antiglitch(color_mean As Integer)
134
+  FMain.outerbox.background = Color_mean
135
+  audiopanel.background = Color_mean
136
+  pictureback.Background = color_mean
137
+End
138
+
139
+
140
+'Public Color_mean As Integer
141
+
142
+
143
+Public Sub AudioAreaGroup_MouseMove()
144
+'   Dim pw As Integer
145
+'   pw = gridup.w
146
+' FMain.outerbox.background = Color_mean
147
+' audiopanel.background = Color_mean
148
+' pictureback.Background = color_mean
149
+'   gridup.w = 30
150
+'   'Gridupshadow.hide
151
+'   Wait 
152
+'   gridup.w = pw
153
+'  ' pictureback.hide
154
+  FMain.VideoAreaGroup_MouseMove()
155
+End
156
+
157
+Public Sub ShowBackground(Optional i As Image = Null)
158
+  Dim blurred As Image
159
+  Dim gradient As Image
160
+  Dim t As Image
161
+  Dim pw, ph, cw, ch As Integer
162
+  Dim max_light As Integer = 150 'normalize bright images to this value
163
+  Dim max_light_down As Integer = 75 'normalize bright images to this value
164
+  Dim mean As Integer
165
+  Dim backcolorimg As Image
166
+  
167
+  pictureback.lower
168
+  pictureback.background = Color.black
169
+  
170
+  gradient = Image.Load("shadeaudiopanel.png") '.Mirror(False, True)
171
+  
172
+  'take the background from the current cover
173
+  If i = Null Then 
174
+    blurred = CoverBox.Picture.Image
175
+      Else
176
+    blurred = i
177
+  Endif
178
+  
179
+  'get a good blur effect without using gb.image.effects by resizing the image multiple times.
180
+  'it works!
181
+  blurred = blurred.Stretch(10, 10)
182
+  blurred = blurred.Stretch(5, 5)
183
+  blurred = blurred.Stretch(10, 10)
184
+  blurred = blurred.Stretch(5, 5)
185
+  blurred = blurred.Stretch(10, 10)
186
+  blurred = blurred.Stretch(5, 5)
187
+  
188
+                                              
189
+
190
+  blurred = blurred.Stretch(gradient.w, gradient.h)
191
+  
192
+  'normalize brightness
193
+  mean = c_mean(blurred)
194
+  If mean > max_light Then
195
+    blurred = blurred.Brightness(- (1 - (max_light / mean)))
196
+  Endif
197
+  
198
+  'compose the alpha mask gradient over the blurred image  
199
+   blurred.PaintImage(gradient, 0, 0)
200
+
201
xt7-player-mpv-0.14.384.tar.gz/.src/Form/AudioForm.form -> xt7-player-mpv-0.16.384.tar.gz/.src/Form/AudioForm.form Changed
201
 
1
@@ -5,384 +5,119 @@
2
   #Scaled = False
3
   Font = Font["1"]
4
   Arrangement = Arrange.Fill
5
-  { AudioPanel VBox AudioAreaGroup
6
+  { AudioPanel VBox audioareagroup
7
     Name = "AudioPanel"
8
-    Move(-7,-7,630,504)
9
-    Font = Font["1"]
10
+    Move(7,28,672,420)
11
     Background = &H000000&
12
     Tracking = True
13
-    Drop = True
14
     Expand = True
15
-    { HBox10 HBox AudioAreaGroup
16
-      Name = "HBox10"
17
-      Move(119,0,273,28)
18
+    { HBox1 HBox audioareagroup
19
+      Name = "HBox1"
20
+      Move(203,7,161,14)
21
       Tracking = True
22
-      Drop = True
23
       Expand = True
24
     }
25
-    { HBox7 HBox AudioAreaGroup
26
-      Name = "HBox7"
27
-      Move(21,21,588,392)
28
-      Font = Font["1"]
29
+    { Label1 Label VideoAreaGroup
30
+      Name = "Label1"
31
+      Move(28,28,161,28)
32
+      Visible = False
33
+      Font = Font["Bold,Italic,17"]
34
+      Foreground = &HFFFF00&
35
+      Text = ("Media Info ")
36
+    }
37
+    { GridUpBox HBox audioareagroup
38
+      Name = "GridUpBox"
39
+      Move(21,63,651,119)
40
       Tracking = True
41
-      Drop = True
42
-      { VBox7 VBox AudioAreaGroup
43
-        Name = "VBox7"
44
-        Move(7,77,21,182)
45
-        Background = &H000000&
46
+      AutoResize = True
47
+      Spacing = True
48
+      { LeftAlignUp VBox audioareagroup
49
+        Name = "LeftAlignUp"
50
+        Move(7,21,14,77)
51
         Tracking = True
52
-        Expand = True
53
       }
54
-      { VBox5 VBox AudioAreaGroup
55
-        Name = "VBox5"
56
-        Move(42,7,490,378)
57
-        Font = Font["Bitstream Vera Sans,1"]
58
-        Background = &H000000&
59
-        Tracking = True
60
-        Drop = True
61
-        { HBox3 HBox AudioAreaGroup
62
-          Name = "HBox3"
63
-          Move(70,7,308,14)
64
+      { CoverPanel Panel
65
+        Move(35,21,126,77)
66
+        { CoverBox PictureBox
67
+          Move(0,0,28,28)
68
           Font = Font["1"]
69
+          Foreground = Color.SelectedBackground
70
           Tracking = True
71
-          Expand = True
72
-        }
73
-        { HBox2 HBox AudioAreaGroup
74
-          Name = "HBox2"
75
-          Move(42,14,434,203)
76
-          Font = Font["Bitstream Vera Sans,1"]
77
-          Background = &H000000&
78
-          Tracking = True
79
-          Margin = True
80
-          { TimerZoomIn #Timer
81
-            Delay = 23
82
-          }
83
-          { BarBox HBox
84
-            Move(7,56,49,133)
85
-            Tracking = True
86
-          }
87
-          { Panel1 Panel AudioAreaGroup
88
-            Name = "Panel1"
89
-            Move(63,0,161,203)
90
-            Font = Font["Bitstream Vera Sans,1"]
91
-            Background = &H000000&
92
-            Tracking = True
93
-            Drop = True
94
-            Spacing = True
95
-            Margin = True
96
-            Padding = 8
97
-            { Label1 Label VideoAreaGroup
98
-              Name = "Label1"
99
-              Move(0,0,161,28)
100
-              Font = Font["Bold,Italic,17"]
101
-              Foreground = &HFFFF00&
102
-              Text = ("Media Info ")
103
-            }
104
-            { HBox8 HBox
105
-              Move(168,189,119,21)
106
-              Font = Font["1"]
107
-            }
108
-            { CoverBox PictureBox
109
-              Move(0,28,28,28)
110
-              Font = Font["1"]
111
-              Background = &H000000&
112
-              Foreground = Color.SelectedBackground
113
-              Tracking = True
114
-              Picture = Picture["emptycover.png"]
115
-              Stretch = True
116
-              Alignment = Align.Center
117
-            }
118
-            { TimerZoomOut #Timer
119
-              #Move(49,56)
120
-              Delay = 30
121
-            }
122
-          }
123
-          { VBox1 VBox AudioAreaGroup
124
-            Name = "VBox1"
125
-            Move(231,14,133,182)
126
-            Background = &H000000&
127
-            Tracking = True
128
-            Drop = True
129
-            AutoResize = True
130
-            Margin = True
131
-            Padding = 8
132
-            { HBox4 HBox AudioAreaGroup
133
-              Name = "HBox4"
134
-              Move(14,0,98,21)
135
-              Tracking = True
136
-              Expand = True
137
-            }
138
-            { Label2 Label AudioAreaGroup
139
-              Name = "Label2"
140
-              Move(14,14,98,28)
141
-              Font = Font["Bold,12"]
142
-              Background = &H000000&
143
-              Foreground = &HFFFFFF&
144
-              Tracking = True
145
-              AutoResize = True
146
-              Text = ("Artist")
147
-            }
148
-            { Label3 Label AudioAreaGroup
149
-              Name = "Label3"
150
-              Move(14,35,98,28)
151
-              Font = Font["Bold,12"]
152
-              Background = &H000000&
153
-              Foreground = &HFFFFFF&
154
-              Tracking = True
155
-              AutoResize = True
156
-              Text = ("Album")
157
-            }
158
-            { Label4 Label AudioAreaGroup
159
-              Name = "Label4"
160
-              Move(14,56,98,28)
161
-              Font = Font["Bold,12"]
162
-              Background = &H000000&
163
-              Foreground = &HFFFFFF&
164
-              Tracking = True
165
-              AutoResize = True
166
-              Text = ("Year")
167
-            }
168
-            { Label5 Label AudioAreaGroup
169
-              Name = "Label5"
170
-              Move(14,77,98,28)
171
-              Font = Font["Bold,12"]
172
-              Background = &H000000&
173
-              Foreground = &HFFFFFF&
174
-              Tracking = True
175
-              AutoResize = True
176
-              Text = ("Title")
177
-            }
178
-            { Label6 Label AudioAreaGroup
179
-              Name = "Label6"
180
-              Move(14,98,98,28)
181
-              Font = Font["Bold,12"]
182
-              Background = &H000000&
183
-              Foreground = &HFFFFFF&
184
-              Tracking = True
185
-              AutoResize = True
186
-              Text = ("Comment")
187
-            }
188
-            { HBox11 HBox AudioAreaGroup
189
-              Name = "HBox11"
190
-              Move(7,119,98,21)
191
-              Tracking = True
192
-              Expand = True
193
-            }
194
-            { Label17 Label
195
-              Move(7,147,98,28)
196
-              Font = Font["Bold,12"]
197
-              Background = &H000000&
198
-              Foreground = &HFFFFFF&
199
-              Tracking = True
200
-              AutoResize = True
201
xt7-player-mpv-0.14.384.tar.gz/.src/Form/CoverManager.class -> xt7-player-mpv-0.16.384.tar.gz/.src/Form/CoverManager.class Changed
75
 
1
@@ -317,7 +317,7 @@
2
 
3
 Public Sub Form_Open()
4
   Global.Center(Fmain, Me)
5
-  Try hsplit1.Layout = [160, hsplit1.w - 160]
6
+  Try hsplit1.Layout = [AudioForm.coversize, hsplit1.w - audioform.coversize]
7
   CoverManager.Show
8
   combobox1.readonly = True
9
   combobox1.index = 0
10
@@ -1133,6 +1133,7 @@
11
 
12
 Public Function FolderPicture(Directory As String) As String  
13
   Dim Files As New String[]
14
+  Dim afile As String
15
   
16
   Files = (Dir(Directory, "*ront*.jpg"))
17
   If Files.count > 0 Then Goto FILEFOUND  
18
@@ -1152,19 +1153,34 @@
19
   Files.Insert(Dir(Directory, "*ront*.BMP"))
20
   If Files.count > 0 Then Goto FILEFOUND
21
   
22
+  Files.Insert(Dir(Directory, "*.jpg"))
23
+  If Files.count > 0 Then Goto FILEFOUND
24
+  
25
   Files.Insert(Dir(Directory, "*.JPG"))
26
   If Files.count > 0 Then Goto FILEFOUND
27
+
28
+  Files.Insert(Dir(Directory, "*.jpeg"))
29
+  If Files.count > 0 Then Goto FILEFOUND
30
   
31
   Files.Insert(Dir(Directory, "*.JPEG"))
32
   If Files.count > 0 Then Goto FILEFOUND
33
+
34
+  Files.Insert(Dir(Directory, "*.png"))
35
+  If Files.count > 0 Then Goto FILEFOUND
36
   
37
   Files.Insert(Dir(Directory, "*.PNG"))
38
   If Files.count > 0 Then Goto FILEFOUND
39
+
40
+  Files.Insert(Dir(Directory, "*.bmp"))
41
+  If Files.count > 0 Then Goto FILEFOUND
42
   
43
   Files.Insert(Dir(Directory, "*.BMP"))
44
 
45
   FILEFOUND:
46
-  If Files.count > 0 Then 
47
+  If Files.count > 0 Then
48
+    For Each afile In files
49
+      If Not (afile Like ".*") Then Return afile
50
+    Next
51
     Return Files[0]
52
       Else
53
     Return ""
54
@@ -1317,6 +1333,8 @@
55
   shadowimg = shadowimg.Stretch(w + ShadowOffset, h + ShadowOffset)
56
 End
57
 
58
+
59
+
60
 Public Function Shadowed(src As Picture) As Image
61
   Dim offset As Integer = 0
62
   Dim w As Integer = src.w
63
@@ -1333,9 +1351,9 @@
64
 Public Function keepaspect(img As Image, width As Integer) As Picture
65
   Dim aspect As Float = img.w / img.h
66
   If aspect >= 1 Then 
67
-    Return cornice(img.Stretch(width, CInt(width / aspect)), 160, 160)
68
+    Return cornice(img.Stretch(width, CInt(width / aspect)), AudioForm.coversize, AudioForm.coversize)
69
       Else
70
-    Return cornice(img.Stretch(CInt(width * aspect), width), 160, 160)
71
+    Return cornice(img.Stretch(CInt(width * aspect), width), AudioForm.coversize, AudioForm.coversize)
72
   Endif
73
 End
74
 
75
xt7-player-mpv-0.14.384.tar.gz/.src/Form/FMain.class -> xt7-player-mpv-0.16.384.tar.gz/.src/Form/FMain.class Changed
201
 
1
@@ -488,8 +488,14 @@
2
   'kill prevoiusly launched xbindkeys
3
   Shell ("killall " & global.CustomBindKeys) For Read
4
   Application.ShowTooltips = GeneralOptions.ToolTipsCHK.value
5
-  'Prepare our xbindkeys link, we'll need it to ensure only one at time.
6
-  Shell ("ln -s $(which xbindkeys) " & global.confpath & "/Xt7BindKeys") For Read
7
+  
8
+  If global.Which("xbindkeys") Then
9
+    'Prepare our xbindkeys link, we'll need it to ensure only one at time.
10
+    Shell ("ln -s $(which xbindkeys) " & global.confpath & "/" & global.CustomBindKeys) For Read
11
+      Else
12
+    global.myDebug("xbindkeys doesn't seem to be installed")
13
+  Endif
14
+
15
   'start to listen for remote commands, one connection is ok.
16
   Mysocket.type = Net.Unix
17
   Mysocket.path = global.confpath & "/.localsocket"
18
@@ -538,7 +544,7 @@
19
   
20
   timer_runtime_infos = New Timer As "timer_runtime_infos"
21
   timer_runtime_infos.enabled = False
22
-  
23
+
24
 End
25
 
26
 Private Sub MakeProfileMenu()
27
@@ -557,6 +563,24 @@
28
   
29
 End
30
 
31
+Public Function get_history_leftoff_time(fullpath As String) As String
32
+  Dim history, entry As String
33
+  Dim historyarray As String[]
34
+  Dim sep As String = Chr(8)
35
+  Try history = file.Load(global.Historyfile)
36
+  If Error Then Return 0
37
+  historyarray = Split(history, "\n", "", True)
38
+  For Each entry In historyarray
39
+    If entry Like fullpath & "*" & sep & "*" Then
40
+      Try Return Split(entry, sep, "", True, "")[1]
41
+      Return "0"
42
+    Endif
43
+  Next
44
+End
45
+
46
+
47
+
48
+
49
 Private RecentFileEntry As Menu
50
 
51
 Private HaveToPlay As String = ""
52
@@ -575,10 +599,11 @@
53
   ClearRecentFilesSub()
54
   historyarray = Split(history, "\n", "", True)
55
   historyarray.Reverse()
56
+
57
   For Each entry In historyarray
58
     RecentFileEntry = New Menu(MenuOpenRecent) As "RecentFileEntry"
59
     RecentFileEntry.name = Timer & Rnd(0, 10000)
60
-    If entry Like "*" & sep & "*" Then 
61
+    If entry Like "*" & sep & "*" & "leftoff" Then 
62
       If HaveToPlay = "" Then
63
         Try HaveToPlay = Split(entry, sep, "", True, "")[0]
64
         If Not Error Then 
65
@@ -612,6 +637,7 @@
66
   Endif
67
 End
68
 
69
+
70
 Public Sub RecentFileEntry_Click()
71
 
72
   Try Play(Last.caption)
73
@@ -897,30 +923,32 @@
74
   Endif
75
 
76
   ArrangeCpl(9)
77
+  audioform.audiopanel.font = GeneralOptions.FontChooseBTN2.font
78
 
79
+  audioform.audiopanel.Foreground = GeneralOptions.ColorChooseBTN2.Background
80
   If audioform.AudioPanel.parent = Rightsidepanel Then
81
     If (Not mplayer.ProcessRunningOvr()) Then ShowAudioPanel(False) 
82
     SetSubControlsStyles(Fmain)
83
-    For Each TheObject In Audioform.controls
84
-      If theobject Is Label Then
85
-        Try TheObject.font = GeneralOptions.FontChooseBTN2.font
86
-        Try TheObject.Foreground = GeneralOptions.ColorChooseBTN2.Background
87
-      Endif
88
-    Next 'TheForm
89
+    ' For Each TheObject In Audioform.controls
90
+    '   If theobject Is Label Then
91
+    '     Try TheObject.font = GeneralOptions.FontChooseBTN2.font
92
+    '     Try TheObject.Foreground = GeneralOptions.ColorChooseBTN2.Background
93
+    '   Endif
94
+    ' Next 'TheForm
95
     ShowAudioPanel(True)
96
   Else
97
     SetSubControlsStyles(Fmain)
98
-    For Each TheObject In Audioform.controls
99
-      If theobject Is Label Then
100
-        Try TheObject.font = GeneralOptions.FontChooseBTN2.font
101
-        Try TheObject.foreground = GeneralOptions.ColorChooseBTN2.Background
102
-      Endif
103
-    Next 'TheForm
104
+    ' For Each TheObject In Audioform.controls
105
+    '   If theobject Is Label Then
106
+    '     Try TheObject.font = GeneralOptions.FontChooseBTN2.font
107
+    '     Try TheObject.foreground = GeneralOptions.ColorChooseBTN2.Background
108
+    '   Endif
109
+    ' Next 'TheForm
110
   Endif
111
 
112
   audioform.Label1.Foreground = &HFFFF00&
113
   audioform.Label1.Font.Italic = True
114
-  Audioform.Label1.Font.size = Audioform.Label2.Font.size + 4
115
+  Audioform.Label1.Font.size = Audioform.audiopanel.Font.size + 4
116
   fmain.Statusbar1.Foreground = &HF0F0F0&
117
   fmain.Statusbar1.Background = &000000&
118
   
119
@@ -1012,7 +1040,7 @@
120
     progressframe.background = Color.rgb(0, 0, 0, 210)
121
     progressframe.tag = True
122
   Endif
123
-
124
+  audioform.init()
125
   'progressframe.background = Color.SetAlpha(Color.Darker(Color.Darker(Color.SelectedBackground)), 200)
126
   Initprogress()
127
 End
128
@@ -1314,39 +1342,66 @@
129
   
130
   'init pretty panel too
131
   If GeneralOptions.CoverCHK2.value Then
132
-    audioform.label12.text = PropertiesGrid[6, 1].text
133
-    audioform.label13.text = PropertiesGrid[5, 1].text
134
-    audioform.label14.text = PropertiesGrid[8, 1].text
135
-    audioform.label15.text = PropertiesGrid[7, 1].text
136
-    audioform.label16.text = PropertiesGrid[11, 1].text
137
+    audioform.UpdateCell(audioform.gridup, 0, 1, PropertiesGrid[6, 1].text)
138
+    audioform.UpdateCell(audioform.gridup, 1, 1, PropertiesGrid[5, 1].text)
139
+    audioform.UpdateCell(audioform.gridup, 2, 1, PropertiesGrid[8, 1].text)
140
+    audioform.UpdateCell(audioform.gridup, 3, 1, PropertiesGrid[7, 1].text)
141
+    audioform.UpdateCell(audioform.gridup, 4, 1, PropertiesGrid[11, 1].text)
142
+    
143
     'commented out the very next because this will be filled by mpv when the name property changes.
144
     'audioform.label18.text = PropertiesGrid[1, 1].text
145
     
146
     'audioform.label19.text = PropertiesGrid[3, 1].text
147
     If Trim(PropertiesGrid[2, 1].text) <> "" Then 
148
-      audioform.label20.text = PropertiesGrid[2, 1].text & "KB"
149
+      audioform.UpdateCell(audioform.griddown, 3, 1, PropertiesGrid[2, 1].text & "KB")
150
     Else
151
-      audioform.label20.text = ("Unknown")
152
+      audioform.UpdateCell(audioform.griddown, 3, 1, ("Unknown"))
153
     Endif
154
     Try audio_codec = Split(Trim(PropertiesGrid[14, 1].text), " ", "", True)[0]
155
-    If audio_codec <> "" Then audioform.label21.text = audio_codec
156
-    If (Trim(PropertiesGrid[15, 1].text) <> "") Then audioform.label21.text &= "@" & PropertiesGrid[15, 1].text
157
-    If (Trim(PropertiesGrid[12, 1].text) <> "") Then audioform.label21.text &= ", " & ("Channels") & ": " & PropertiesGrid[12, 1].text
158
-    If (Trim(PropertiesGrid[13, 1].text) <> "") Then audioform.label21.text &= ", " & ("Rate") & ": " & PropertiesGrid[13, 1].text & "Hz"
159
+    If audio_codec <> "" Then audioform.UpdateCell(audioform.griddown, 4, 1, audio_codec)
160
+    If (Trim(PropertiesGrid[15, 1].text) <> "") Then audioform.UpdateCell(audioform.griddown, 4, 1, audioform.griddown[4, 1].text & "@" & PropertiesGrid[15, 1].text)
161
+    If (Trim(PropertiesGrid[12, 1].text) <> "") Then audioform.UpdateCell(audioform.griddown, 4, 1, audioform.griddown[4, 1].text & ", " & ("Channels") & ": " & PropertiesGrid[12, 1].text)
162
+    If (Trim(PropertiesGrid[13, 1].text) <> "") Then audioform.UpdateCell(audioform.griddown, 4, 1, audioform.griddown[4, 1].text & ", " & ("Rate") & ": " & PropertiesGrid[13, 1].text & "Hz")
163
+
164
   Endif
165
   
166
   If (global.IsAudioFile(mplayer.getP("fullpath"))) Or (global.IsNetworkURI(mplayer.getP("fullpath"))) Or (Lower(mplayer.getP("fullpath")) Like "cdd?://*") Then
167
-    AutoresizeAudioForm()
168
+    audioform.AutoresizeAudioForm()
169
   Endif
170
 
171
 End
172
 
173
+
174
+Public Sub mplayer_user_stopping(fullpath As String, timepos As String)
175
+  If Not (global.IsNetworkURI(mplayer.getP("fullpath"))) Then
176
+    Try addhistory(fullpath, Split(timepos, ".,")[0])
177
+    If Error Then 
178
+      global.myDebug("could not add timepos to " & fullpath)
179
+      addhistory(fullpath)
180
+    Endif
181
+  Endif
182
+End
183
+
184
 Public Sub Form_Close()
185
   Dim MySettings As New SettingsClass
186
   Dim t0 As Float = Timer()
187
-  
188
-  ButtonStop_Click()
189
-  
190
+  Dim wasrunning As Boolean = False
191
+  Dim fullpath, currenttime As String
192
+
193
+  Closing = True
194
+
195
+  Try wasrunning = mplayer.ProcessRunningOvr()
196
+  Object.Detach(mplayer)
197
+
198
+  If wasrunning Then
199
+    fullpath = mplayer.getP("fullpath")
200
+    currenttime = mplayer.CurrentTime()
201
xt7-player-mpv-0.14.384.tar.gz/.src/Form/FMain.form -> xt7-player-mpv-0.16.384.tar.gz/.src/Form/FMain.form Changed
27
 
1
@@ -1410,7 +1410,7 @@
2
               Text = ("Order by")
3
             }
4
             { ComboBoxOrderBy ComboBox
5
-              MoveScaled(9.4286,-29.2857,18,4)
6
+              MoveScaled(9.4286,-31.2857,18,4)
7
               #Translate = False
8
               Expand = True
9
               ReadOnly = True
10
@@ -1980,14 +1980,14 @@
11
       }
12
       { OuterBox Panel VideoAreaGroup
13
         Name = "OuterBox"
14
-        MoveScaled(2,15,24,28)
15
+        MoveScaled(4,15,24,28)
16
         Background = &H000000&
17
         Tracking = True
18
         Drop = True
19
         Expand = True
20
         { VideoBox DrawingArea VideoAreaGroup
21
           Name = "VideoBox"
22
-          MoveScaled(1,8,24,14)
23
+          MoveScaled(0,7,24,14)
24
           Background = &H000000&
25
           Tracking = True
26
           Drop = True
27
xt7-player-mpv-0.14.384.tar.gz/.src/Form/GeneralOptions.class -> xt7-player-mpv-0.16.384.tar.gz/.src/Form/GeneralOptions.class Changed
112
 
1
@@ -84,6 +84,16 @@
2
   Try Optionslist.Add("User options", ("User options"), Stock["large/terminal"])
3
   Try Optionslist.Add("Style", ("Style"), Stock["large/color"])
4
   DrawFiltersGui()
5
+  
6
+  NoParseVisType2.Add("0 - Disabled")
7
+  NoParseVisType2.Add("1 - Waves over spectrum")
8
+  NoParseVisType2.Add("2 - Waves and spectrum")
9
+  NoParseVisType2.Add("3 - Spectrum")
10
+  NoParseVisType2.Add("4 - Frequencies")
11
+  NoParseVisType2.Add("5 - Vectorscope")
12
+  
13
+  
14
+  
15
   InitDone = True
16
 End
17
 
18
@@ -340,17 +350,54 @@
19
   If Right(pt) = "," Then pt = Left(pt, -1)
20
   'If pt <> "" Then myopts.Add(newopt("ad", pt))
21
   If pt <> "" Then myopts.Add(newopt("audio-spdif", pt))
22
-  
23
   Return myopts.Insert(parse_custom_options())
24
 
25
 End
26
 
27
+Public Function Visualization_opts() As MpvOption[]
28
+  Dim myopts As New MpvOption[]
29
+  Dim visstring As String
30
+  Dim t1 As String
31
+
32
+  t1 = Temp()
33
+  Select Case Left(NoParseVisType2.text)
34
+    Case "1"
35
+      visstring = "'[aid1]asplit=3 [azero][auno][ao];[azero]showspectrum=mode=separate:color=intensity:slide=scroll:s=4x512:color=intensity:win_func=blackman:mode=combined:saturation=1,crop=h=(in_h/1.5):y=in_h,scale=h=512:w=512:force_original_aspect_ratio=disable[spectrum];[auno]showwaves=s=512x512:mode=line:r=20,crop=h=(ih/2):y=(0),crop=h=(ih/2):y=ih,colorlevels=romax=0.5[waves];[spectrum][waves]overlay[vo]'"
36
+    Case "2"
37
+      visstring = "'[aid1]asplit=3 [azero][auno][ao];[azero]showspectrum=mode=separate:color=intensity:slide=scroll:s=4x512:color=intensity:win_func=blackman:mode=combined:saturation=1,crop=h=(in_h/1.5):y=in_h,scale=h=512:w=512:force_original_aspect_ratio=disable[spectrum];[auno]showwaves=s=512x512:mode=line:r=20,crop=h=(in_h):y=(in_h/2),colorlevels=romax=0.5,colorkey=0x000000:0.1:0.5[waves];[spectrum][waves]overlay[vo]'"
38
+    Case "3"
39
+      Copy "shade_alpha.png" To t1
40
+      visstring = "'[aid1]asplit [a][ao];[a]showspectrum=mode=separate:color=intensity:slide=scroll:s=4x256:color=intensity:win_func=blackman:mode=combined:saturation=1,crop=h=(in_h/1.5):y=in_h[spectrum];movie=" & t1 & ",scale=h=(in_h/1.5)[pic];[spectrum][pic]overlay[vo]'"
41
+    Case "4"
42
+      Copy "black.png" To t1
43
+      visstring = "'[aid1]asplit=3[ao][a1][a2];[a1]showfreqs=s=512x256:mode=bar:colors=#eeeeee|#4d4d4d:averaging=0.6[freqs];movie=" & t1 & ",scale=512x256[pic];[a2]adrawgraph=bg=#00000000:size=512x256[blank];[blank][pic]overlay[back];[back][freqs]overlay[vo]'"
44
+      'visstring = "'[aid1]asplit=3[ao][a1][a2];[a1]showfreqs=s=512x256:mode=bar:colors=#00bbff|#0088ff:averaging=0.6[freqs];movie=" & t1 & ",scale=512x256[pic];[a2]adrawgraph=bg=#00000000:size=512x256[blank];[blank][pic]overlay[back];[back][freqs]overlay[vo]'"
45
+    Case "5"
46
+      Copy "black.png" To t1
47
+      visstring = "'[aid1]asplit=3[a1][a2][ao]; [a2]adrawgraph=bg=#00000000:size=256x256[blank];movie=" & t1 & ",scale=256x256[pic];[blank][pic]overlay[back];[a1]avectorscope=size=256x256[sp];[back][sp]overlay[vo]'"
48
+  End Select
49
+  If visstring <> "" Then
50
+    myopts.Add(newopt("keepaspect", "no"))
51
+    myopts.Add(newopt("lavfi-complex", visstring))
52
+  Endif
53
+  Return myopts
54
+End
55
+
56
+
57
+
58
 Public Sub ApplyBTN_Click()
59
+
60
+Debug NoParse55ab.visible
61
+
62
   FMain.Apply
63
   Wait 0.1
64
   'IF ((NOT FMain.mplayer.ProcessRunningOvr()) OR (Fmain.mplayer.paused)) OR (GeneralOptions.Tabstrip1.caption = ("Style")) THEN 'apply style changes only if mplayer is not running.
65
     FMain.SetStyle_early()
66
     FMain.SetStyle_later()
67
+    AudioForm.init()
68
+    AudioForm.CoverPanel.Resize(AudioForm.CoverSize, AudioForm.coversize)
69
+    AudioForm.CoverBox.Resize(AudioForm.CoverSize, AudioForm.coversize)
70
+    
71
     Fmain.UpdateSearchResults(Fmain.mylibrary, Fmain.Librarygrid, fmain.fullyloaded, fmain.Searchfield.text)
72
     Fmain.UpdateSearchResults(Fmain.myplaylist, Fmain.PlaylistGrid, fmain.fullyloaded, fmain.SearchfieldPLS.text)
73
     global.AddUserExtensions(KnownExtensions.text)
74
@@ -834,12 +881,12 @@
75
 Public Sub Form_Show()
76
  'mpv 0.11 removed af_export filter :(
77
   '8 5 42 40 43
78
-  noparse8.visible = False
79
-  noparse5.visible = True
80
-  noparse42.visible = False
81
-  noparse40.visible = False
82
-  noparse43.visible = False
83
-  noparse55.visible = False
84
+  ' NoParse8a.visible = False
85
+  ' noparse5.visible = True
86
+  ' noparse42.visible = False
87
+  ' noparse40.visible = False
88
+  ' noparse43.visible = False
89
+  ' NoParse55ab.visible = False
90
   
91
   FillCdAndDvdDevices()
92
   If Not aligned Then
93
@@ -886,12 +933,12 @@
94
 End
95
 
96
  'mpv 0.11 removed af_export filter :(
97
-' Public Sub ShowVmeterCHK_Click()
98
-'   noparse42.enabled = Last.value
99
-'   noparse40.enabled = Last.value
100
-'   noparse43.enabled = Last.value
101
-'   NoParseVisType.enabled = Last.value
102
-' End
103
+ ' Public Sub ShowVmeterCHK2_Click()
104
+ '   noparse42.enabled = Last.value
105
+ '   noparse40.enabled = Last.value
106
+ '   noparse43.enabled = Last.value
107
+ '   NoParseVisType2.enabled = Last.value
108
+ ' End
109
 
110
 
111
 
112
xt7-player-mpv-0.14.384.tar.gz/.src/Form/GeneralOptions.form -> xt7-player-mpv-0.16.384.tar.gz/.src/Form/GeneralOptions.form Changed
201
 
1
@@ -1,7 +1,7 @@
2
 # Gambas Form File 3.0
3
 
4
 { Form Form
5
-  MoveScaled(0,0,113,85.8)
6
+  MoveScaled(0,0,113,85.8571)
7
   Tag = "12"
8
   Text = ("General options")
9
   Icon = Picture["icon:/16/options"]
10
@@ -93,13 +93,13 @@
11
           Alignment = Align.TopLeft
12
         }
13
         { NoParseBox123 Panel
14
-          MoveScaled(2,16,47,4.6)
15
+          MoveScaled(2,16,47,4.5714)
16
           ToolTip = ("Select the preferred hardware decoding method.\n(decode api + video output driver)\n\nCaveats that applies to anything but \"no\" and \"vaapi-copy\"\n- Any video driver in the chains window is overriden\n- Use of video filters will disable hardware decoding")
17
           Arrangement = Arrange.Horizontal
18
           Spacing = True
19
           Indent = True
20
           { PictureBox3 PictureBox
21
-            MoveScaled(1,1,4.6,4.6)
22
+            MoveScaled(1,1,4.5714,4.5714)
23
             Picture = Picture["icon:/large/hardware"]
24
             AutoResize = True
25
           }
26
@@ -109,7 +109,7 @@
27
             ToolTip = "Select the preferred hardware decoding method.\n(decode api + video output driver)\n\nCaveats that applies to anithing but \"no\" and \"vaapi-copy\"\n- Any video driver in the chains window is overriden\n- Use of video filters will disable hardware decoding"
28
             Expand = True
29
             ReadOnly = True
30
-            List = ["no (allows all video filters and drivers)", "auto + opengl (allows only gamma adjustments)", "auto + vdpau (allows equalization, but gamma)", "auto + vaapi (allows equalization, but gamma)", "vdpau + vdpau (allows equalization, but gamma)", "vdpau + opengl (allows only gamma adjustments)", "vaapi + vaapi (allows equalization, but gamma)", "vaapi + opengl (allows only gamma adjustments)", "vaapi-copy (allows all video filters and drivers - Intel only)"]
31
+            List = ["no (allows all video filters and drivers)", "auto + opengl (may allows only gamma adjustments)", "auto + vdpau (allows equalization, but gamma)", "auto + vaapi (allows equalization, but gamma)", "vdpau + vdpau (allows equalization, but gamma)", "vdpau + opengl (may allows only gamma adjustments)", "vaapi + vaapi (allows equalization, but gamma)", "vaapi + opengl (allows only gamma adjustments)", "vaapi-copy (allows all video filters and drivers - Intel only)"]
32
             Text = "0 - disabled (allow all video processing filters)"
33
           }
34
         }
35
@@ -119,7 +119,7 @@
36
           Spacing = True
37
           Indent = True
38
           { Panel5 Panel
39
-            MoveScaled(1,0,4.6,4.6)
40
+            MoveScaled(1,0,4.5714,4.5714)
41
           }
42
           { vdpauooverlaycheck CheckBox
43
             MoveScaled(18,0,28,3)
44
@@ -194,29 +194,29 @@
45
         Spacing = True
46
         Margin = True
47
         Padding = 6
48
-        { NoParse8 HBox
49
+        { NoParse8as HBox
50
           MoveScaled(0,0,50,4)
51
           Visible = False
52
-          Enabled = False
53
           Spacing = True
54
-          { ShowVmeterCHK CheckBox
55
-            MoveScaled(1,0,17.2,4)
56
-            Expand = True
57
+          { ShowVmeterCHK3 CheckBox
58
+            MoveScaled(1,0,17.1429,4)
59
+            Visible = False
60
             AutoResize = True
61
             Text = ("Visualization:")
62
           }
63
         }
64
-        { NoParse55 HBox
65
+        { NoParse55ab HBox
66
           MoveScaled(0,4,50,4)
67
-          Visible = False
68
-          Enabled = False
69
           Spacing = True
70
           Indent = True
71
-          { NoParseVisType ComboBox
72
-            MoveScaled(1,0,26,4)
73
+          { Label5 Label
74
+            MoveScaled(1,0,18,4)
75
+            Text = ("Visualization:")
76
+          }
77
+          { NoParseVisType2 ComboBox
78
+            MoveScaled(22,0,26,4)
79
             Expand = True
80
             ReadOnly = True
81
-            List = [("vmeters - Audio meters"), ("DFT - Spectrum analyzer")]
82
             Text = ("vmeters - Audio meters")
83
           }
84
         }
85
@@ -976,6 +976,18 @@
86
             Text = ("Disable Kde Effects in fullscreen mode")
87
           }
88
         }
89
+        { NoParse14 HBox
90
+          MoveScaled(1,26,48,4)
91
+          ToolTip = ("Player nice level.\nThe lower the value, the higher the priority\nthe player will get against other processes.")
92
+          Spacing = True
93
+          { CHKpausefullscreen CheckBox
94
+            MoveScaled(1,0,43,4)
95
+            ToolTip = ("It has been noticed that with some intel drivers when used\nwith SNA acceleration produces video tearing.\nActivating this option may help at the cost of pausing the video\nfor a while when going to fullscreen mode.")
96
+            AutoResize = True
97
+            Text = ("Pause video when going fullscreen (helps with tearing)")
98
+            Value = CheckBox.True
99
+          }
100
+        }
101
       }
102
       Index = 6
103
       Text = ("CD/DVD")
104
@@ -1471,7 +1483,7 @@
105
       Index = 10
106
       Text = ("Misc")
107
       { ScrollView3 ScrollView
108
-        MoveScaled(4,4,55,55)
109
+        MoveScaled(4,5,55,55)
110
         Tag = "misc"
111
         Expand = True
112
         Arrangement = Arrange.Vertical
113
@@ -1559,8 +1571,31 @@
114
         { NOPARSESEP2 Separator
115
           MoveScaled(1,25,46,1)
116
         }
117
+        { NoParse47 HBox
118
+          MoveScaled(1,26,44,4)
119
+          ToolTip = ("Enable/Disbale Tooltips")
120
+          Spacing = True
121
+          { RestorePlayCHK CheckBox
122
+            MoveScaled(1,0,41,4)
123
+            ToolTip = ("If you close xt7-player while playing a local file,\nxt7 will start just were you left the next time.")
124
+            Expand = True
125
+            Text = ("Start were you left")
126
+          }
127
+        }
128
+        { NoParse8 HBox
129
+          MoveScaled(1,30,44,4)
130
+          ToolTip = ("Enable/Disbale Tooltips")
131
+          Spacing = True
132
+          { RememberPlayTimeCHK CheckBox
133
+            MoveScaled(1,0,41,4)
134
+            ToolTip = ("This will cause xt7 to restore the playback\ntime position of any recently played file.")
135
+            Expand = True
136
+            Text = ("Restore playback time position")
137
+            Value = CheckBox.True
138
+          }
139
+        }
140
         { NoParse6 HBox
141
-          MoveScaled(1,27,44,4)
142
+          MoveScaled(1,34,44,4)
143
           ToolTip = ("Enable/Disbale Tooltips")
144
           Spacing = True
145
           { ToolTipsCHK CheckBox
146
@@ -1571,7 +1606,7 @@
147
           }
148
         }
149
         { NoParse46 HBox
150
-          MoveScaled(1,31,44,4)
151
+          MoveScaled(1,38,44,4)
152
           ToolTip = ("Enable this if you want xt7 to be controlled through an mpris2 compliant client.\n")
153
           Spacing = True
154
           { ToolTipsCHKDBUS CheckBox
155
@@ -1588,19 +1623,8 @@
156
             Alignment = Align.Right
157
           }
158
         }
159
-        { NoParse47 HBox
160
-          MoveScaled(1,36,44,4)
161
-          ToolTip = ("Enable/Disbale Tooltips")
162
-          Spacing = True
163
-          { RestorePlayCHK CheckBox
164
-            MoveScaled(1,0,41,4)
165
-            ToolTip = ("If you close xt7-player while playing a local file,\nxt7 will start just were you left the next time.")
166
-            Expand = True
167
-            Text = ("Start were you left")
168
-          }
169
-        }
170
         { NoParse18 HBox
171
-          MoveScaled(1,40,50,4)
172
+          MoveScaled(1,43,50,4)
173
           ToolTip = ("When an audio file is played, the right panel will show\ninformations on the file played, allowing to set covers\nfor your library items.")
174
           Spacing = True
175
           { CoverCHK2 CheckBox
176
@@ -1612,7 +1636,7 @@
177
           }
178
         }
179
         { NoParse20 HBox
180
-          MoveScaled(1,44,50,4)
181
+          MoveScaled(1,47,50,4)
182
           ToolTip = ("Enable/Disbale the tray icon")
183
           Spacing = True
184
           { TrayCHK1 CheckBox
185
@@ -1626,7 +1650,7 @@
186
           MoveScaled(4,48,45,1)
187
         }
188
         { NoParse12 HBox
189
-          MoveScaled(1,49,50,4)
190
+          MoveScaled(1,51,50,4)
191
           Spacing = True
192
           { SaveOnExitCHK CheckBox
193
             MoveScaled(1,0,47,4)
194
@@ -1635,7 +1659,7 @@
195
           }
196
         }
197
         { NoParse21 HBox
198
-          MoveScaled(1,53,50,4)
199
+          MoveScaled(1,55,50,4)
200
           ToolTip = ("Save xt7 position and size on program exit.")
201
xt7-player-mpv-0.14.384.tar.gz/.src/Form/HotKeys.class -> xt7-player-mpv-0.16.384.tar.gz/.src/Form/HotKeys.class Changed
150
 
1
@@ -90,8 +90,8 @@
2
   HotKeysGrid.Rows[37].text = "add video-aspect -0.05"
3
   HotKeysGrid.Rows[38].text = " "
4
   HotKeysGrid.Rows[39].text = "set video-rotate 0"
5
-  HotKeysGrid.Rows[40].text = "add video-rotate +90"
6
-  HotKeysGrid.Rows[41].text = "add video-rotate -90"
7
+  HotKeysGrid.Rows[40].text = "cycle-values video-rotate 90 180 270 0"
8
+  HotKeysGrid.Rows[41].text = " "
9
   HotKeysGrid.Rows[42].text = " "
10
   HotKeysGrid.Rows[43].text = "contrast +1"
11
   HotKeysGrid.Rows[44].text = "contrast -1"
12
@@ -388,6 +388,7 @@
13
   'DIM filename AS String = ProfileName & "." & "HotKeys.txt"
14
   Dim filename As String = ProfileName & ".profile/" & "HotKeys.txt"
15
   Dim filename_fs As String = ProfileName & ".profile/" & "HotKeys_fs.txt"
16
+  Dim filename_global_hk As String = ProfileName & ".profile/" & "HotKeys_global_enabled.txt"
17
   Dim globalfilename As String = ProfileName & ".profile/" & "GlobalHotKeys.txt"
18
   Dim xbindkeysfilename As String = ProfileName & ".profile/" & "xbindkeysrc"
19
   Dim HotFile As File
20
@@ -399,6 +400,11 @@
21
       Else
22
     File.Save(filename_fs, "FALSE")
23
   Endif
24
+  If CheckBoxEnableGlobalHotkeys.value Then
25
+    File.Save(filename_global_hk, "TRUE")
26
+      Else
27
+    File.Save(filename_global_hk, "FALSE")
28
+  Endif
29
 
30
   If Not Exist(file.Dir(filename), True) Then
31
     Try Mkdir File.dir(File.Dir(File.dir(File.Dir(File.Dir(filename)))))
32
@@ -453,18 +459,24 @@
33
 Public Sub LoadHotKeys(ProfileName As String)
34
   Dim filename As String = ProfileName & ".profile/" & "HotKeys.txt"
35
   Dim filename_fs As String = ProfileName & ".profile/" & "HotKeys_fs.txt"
36
+  Dim filename_global_hk As String = ProfileName & ".profile/" & "HotKeys_global_enabled.txt"
37
   Dim Globalfilename As String = ProfileName & ".profile/" & "GlobalHotKeys.txt"
38
   Dim xbindkeysfilename As String = ProfileName & ".profile/" & "xbindkeysrc"
39
   Dim HotFile As File
40
   Dim GlobalHotFile As File
41
   
42
   Dim C, R, w1, w2 As Integer
43
-  
44
+
45
   If Exist(filename_fs) Then
46
     Try dblclick_fs_checkbox.value = (File.Load(filename_fs) = "TRUE")
47
       Else
48
     dblclick_fs_checkbox.value = True 'default value
49
   Endif
50
+  If Exist(filename_global_hk) Then
51
+    Try checkboxenableglobalhotkeys.value = (File.Load(filename_global_hk) = "TRUE")
52
+      Else
53
+    checkboxenableglobalhotkeys.value = False 'default value
54
+  Endif
55
   
56
   
57
   DefaultFill()
58
@@ -514,12 +526,14 @@
59
 End
60
 
61
 Public Sub RestartXbindKeys(xbindkeysfilename As String)
62
-  If FMain.closing Then Return
63
-  global.myDebug("Hotkeys: RestartXbindKeys()")
64
+  If (checkboxenableglobalhotkeys.value = checkboxenableglobalhotkeys.true) Then 
65
+    If FMain.closing Then Return
66
+    global.myDebug("Hotkeys: RestartXbindKeys()")
67
     Try xbindkeys.Kill
68
     If Stat(xbindkeysfilename).Size > 0 Then
69
       xbindkeys = Shell Global.XbindkeysBIN & " -n -f " & xbindkeysfilename For Read As "xbindkeys"
70
     Endif
71
+  Endif
72
 End
73
 
74
 
75
@@ -615,7 +629,9 @@
76
   Dim GrabbedData As String
77
   Dim w1, w2 As Integer = 0
78
   Dim profilename As String
79
-  
80
+
81
+  If Not Last.enabled Then Return
82
+
83
   If MouseInsideGrid(GlobalHotKeysGrid) Then
84
     GlobalHotKeysGrid.mouse = Mouse.wait
85
     Try xbindkeys.Kill
86
@@ -628,11 +644,13 @@
87
     Endif
88
    
89
     'Expand the column
90
-    w1 = GlobalHotKeysGrid.Columns[PointedCol].width
91
+    Try w1 = GlobalHotKeysGrid.Columns[PointedCol].width
92
     ' [GB2:FNTW] w2 = GlobalHotKeysGrid.Font.TextWidth(GlobalHotKeysGrid[pointedrow, PointedCol].Text)
93
-    w2 = GlobalHotKeysGrid.Font.TextWidth(GlobalHotKeysGrid[pointedrow, PointedCol].Text)
94
-    If w1 < w2 Then
95
-      GlobalHotKeysGrid.Columns[PointedCol].width = w2 + 8
96
+    If Not Error Then
97
+      w2 = GlobalHotKeysGrid.Font.TextWidth(GlobalHotKeysGrid[pointedrow, PointedCol].Text)
98
+      If w1 < w2 Then
99
+        GlobalHotKeysGrid.Columns[PointedCol].width = w2 + 8
100
+      Endif
101
     Endif
102
   Endif
103
   
104
@@ -694,4 +712,45 @@
105
   GlobalHotKeysGrid.H = CInt(GlobalHotKeysGrid.Font.TextHeight("Ij|") * 1.5)
106
 End
107
 
108
+Public Function checkxbindkeys() As Boolean
109
+  If Not global.Which("xbindkeys") Then 
110
+    Message.Error(("Sorry, could not find xbindkeys"), "Ok")
111
+    Return False
112
+      Else
113
+    Return True
114
+  Endif
115
+End
116
+
117
+
118
+Public Sub Panel2_Arrange()
119
+   If Not fmain.fullyloaded Then Return
120
+   globalhotkeysgrid.visible = (checkboxenableglobalhotkeys.value = checkboxenableglobalhotkeys.true)
121
+   Wait
122
+   GlobalHotKeysGrid.Move(0, 0, Panel2.clientw, Panel2.clienth)
123
+End
124
 
125
+Public Sub CheckBoxEnableGlobalHotkeys_Click()
126
+  Dim profilename As String
127
+  Wait
128
+  If Not fmain.fullyloaded Then Return
129
+  If checkboxenableglobalhotkeys.value = CheckBox.true Then 
130
+    If checkxbindkeys() Then
131
+      globalhotkeysgrid.visible = checkxbindkeys()
132
+      Profilename = global.confpath & "/" & Global.CurrentProfile
133
+      RestartXbindKeys(ProfileName & ".profile/" & "xbindkeysrc.tmp")
134
+        Else
135
+      checkboxenableglobalhotkeys.value = CheckBox.false
136
+    Endif
137
+      Else
138
+    globalhotkeysgrid.visible = False
139
+    Try xbindkeys.Kill
140
+  Endif
141
+
142
+End
143
+
144
+
145
+Public Sub TabStrip1_Click()
146
+  If TabStrip1.Children[0] = CheckBoxEnableGlobalHotkeys Then
147
+   If checkboxenableglobalhotkeys.value = CheckBox.true Then checkxbindkeys()
148
+  Endif
149
+End
150
xt7-player-mpv-0.14.384.tar.gz/.src/Form/HotKeys.form -> xt7-player-mpv-0.16.384.tar.gz/.src/Form/HotKeys.form Changed
40
 
1
@@ -25,7 +25,7 @@
2
     }
3
   }
4
   { TabStrip1 TabStrip
5
-    MoveScaled(1,1,63,53)
6
+    MoveScaled(1,0,63,53)
7
     Tracking = True
8
     Expand = True
9
     Arrangement = Arrange.Vertical
10
@@ -39,7 +39,7 @@
11
       Arrangement = Arrange.Fill
12
       Border = Border.Plain
13
       { HotKeysGrid GridView
14
-        MoveScaled(0,0,45,31)
15
+        MoveScaled(0,0,43,31)
16
         Tracking = True
17
         Expand = True
18
         Border = False
19
@@ -97,14 +97,18 @@
20
     }
21
     Index = 1
22
     Text = ("Global Hotkeys")
23
+    { CheckBoxEnableGlobalHotkeys CheckBox
24
+      MoveScaled(2,2,57,4)
25
+      Text = ("Enable Global Hotkeys")
26
+    }
27
     { Panel2 Panel
28
-      MoveScaled(0,0,45,28)
29
+      MoveScaled(3,11,45,28)
30
       Background = Color.TextBackground
31
       Expand = True
32
       Arrangement = Arrange.Fill
33
       Border = Border.Plain
34
       { GlobalHotKeysGrid GridView
35
-        MoveScaled(0,0,44,27)
36
+        MoveScaled(1,2,44,27)
37
         Expand = True
38
         Border = False
39
         Mode = Select.Single
40
xt7-player-mpv-0.14.384.tar.gz/.src/Form/NewChains.class -> xt7-player-mpv-0.16.384.tar.gz/.src/Form/NewChains.class Changed
70
 
1
@@ -35,7 +35,7 @@
2
 Private Sub Init_filters_audio()
3
   Dim filters_audio_list As New String[]
4
   Dim filter As String
5
-  filters_audio_list = ["equalizer", "earwax", "scaletempo", "dynaudnorm", "volume"]
6
+  filters_audio_list = ["equalizer", "earwax", "extrastereo", "scaletempo", "alimiter", "dynaudnorm", "volume"]
7
   filters_audio_list.insert(["CustomAudio1", "CustomAudio2", "CustomAudio3", "lavcac3enc"])
8
   For Each filter In filters_audio_list
9
     If filter = "scaletempo" Then 
10
@@ -324,11 +324,7 @@
11
   ladspacompiledin = FMain.mplayer.supportsladspa()
12
 
13
 
14
-  ' 'extrastereo[=mul]
15
-  ' AllParams.Add(["TITLE", "- Adds live effect to playback -", "ExtraStereo0", ""])
16
-  ' AllParams.add(["RANGEFLOAT", ("Amount"), "0", "2.25", "10", "ExtraStereo1", ""])
17
-  ' Global.DrawGui(AllParams, "extrastereo", aTabstrip, NotSwitchable)
18
-  ' AllParams.Clear
19
+
20
 
21
 
22
   'lavcac3enc
23
@@ -377,6 +373,25 @@
24
     AllParams.Clear
25
     
26
 
27
+  'extrastereo lavfi
28
+  AllParams.Add(["TITLE", "- Adds live effect to playback - (ffmpeg >=3.0 only)", "ExtraStereo0", ""])
29
+  AllParams.add(["RANGEFLOAT", ("Amount"), "0", "2.25", "10", "ExtraStereo1", ""])
30
+  Global.DrawGui(AllParams, "extrastereo", aTabstrip, NotSwitchable,,, "lavfi")
31
+  AllParams.Clear
32
+
33
+  ' 'alimiter lavfi
34
+  AllParams.Add(["TITLE", "Keep input signal under a desired threshold - (ffmpeg >=3.0 only)", "alimiter0", ""])
35
+  AllParams.add(["RANGEFLOAT", "Input gain", "0.1", "2", "64", "alimiter1", ""])
36
+  AllParams.add(["RANGEFLOAT", "output gain", "0.1", "1", "64", "alimiter2", ""])
37
+  AllParams.add(["RANGEFLOAT", "limit", "0.1", "1", "1", "alimiter3", ""]) 
38
+  AllParams.add(["RANGE", "attack", "1", "5", "80", "alimiter4", ""]) 
39
+  AllParams.add(["RANGE", "release", "1", "2000", "8000", "alimiter5", ""]) 
40
+  AllParams.Add(["TIP", ("This filter is a good volume normalizer"), "alimiter6", ""])
41
+  Global.DrawGui(AllParams, "alimiter", aTabstrip, False,,, "lavfi")
42
+  AllParams.Clear
43
+
44
+
45
+
46
 
47
   'Dynaudnorm lavfi
48
   'Syntax for TheParameters is:["SUBLABEL", caption(SubFilterName), TextLabel name ,comment]
49
@@ -621,7 +636,7 @@
50
   'stereo3d=[in:out]
51
   AllParams.Add(["TITLE", "- Converts betweed stereoscopic image formats - ", "stereo3d0", ""])
52
   AllParams.Add(["CHOOSE", ("Input format"), ("sbsl - side by side parallel (left eye left, right eye right)"), ("sbsr - side by side crosseye (right eye left, left eye right)"), ("abl - above-below (left eye above, right eye below)"), ("abr - above-below (right eye above, left eye below)"), ("ab2l - above-below with half height resolution (left eye above, right eye below)"), ("ab2r - above-below with half height resolution (right eye above, left eye below)"), "stereo3d1", ""])
53
-  AllParams.add(["CHOOSE", ("Output format"), ("arcg - anaglyph red/cyan gray (red filter on left eye, cyan filter on right eye)"), ("arch - anaglyph red/cyan half colored (red filter on left eye, cyan filter on right eye)"), ("arcc - anaglyph red/cyan color (red filter on left eye, cyan filter on right eye)"), ("arcd - anaglyph red/cyan color optimized with the least squares projection of dubois (red filter on left eye, cyan filter on right eye)"), ("agmg - anaglyph green/magenta gray (green filter on left eye, magenta filter on right eye)"), ("agmh - anaglyph green/magenta half colored (green filter on left eye, magenta filter on right eye)"), ("agmc - anaglyph green/magenta colored (green filter on left eye, magenta filter on right eye)"), ("aybg - anaglyph yellow/blue gray (yellow filter on left eye, blue filter on right eye)"), ("aybh - anaglyph yellow/blue half colored (yellow filter on left eye, blue filter on right eye)"), ("aybc - anaglyph yellow/blue colored (yellow filter on left eye, blue filter on right eye)"), ("irl - Interleaved rows (left eye has top row, right eye starts on next row)"), ("irr - Interleaved rows (right eye has top row, left eye starts on next row)"), ("ml - mono output (left eye only)"), ("mr - mono output (right eye only)"), "stereo3d2", ""])  
54
+  AllParams.add(["CHOOSE", ("Output format"), ("arcg - anaglyph red/cyan gray (red filter on left eye, cyan filter on right eye)"), ("arch - anaglyph red/cyan half colored (red filter on left eye, cyan filter on right eye)"), ("arcc - anaglyph red/cyan color (red filter on left eye, cyan filter on right eye)"), ("arcd - anaglyph red/cyan color optimized with the least squares projection of dubois (red filter on left eye, cyan filter on right eye)"), ("agmg - anaglyph green/magenta gray (green filter on left eye, magenta filter on right eye)"), ("agmh - anaglyph green/magenta half colored (green filter on left eye, magenta filter on right eye)"), ("agmc - anaglyph green/magenta colored (green filter on left eye, magenta filter on right eye)"), ("aybg - anaglyph yellow/blue gray (yellow filter on left eye, blue filter on right eye)"), ("aybh - anaglyph yellow/blue half colored (yellow filter on left eye, blue filter on right eye)"), ("aybc - anaglyph yellow/blue colored (yellow filter on left eye, blue filter on right eye)"), ("irl - Interleaved rows (left eye has top row, right eye starts on next row)"), ("irr - Interleaved rows (right eye has top row, left eye starts on next row)"), ("ml - mono output (left eye only)"), ("mr - mono output (right eye only)"), ("al - alternating mode, left first"), ("ar - alternating mode, right first"), "stereo3d2", ""])  
55
   Global.DrawGui(AllParams, "stereo3d", aTabstrip, NotSwitchable)
56
   AllParams.Clear
57
 End
58
@@ -1571,9 +1586,9 @@
59
   aTabstrip.index = tab_index_old
60
   If Right(outline) = ":" Then outline = Left(outline, -1)
61
   If Right(outline) = "" Then 
62
-    Return driver_name
63
+    Return driver_name 
64
       Else
65
-    Return driver_name & ":" & outline 
66
+    Return driver_name & ":" & outline
67
   Endif
68
 
69
 End
70
xt7-player-mpv-0.14.384.tar.gz/.src/Form/NewChains.form -> xt7-player-mpv-0.16.384.tar.gz/.src/Form/NewChains.form Changed
9
 
1
@@ -461,6 +461,7 @@
2
             MoveScaled(1,1,39,4)
3
             #Translate = False
4
             Tag = "interpolation"
5
+            ToolTip = "Reduce stuttering caused by mismatches in the video fps and display refresh rate (also known as judder).\n\nActivating this, will silently set: --video-sync=display-vdrop"
6
             AutoResize = True
7
             Text = "temporal interpolation"
8
           }
9
xt7-player-mpv-0.14.384.tar.gz/.src/Form/ladspahelper.class -> xt7-player-mpv-0.16.384.tar.gz/.src/Form/ladspahelper.class Changed
12
 
1
@@ -178,7 +178,9 @@
2
       TextBox1.text &= "ladspa=file=" & LADSPA_FILE 
3
       TextBox1.text &= ":p=" & LADSPA_LABEL 
4
       TextBox1.text &= ":c='" & controls & "'"
5
-      TextBox1.text &= ",aformat=channel_layouts=" & combooutputchannels.Text
6
+      If Not (Lower(combooutputchannels.Text) Like "auto*") Then
7
+        TextBox1.text &= ",aformat=channel_layouts=" & combooutputchannels.Text
8
+      Endif
9
     TextBox1.text &= "]" 
10
 End
11
 
12
xt7-player-mpv-0.14.384.tar.gz/.src/Form/ladspahelper.form -> xt7-player-mpv-0.16.384.tar.gz/.src/Form/ladspahelper.form Changed
10
 
1
@@ -65,7 +65,7 @@
2
       #Translate = False
3
       Expand = True
4
       ReadOnly = True
5
-      List = ["1c", "2c", "3c", "4c", "5c", "6c", "7c", "8c"]
6
+      List = ["1c", "2c", "3c", "4c", "5c", "6c", "7c", "8c", "auto (ffmpeg > 2.8)"]
7
       Text = "8c"
8
     }
9
     { Label5 Label
10
xt7-player-mpv-0.14.384.tar.gz/AA_ToDo -> xt7-player-mpv-0.16.384.tar.gz/AA_ToDo Changed
122
 
1
@@ -733,42 +733,6 @@
2
 --------------------------------------------------------------------------
3
 --------------------------------------------------------------------------
4
 
5
-Visualizzazione:
6
-
7
-#!/bin/bash
8
-file="/mnt/nas.crypt/Musica/streamripper/radioparallax/Sixto Sounds - Super Hang On (Burn Baby Burn OC ReMix).mp3"
9
-file=/mnt/nas.crypt/Musica/Roxette\ -\ Tourism/Roxette\ -\ Tourism\ -\ 16\ -\ Queen\ of\ rain.ogg
10
-wid="58720645"
11
-export IFS=$'\n'
12
-
13
-#4.5%:
14
-    graph="amovie=$file,"
15
-    graph=$graph'asplit [a][out1];'
16
-    graph=$graph'[a]showspectrum=mode=separate:color=intensity:slide=scroll:s=4x512:color=intensity:win_func=blackman:mode=combined:saturation=1,'
17
-    graph=$graph'crop=h=(in_h/1.5):y=in_h[spectrum];'
18
-    graph=$graph'movie=/root/Download/png.png,scale=h=(in_h/1.5)[pic];[spectrum][pic]overlay[out0]'
19
-
20
-    mpv av://lavfi:$graph -wid $wid  -no-keepaspect -v
21
-    exit
22
-
23
-#12%
24
-graph="amovie=$file[musica];"
25
-#graph=$graph'[musica]asplit=2 [azero][auno];'
26
-graph=$graph'[musica]asplit=3 [azero][auno][out1];'
27
-
28
-graph=$graph'[azero]showspectrum=mode=separate:color=intensity:slide=scroll:s=4x512:color=intensity:win_func=blackman:mode=combined:saturation=1,'
29
-    graph=$graph'crop=h=(in_h/1.5):y=in_h,'
30
-    graph=$graph'scale=h=512:w=512:force_original_aspect_ratio=disable[spectrum];'
31
-
32
-graph=$graph'[auno]showwaves=s=512x512:mode=line:r=20,'
33
-    graph=$graph'crop=h=(ih/2):y=(0),crop=h=(ih/2):y=ih,'
34
-    graph=$graph'colorlevels=romax=0.5[waves];'
35
-
36
-graph=$graph'[spectrum][waves]overlay[out0]'
37
-
38
-
39
-    mpv av://lavfi:$graph -wid $wid  -no-keepaspect -v
40
-    exit
41
 
42
 
43
 
44
@@ -807,12 +771,68 @@
45
 /JUNK
46
 --------------------------------------------------------------------------
47
 
48
-attualmente, get_property_mpv, per essere certo che mpv abbia risposto, imposta la variabile
49
-di "ritorno" ad un valore conosciuto sicuramente diverso dalla risposta.)
50
-Poi dopo il timeout controlla se il valore è cambiato; se è cambiato lo usa, altrimenti
51
-va in timeout e ripristina il valore percedente.
52
-Questo funziona "spesso", ma può dar problemi.
53
-Il modo di non cambiare il valore per aspettare che cambi è:
54
-nell'handler playerprocess_read, oltre a memorizzare con setP() il valore della risposta
55
-memorizzare pure il tempo nel quale  avvenuta la risposta, in un' altra collezione separata.
56
-Get_property_mpv, andrà a controllare che a cambiare sia il tempo , e non la variabile stessa.
57
+
58
+
59
+
60
+visualizzazione audio:
61
+
62
+spectrum sotto con onde sopra:
63
+10.5%cpu
64
+build/mpv /mnt/nas.crypt/Musica/BestOfBowie/CD1/01.Space.Oddity.ogg  --lavfi-complex='[aid1]asplit=3 [azero][auno][ao];[azero]showspectrum=mode=separate:color=intensity:slide=scroll:s=4x512:color=intensity:win_func=blackman:mode=combined:saturation=1,crop=h=(in_h/1.5):y=in_h,scale=h=512:w=512:force_original_aspect_ratio=disable[spectrum];[auno]showwaves=s=512x512:mode=line:r=20,crop=h=(ih/2):y=(0),crop=h=(ih/2):y=ih,colorlevels=romax=0.5[waves];[spectrum][waves]overlay[vo]' -ao null
65
+
66
+Spectrum con onde sovraimpresse:
67
+28%cpu
68
+build/mpv /mnt/nas.crypt/Musica/BestOfBowie/CD1/01.Space.Oddity.ogg  --lavfi-complex='[aid1]asplit=3 [azero][auno][ao];[azero]showspectrum=mode=separate:color=intensity:slide=scroll:s=4x512:color=intensity:win_func=blackman:mode=combined:saturation=1,crop=h=(in_h/1.5):y=in_h,scale=h=512:w=512:force_original_aspect_ratio=disable[spectrum];[auno]showwaves=s=512x512:mode=line:r=20,crop=h=(in_h):y=(in_h/2),colorlevels=romax=0.5,colorkey=0x000000:0.1:0.5[waves];[spectrum][waves]overlay[vo]' -ao null
69
+
70
+
71
+
72
+
73
+solo spectrum; l'immagine png è un gradiente da trasparente a nero.
74
+5,5%cpu
75
+-lavfi-complex='[aid1]asplit [a][ao];[a]showspectrum=mode=separate:color=intensity:slide=scroll:s=4x256:color=intensity:win_func=blackman:mode=combined:saturation=1,crop=h=(in_h/1.5):y=in_h[spectrum];movie=/tmp/out.png,scale=h=(in_h/1.5)[pic]              ;[spectrum][pic]overlay[vo]'  --no-keepaspect
76
+
77
+frequenze
78
+7%cpu
79
+--lavfi-complex='[aid1]asplit[ao][a1];[a1]showfreqs=s=256x256:mode=bar           :colors=#ff0000|#aa0000  :averaging=0.6
80
+
81
+Vectorscope sovraimpresso con hack per la sovraimpressione
82
+17% cpu
83
+build/mpv /mnt/nas.crypt/Musica/BestOfBowie/CD1/01.Space.Oddity.ogg  --lavfi-complex='[aid1]asplit=3[a1][a2][ao]; [a2]adrawgraph=bg=#00000000:size=256x256[blank];                            movie=/home/root/Gambas3/xt7-player-mpv-gtk/shade1.png,scale=256x256[pic]; [blank][pic]overlay[back] ; [a1]avectorscope=size=256x256[sp];[back][sp]overlay[vo]'
84
+
85
+
86
+filtri presenti solo in ffmpeg >=3.0:
87
+ ... acompressor       A->A       Audio compressor.
88
+ ... aemphasis         A->A       Audio emphasis.
89
+ ... afftfilt          A->A       Apply arbitrary expressions to samples in 
90
+ ... agate             A->A       Audio gate.
91
+ ... alimiter          A->A       Audio lookahead limiter.
92
+ ... allpass           A->A       Apply a two-pole all-pass filter.
93
+ ... amerge            N->A       Merge two or more audio streams into a single multi-channel stream.
94
+ T.. ametadata         A->A       Manipulate audio frame metadata.
95
+ ..C anequalizer       A->N       Apply high-order audio parametric multi band equalizer.
96
+ ... apulsator         A->A       Audio pulsator.
97
+ ... arealtime         A->A       Slow down filtering to match realtime.
98
+ ..C astreamselect     N->N       Select audio streams
99
+ ... compensationdelay A->A       Audio Compensation Delay Line.
100
+ ... extrastereo       A->A       Increase difference between stereo audio channels.
101
+ ... sidechaingate     AA->A      Audio sidechain gate.
102
+ ... stereotools       A->A       Apply various stereo tools.
103
+ ... stereowiden       A->A       Apply stereo widening effect.
104
+ ... tremolo           A->A       Apply tremolo effect.
105
+ ... vibrato           A->A       Apply vibrato effect.
106
+ TS. chromakey         V->V       Turns a certain color into transparency. Operates on YUV colors.
107
+ T.. convolution       V->V       Apply convolution filter.
108
+ T.. displace          VVV->V     Displace pixels.
109
+ T.. maskedmerge       VVV->V     Merge first stream with second stream 
110
+ T.. metadata          V->V       Manipulate video frame metadata.
111
+ T.. nnedi             V->V       Apply neural network edge directed interpolation intra-only deinterlacer.
112
+ ... realtime          V->V       Slow down filtering to match realtime.
113
+ TS. selectivecolor    V->V       Apply CMYK adjustments to specific color ranges.
114
+ T.. shuffleframes     V->V       Shuffle video frames.
115
+ ..C streamselect      N->N       Select video streams
116
+ T.. swaprect          V->V       Swap 2 rectangular objects in video.
117
+ ... testsrc           |->V       Generate test pattern.
118
+ ... testsrc2          |->V       Generate another test pattern.
119
+ ... ahistogram        A->V       Convert input audio to histogram video output.
120
+ ... showspectrumpic   A->V       Convert input audio to a spectrum video output single picture.
121
+ ... spectrumsynth     VV->A      Convert input spectrum videos to audio output.
122
xt7-player-mpv-0.16.384.tar.gz/cdtemplate.png Added
xt7-player-mpv-0.16.384.tar.gz/shade_alpha.png Added
xt7-player-mpv-0.16.384.tar.gz/shadeaudiopanel.png Added