TOTALCMD#BAR#DATA
cmd /c setlocal&title 7z-packing... &for /f "tokens=1-6 delims=:., " %a in ('echo %date% %time:~0,8%') do for %i in ("%CD%") do
for /f "delims=" %%R in ("%S") do cls&%%pp%%\7z a -pПАРОЛЬ -scswin -m0=bcj -m1=lzma:d=21 -ms -mmt """""%%~nxi_[%%c.%%b.%%a-%%d.%%e.%%f].7z""""" """"%%R""""
keymgr.dll
Создание зашифрованного 7z-архива
 
1

TOTALCMD#BAR#DATA
cmd /c title 7z-unpacking... &%pp%\7z x -aoa
-o"%O" "%O.%E"
%pp%\7z.sfx
Распаковать 7z-ом
 
1

TOTALCMD#BAR#DATA
%comspec% /c start "7-zip сжимает..." /min "%COMMANDER_PATH%\7-Zip\7z.exe"
a -t7z -mx -m0=LZMA2 -mse -ssw -scsWIN -y -- "%O.7z" @%L
%COMMANDER_PATH%\7-Zip\7z.sfx
7z с максимальным сжатием методом LZMA2

1
-1

TOTALCMD#BAR#DATA
%comspec% /c start "7z сжимает..." /min "<App>\7-Zip\7z.exe"
a -t7z -mx9 -m0=BCJ2 -m1=lzma2 "%T%O.7z" %S
<App>\7-Zip\7z.sfx
Создать 7z(LZMA2)-архив c макс. уровнем сжатия из выделенного в противоположной панели

1
-1

a -t7z -mx -m0=LZMA2 -mse -ssw -scsWIN -y -- "%O.7z" @%L

a -t7z -mx9 -m0=lzma2 "%O.7z" %S

TOTALCMD#BAR#DATA
%comspec% /c start "7-zip извлекает..." /min "%COMMANDER_PATH%\7-Zip\7z.exe"
x -scsWIN -y -- %P%N
%COMMANDER_PATH%\7-Zip\7z.dll
Извлечь в текущую папку с помощью 7-zip

1
-1

TOTALCMD#BAR#DATA
%comspec% /c start "7z распаковывает..." /min "<App>\7-Zip\7z.exe"
e %N -o"%O"
<App>\7-Zip\7z.sfx
Распаковать архив под курсором

1
-1

TOTALCMD#BAR#DATA
%comspec% /c start "7-zip извлекает..." /min "%COMMANDER_PATH%\7-Zip\7z.exe"
x -scsWIN -y -o"%O" -- %P%N
%COMMANDER_PATH%\7-Zip\7z.dll
Извлечь в папку c именем архива с помощью 7-zip

1
-1

@echo off &setlocal enableextensions &chcp 1251 >nul
rem  Распаковка с помощью 7-Zip
set "Arc=%commander_path%\7-Zip\7z.exe"

goto :------------------------------------------------------------
rem  Параметры: список "D:\куда\" -o
rem  -o —— в отдельные папки с именами архивов
rem  Пример параметров для TC: "%L" "%%userprofile%%\Мои документы\"
rem  В одноимённые папки расположенные в пути запуска (или в текущем): "%L" -o
rem  В одноимённые папки расположенные рядом с архивами: "%L" "%%~dpf" -o
:------------------------------------------------------------

set "Dest=" &set "cage="
if /i "%~2"=="-o" set "cage=Yes"
if /i "%~3"=="-o" set "cage=Yes"
if not "%~2"=="" if /i not "%~2"=="-o" set "Dest=%~2"
if not "%~3"=="" if /i not "%~3"=="-o" set "Dest=%~3"

if "%cage%"=="Yes" set "Dest=%Dest%.\%%~nf"
for /f "usebackq delims=" %%f in ("%~1") do (
  title Unpacking "%%~nf"
  "%Arc%" x -scsWIN -y -o"%Dest%." -- "%%f"
)

enableextensions

setlocal /?

TOTALCMD#BAR#DATA
%COMMANDER_PATH%\SOFT\7-Zip\7z.exe
x -scsWIN -y -o"%O" -- %P%N
%COMMANDER_PATH%\ICO\em_UnpackFiles.ico
Р а с п а к о в а т ь  файлы [Win+Alt+F6]

0
-1

@echo off &chcp 1251 >nul
setlocal enableextensions

rem  Параметры кнопки: %L -o
rem  -o — каждый архив в отдельную папку с именем архива

if "%~2"=="-o" for /f "usebackq delims=" %%f in ("%~1") do (
title Распаковка %%~nf...
"%COMMANDER_PATH%\7-Zip\7z.exe" x -scsWIN -y -o"%%~nf" -- "%%f"
)
if "%~2"=="" for /f "usebackq delims=" %%f in ("%~1") do (
title Распаковка %%~nf...
"%COMMANDER_PATH%\7-Zip\7z.exe" x -scsWIN -y -- "%%f"
)

TOTALCMD#BAR#DATA
%comspec% /c call "%COMMANDER_PATH%\cmd\un7z.cmd"
%L -o
%COMMANDER_PATH%\7-Zip\7z.dll
Извлечь все с помощью 7-zip

1
-1

[em_PackFilesInZIP]
button=%COMMANDER_PATH%\ICO\zip.ico
cmd=%COMMANDER_PATH%\SOFT\7-Zip\7z.exe
param=a -tzip -mx "%O.zip" @%L

[em_PackFiles]
button=%COMMANDER_PATH%\ICO\em_PackFiles.ico
cmd=%COMMANDER_PATH%\SOFT\7-Zip\7z.exe
param=a -t7z -mx -m0=LZMA2 -mse -ssw -scsWIN -y -- "%O.7z" @%L
menu=У п а к о в а т ь  файлы [Win+Alt+F5]

[em_PackFiles]
button=%COMMANDER_PATH%\ICO\em_PackFiles.ico
cmd=%COMMANDER_PATH%\SOFT\7-Zip\7z.exe
param=a -t7z -mx9 -m0=LZMA2 -mse -ssw -scsWIN -y -- "%O.7z" @%L
menu=У п а к о в а т ь  файлы [Win+Alt+F5]

%COMMANDER_PATH%\Plugins\arc\7z.exe
x -scsUTF-8 -y -o"%T%O" -- %P%N

Распаковка с помощью 7-zip  в противоположную панель

WSH.Run """" & Proga & """ x """ & File & """ -o""" & NF & """ -y", 0, True

      NF = FSO.CreateFolder(FSO.GetParentFolderName(File) & "\"  & FSO.GetBaseName(File) & "\" )
      WSH.Run """" & Proga & """ x """ & File & """ -o""" & NF & """ -y", 0, True

      WSH.Run """" & Proga & """ x """ & File & """ -o""" & FSO.GetParentFolderName(File) & "\"" -y", 0, True

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "%COMMANDER_PATH%\Soft\Utils\archivers\file.exe",7

WshShell.Run "taskkill /IM file.exe", 0

TOTALCMD#BAR#DATA
%comspec% /c start "7-zip Packing..." /min "%COMMANDER_PATH%\Packers\7zg.exe"
a -t7z -mx -m0=LZMA2 -mse -ssw -scsWIN -y -- %N.7z "@%L"
%COMMANDER_PATH%\Icons\7zip_add.ico
Add all to 7-Zip (Full Path) - Pack FOLDERS (Ultra Compression)

1
-1

'WSH.Popup "Упаковка завершена!", 1.4 , "Результат", 64
'Set FSO = Nothing
'Set WSH = Nothing
'WScript.Quit

SetLocale(1049)

SetLocale(1049)

' Вывод сообщения и выход:
SetLocale(1049)
WSH.Popup "Упаковка завершена!", 1.4, "Результат", 64
Set FSO = Nothing : Set WSH = Nothing : WScript.Quit

' Вывод сообщения и выход:
SetLocale(1049) WSH.Popup "Упаковка завершена!", 1.4, "Результат", 64
Set FSO = Nothing : Set WSH = Nothing : WScript.Quit

TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Utils\7-Zip\7z.exe
e %V -o"%T%O\" *.gif *.png *.jpg -aour
wcmicons.dll,31
Рекурсивно распаковать файлы gif, png, jpg из архива под курсором в папку др. панели с тем же именем
%COMMANDER_PATH%\Utils\7-Zip\
1

TOTALCMD#BAR#DATA
%ComSpec% /c for %# in (*.*) do "%COMMANDER_PATH%\Utils\7-Zip\7z.exe" a "%~n#.zip" "%#"

wcmicons.dll,30
Упаковать файлы активной папки в однобазовые zip-архивы

1

@echo off &setlocal enableextensions &chcp 1251 >nul
rem  Распаковка с помощью 7-Zip
set "Arc=%COMMANDER_PATH%\Packers\7zg.exe"

goto :------------------------------------------------------------
rem  Параметры: список "D:\куда\" -o
rem  -o -- в отдельные папки с именами архивов
rem  Пример параметров для TC: "%L" "%%userprofile%%\Мои документы\"
rem  В одноимённые папки расположенные в пути запуска (или в текущем): "%L" -o
rem  В одноимённые папки расположенные рядом с архивами: "%L" "%%~dpf" -o
:------------------------------------------------------------

set "Dest=" &set "cage="
if /i "%~2"=="-o" set "cage=Yes"
if /i "%~3"=="-o" set "cage=Yes"
if not "%~2"=="" if /i not "%~2"=="-o" set "Dest=%~2"
if not "%~3"=="" if /i not "%~3"=="-o" set "Dest=%~3"

if "%cage%"=="Yes" set "Dest=%Dest%.\%%~nf"
for /f "usebackq delims=" %%f in ("%~1") do (
  title Unpacking "%%~nf"
  "%Arc%" x -scsWIN -y -o"%Dest%." -- "%%f"
)

TOTALCMD#BAR#DATA
"%COMMANDER_PATH%\Utilities\Scripts\7zip_unpack.cmd"
"%L" -o
%COMMANDER_PATH%\Icons\7zip_extract.ico
Extract all with 7-Zip (Maintain Path)

1
-1

a -tzip -ssw -mx5 "%O.7z" @%L

a -t7z -mx0 -mse -ssw -scsWIN -y -- "%O.7z" @%L

a -t7z -mx0 -ms=off -mhc=off -ssw -scsUTF-16LE -y -- "%O.7z" @%WL

a "%O.7z" -mx0 -ms=off -mhc=off -ssw -scsUTF-16LE -y @%WL

TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Utils\7-Zip\7zG.exe
a "%O.7z" -mx0 -ms=off -ssw -scsUTF-16LE -y @%WL
%COMMANDER_PATH%\Utils\7-Zip\7zG.exe
Упаковать выделенное в 7z-архив с минимальным сжатием

1

a -mx0 -ms=off -mhc=off -ssw -scsUTF-16LE -y -- "%O.7z" @%WL

a -mx0 -ms=off mhc=off -ssw -scsUTF-16LE -y -- "%O.7z" @%WL

команда: %comspec% /c start "7-zip сжимает..." /min "%COMMANDER_PATH%\7z\7zG.exe"
параметр: a -tzip -ssw -mx5 "%O.7z" @%L

команда: %comspec% /c start "7-zip сжимает..." /min "%COMMANDER_PATH%\7z\7zG.exe"
параметр: a -t7z -mx -m0=LZMA -mse -ssw -scsWIN -y -- "%O.7z" @%L

%comspec% /c start "7-zip сжимает..." /min

a -ssw -scsUTF-8 -mx5 "%O.7z" @%UL

TOTALCMD#BAR#DATA
"c:\Program Files\Total Commander\Utils\WHS\MultiRun.vbs"
01 "%%ProgramFiles%%\7-Zip\7z.exe" x {{%WL}} -o"%T{{%WF}}" -y
%COMMANDER_PATH%\Totalcmd.exe,7
Распаковать архивы в отдельные папки


-1

TOTALCMD#BAR#DATA
%ComSpec% /c for /f "delims=" %a in
('type %WF') do "%%COMMANDER_PATH%%\Plugins\WCX\Total7zip\64\7z.exe" x -y "%%a" -o"%T%%~na"
WCMICONS.DLL,31
Распаковать с 7Z выделенные архивы в каталоги с именами архивов  в противоположную панель

1
-1

TOTALCMD#BAR#DATA
"%COMMANDER_PATH%\Packers\7zg.exe"
a -t7z -mx -myx=9 -m0=LZMA2 -ssw -mqs=on -scsWIN -y -- %N.7z "@%L"
%COMMANDER_PATH%\Icons\7zip_add.ico
Add all to 7-Zip (Full Path) - Pack FOLDERS (Ultra Compression)

1
-1

a -t7z -mx -myx=9 -m0=LZMA2 -ssw -mqs=on -scsWIN -y --

TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Utils\7-zip\7zG.exe
t -scsUTF-16LE -an -ai@%WL -y
Utils\7-zip\7z.dll,13
Протестировать выбранные в активной панели архивы

;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;
; Total Commander DreamLair                        ;
; Script: Unpack Selected Archives with 7-Zip      ;
; Script version: 1.0 (2018.09.14)                 ;
; Script author: LonerD                            ;
; Site: https://dreamlair.net                      ;
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;
; Parameters:                                      ;
;  1) %WL (required)                               ;
;  2) Path to archiver (required)                  ;
; ("%%commander_path%%\Plugins\arc\7-Zip\7zG.exe") ;
;  3) Unpack to subdir (1|0)                       ;
;  4) Unpack only supported extensions (1|0)       ;
;  5) Mode (a|s|u - overwrite all|skip|rename)     ;
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;

#NoEnv
#NoTrayIcon
#SingleInstance ignore

if not ( WinExist("ahk_class TTOTAL_CMD") || WinActive("ahk_class TTOTAL_CMD") )
  ExitApp

Filelist = %1%
7ZipPath = %2%
ToSubdir = %3%
Supported = %4%
Overwrite = %5%

if 0 < 5
  Overwrite = u
if 0 < 4
  Supported = 1
if 0 < 3
  ToSubdir := 1
if 0 < 2
  ExitApp

EnvGet, commander_path, commander_path
Transform, 7ZipPath, Deref, % 7ZipPath
7ZipPath := ExpandEnvVars (7ZipPath)

if Overwrite not in a,s,u
  Overwrite:= s
if Supported not in 0,1
  Supported:= 1

if ( Supported = "1" )
  SupportedExt := "7z,7zip,7-zip,exe,bz2,bzip2,tbz2,tbz,gz,gzip,tgz,tar,wim,swm,esd,xz,txz,zip,zipx,jar,apk,xpi,odt,ods,docx,xlsx,epub,apm,ar,a,deb,lib,arj,cab,chm,chw,chi,chq,msi,msp,doc,xls,ppt,cpio,cramfs,dmg,ext,ext2,ext3,ext4,fat,hfs,hfsx,hxs,hxi,hxr,hxq,hxw,lit,ihex,iso,img,lha,lzh,lzma,mbr,mslz,mub,nsis,ntfs,rar,r00,rpm,ppmd,qcow,qcow2,qcow2c,squashfs,udf,scap,uefif,vdi,vhd,vmdk,xar,pkg,z,taz"

Loop, Read, % Filelist
{
  TargetFile = %A_LoopReadLine%
  SplitPath, TargetFile, FileName, FileDir, FileExt, FileNameNoExt

  if not InStr(FileExist(TargetFile), "D")
  {
    if ( ToSubdir = "0" )
      TargetPath := FileDir . "\"
      else
        TargetPath := FileDir . "\" . FileNameNoExt . "\"

     While InStr(TargetPath, ".\")
       TargetPath := StrReplace(TargetPath, ".\", "\")

      if ( Supported = "0" )
      RunWait, %7ZipPath% x -scsUTF-8 -ao%Overwrite% -o"%TargetPath%" -- "%TargetFile%"
      else if FileExt in % SupportedExt
        RunWait, %7ZipPath% x -scsUTF-8 -ao%Overwrite% -o"%TargetPath%" -- "%TargetFile%"
  }
}

ExitApp

;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;
ExpandEnvVars(ppath)
{
  VarSetCapacity(Dest, 2000)
  DllCall("ExpandEnvironmentStrings", Str, ppath, Str, Dest, Int, 1998)
  Return, Dest
}
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~;

[em_7Zip_crypt]
cmd=%commander_path%\Plugins\exe\AskParam.exe
param=/c"7-Zip Archive with Date" /u"-mx9 -m0=LZMA2 -mse -ssw -scsUTF-16LE -y" /t"-mx9 -m0=LZMA -mse -ssw -scsUTF-16LE -y" /p"Compression Parameters" /u"pass" /p"Password" /s0 %%comspec%% /c setlocal & for /f "tokens=1-6 delims=:., " %%%%a in ('echo %%%%date%%%% %%%%time:~0,8%%%%') do "%%%%commander_path%%%%\Plugins\arc\7-Zip\7zG.exe" a -t7z %%1 -p%%2 -mhe "%P%N [%%%%c.%%%%b.%%%%a_%%%%d.%%%%e.%%%%f].7z" ""%P%N""

for /f "tokens=1-6 delims=:., " %a in ('echo %date% %time:~0,8%') do echo %c.%b.%a_%d.%e.%f

echo %date:~6,4%.%date:~3,2%.%date:~,2%_%time:~,2%.%time:~3,2%.%time:~6,2%

TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Plugins\exe\AskParam.exe /c"7-Zip Archive with Date" /u"LZMA2" /t"LZMA" /p"Compression Parameters" /u"pass" /p"Password" /s0 %ComSpec% /v:on /q/c "(for /f "skip=1" %%# in ('wmic os get localdatetime')
do >nul set /a c+=1 &set !c!=%%%%~n#)&&"!COMMANDER_PATH!\Plugins\arc\7-Zip\7z.exe" a ""%N" [!1:~,4!.!1:~4,2!.!1:~6,2!_!1:~8,2!.!1:~10,2!.!1:~12!].7z" -m0=%%1 -p%%2 -mx -mhe -ssw -y -scsUTF-16LE @%WL"
Plugins\arc\7-Zip\7z.dll
Упаковка выбранного в "<CurrentName> [yyyy.MM.dd_HH.mm.ss].7z" с выбором алгоритма LZMA/2

a -t7z -md=192m -mx -myx=9 -m0=LZMA2 -ssw -mqs=on -scsUTF-16LE -y -i"@%WL" -- "%T%O.7z"

a %O.7z %S

arwcx="%p%O"||7z||1

a -t7z -md=192m -mx -myx=9 -m0=LZMA2 -ssw -mqs=on -scsUTF-16LE -y -i"@%WL" -- "%T%O.7z"

a -t7z -md=192m -mx -myx=9 -m0=LZMA2 -ssw -mqs=on -scsUTF-16LE -y -i"@%WL" -- "%T%O.7z"