G:\Utility\File\XYplorer\Scripts\OpenUpdater\OpenUpdater-compare-beta.xys G:\Utility\File\XYplorer\Scripts\OpenUpdater\SimpleUpdater v7-compare-beta.xys
1"_GetBetaChanges"  1       WHILE($count<$betas){ 
2    global $tempDir, $sequenceDirection;  2// Get previous beta log 
3    global $officialChanges, $highestOfficialVersion, $downloadOfficialUrl;  3       $newtoken= gettoken($ReadURL, $count+2, 'the new BETA');   
4    global $betaChanges, $highestBetaVersion, $downloadBetaUrl;  4             
5    global $messages; 5       $betapretext= gettoken($newtoken, 1, '<br /></div><br />To <span style="font-weight: bold">download');
6    global $xyver, $log; 6       $betatext= gettoken($betapretext, 2, 'Change Log');
7    $betaChanges = ""; 7       $betatext= gettoken(gettoken($newtoken, 1, '<br /></div><br />To <span style="font-weight: bold">download'), 2, 'Change Log');
8    global $cache, $url, $html; // _ReadCachedUrl variables  8       
9    $cache = $tempDir . "beta.html";  9       IF($OnlyNewer==1){ 
10    $url = "http://www.xyplorer.com/xyfc/viewtopic.php?t=4&start=0&sd=d";  10            $curbetatoken=gettoken($betatext, 2, '<div class="codecontent">v');  
11    sub _ReadCachedUrl;  11            $curbetaver =gettoken ($curbetatoken, 1, " -");             
12    $html = gettoken($html, 2, "</head>"); 12 
13    $t = writefile($log, $html, "o", "ta");  13                IF ($xyver > $curbetaver && $betatext!=""){ 
14    $html = regexreplace($html, "(\r\n|\r|\n)", " ");   14                    break; 
15    // prepend changes until we reach a version that is smaller than our current version  15                    } 
16    $highestOfficialVersion = "";  
17    $i = 1;  
18    while(TRUE) {  
19        $i++;  
20        $text = gettoken($html, $i, "Re: Here's the new BETA");  
21        if ($text == "") {  
22            if ($betaChanges != "") {  
23                $messages = $messages . "Your version is too old to list all beta change logs."; // . chr(10);  
24            } 16            }
  17 
  18        IF($betatext==""){
  19            //Download Official release
  20            $betatext= gettoken($betapretext, 2, 'XYplorer Official Release');  
  21            $betatext= gettoken($betatext, 1, 'faq.php" class="postlink">FAQ</a>');
  22            $betatext= gettoken($betatext, 1, '<br /></div></div>');
  23            $betatext= gettoken($betatext, 2, 'class="codetitle"><b>Code:</b></div><div class="codecontent">');    
  24            IF($betatext==""){
25            break; 25                break;
26        } 26            }          
27        $text = gettoken($text, 2, "<div class=""postbody"">");  
28        $text = gettoken($text, 1, "No-Install Package");  
29        $version = regexreplace($text, ".*v(\d+([.]\d+)+).*", "$1");  
30        if (compare($xyver, $version, v) >= 0) { 27            IF($OnlyNewer==1){
  28                        $curbetatoken=$betatext;
  29            $curbetaver =gettoken ($curbetatoken, 1, " -");
  30    
  31                IF ($xyver > $curbetaver){
31            break; 32                break;
32        } 33                }
33        $downloadUrl = regexreplace($text, ".*(http://www.xyplorer.com/download/xyplorer_[\d\w._]+?_noinstall\.zip).*", "$1");  34        } 
34        $name = regexreplace($text, ".*?XYplorer ([^<]+).+", "$1"); 35 
35        $text = regexreplace($text, ".+<div class=""codecontent"">v(.*?)</div>.*", "$1");  36        $betafinal="$betafinal<br><br><b><font color=$Officialtext>OFFICIAL RELEASE:</b><br>$betatext</font><br>";                      
36        $date = regexreplace($text, ".*(\d{4}.\d{2}.\d{2}.\d{2}.\d{2}).*", "$1");  37         
37        $text = regexreplace($text, ".*?<br />(&nbsp;.+)", "$1");  38        } 
38        $changes = replace($text, "$version - $date<br />", ""); 39 
39        $changes = replace($changes, "<br /></p>", "</p>");  40    ELSE { 
40        if (strpos($name, "BETA") >= 0) {  41            $betatext= gettoken($betatext, 2, 'class="codetitle"><b>Code:</b></div><div class="codecontent">'); 
41            $class = "beta"; 42            $betafinal="$betafinal<br>$betatext<br>";
42            if ($downloadBetaUrl == "") {   43             } 
43                $highestBetaVersion = $version; 44            $count++;
44                $downloadBetaUrl = $downloadUrl;  45         } 
45            } 46 
46        } else { 47 
47            $class = "official";  48// Download URL 
48            if ($highestOfficialVersion == "") {   49    IF ($release=="official"){ 
49                $highestOfficialVersion = $version; 50                      $downloadurl="http://www.xyplorer.com/download/xyplorer_full_noinstall.zip";
50                $downloadOfficialUrl = "http://www.xyplorer.com/download/xyplorer_full_noinstall.zip";  51                            } 
51            }  52    ELSE{ 
52        }  53          $downloadurl=gettoken($newtoken, 1, '" class="postlink"><span style="font-weight: bold">No-Install Package'); 
53        $thisChange =   54          $downloadurl=gettoken($downloadurl, 2, '(2) <a href="');    
54            "<!-- entry --><!-- %$class% %$version% -->" . chr(10) .  
55            "<h3 class=""$class"">$name - $version ($date)</h3>" . chr(10) .  
56            "<p class=""$class code"">$changes</p>" . chr(10);  
57            //$betaChanges;  
58        if($sequenceDirection == 1) {  
59            $betaChanges = $betaChanges . $thisChange;  
60        } else {  
61            $betaChanges = $thisChange . $betaChanges; // ascending  
62        } 55           }
63  56