Advanced Search

Posted By

wxox on 09/15/12

Tagged

Versions (?)

Last Edited at 09/15/12 10:18pm

Statistics

Viewed 158 times
Favorited by 0 user(s)

Related snippets

0
Dyna Test Xplode

Poprawny Dyna DAT

/ Published in: PHP
Save to your folder(s)
Blah BLah

Expand | Embed | Plain Text

Copy this code and paste it in your HTML 
  1. <pre>
  2. <?php
  3.  
  4. $directory = "";
  5. $pliki = glob($directory . "*.DAT");
  6. foreach($pliki as $plik)
  7. {
  8.  
  9. $dane = 	file($plik);
  10. $ile = count($dane);
  11.  
  12. // miks ustawiony z defaultu na -00:00.001
  13. $mik = substr($dane[37],4,9);
  14.  
  15. // miks ustawiony w dynakatalogu czyli pozadany
  16. // ale olewany przez dynamixa (!)
  17. $nwk = substr($dane[39],4,9);
  18.  
  19. // jezeli default, to nie przetwarzamy = 0
  20. if (substr($mik,0,1)=="-") $mik = "00:00.000";
  21.  
  22. // lamerskie operacje na czasie
  23. $nwkmin = intval(substr($nwk,0,2));
  24. $nwksec = intval(substr($nwk,3,2));
  25. $nwksss = intval(substr($nwk,6,3));
  26. $nwkmt = ($nwkmin * 60000) + ($nwksec * 1000) + $nwksss; 
  27.  
  28. $mikmin = intval(substr($mik,0,2));
  29. $miksec = intval(substr($mik,3,2));
  30. $miksss = intval(substr($mik,6,3));
  31. $mikmt = ($mikmin * 60000) + ($miksec * 1000) + $miksss; 
  32.  
  33. if ($mikmt>0) $roznica = $nwkmt-$mikmt;
  34. else $roznica = 0;
  35.  
  36. // lamerska zmiana msec na sec
  37. $rozsek = intval($roznica/1000);
  38. $reszta = $roznica - ($rozsek*1000); 
  39.  
  40. // zera wiodace 
  41. $rozsek = str_pad($rozsek, 2, "0", STR_PAD_LEFT);
  42. $reszta = str_pad($reszta, 3, "0", STR_PAD_LEFT);
  43.  
  44. // prawidlowy punkt miksu liczony od konca pliku (sic!)
  45. $time = "00:".$rozsek.".".$reszta;
  46.  
  47. // kontrolny output na ekran
  48. echo "<hr>".$plik."\t00:".$nwk."(".$nwkmt.")\t00:". $mik."(".$mikmt.") = (".$roznica.") = (".$time.")";
  49.  
  50.  
  51. // cache nowego pliku DAT
  52.  
  53. $nowyplik = "";
  54. $string = "Mix=".$time."\n";
  55. echo count($dane);
  56.  
  57. for($a=0; $a<count($dane); $a++)
  58. 	{
  59. 	$wiersz = $dane[$a];
  60. 	if (substr($wiersz,0,3)=="Mix") 
  61. 		{
  62. 		if ($roznica>0) $wiersz = "Mix=".$time."\n";
  63. 		else $wiersz = "Mix=-00:00.00\n";
  64. 		}
  65. 	$nowyplik .= $wiersz;
  66. 	}
  67. 	echo $nowyplik;
  68. 	echo '<hr>';
  69.  
  70. // zapis zmienionego pliku DAT do bocznego katalogu
  71. $fp = fopen("y/".$plik, "w");
  72. fwrite($fp, $nowyplik);
  73. fclose($fp);
  74. }
  75.  
  76. // kurwa, jak mozna ludziom tak komplikowac zycie?!!!
  77.  
  78. ?>
  79. </pre>

Report this snippet


Comments

RSS Icon Subscribe to comments

You need to login to post a comment.