Использование Powershell

Set-ExecutionPolicy -ExecutionPolicy RemoteSigned -Scope CurrentUser -Force
Set-ExecutionPolicy -ExecutionPolicy RemoteSigned -Scope LocalMachine -Force

external(INT, "PS_Command", "PS_Command", "PowerShell.dll");
char Result[99999];
// получить список папок на диске C:
int res = PS_Command("(Get-ChildItem -Path C:\ -Directory).Name", address(#Result[0]), sizearray(Result));
if(res) messagebox(format(#Result[0]));
else messagebox("res = 0");

external(INT, "PS_Command", "PS_Command", "PowerShell.dll");
char Result[99999];
// узнать количество дней между датами
int res = PS_Command("([DateTime]::Parse(^"25.02.2025^") - [DateTime]::Parse(^"10.01.2025^")).Days", address(#Result[0]), sizearray(Result));
if(res) messagebox(format(#Result[0]));
else messagebox("res = 0");

try{
$prc = Get-Process Kibor
}
catch [Microsoft.PowerShell.Commands.ProcessCommandException]{
$PSItem.Exception
return
}
@{
'Handle' = $prc[0].MainWindowHandle
'StartTime' = $prc[0].StartTime.ToString("dd.MM.yy HH:mm:ss")
'PID' = $prc[0].Id
}|ConvertTo-Json

external(INT, "PS_File", "PS_File", "PowerShell.dll");
char Result[99999];
// выполнить код из файла
int res = PS_File(pathfolder()+"GetProcess.ps1", address(#Result[0]), sizearray(Result));
if(res)
{
messagebox(format(#Result[0]));
parserjson(Json, format(#Result[0]));
messagebox("Хендл: " + Json.Handle);
messagebox("Время запуска: " + Json.StartTime);
messagebox("PID: " + Json.PID);
}
else messagebox("res = 0");

Add-Type -AssemblyName System.Security
$encrypted = "AQAAANCMnd8BFdERjHoAwE/Cl+sBAAAAASyDqgb2CE24Rv3n9c7toAAAAAACAAAAAAAQZgAAAAEAACAAAAAGMhJknBN0yub6l/vHQwiPQj9QkmiVnP0ccGytg7bmrgAAAAAOgAAAAAIAACAAAADLCYtB9IBWNzJjrh18cGNb964GKLEmyY1+axY2GUgx6yAAAAAbfyOLx3rZqkt97T1NzuLvC2iyZwNR8+2fv32xhdJVwEAAAAATHTjxsekAf15NE2/YQivXAlFn+GaUWl63FOfpMe/z7asyNLj2hOTNJWz8v4Wz3Fw4DqyGWTyseOiclZEhXwCY"
$bytes = [Convert]::FromBase64String($encrypted)
$decrypted = [System.Security.Cryptography.ProtectedData]::Unprotect($bytes, $null, [System.Security.Cryptography.DataProtectionScope]::CurrentUser)
[System.Text.Encoding]::UTF8.GetString($decrypted)

try{
Add-Type -AssemblyName System.Security
$scope = [System.Security.Cryptography.DataProtectionScope]::CurrentUser
$text = [System.Text.Encoding]::UTF8.GetBytes("Text to encrypt")
$protected = [System.Security.Cryptography.ProtectedData]::Protect($text, $null, $scope)
$protectedBase64 = [Convert]::ToBase64String($protected)
$textProtected = [Convert]::FromBase64String($protectedBase64)
$unprotected = [System.Security.Cryptography.ProtectedData]::Unprotect($textProtected, $null, $scope)
$protectedBase64 # зашифрованный текст в формате base64
[System.Text.Encoding]::UTF8.GetString($unprotected) # расшифрованный текст
}
catch [Microsoft.PowerShell.Commands.ProcessCommandException]{
$PSItem.Exception
return
}

external(INT, "PS_File", "PS_File", "PowerShell.dll");
char Result[99999];

int res = PS_File(pathfolder()+"GetProcess.ps1", address(#Result[0]), sizearray(Result));
if(res)
{
messagebox(format(#Result[0]));
}
else messagebox("res = 0");

int res = PS_Command(тут код)

Преобразуем строку в хеш-таблицу
$ownershipMap = @{}
if (-not [string]::IsNullOrEmpty($ownershipMapStr)) {
$pairs = $ownershipMapStr -split ';'
foreach ($pair in $pairs) {
if (-not [string]::IsNullOrEmpty($pair)) {
$key, $value = $pair -split ':', 2
$ownershipMap[$key] = $value
}
}
}

# Проверяем возможность
function Test-PropertyPurchase {
param(
[string]$playerName,
[string]$propertyToBuy,
[hashtable]$ownershipMap,
[hashtable]$boardDefinition
)

external(INT, "PS_Command", "PS_Command", "PowerShell.dll");
char Result[99999];
// получить список папок на диске C:
int res = PS_Command("(Get-ChildItem -Path C:\ -Directory).Name", address(#Result[0]), sizearray(Result));
if(res) messagebox(format(#Result[0]));
else messagebox("res = 0");

external(INT, "PS_Command", "PS_Command", "PowerShell.dll");
char Result[99999];
string rn=formatic(13)+formatic(10);

string MyTextProtected = "AQAAANCMnd8BFdERjHoAwE/Cl+sBAAAAASyDqgb2"+
"CE24Rv3n9c7toAAAAAACAAAAAAAQZgAAAAE"+
"AACAAAAAGMhJknBN0yub6l/vHQwiPQj9Qkm"+
"iVnP0ccGytg7bmrgAAAAAOgAAAAAIAACAAA"+
"ADLCYtB9IBWNzJjrh18cGNb964GKLEmyY1+"+
"axY2GUgx6yAAAAAbfyOLx3rZqkt97T1NzuL"+
"vC2iyZwNR8+2fv32xhdJVwEAAAAATHTjxse"+
"kAf15NE2/YQivXAlFn+GaUWl63FOfpMe/z7"+
"asyNLj2hOTNJWz8v4Wz3Fw4DqyGWTyseOiclZEhXwCY";

string sss ="Add-Type -AssemblyName System.Security"+rn+
"$scope = [System.Security.Cryptography.DataProtectionScope]::CurrentUser"+rn+
"$bytes = [Convert]::FromBase64String(^"" + MyTextProtected + "^")"+rn+
"$unprotected = [System.Security.Cryptography.ProtectedData]::Unprotect($bytes, $null, $scope)"+rn+
"[System.Text.Encoding]::UTF8.GetString($unprotected)";

int res = PS_Command(sss, address(#Result[0]), sizearray(Result));
if(res) messagebox(format(#Result[0]));
else messagebox("res = 0");