Szukam paczek tekstur HD dla Sega Model 2 Emulator

#11 · 2023-09-21, 09:34

Nie będzie, pozwoliłem sobie poprawić 🙂

#include <File.au3>

#include <String.au3>

Local $aFileList = _FileListToArray(@ScriptDir, '*.png')

_ArrayDisplay($aFileList,'$aFileList')

Fileopen('generated.pat',2)

for $x=1 to ubound($aFileList)

$id1=_StringBetween($aFileList[$x],'','_')

$id2=_StringBetween($aFileList[$x],'_','.')

FilewriteLine('generated.pat',$id1[0]&' '&$id2[0]&' 0 '&$aFileList[$x]&@CRLF)

#12 · 2023-09-21, 10:11

Zrzut%20ekranu%20(334)

Patent działa :]

Tak sobie piszę po internetach...