שיתוף | תוכנה (קובץ באט) לסידור תקיות במחשב לפי תיקיות 1.0

[FSHLOMO]

היום כתבתי את הקובץ באט הראשון שלי בינתיים זה רק באנגלית אשמח לכל תגובה לכל עזרה ולכל הערה.

הבאט הזה מסדר כל הסוגי קבצים לתקיות נפרדות
אני יעלה צילומי מסך של הבאט
תהנהו
בעזרת השם העיצוב עוד ישתנה ו......,(מי שיכול לעזור לי בזה אשמח בפרטי)

זה לבינתיים הכנסתי מלא מלא עבודה ישבתי על שעות על גבי שעות בבקשה תשתמשו תהנהו רק לא לשכוח לתת קרדיט

אני מעלה פה את הקוד ולמטה קקובץ באט

@echo off
setlocal enabledelayedexpansion

rem Temporary file to store original file locations for undo
set "undo_file=%TEMP%\undo_list.txt"

rem Function to display the menu
:display_menu
cls
echo ====================================
echo             File Organizer
echo     CREDIT BY FOLDER@83262044.COM
echo ====================================
echo 1. Organize Downloads Folder
echo 2. Organize Music Folder
echo 3. Organize Documents Folder
echo 4. Organize Images Folder
echo 5. Organize Video Folder
echo 6. Organize Other Folder
echo 7. Exit
echo ====================================
set /p choice="Enter your choice (1, 2, 3, 4, 5, 6, or 7): "

if "%choice%"=="1" (
    set "source_dir=%USERPROFILE%\Downloads"
    goto :process_files
) else if "%choice%"=="2" (
    set /p source_dir="Enter the full path of the Music folder: "
    goto :process_files
) else if "%choice%"=="3" (
    set /p source_dir="Enter the full path of the Documents folder: "
    goto :process_files
) else if "%choice%"=="4" (
    set /p source_dir="Enter the full path of the Images folder: "
    goto :process_files
) else if "%choice%"=="5" (
    set /p source_dir="Enter the full path of the Video folder: "
    goto :process_files
) else if "%choice%"=="6" (
    set /p source_dir="Enter the full path of the folder: "
    goto :process_files
) else if "%choice%"=="7" (
    echo Exiting...
    exit /b
) else (
    echo Invalid choice. Please try again.
    pause
    goto :display_menu
)

:process_files
rem Initialize file count
set file_count=0

rem Check for and create folders if they contain files
if exist "%source_dir%\*.mp3" (
    mkdir "%source_dir%\Audio" 2>nul
)
if exist "%source_dir%\*.jpg" (
    mkdir "%source_dir%\Images" 2>nul
)
if exist "%source_dir%\*.pdf" (
    mkdir "%source_dir%\Documents" 2>nul
)
if exist "%source_dir%\*.mp4" (
    mkdir "%source_dir%\Video" 2>nul
)
if exist "%source_dir%\*.exe" (
    mkdir "%source_dir%\Programs" 2>nul
)
if exist "%source_dir%\*.py" (
    mkdir "%source_dir%\Python" 2>nul
)
if exist "%source_dir%\*.bat" (
    mkdir "%source_dir%\Scripts" 2>nul
)
if exist "%source_dir%\*.zip" (
    mkdir "%source_dir%\Archives" 2>nul
)

rem Clear undo file
echo. > "%undo_file%"

rem Display message while organizing
echo Organizing files, please wait...

rem Move files and record their original locations for undo
for %%f in ("%source_dir%\*.mp3" "%source_dir%\*.wav" "%source_dir%\*.flac" "%source_dir%\*.aac" "%source_dir%\*.ogg") do (
    echo "%%f" >> "%undo_file%"
    move "%%f" "%source_dir%\Audio\" >nul
    set /a file_count+=1
)

for %%f in ("%source_dir%\*.jpg" "%source_dir%\*.jpeg" "%source_dir%\*.png" "%source_dir%\*.gif" "%source_dir%\*.bmp") do (
    echo "%%f" >> "%undo_file%"
    move "%%f" "%source_dir%\Images\" >nul
    set /a file_count+=1
)

for %%f in ("%source_dir%\*.pdf" "%source_dir%\*.doc" "%source_dir%\*.docx" "%source_dir%\*.xls" "%source_dir%\*.xlsx" "%source_dir%\*.ppt" "%source_dir%\*.pptx" "%source_dir%\*.txt") do (
    echo "%%f" >> "%undo_file%"
    move "%%f" "%source_dir%\Documents\" >nul
    set /a file_count+=1
)

for %%f in ("%source_dir%\*.mp4" "%source_dir%\*.avi" "%source_dir%\*.mkv" "%source_dir%\*.mov" "%source_dir%\*.wmv") do (
    echo "%%f" >> "%undo_file%"
    move "%%f" "%source_dir%\Video\" >nul
    set /a file_count+=1
)

for %%f in ("%source_dir%\*.exe") do (
    echo "%%f" >> "%undo_file%"
    move "%%f" "%source_dir%\Programs\" >nul
    set /a file_count+=1
)

for %%f in ("%source_dir%\*.py") do (
    echo "%%f" >> "%undo_file%"
    move "%%f" "%source_dir%\Python\" >nul
    set /a file_count+=1
)

for %%f in ("%source_dir%\*.bat") do (
    echo "%%f" >> "%undo_file%"
    move "%%f" "%source_dir%\Scripts\" >nul
    set /a file_count+=1
)

for %%f in ("%source_dir%\*.zip" "%source_dir%\*.7z") do (
    echo "%%f" >> "%undo_file%"
    move "%%f" "%source_dir%\Archives\" >nul
    set /a file_count+=1
)

rem Move remaining files to Others if necessary
for %%f in ("%source_dir%\*") do (
    if not exist "%source_dir%\Audio\%%~nxF" if not exist "%source_dir%\Images\%%~nxF" if not exist "%source_dir%\Documents\%%~nxF" if not exist "%source_dir%\Video\%%~nxF" if not exist "%source_dir%\Programs\%%~nxF" if not exist "%source_dir%\Python\%%~nxF" if not exist "%source_dir%\Scripts\%%~nxF" if not exist "%source_dir%\Archives\%%~nxF" (
        if not exist "%source_dir%\Others" mkdir "%source_dir%\Others"
        echo "%%f" >> "%undo_file%"
        move "%%f" "%source_dir%\Others\" >nul
        set /a file_count+=1
    )
)

echo %file_count% files have been organized in the folder.

rem Ask if the user wants to undo the action or exit
:undo_or_exit
cls
echo ====================================
echo       Operation Completed
echo ====================================
echo %file_count% files have been organized.
echo ====================================
echo 1. Undo the Last Action
echo 2. Organize Another Folder
echo 3. Exit
echo ====================================
set /p user_choice="Enter your choice (1, 2, or 3): "

if "%user_choice%"=="1" (
    goto :undo_operation
) else if "%user_choice%"=="2" (
    goto :display_menu
) else if "%user_choice%"=="3" (
    echo Exiting...
    exit /b
) else (
    echo Invalid choice. Please try again.
    pause
    goto :undo_or_exit
)

:undo_operation
rem Restore files from organized folders back to the original directory
echo Restoring files to the original location...

rem Move files from each organized folder back to the original directory
for %%d in ("Audio" "Images" "Documents" "Video" "Programs" "Python" "Scripts" "Archives" "Others") do (
    if exist "%source_dir%\%%d" (
        for %%f in ("%source_dir%\%%d\*") do (
            move "%%f" "%source_dir%\" >nul
        )
    )
)

rem Remove the directories created during the organization process if they are empty
for %%d in ("Audio" "Images" "Documents" "Video" "Programs" "Python" "Scripts" "Archives" "Others") do (
    if exist "%source_dir%\%%d" (
        rd /s /q "%source_dir%\%%d" 2>nul
    )
)

echo Files have been restored to their original location and directories have been removed.
pause
goto :display_menu

---

מסדר תקיות 1.0.BAT

(זה העברית זה באמצע סידור של הRTL מסדר תקיות עברית 1.0.BAT יש לי את זה גם באותיות ישרות אולי מישהו יודע איך לעשות את זה באנטר אחד אני אשמח עברית אם אותיות ישר.BAT )

@NH-LOCAL אני מכיר את המסדר הורדות שלך אבל אני עוד עדיין חושב שזה יותר משוכלל אם אופציות לחזור בך ועוד הרבה דברים שעוד בדרך.....

[מיגו להוציא]

כל הכבוד על ההשקעה...

Spoiler

@FSHLOMO כתב בשיתוף | תוכנה (קובץ באט) לסידור תקיות במחשב לפי תיקיות 1.0:

מי שיכול לעזור לי בזה אשמח בפרטי

היום עושים כאלו דברים בחברותא עם קלאוד, gpt ושאר החברים

[NH.LOCAL]

@FSHLOMO כתב בשיתוף | תוכנה (קובץ באט) לסידור תקיות במחשב לפי תיקיות 1.0:

(זה העברית זה באמצע סידור של הRTL מסדר תקיות עברית 1.0.BAT יש לי את זה גם באותיות ישרות אולי מישהו יודע איך לעשות את זה באנטר אחד אני אשמח עברית אם אותיות ישר.BAT )

יש לך את הסקריפט הזה:
https://github.com/NHLOCAL/batch-designer

[יהודי חסיד]

@FSHLOMO
אני עשיתי משהו דומה באמצעות כלי AI
מורדים את הקובץ המצורף
דאבל קליק מנווטים לתקיה שאותה רוצים לסדר
ממיין קבצים.vbs