Ceriwis

Ceriwis (https://forum.ceriwis.com/forum.php)
-   Tips & Trick (https://forum.ceriwis.com/forumdisplay.php?f=396)
-   -   [Tips] Membuat Komputer serasa baru kembali (https://forum.ceriwis.com/showthread.php?t=2128)

rezakakashi 4th January 2010 11:49 AM

[Tips] Membuat Komputer serasa baru kembali
 
[Tips] Membuat Komputer serasa baru kembali Bikin kompi lemot serasa baru (dijamin) masalah kritis yg bikin kompi jd lemot

1. registry mungkin dah amburadul
2. dma (direct memory access)mode telah berubah menjadi PIO (Processor Input Oputput)mode karena keseringan hang ato error, sehingga program tidak mengandalkan memory lg ttp memaksa kerja prosesor kerja bit per bit (mencapai 100 persen yg bisa bikin kompi panas bgt). Setiap crash/error DMA mode turun dr Ultra DMA mode 5.. 4.. 3.. hingga PIO. 6x crash = lemot.

solusi :
1. instal cc cleaner ato regcure

Indowebster RegCure 1.5.0.0

scan lalu fix problems.

2. masuk : 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 mjd : DMA if available - OK.

klo masih lambat/hang, download resettingdma.vbs dari:

DMA reverts to PIO | Windows Problem Solver

Download quick solution no.1 yg bertuliskan : Click here.
File yg dah didonlot berformat .txt rename jd format .vbs
dr situs itu, yg no 1, bag.click here; kan muncul seperti ini:
Reset Dma
Quote:

' 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\C ontr 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


teknisnya sih bkn didonlot, tp di copas smua isi textnya ke notepad
trus ntar setelah direname .txt jadi .vbs, iconnya ga notepad lg, tp icon VBscript file. pas rename, jgn lupa kosongkan centang utk Hide ekstensions for known file types di folder option - view.

http://forum.nusa.net.id/highslide/graphics/warning.gif
http://i448.photobucket.com/albums/q...13/pripiuw.jpg

klo ikonnya dah berubah, klik 2x resetdma.vbs dan ada box menyarankan restart. setelah restart baru terasa performanya.
sblm klik 2x ada bagusnya non aktifkan antivirus sementara, av bakal detect sbg malicious file krn script modifikasi registry.

Cara ini jg membuat komp lama yg lambat dan terlalu bnyk program serasa kompi baru lg.

Gw pake notebook Compaq Presario M2000 CentrinoM 1,7 GHz, 512 mb. Setelah resetting DMA bisa multitask firefox(14 tab), YM(3 login), 2 windows explorer, tv home media (tuner), coreldraw 12, word, photoshop dan winamp, dan kerja prosesor ga nyampe 48 persen.

Selamat mencoba

kadalimoet 6th January 2010 03:04 PM

thx gan.... bagus infonya, biar agan2 yg laen jg bisa terasa kompi baru, hehehehe







:hi:

hbs16 25th October 2010 01:21 PM

thanx gan, ane mo coba, kemaren kirain karena memory, udah nambah dr 1 gb ke 2 gb masih lemot juga

mpluympluyan 5th November 2011 02:45 AM

nice info gan

cynderline 5th November 2011 07:20 PM

tinggal di format kalo mau baru lagi
ahahaha

krztna 6th November 2011 05:34 AM

nice inpo ndan ! :loveindonesia

handysetiady 6th November 2011 11:42 AM

Nice inpo, ndan

vengenz 6th November 2011 05:41 PM

tes dlu gan

sobat 7th November 2011 12:58 AM

trims, dicoba gan

Aldoblacksweet 7th November 2011 01:18 AM

Makasi mas bro Perlu coba kyanya hehehe......mantaf up...up...:loveindonesia


All times are GMT +7. The time now is 01:49 AM.