Sistem Bilgisi PS1 Betiği

# ==============================
# Sistem Bilgisi Raporu - TRWE_2012
# ==============================

Write-Host "`n=== SISTEM BILGISI RAPORU ===`n"

# --- Donanım Bilgileri ---
$cpu  = Get-CimInstance Win32_Processor
$gpu  = Get-CimInstance Win32_VideoController
$ram  = Get-CimInstance Win32_PhysicalMemory
$disk = Get-CimInstance Win32_DiskDrive
$board = Get-CimInstance Win32_BaseBoard
$bios = Get-CimInstance Win32_BIOS
$net = Get-NetAdapter | Where-Object {$_.Status -eq "Up"}

# --- CPU ---
Write-Host "---- ISLEMCi ----"
Write-Host "Model: $($cpu.Name)"
Write-Host "Cekirdek: $($cpu.NumberOfCores)"
Write-Host "Mantıksal Cekirdek: $($cpu.NumberOfLogicalProcessors)"
Write-Host ""

# --- GPU ---
Write-Host "---- EKRAN KARTLARI ----"
foreach ($g in $gpu) {
    Write-Host "GPU: $($g.Name)"
    Write-Host "VRAM: $([math]::Round($g.AdapterRAM/1MB)) MB"

    # NVIDIA sıcaklık (varsa)
    try {
        $temp = nvidia-smi --query-gpu=temperature.gpu --format=csv,noheader
        Write-Host "Sıcaklık: $temp °C"
    } catch {}
    Write-Host ""
}

# --- RAM ---
Write-Host "---- BELLEK ----"
$ToplamRAM = ($ram.Capacity | Measure-Object -Sum).Sum
Write-Host "Toplam RAM: $([math]::Round($ToplamRAM/1GB)) GB"
Write-Host "RAM Modülleri:"
$ram | ForEach-Object { Write-Host "Slot: $($_.BankLabel), Device: $($_.DeviceLocator), Capacity: $([math]::Round($_.Capacity/1GB)) GB, Speed: $($_.Speed) MHz, Manufacturer: $($_.Manufacturer)" }
Write-Host ""

# --- Depolama ---
Write-Host "---- DEPOLAMA ----"
foreach ($d in $disk) {
    Write-Host "Disk Model: $($d.Model)"
    Write-Host "Boyut: $([math]::Round($d.Size/1GB)) GB"
}
Write-Host ""

# --- Anakart ve BIOS ---
Write-Host "---- ANAKART ----"
Write-Host "Üretici: $($board.Manufacturer)"
Write-Host "Model: $($board.Product)"
Write-Host ""
Write-Host "---- BIOS ----"
Write-Host "Versiyon: $($bios.SMBIOSBIOSVersion)"
Write-Host "Tarih: $($bios.ReleaseDate)"
Write-Host ""

# --- Ağ adaptörleri ---
Write-Host "---- AG ADAPTERLERI ----"
foreach ($a in $net) {
    Write-Host "Adaptör: $($a.Name), Hız: $($a.LinkSpeed), MAC: $($a.MacAddress)"
}
Write-Host ""

# --- DirectX Bilgisi ---
Write-Host "---- DIRECTX ----"
$dxFile = "$env:TEMP\dxdiag_temp.txt"
dxdiag /t $dxFile | Out-Null
$dxContent = Get-Content $dxFile
$dxVer = ($dxContent | Where-Object {$_ -match "DirectX Version"}).Trim()
Write-Host $dxVer
Remove-Item $dxFile -Force
Write-Host ""

# --- Kaydetme ---
Write-Host "Rapor masaüstüne kaydedilsin mi? (E/H)"
$secim = Read-Host "Secim"

if ($secim -match "^[Ee]$") {
    $Desktop = [Environment]::GetFolderPath("Desktop")
    $ReportPath = Join-Path $Desktop "Sistem_Raporu.txt"

    # Tüm bilgileri rapora yaz
    $Rapor = @()
    $Rapor += "=== SISTEM BILGISI RAPORU ==="
    $Rapor += "Islemci: $($cpu.Name) - Cekirdek: $($cpu.NumberOfCores), Mantiksal: $($cpu.NumberOfLogicalProcessors)"
    $Rapor += "GPU:"
    foreach ($g in $gpu) { $Rapor += "  $($g.Name) - VRAM: $([math]::Round($g.AdapterRAM/1MB)) MB" }
    $Rapor += "Toplam RAM: $([math]::Round($ToplamRAM/1GB)) GB"
    $Rapor += "RAM Modülleri:"
    $ram | ForEach-Object { $Rapor += "  Slot: $($_.BankLabel), Device: $($_.DeviceLocator), Capacity: $([math]::Round($_.Capacity/1GB)) GB, Speed: $($_.Speed) MHz, Manufacturer: $($_.Manufacturer)" }
    $Rapor += "Diskler:"
    foreach ($d in $disk) { $Rapor += "  $($d.Model) - $([math]::Round($d.Size/1GB)) GB" }
    $Rapor += "Anakart: $($board.Manufacturer) $($board.Product)"
    $Rapor += "BIOS: $($bios.SMBIOSBIOSVersion) - $($bios.ReleaseDate)"
    $Rapor += "Ağ Adaptörleri:"
    foreach ($a in $net) { $Rapor += "  $($a.Name), Hız: $($a.LinkSpeed), MAC: $($a.MacAddress)" }
    $Rapor += "DirectX: $dxVer"

    $Rapor | Out-File -FilePath $ReportPath -Encoding UTF8
    Write-Host "`nRapor kaydedildi: $ReportPath"
} else {
    Write-Host "`nRapor kaydedilmedi."
}

Write-Host "`nIslem tamamlandi."