[Автоматизация] Создание комбинации слов с последующим сохранением в txt файл

[garylucky]

Версия AutoIt: 3.3.14.4

Описание:

Итак, имеем 6 слов - "Copper" "Iron" "Silver" "Gold" "Platinum" "Diamond"
Нужно получить все возможные комбинации из этих слов, но без повторов. После создания, список нужно сохранить в текстовый файл с возможностью изменения пути сохранения в скрипте.

Поиском пользовался, на глаз попалась только одна старая тема от 2012 года. Причем без сохранения. Скрипт, предложенный в ней, не сработал.


Примечания:
Тема не брут. Если что-то не учел, по шапке не бейте :(

 

[Tempo]

?

#include <File.au3>
#include <Array.au3>
Local $aArray[] = ["Copper", "Iron", "Silver", "Gold", "Platinum", "Diamond"], $sOut = @ScriptDir & "\Out.txt"

Local $aPermute = _ArrayPermute($aArray, " ")
_ArrayDisplay($aPermute)

Local $hFile = FileOpen($sOut, $FO_OVERWRITE + $FO_CREATEPATH)
_FileWriteFromArray($hFile, $aPermute, 1)
FileClose($hFile)

 

[garylucky]

Огромное спасибо !!!! :beer: