Add all the A tasks

Task/Array-concatenation/AutoHotkey/array-concatenation-1.ahk

@@ -0,0 +1,18 @@
+List1 := [1, 2, 3]
+List2 := [4, 5, 6]
+cList := Arr_concatenate(List1, List2)
+MsgBox % Arr_disp(cList) ; [1, 2, 3, 4, 5, 6]
+
+Arr_concatenate(p*) {
+    res := Object()
+    For each, obj in p
+        For each, value in obj
+            res.Insert(value)
+    return res
+}
+
+Arr_disp(arr) {
+    for each, value in arr
+        res .= ", " value
+    return "[" SubStr(res, 3) "]"
+}

Task/Array-concatenation/AutoHotkey/array-concatenation-2.ahk

@@ -0,0 +1,37 @@
+List1 = 1,2,3
+List2 = 4,5,6
+
+List2Array(List1 , "Array1_")
+List2Array(List2 , "Array2_")
+
+ConcatArrays("Array1_", "Array2_", "MyArray")
+MsgBox, % Array2List("MyArray")
+
+
+;---------------------------------------------------------------------------
+ConcatArrays(A1, A2, A3) { ; concatenates the arrays A1 and A2 to A3
+;---------------------------------------------------------------------------
+    local i := 0
+    %A3%0 := %A1%0 + %A2%0
+    Loop, % %A1%0
+        i++, %A3%%i% := %A1%%A_Index%
+    Loop, % %A2%0
+        i++, %A3%%i% := %A2%%A_Index%
+}
+
+
+;---------------------------------------------------------------------------
+List2Array(List, Array) { ; creates an array from a comma separated list
+;---------------------------------------------------------------------------
+    global
+    StringSplit, %Array%, List, `,
+}
+
+
+;---------------------------------------------------------------------------
+Array2List(Array) { ; returns a comma separated list from an array
+;---------------------------------------------------------------------------
+    Loop, % %Array%0
+        List .= (A_Index = 1 ? "" : ",") %Array%%A_Index%
+    Return, List
+}