XYplorer Beta Club

Code: Select all

"abc's" text "abc";
"def's" text "def";

Code: Select all

"Backup to ""Desktop""|%desktop% : bak2desktop"
  $local = %desktop%;

  // Data e hora:
  $tc = <date yyyy-mm-dd hh:nn:ss>;
  $td = gettoken($tc, 1, " ");
  $th = gettoken($tc, 2, " ");

  // Fragmentar a hora:
  $h = substr($th, 0, 2);
  $m = substr($th, 3, 2);
  $s = substr($th, 6, 2);

  // Nome final do arquivo:
  $n = $td $h . "h" . $m;
  if (exists($local . \Backup\) != 2) { new($local . "\Backup", "dir"); }
  copyas '* ' . "(bak " . $n . ")" . '.?', "$local" . "\Backup\";

Code: Select all

"_Initialize"
  perm $p_tmpCaption1 = "Send to ""Backup"" folder";

/*
[...]
*/

"$p_tmpCaption1"
  text OK;

Code: Select all

"Backup to “Desktop”|%desktop% : bak2desktop"
  $local = %desktop%;