This was written with Pascal Script on Inno Setup