Changeset 143 for trunk/Modules/ZdechovNET
- Timestamp:
- Jan 29, 2023, 12:36:33 AM (22 months ago)
- Location:
- trunk/Modules/ZdechovNET
- Files:
-
- 2 edited
-
UIPTVPage.pas (modified) (12 diffs)
-
UInternetPage.pas (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Modules/ZdechovNET/UIPTVPage.pas
r139 r143 114 114 AddNew('CS History', [cpBasic, cpStandard, cpMax, cpCesky]); 115 115 AddNew('CS Mystery', [cpStandard, cpMax, cpCesky]); 116 AddNew(' CT :D HD/ Art HD', [cpBasic, cpStandard, cpMax]);117 AddNew(' CT 1 HD', [cpBasic, cpStandard, cpMax]);118 AddNew(' CT 1 JM HD', [cpBasic, cpStandard, cpMax]);119 AddNew(' CT 1 SM HD', [cpBasic, cpStandard, cpMax]);120 AddNew(' CT 2 HD', [cpBasic, cpStandard, cpMax]);121 AddNew(' CT 3 HD', [cpBasic, cpStandard, cpMax]);122 AddNew(' CT 24 HD', [cpBasic, cpStandard, cpMax]);123 AddNew(' CT sport HD', [cpBasic, cpStandard, cpMax]);124 AddNew('De utsche Welle HD', [cpStandard, cpMax, cpZpravodaj]);116 AddNew('ČT :D HD/ Art HD', [cpBasic, cpStandard, cpMax]); 117 AddNew('ČT 1 HD', [cpBasic, cpStandard, cpMax]); 118 AddNew('ČT 1 JM HD', [cpBasic, cpStandard, cpMax]); 119 AddNew('ČT 1 SM HD', [cpBasic, cpStandard, cpMax]); 120 AddNew('ČT 2 HD', [cpBasic, cpStandard, cpMax]); 121 AddNew('ČT 3 HD', [cpBasic, cpStandard, cpMax]); 122 AddNew('ČT 24 HD', [cpBasic, cpStandard, cpMax]); 123 AddNew('ČT sport HD', [cpBasic, cpStandard, cpMax]); 124 AddNew('Desire TV HD', [cpStandard, cpMax]); 125 125 AddNew('Discovery Channel HD', [cpStandard, cpMax, cpDokument]); 126 126 AddNew('Discovery Science HD', [cpMax, cpDokument]); … … 130 130 AddNew('DTX HD', [cpMax, cpDokument]); 131 131 AddNew('Dvojka HD', [cpBasic, cpStandard, cpMax]); 132 AddNew('Erox HD', [cpMax, cpSuperBox, cpLaska]); 133 AddNew('Eroxxx HD', [cpMax, cpSuperBox, cpLaska]); 132 AddNew('DW TV HD', [cpStandard, cpMax, cpZpravodaj]); 133 AddNew('EroX HD', [cpMax, cpSuperBox, cpLaska]); 134 AddNew('EroXXX HD', [cpMax, cpSuperBox, cpLaska]); 134 135 AddNew('Euronews', [cpMax, cpZpravodaj]); 136 AddNew('Eurosport 1 HD', [cpStandard, cpMax, cpSport]); 135 137 AddNew('Eurosport 2 HD', [cpStandard, cpMax, cpSport]); 136 AddNew('Eurosport 1 HD', [cpStandard, cpMax, cpSport]); 137 AddNew('EXTASY TV HD', [cpLeoTv]); 138 AddNew('Extasy TV HD', [cpLeoTv]); 138 139 AddNew('Fashion TV HD', [cpStandard, cpMax, cpZpravodaj]); 139 140 AddNew('FashionBox HD', [cpMax, cpSuperBox]); … … 148 149 AddNew('Filmbox Premium HD', [cpMax, cpSuperBox]); 149 150 AddNew('Fishing & Hunting', [cpStandard, cpMax, cpDokument]); 150 AddNew('France 24 ', [cpMax, cpZpravodaj]);151 AddNew('France 24 ENG', [cpMax, cpZpravodaj]); 151 152 AddNew('Golf Channel HD', [cpMax, cpSport]); 152 153 AddNew('Hobby TV HD', [cpBasic, cpStandard, cpMax]); 153 AddNew('iConcerts HD', [cpStandard, cpMax]);154 AddNew('I nvestigation discovery', [cpMax, cpDokument]);154 AddNew('iConcerts', [cpStandard, cpMax]); 155 AddNew('ID HD', [cpMax, cpDokument]); 155 156 AddNew('Jednotka HD', [cpBasic, cpStandard, cpMax]); 156 157 AddNew('Jihočeská televize', [cpBasic, cpStandard, cpMax]); … … 164 165 AddNew('Mňam TV', [cpBasic, cpStandard, cpMax]); 165 166 AddNew('Mňau TV HD', [cpBasic, cpStandard, cpMax]); 166 AddNew(' MTV CZ', [cpStandard, cpMax]);167 AddNew('Náš Region TV', [cpBasic, cpStandard, cpMax, cpZpravodaj]); 167 168 AddNew('NASA TV HD', [cpBasic, cpStandard, cpMax]); 168 169 AddNew('National Geographic HD', [cpMax, cpDokument]); … … 170 171 AddNew('Nickelodeon', [cpStandard, cpMax, cpDetske]); 171 172 AddNew('Nickelodeon Jr.', [cpStandard, cpMax, cpDetske]); 173 AddNew('Nick. Ukraine Pluto TV', [cpStandard, cpMax, cpDetske]); 172 174 AddNew('Nova HD', [cpBasic, cpStandard, cpMax]); 173 175 AddNew('Nova Action HD', [cpBasic, cpStandard, cpMax]); 174 176 AddNew('Nova Cinema HD', [cpBasic, cpStandard, cpMax]); 175 177 AddNew('Nova Gold HD', [cpBasic, cpStandard, cpMax]); 176 AddNew('Nova F UNHD', [cpBasic, cpStandard, cpMax]);178 AddNew('Nova Fun HD', [cpBasic, cpStandard, cpMax]); 177 179 AddNew('Nova Lady HD', [cpBasic, cpStandard, cpMax]); 178 180 AddNew('Nova Sport 1 HD', [cpMax, cpSport]); … … 182 184 AddNew('ORF1', [cpBasic, cpStandard, cpMax]); 183 185 AddNew('ORF2', [cpBasic, cpStandard, cpMax]); 184 AddNew('PASSIONXXX HD', [cpLeoTv]); 186 AddNew('Paramount Network', [cpBasic, cpStandard, cpMax]); 187 AddNew('PassionXXX HD', [cpLeoTv]); 185 188 AddNew('Polar', [cpBasic, cpStandard, cpMax]); 186 189 AddNew('Polsat', [cpBasic, cpStandard, cpMax]); 187 190 AddNew('Praha TV', [cpBasic, cpStandard, cpMax]); 188 191 AddNew('Prima COOL HD', [cpBasic, cpStandard, cpMax]); 189 AddNew('Paramount Network', [cpBasic, cpStandard, cpMax]);190 192 AddNew('Prima HD', [cpBasic, cpStandard, cpMax]); 191 193 AddNew('Prima Krimi HD', [cpBasic, cpStandard, cpMax]); 192 194 AddNew('Prima LOVE HD', [cpBasic, cpStandard, cpMax]); 193 195 AddNew('Prima MAX HD', [cpBasic, cpStandard, cpMax]); 194 AddNew('Prima S HOWHD', [cpBasic, cpStandard, cpMax]);195 AddNew('Prima S TARHD', [cpBasic, cpStandard, cpMax]);196 AddNew('Prima Show HD', [cpBasic, cpStandard, cpMax]); 197 AddNew('Prima Star HD', [cpBasic, cpStandard, cpMax]); 196 198 AddNew('Prima ZOOM HD', [cpBasic, cpStandard, cpMax]); 197 199 AddNew('Reality Kings TV', [cpMax, cpLaska]); 198 AddNew('Regionální Televize ', [cpBasic, cpStandard, cpMax]);200 AddNew('Regionální Televize TVS HD', [cpBasic, cpStandard, cpMax]); 199 201 AddNew('Relax', [cpBasic, cpStandard, cpMax]); 200 202 AddNew('Retro Music Television', [cpBasic, cpStandard, cpMax]); … … 202 204 AddNew('Seznam.cz TV HD', [cpBasic, cpStandard, cpMax]); 203 205 AddNew('Spektrum HD', [cpStandard, cpMax]); 206 AddNew('Sport 1 HD', [cpStandard, cpMax]); 204 207 AddNew('Sport 5 HD', [cpMax, cpSport]); 205 AddNew('Sport 1 HD', [cpStandard, cpMax]);206 208 AddNew('Sport 2 HD', [cpStandard, cpMax]); 207 209 AddNew('Super Polsat', [cpBasic, cpStandard, cpMax]); 208 210 AddNew('Šlágr Originál TV', [cpBasic, cpStandard, cpMax]); 209 AddNew('TA 3 ', [cpBasic, cpStandard, cpMax]);211 AddNew('TA 3 HD', [cpBasic, cpStandard, cpMax]); 210 212 AddNew('TLC HD', [cpStandard, cpMax, cpDokument]); 211 213 AddNew('Travel Channel HD', [cpStandard, cpMax, cpDokument]); 212 AddNew('Trojka HD', [cpBasic, cpStandard, cpMax]); 214 AddNew('Travelxp HD', [cpStandard, cpMax, cpDokument]); 215 AddNew('Turbo TV HD', [cpStandard, cpMax, cpBasic]); 213 216 AddNew('TV Brno 1', [cpBasic, cpStandard, cpMax]); 214 217 AddNew('TV Lux', [cpBasic, cpStandard, cpMax]); … … 217 220 AddNew('TV Puls 2', [cpBasic, cpStandard, cpMax]); 218 221 AddNew('TV Rebel', [cpBasic, cpStandard, cpMax]); 219 AddNew('TV Slovácko', [cpBasic, cpStandard, cpMax]);220 222 AddNew('TV5 Monde', [cpMax, cpZpravodaj]); 221 223 AddNew('TVN', [cpBasic, cpStandard, cpMax]); … … 226 228 AddNew('TVP1 HD', [cpBasic, cpStandard, cpMax]); 227 229 AddNew('TVP2 HD', [cpBasic, cpStandard, cpMax]); 230 AddNew('UA:Pershyi', [cpBasic, cpStandard, cpMax]); 228 231 AddNew('V1', [cpBasic, cpStandard, cpMax]); 229 232 AddNew('Viasat Explore HD', [cpStandard, cpMax, cpDokument]); … … 249 252 '<h3>Základní balíčky</h3>' + 250 253 '<table class="WideTable"><tr><th>Balíček</th><th>Cena [Kč/měsíc]</th><th>Počet kanálů</th><th>Kanály</th></tr>' + 251 Row(['Basic', '1 03', IntToStr(Channels.GetCountByGroup(cpBasic)), Channels.GetNamesByGroup(cpBasic)]) +252 Row(['Basic + tématika', '1 11', IntToStr(Channels.GetCountByGroup(cpBasic)), Channels.GetNamesByGroup(cpBasic)]) +253 Row(['Standard', ' 379', IntToStr(Channels.GetCountByGroup(cpStandard)), Channels.GetNamesByGroup(cpStandard)]) +254 Row(['Max', '5 40', IntToStr(Channels.GetCountByGroup(cpMax)), Channels.GetNamesByGroup(cpMax)]) +254 Row(['Basic', '122', IntToStr(Channels.GetCountByGroup(cpBasic)), Channels.GetNamesByGroup(cpBasic)]) + 255 Row(['Basic + tématika', '131', IntToStr(Channels.GetCountByGroup(cpBasic)), Channels.GetNamesByGroup(cpBasic)]) + 256 Row(['Standard', '425', IntToStr(Channels.GetCountByGroup(cpStandard)), Channels.GetNamesByGroup(cpStandard)]) + 257 Row(['Max', '587', IntToStr(Channels.GetCountByGroup(cpMax)), Channels.GetNamesByGroup(cpMax)]) + 255 258 '</table>' + 256 259 'Balíček Basic obsahuje stejné kanály jako Basic + tématika. Pro možnost volby tématických balíčků je ale nutné mít balíček Basic + tématika.<br/>' + … … 258 261 '<h3>Tématické balíčky</h3>' + 259 262 '<table class="WideTable"><tr><th>Balíček</th><th>Cena [Kč/měsíc]</th><th>Počet kanálů</th><th>Kanály</th></tr>' + 260 Row(['Film', '4 8', IntToStr(Channels.GetCountByGroup(cpFilm)), Channels.GetNamesByGroup(cpFilm)]) +261 Row(['Superbox', '14 3', IntToStr(Channels.GetCountByGroup(cpSuperBox)), Channels.GetNamesByGroup(cpSuperBox)]) +262 Row(['Sport', ' 72', IntToStr(Channels.GetCountByGroup(cpSport)), Channels.GetNamesByGroup(cpSport)]) +263 Row(['Dětské', '3 6', IntToStr(Channels.GetCountByGroup(cpDetske)), Channels.GetNamesByGroup(cpDetske)]) +263 Row(['Film', '49', IntToStr(Channels.GetCountByGroup(cpFilm)), Channels.GetNamesByGroup(cpFilm)]) + 264 Row(['Superbox', '146', IntToStr(Channels.GetCountByGroup(cpSuperBox)), Channels.GetNamesByGroup(cpSuperBox)]) + 265 Row(['Sport', '91', IntToStr(Channels.GetCountByGroup(cpSport)), Channels.GetNamesByGroup(cpSport)]) + 266 Row(['Dětské', '37', IntToStr(Channels.GetCountByGroup(cpDetske)), Channels.GetNamesByGroup(cpDetske)]) + 264 267 Row(['Česky', '43', IntToStr(Channels.GetCountByGroup(cpCesky)), Channels.GetNamesByGroup(cpCesky)]) + 265 268 Row(['Láska', '48', IntToStr(Channels.GetCountByGroup(cpLaska)), Channels.GetNamesByGroup(cpLaska)]) + 266 269 Row(['Zpravodaj', '15', IntToStr(Channels.GetCountByGroup(cpZpravodaj)), Channels.GetNamesByGroup(cpZpravodaj)]) + 267 Row(['Dokument', '1 18', IntToStr(Channels.GetCountByGroup(cpDokument)), Channels.GetNamesByGroup(cpDokument)]) +268 Row(['Leo TV', '4 8', IntToStr(Channels.GetCountByGroup(cpLeoTv)), Channels.GetNamesByGroup(cpLeoTv)]) +270 Row(['Dokument', '125', IntToStr(Channels.GetCountByGroup(cpDokument)), Channels.GetNamesByGroup(cpDokument)]) + 271 Row(['Leo TV', '49', IntToStr(Channels.GetCountByGroup(cpLeoTv)), Channels.GetNamesByGroup(cpLeoTv)]) + 269 272 '</table>' + 270 273 'Celková cena vznikne jako součet zvolených tématických balíčků a základního balíčku Basic + tématika.<br/>' + … … 277 280 '<h3>Zřízení služby</h3>' + 278 281 'Instalace a aktivace: zdarma<br/>' + 279 'Cena set-top boxu: 1800 Kč<br/>' +282 'Cena set-top boxu: 2000 Kč<br/>' + 280 283 'Webové rozhraní pro TV: <a href="https://live.4network.tv/">live.4network.tv</a><br/>' + 281 284 'Návod ke služby 4network.tv: <a href="/docs/navod_4network.tv.pdf">navod_4network.tv.pdf</a><br/>' + 282 285 '<br/>' + 283 'Ceny uvedeny včetně DPH platné od 1. 4.2022.';286 'Ceny uvedeny včetně DPH platné od 1.1.2023.'; 284 287 Channels.Free; 285 288 end; -
trunk/Modules/ZdechovNET/UInternetPage.pas
r139 r143 46 46 '<tr><th>Označení</th><th>Minimální rychlost</th><th>Běžně dostupná rychlost</th><th>Maximální rychlost</th><th>Bonusová rychlost</th><th>Cena</th></tr>' + 47 47 '<tr><td>Zdarma</td><td align="center">0</td><td align="center"> </td><td align="center">256 kbit/s</td><td align="center"> </td><td align="center">0 Kč</td></tr>' + 48 '<tr><td>Internet 20M</td><td align="center">6 Mbit/s</td><td align="center">12 Mbit/s</td><td align="center">20 Mbit/s</td><td align="center"> 140 Mbit/s</td><td align="center">190 Kč</td></tr>' +49 '<tr><td>Internet 40M</td><td align="center">12 Mbit/s</td><td align="center">24 Mbit/s</td><td align="center">40 Mbit/s</td><td align="center"> 140 Mbit/s</td><td align="center">260 Kč</td></tr>' +50 '<tr><td>Internet 60M</td><td align="center">18 Mbit/s</td><td align="center">36 Mbit/s</td><td align="center">60 Mbit/s</td><td align="center"> 140 Mbit/s</td><td align="center">360 Kč</td></tr>' +51 '<tr><td>Internet 80M</td><td align="center">24 Mbit/s</td><td align="center">48 Mbit/s</td><td align="center">80 Mbit/s</td><td align="center"> 140 Mbit/s</td><td align="center">520 Kč</td></tr>' +52 '<tr><td>Internet 100M</td><td align="center">30 Mbit/s</td><td align="center">60 Mbit/s</td><td align="center">100 Mbit/s</td><td align="center"> 140 Mbit/s</td><td align="center">750 Kč</td></tr>' +48 '<tr><td>Internet 20M</td><td align="center">6 Mbit/s</td><td align="center">12 Mbit/s</td><td align="center">20 Mbit/s</td><td align="center">240 Mbit/s</td><td align="center">190 Kč</td></tr>' + 49 '<tr><td>Internet 40M</td><td align="center">12 Mbit/s</td><td align="center">24 Mbit/s</td><td align="center">40 Mbit/s</td><td align="center">240 Mbit/s</td><td align="center">260 Kč</td></tr>' + 50 '<tr><td>Internet 60M</td><td align="center">18 Mbit/s</td><td align="center">36 Mbit/s</td><td align="center">60 Mbit/s</td><td align="center">240 Mbit/s</td><td align="center">360 Kč</td></tr>' + 51 '<tr><td>Internet 80M</td><td align="center">24 Mbit/s</td><td align="center">48 Mbit/s</td><td align="center">80 Mbit/s</td><td align="center">240 Mbit/s</td><td align="center">520 Kč</td></tr>' + 52 '<tr><td>Internet 100M</td><td align="center">30 Mbit/s</td><td align="center">60 Mbit/s</td><td align="center">100 Mbit/s</td><td align="center">240 Mbit/s</td><td align="center">750 Kč</td></tr>' + 53 53 '</table>' + 54 54 '<br/>' + … … 77 77 '<i>V případě velkých odchylek od běžně dostupné rychlosti stahování nebo vkládání dat, má účastník právo službu reklamovat.</i><br/>' + 78 78 '<br/>' + 79 'Aktualizováno: 22.2.2021';79 'Aktualizováno: 1.1.2023'; 80 80 end; 81 81 GeneratePage(Self);
Note:
See TracChangeset
for help on using the changeset viewer.
