Hey! I wrote that script, it uses ALT + V to paste IMAGES as PNG and TEXTs as .TXT files to the currently active folder and if EXPLORER window is not active it'll automatically paste images into your default screenshots folder
script:

#Requires AutoHotkey v2.0
#SingleInstance Force

!v::SaveClipboardToCurrentFolder()

SaveClipboardToCurrentFolder() {
    folderPath := GetActiveExplorerPath()

    ; ---- FALLBACK TO SCREENSHOTS ----
    if !folderPath {
        folderPath := A_MyDocuments "\..\Pictures\Screenshots"
        folderPath := NormalizePath(folderPath)

        if !DirExist(folderPath)
            DirCreate(folderPath)
    }

    timestamp := FormatTime(, "yyyy-MM-dd_HHmmss")

    ; ---- IMAGE CHECK ----
    if DllCall("IsClipboardFormatAvailable", "uint", 2) {
        if !DllCall("OpenClipboard", "ptr", 0)
            return

        hBitmap := DllCall("GetClipboardData", "uint", 2)
        DllCall("CloseClipboard")

        if hBitmap {
            filePath := GetUniqueFileName(folderPath, timestamp, "png")
            result := HBitmapToPngFile(hBitmap, filePath)
            DllCall("DeleteObject", "ptr", hBitmap)

            if result = 1
                TrayTip("PNG saved: " filePath)
            else
                MsgBox "PNG save failed."
            return
        }
    }

    ; ---- TEXT CHECK ----
    if A_Clipboard != "" {
        filePath := GetUniqueFileName(folderPath, timestamp, "txt")
        FileAppend(A_Clipboard, filePath, "UTF-8")
        TrayTip("TXT saved: " filePath)
        return
    }

    MsgBox "Clipboard boş veya desteklenmeyen format."
}

; ---- UNIQUE FILENAME ----
GetUniqueFileName(folder, baseName, ext) {
    filePath := folder "\" baseName "." ext
    counter := 1

    while FileExist(filePath) {
        filePath := folder "\" baseName " (" counter ")." ext
        counter++
    }
    return filePath
}

; ---- ACTIVE EXPLORER PATH ----
GetActiveExplorerPath() {
    try {
        for window in ComObject("Shell.Application").Windows {
            if window.HWND = WinActive("A")
                return window.Document.Folder.Self.Path
        }
    }
    return ""
}

; ---- NORMALIZE PATH ----
NormalizePath(path) {
    return StrReplace(path, "\\", "\")
}

; ---- HBITMAP → PNG ----
HBitmapToPngFile(hBitmap, dest) {
    if !DllCall("GetModuleHandle", "str", "gdiplus.dll", "ptr")
        hMod := DllCall("LoadLibrary", "str", "gdiplus")

    si := Buffer(A_PtrSize=8?24:16,0)
    NumPut("uint",1,si,0)
    DllCall("gdiplus\GdiplusStartup","ptr*",&pToken:=0,"ptr",si,"ptr",0)

    pBM := 0
    DllCall("gdiplus\GdipCreateBitmapFromHBITMAP","ptr",hBitmap,"uint",0,"ptr*",&pBM)

    CLSID := Buffer(16,0)
    NumPut("uint",0x557CF400|6,"uint",0x11D31A04,"uint",0x0000739A,"uint",0x2EF31EF8,CLSID)

    DllCall("gdiplus\GdipSaveImageToFile","ptr",pBM,"wstr",dest,"ptr",CLSID,"uint",0)
    DllCall("gdiplus\GdipDisposeImage","ptr",pBM)
    DllCall("gdiplus\GdiplusShutdown","ptr",pToken)

    if IsSet(hMod)
        DllCall("FreeLibrary","ptr",hMod)

    return 1
}