Black-Platypus

// + Additional data in objects
/*******************************************************************************
 * ISO 639-2 language codes: Object with 1056 entries as of 2026-01-09         *
 * from https://iso639-3.sil.org/code_tables/639/data/all                      *
 * using https://github.com/Black-Platypus/grab-iso-639-language-codes.user.js *
 * Entries are keyed by their ISO 639-2 codes                                  *
 * (Entries without an ISO 639-2 code are omitted)                             *
 *******************************************************************************/
{
	"aar": {

Black-Platypus

// The most complete: Also includes some entries without an ISO 639-3 code.
/*******************************************************************************
 * ISO 639 language codes: Array of all 8561 entries as of 2026-01-09          *
 * from https://iso639-3.sil.org/code_tables/639/data/all                      *
 * using https://github.com/Black-Platypus/grab-iso-639-language-codes.user.js *
 * Each entry will have at least one of 639-1, 639-2 or 639-3.                 *
 * 639-2/B: Bibliographic use instead of Terminological use.                   *
 *   In practice, /B usually refers to the English name; /T to the endonym.    *
 *   /T is used as the default, where applicable.                              *
 *   see https://en.wikipedia.org/wiki/ISO_639-2#B_and_T_codes                 *

Black-Platypus

// + Additional data in objects
/*******************************************************************************
 * ISO 639-3 language codes: Object with 8445 entries as of 2026-01-09         *
 * from https://iso639-3.sil.org/code_tables/639/data/all                      *
 * using https://github.com/Black-Platypus/grab-iso-639-language-codes.user.js *
 * Entries are keyed by their ISO 639-3 codes                                  *
 * (Entries without an ISO 639-3 code are omitted)                             *
 *******************************************************************************/
{
	"aaa": {

Black-Platypus

// + Additional data in objects, as array
/*******************************************************************************
 * ISO 639-3 language codes: Array with all 8445 entries as of 2026-01-09      *
 * from https://iso639-3.sil.org/code_tables/639/data/all                      *
 * using https://github.com/Black-Platypus/grab-iso-639-language-codes.user.js *
 * (Entries without an ISO 639-3 code are omitted)                             *
 *******************************************************************************/
[
	{
		"639-1": "",

Black-Platypus

// Probably the most useful: A "dictionary"-style object
/********************************************************************************
 * Dictionary [ISO 639-3 => Language name] with 8445 entries as of 2026-01-09   *
 * from https://iso639-3.sil.org/code_tables/639/data/all                       *
 * using https://github.com/Black-Platypus/grab-iso-639-language-codes.user.jss *
 ********************************************************************************/
{
	"aaa": "Ghotuo",
	"aab": "Alumu-Tesu",
	"aac": "Ari",

Black-Platypus

@echo off
REM Windows implementation of Marian Minar's answer to "ffmpeg video compression / specific file size" https://stackoverflow.com/a/61146975/2902367
SET "video=%~1"
SET "target_video_size_MB=%~2"
SET "output_file=%~dpn1 %~2MB.mp4"
REM I usually don't see a big difference between two-pass and single-pass... set to anything but "true" to turn off two-pass encoding
SET "twopass=true"
REM We need a way to do floating point arithmetic in CMD, here is a quick one. Change the path to a location that's convenient for you
set "mathPath=c:\bin\Math.vbs"
REM Creating the Math VBS file

Black-Platypus

' About: https://www.reddit.com/r/vba/comments/p8i523/code_vba_function_get_regex_matches_as_array/
Function matches(ByVal text As String, pattern As String) As Variant()
    Dim allMatches As Object, flagMatches As Object
    Dim RE As Object, FRE As Object, fGlobal As Boolean, fIgnoreCase As Boolean, fMultiLine As Boolean
    Set RE = CreateObject("vbscript.regexp")
    ' Check for slash delim syntax with optional flags, like /pattern/[flags]
    Set FRE = CreateObject("vbscript.regexp")
    FRE.pattern = "^\/(.+)\/([gmi]*)$"
    FRE.IgnoreCase = True
    Set flagMatches = FRE.Execute(pattern)