feedburner
Enter your email address:

Delivered by FeedBurner

feedburner count

Tips Bikin Kompi Lemot Serasa Baru

Labels:

Beberapa hal yang sering membuat sebuah komputer jadi lambat/lemot :

1. Registry mungkin sudah amburadul
2. DMA (direct memory access) mode telah berubah menjadi PIO (Processor Input Output) mode karena keseringan hang atau error, sehingga program tidak mengandalkan memory lg tetapi memaksa prosesor kerja bit per bit (mencapai 100 persen yang bisa membuat komputer panas). Setiap crash/error DMA mode turun dari Ultra DMA mode 5.. 4.. 3.. hingga PIO. 6x crash/error = lemot.

Berikut ini solusinya :
1. Instal CC Cleaner atau Regcure
bila belum punya Regcure anda bisa download disini

Setelah download > Scan kemudian Fix Problems.

2. Masuk ke control panel > system > hardware > device manager > IDE ATA/ATAPI controller > Primary IDE Channel > (klik 2x) > Advanced Setting > Device 0 dan Device 1 transfer modenya ubah menjadi : DMA if available - OK. Save perubahan tadi

kalau masih lambat/hang, silahkan download resettingdma.vbs dari sini
jika anda malas untuk download atau link-nya ga bisa dibuka, silahkan copy dan paste ke Notepad spoiler yang ada di bawah ini lalu simpan di Komputer anda:
Code for resetDMA:

' Visual Basic Script program to reset the DMA status of all ATA drives
' Copyright © 2006 Hans-Georg Michna
' Version 2007-04-04
' Works in Windows XP, probably also in Windows 2000 and NT.
' Does no harm if Windows version is incompatible.

If MsgBox("This program will now reset the DMA status of all ATA drives with Windows drivers." _
& vbNewline & "Windows will redetect the status after the next reboot, therefore this procedure" _
& vbNewline & "should be harmless.", _
vbOkCancel, "Program start message") _
= vbOk Then

RegPath = "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Contr ol\Class\{4D36E96A-E325-11CE-BFC1-08002BE10318}\"
ValueName1Master = "MasterIdDataChecksum"
ValueName1Slave = "SlaveIdDataChecksum"
ValueName2Master = "UserMasterDeviceTimingModeAllowed"
ValueName2Slave = "UserSlaveDeviceTimingModeAllowed"
ValueName3 = "ResetErrorCountersOnSuccess"
MessageText = "The following ATA channels have been reset:"
MessageTextLen0 = Len(MessageText)
ConsecutiveMisses = 0
Set WshShell = WScript.CreateObject("WScript.Shell")

For i = 0 to 999
RegSubPath = Right("000" & i, 4) & "\"

' Master

Err.Clear
On Error Resume Next
WshShell.RegRead RegPath & RegSubPath & ValueName1Master
errMaster = Err.Number
On Error Goto 0
If errMaster = 0 Then
On Error Resume Next
WshShell.RegDelete RegPath & RegSubPath & ValueName1Master
WshShell.RegDelete RegPath & RegSubPath & ValueName2Master
On Error Goto 0
MessageText = MessageText & vbNewLine & "Master"
End If

' Slave

Err.Clear
On Error Resume Next
WshShell.RegRead RegPath & RegSubPath & ValueName1Slave
errSlave = Err.Number
On Error Goto 0
If errSlave = 0 Then
On Error Resume Next
WshShell.RegDelete RegPath & RegSubPath & ValueName1Slave
WshShell.RegDelete RegPath & RegSubPath & ValueName2Slave
On Error Goto 0
If errMaster = 0 Then
MessageText = MessageText & " and "
Else
MessageText = MessageText & vbNewLine
End If
MessageText = MessageText & "Slave"
End If

If errMaster = 0 Or errSlave = 0 Then
On Error Resume Next
WshShell.RegWrite RegPath & RegSubPath & ValueName3, 1, "REG_DWORD"
On Error Goto 0
ChannelName = "unnamed channel " & Left(RegSubPath, 4)
On Error Resume Next
ChannelName = WshShell.RegRead(RegPath & RegSubPath & "DriverDesc")
On Error Goto 0
MessageText = MessageText & " of " & ChannelName & ";"
ConsecutiveMisses = 0
Else
ConsecutiveMisses = ConsecutiveMisses + 1
If ConsecutiveMisses >= 32 Then Exit For ' Don't search unnecessarily long.
End If
Next ' i

If Len(MessageText) <= MessageTextLen0 Then
MessageText = "No resettable ATA channels with Windows drivers found. Nothing changed."
Else
MessageText = MessageText & vbNewline _
& "Please reboot now to reset and redetect the DMA status."
End If

MsgBox MessageText, vbOkOnly, "Program finished normally"

End If ' MsgBox(...) = vbOk
' End of Visual Basic Script program

Setelah anda copy paste file tadi ke Notepad kemudian anda rename extensi .txt jadi .vbs, nanti iconnya bukan notepad lagi, tapi icon VBscript file. pas rename, sebelum merename jangan lupa kosongkan centang utk Hide ekstensions for known file types di folder option - view. kalau ikonnya sudah berubah, klik 2x resetdma.vbs dan muncul box menyarankan restart. setelah restart baru terasa performanya.
sebelum klik 2x ada bagusnya non aktifkan antivirus sementara, karena antivirus bakal ngedetect sebagai malicious file karena script modifikasi registry.

Tips ini juga bisa membuat komputer lama yang lambat dan terlalu banyak program serasa komputer baru lagi.

Semoga bermanfaat,
Mari berbagi untuk kemajuan bersama…!!!


Digg Technorati del.icio.us Stumbleupon Reddit Blinklist Furl Spurl Yahoo Simpy

Related Posts by Categories



0 comments: