XYplorer Beta Club

Code: Select all

/*
***************************************************************************************************
@Author  : https://www.xyplorer.com/xyfc/viewtopic.php?p=195781#p195781
@Created : 2020-02-19
@Modified: 2023-08-09
@Function: Everything For XY
@Version : v3.7
@Change  :
2023-08-09: Support adding quotes "" exact search
2022-11-04: Replace & History
***************************************************************************************************
*/



    // Handle .ini file
    $iniFile = "<xydata>" . "\" . "INI" . "\" . "EverythingForXY_LastQuery" . ".ini";

    // Write .ini file if missing
    if (exists($iniFile) != 1) {
        $iniContent = <<<'>>>'

// Cannot use <.> (.) etc as a separator
[EverythingForXY]
Query=Query1¶Query2¶Query3¶Query4¶Query5¶Query6¶Query7¶Query8¶Query9¶Query10

        >>>;
        writefile($iniFile, $iniContent, , "tu");                       // Save as Unicode
    }


// Get .ini file entries
 $lastQuery = getkey("Query", "EverythingForXY", $iniFile);
// Get the first value, the separator is ¶
 $lastQuery1 = gettoken($lastQuery, 1, '¶', "t");
// Replace ¶ to |
 $lastQuery =regexreplace($lastQuery, "¶", "|");



// Scripting
// ================================= settings =================================
	// -----------------search text process---------------
		$es 		= """<xyscripts>\EV FOR XY\es.exe"""; 				    // es.exe path
		$name       = now("yyyy-mm-dd-hhnnss");							    // Paper name
		$paper  	= "%temp%\EverythingForXYplorer\$name.txt";             // Paper path
		//$delete   = "!$ !@ !`% !# !\$Recycle.Bin";                        // It takes a few seconds


        $notes = "";
          $notes = <<<'>>>'
            Tips : Support everything syntax.
			                        PDF greater than 1mb：    size:>1mb .pdf
				                        Empty folder :                      empty:
		    
			            The left side automatically converts to the right
			                d: = Search directories          => folder:
			                 f: = Search file                       => file:
			                c: = Search content               => content:
			                p: = Search in current path  => path:<curpath >
							
			                p:c:Last    =>    path:D:\TXT content:Last
            >>>;



        $text = input("Everything for XYplorer", "$notes", "$lastQuery1", "s/e", "cancel", "510", "500", "$lastQuery", ":qns"); 
                                if $text == "cancel" {end 1==1;}

                                // Replace
                                $text=replace($text, "wjj:", "folder:");
                                $text=replace($text, "wj:", "file:");
                                $text=replace($text, "nr:", "content:");
                                $text=replace($text, "lj:", "path:");
                                $text=replace($text, "dq:", "path:<curpath>\ ");



    // ---------------------Short name---------------------					// Custom search short name,Users can modify it by themselves
        if $text == "office:" {$text = "*.doc|*.docx|*.ppt|*.pptx|*.mpaa|*.xlsx|*.xls";}
        elseif $text == "pic:"    {$text = "*.bmp|*.jpg|*.jpeg|*.png|*.tif|*.gif|*.pcx|*.tga|*.svg|*.psd|*.cdr|*.pcd|*.dxf|*.ufo|*.eps|*.ai|*.raw|*.WMF|*.webp"}
        elseif $text == "video:"  {$text = "*.avi|*.flv|*.mkv|*.mp4|*.mpe|*.mpeg|*.mpg|*.mov|*.rmvb|*.wm|*.wmv"}
        elseif $text == "zip:"    {$text = "*.zip|*.rar|*.7z|*.cab"}
    // -------------Special characters working-------------
	    //$text2  = replacelist("$text", '< > & | ^ "', '^< ^> ^& ^| ^^ \"', " "); //ES special characters need to be prefixed with "^"
        $text2  = replacelist("$text", '< > & | ^', '^< ^> ^& ^| ^^', " "); //ES special characters need to be prefixed with "^"
// ================================= script =======================
    // -----------------------search--------------------
        if $text != "*" and $text != "file:" and $text != "folder:" and $text != "" 
        {
                // Make sure the path exists
			    if(!exists("%temp%\EverythingForXYplorer")) {new("%temp%\EverythingForXYplorer", "dir")}
                //runret ("cmd /c chcp 65001 & $es $text2 >$paper");                               // Run cmd, use UTF8 format save to TXT file
				//runret ("cmd /c $es $text2  -export-txt $paper");
				run "$es $text2 -export-txt $paper",, 2, 0;                                        // Run cmd, Make the results of the search save to the $paper file

                //tab("newb", "This PC");                                // New background tab
                $size = report("{Size B}", $paper);                    // Get file size

                if(!$size) {
                   msg "No match found!";                              // Popup "No match found!"
				   //tab("close",, tab("get", "index")+1);
                } else {
				        //seltab +;
						tab("new");
                        paperfolder($paper, , , "l");                  // Open a file as paperfolder
                        //goto ">cmt:$text";                             // Highlight search keywords;Turn on Instant Color Filters
                        status "Query: $text";                         //Status query
                }



// Save last query to INI file
                $newLastQuery = "";
                $count = "0";

                // Foreach $lastQuery
                foreach($value, "$lastQuery", "|", "e") {
	               if($value != $text) {$newLastQuery .= "$value" . "¶";}      // if $value != $text, stack each item with the separator ¶

                   $count++;                      // $count + 1 each time

                   if $count == "10" {break}
                }


                if($text) {                       // Merges input values with old values, the separator is ¶
                   $newLastQuery = "$text" . "¶" . "$newLastQuery";
                   setkey $newLastQuery, "Query", "EverythingForXY", $iniFile;
                }

        } else {
                msg "The range of keywords you entered is too large. Please try another keyword";
        }
// ================================== END ===================================