eduzsrj

aonde você esta vendo essa informacao de memoria utilizavel pelo sistema?

tenta testar c outra memo

ja viu se parte da memoria esta alocada para video?

usa o memtext86+ pra testar as memoriaas

Nunca atualize a bios se não tiver problemas de funcionamento e/ou o risco compensar muito.

Ter extrema CERTEZA de que a BIOS que vai baixar do site é para a MARCA, MODELO e REVISÃO/VERSÃO do seu equipamento.

Seguir rigorosamente as instruções para BIOS update do manual do equipamento.

Deixar que o ciclo seja completado automaticamente, mesmo que leve vários minutos, jamais resetar ou desligar o equipamento antes de completado o procedimento.

Garantir que NÃO FALTE LUZ no momento da atualização, preferencialmente usar NOBREAK, por exemplo evitar fazer a atualização durante tempestades, período em que houve falta de luz recente, deixar cabos expostos com risco de esbarrão e desconexão acidental.

O BIOS UPDATE é um procedimento de risco, faça à sua própria conta e risco.

Se algo der errado provavelmente terá que enviar o equipamento para assistência especializada para tentar recuperar a BIOS. Alguns modelos de equipamentos tem sistema de BACKUP e redundância para minimizar estes riscos.

Boa sorte.

Olha a iniciativa da thermaltake é boa.

Eu particularmente adoraria por um cooler que não seja o BOX, mas estou simplesmente impedido por que não quero por estes MINI TIJOLOS no meu micro.

É uma pena que os fabricantes abram mão de criar cooler compactos e eficientes em prol desses grandes e pesados.

Seria muito melhor coolers compactos, feitos de cobre, com muitas aletas e heat pipes.

Falar nisso será que existe algum cooler compacto que seja bom? Pelo menos que supere os box da intel com alguma margem.

rsrsrsrs e chega ne

esse topico ja rendeu de mais

Em informática existem três tipos principais de dispositivos wireless:

802.11b/g/n: é a utilizada em redes sem fio, compartilhamento de internet, roteadores sem fio, impressoras wireless e até em algumas TVs, alguns blue-rays e outros midia-players. É normalmente designada "wireless", "wi-fi". Requer micro com placa wireless PCI ou USB, e que o dispositivo ou outro micro também tenha. Pode haver várias conexões simultâneas.

Bluetooth: utilizada para conectar diversos dispositivos entre si, como micros, celulares, PDAs, fones de ouvido, aparelhos de som, impressora, microfones, mouses, teclados, etc. Chama-se simplesmente conexão "bluetooth". Requer que o dispositivo tenha esse tipo de conexão e que o micro tenha um adaptador bluetooth interno ou USB. Pode-se conectar diversos dispositivos ao mesmo tempo em um unico receptor, e tem grande compatibilidade entre si. Pode funcionar ate 30 ou 100 metros de distancia entre si, dependendo da versao utilizada.

Conexão sem fio comum rádio frequência (RF): mais arcaica de todas, basicamente e a mesma tecnologia utilizada nos telefones sem fio antigos, é a utilizada em mouses e teclados sem fio que não sejam bluetooth, possuem um receptor de sinal proprietário, só funciona com o dispositivo com o qual foi vendido. Tem área de atuação muito limitada, geralmente nao podendo passar de 1 a 5 metros, dependendo da qualidade do produto.

Você não pode misturar os dispositivos, tipo querer usar bluetooth em um wireless 802.11g, ou um RF no wireless, etc.

Quase todos os mouses e teclados sem fio fácilmente encontrados nas lojas são do padrão normal e não BLUETOOTH.

Teclados e mouses Bluetooth custam um bocado mais que o equivalente normal (RF).

Alguém tem noticias sobre a sucessora da 5670 na série 6000? nao houvi mais falar de mid-low end na serie 6000 da ati.

voce desligou a controladora na bios?

Tem duas coisas que pode estar acontecendo:

Se você desabilitou a controladora IDE, pode ser que tenha desabilitado a sata tb.

Ve se o "SATA" tá "ENABLED" na bios

Ve se está em modo "RAID" se estiver volta para o modo "IDE"

esse mouse da logitec é BLUETOOTH se seu notebook tiver, ele vai funcionar, caso contrário voce precisará comprar um adaptador BLUETOOTH para ele funcionar.

A MAIORIA de 99,9% dos mouses e teclados sem fio no brasil são de padrão sem fio norma mas não BLUETOOTH, BLUETOOTH é um protocolo de comunicação requer hardware e programas específicos.

Teclados e mouses BLuetooth custam um bocado mais que o equivalente normal.

qualquer roteador funciona

voce apenas tem que ter cuidado quando instalar fazer o MAC CLONE (copiar o endereço MAC do seu computador que estava ligado ao modem, para o roteador) para que a net continue a achar que é o seu micro e nao o roteador que está conectado.

é mais pratico que ficar ligando pra net pra mudar o MAC registrado.

nao acho que seja possivel mudar a velocidade de leitura, ja que ele nem sequer é reconhecido.

algumas tecnologias antigas tem problemas mesmo, assim como certos sons não são capazes de ler CD-R, CD-RW e vários DVDs antigos não leem DVD-R, DVD-RW, etc.

O ideal é você nao tentar limpa-lo nem passar pasta de dente, pois você pode danificar de vez o cd rs, isso só é valido quando o problema for da midia e ja nao houver mais o que possa ser feito pra tentar recuperaer.

se você conseguir dps upa a imagem desse joguinho ai pra galera baixar rs

tb gosto desses classicos.

pode tentar em quaisquer outros micros, mesmo mais novos, porque as vezes é um problema/limitação apenas do seu modelo de leitor de cd/dvd.

Se não funcionar mesmo aí você vai ter que procurar um jurássico leitor/gravador de cds.

boa sorte

nao tem muito a se fazer

pode ser que o CD esteja fisicamente danificado (mesmo que nao visivel a olho nú).

Mas pelo que você relata realmente os leitores de dvd atuais estão tendo problema em ler, o lance vai ser você procurar um micro mais antigo ou mesmo um antigo leitor de cds pra ver se consegue ler e transferir para outro cd/dvd/pendrive

pra mim esse tipo de lixo nao entrava nos EUA

bom saber

opte pelas vercoes officejet com cartuchos de 20ml ou superior.

Nossa, só demorou 2 anos pra conseguir rsrsrs

Fruit of the poisonous tree

rsrsrs

qual modelo da fonte OCZ?

abre um outro tópico, isso nao é assunto para este

bom em vez de SUB usa uma FUNCTION

então você poe na formula

= SE(A1 = 1;MINHAFUNC();"")

é um jeito

todo mundo fala mal do estabilizador, mas desde quando joguei o meu fora já estou na 3a fonte que compro em 2 anos, coincidência apenas?

Você digita textos com valores frequentemente?

Já pensou usar aquela função de valor por extenso no word?

Sim, agora você pode escrever valores por extenso no word rapidamente.

Então basta salvar a seguinte macro no word:

Sub WValorExtenso()

'    Selection.MoveLeft unit:=wdWord, Count:=1, Extend:=wdExtend

    On Error GoTo Erro

    Selection.MoveStartUntil cset:=" ", Count:=wdBackward
    Selection.TypeText FormatCurrency(Selection.Text, 2) & " (" & ConverterParaExtenso(Selection.Text) & ")"

    GoTo Pula

Erro:

    MsgBox "O valor deve ser informado sem ponto e sem 'R$'." & Chr$(10) & "O cursor deve estar imediatamente após o valor." _
    & Chr$(10) & "O valor não pode estar em início de parágrafo." & Chr$(10) & _
    "Exemplo: 1250,35", vbCritical, "Dados inválidos!"

    Exit Sub

Pula:

End Sub

Public Function ConverterParaExtenso(NumeroParaConverter As String) As String
Dim sExtensoFinal As String, sExtensoAtual As String
Dim i As Integer
Dim iQtdGrupos As Integer
Dim sDecimais As String
Dim sMoedaSing As String, sMoedaPlu As String, sCentavos As String, sConector As String
Dim bSufMoeda As Boolean
Dim vArrCenten As Variant

'Separa os Decimais
If InStr(1, NumeroParaConverter, ",") > 0 Then
sDecimais = Right(NumeroParaConverter, Len(NumeroParaConverter) - InStr(1, NumeroParaConverter, ","))
NumeroParaConverter = Mid(NumeroParaConverter, 1, InStr(1, NumeroParaConverter, ",") - 1)
End If

'Obtém a separação de milhares
iQtdGrupos = Fix(Len(NumeroParaConverter) / 3)
If Len(NumeroParaConverter) Mod 3 > 0 Then
iQtdGrupos = iQtdGrupos + 1
End If

'Chama as funções para escrever o número
If iQtdGrupos > 2 Then bSufMoeda = True

For i = iQtdGrupos To 1 Step -1
sExtensoAtual = DesmembraValor(NumeroParaConverter, i)
If i = 1 Then
If sExtensoAtual = "" Then
sExtensoFinal = sExtensoFinal & sExtensoAtual
Else
If sExtensoFinal = "" Then
sExtensoFinal = sExtensoFinal & sExtensoAtual
Else

vArrCenten = Array("cem", "duzentos", "trezentos", "quatrocentos", _
"quinhentos", "seiscentos", "setecentos", "oitocentos", "novecentos")

sConector = ""

For w = 0 To 8
If Len(NumeroParaConverter) >= 4 And Right(NumeroParaConverter, 2) = "00" _
And sExtensoAtual <> vArrCenten(w) Then sConector = "e "
Exit For
Next w

If Len(NumeroParaConverter) >= 4 And Left(Right(NumeroParaConverter, 3), 1) = "0" Then sConector = " e "

If Len(NumeroParaConverter) >= 4 And sExtensoAtual = "cem" Then sConector = " e "

sExtensoFinal = sExtensoFinal & sConector & sExtensoAtual
End If
End If
Else
sExtensoFinal = sExtensoFinal & sExtensoAtual
End If

If iQtdGrupos > 2 Then
Select Case i
Case 1, 2
If sExtensoAtual <> "" Then
bSufMoeda = False
End If
End Select
End If
Next i

'Define a moeda
sMoedaPlu = " reais"
sMoedaSing = " real"

If bSufMoeda = True Then sMoedaPlu = " de reais"

'Escreve os Centavos
sCentavos = EscreveCentavos(sDecimais)

'Adiciona a moeda e os centavos
sExtensoFinal = IIf((sExtensoFinal = ""), "", sExtensoFinal & IIf((sExtensoFinal = "um"), sMoedaSing, sMoedaPlu)) _
& IIf((sExtensoFinal = ""), sCentavos, IIf((sCentavos = ""), "", " e " & sCentavos))

'retorna o resultado

sExtensoFinal = Replace(sExtensoFinal, "  ", " ", 1, , vbTextCompare)

ConverterParaExtenso = Replace(sExtensoFinal, "e e ", "e ", 1, , vbTextCompare)

End Function

Private Function DesmembraValor(sValor As String, iGrupoDiv As Integer) As String
Dim iValor As Integer
Dim sExtenso As String
Dim iDivResto As Integer
Dim iDivInteiro As Integer
Dim iPosInicMid As Integer
Dim iTamMid As Integer
Dim sComplemento As String
Dim vArrDez1 As Variant
Dim vArrDez2 As Variant
Dim vArrCentena As Variant

vArrDez1 = Array("", "um", "dois", "três", "quatro", "cinco", "seis", "sete", "oito", "nove", _
"dez", "onze", "doze", "treze", "quatorze", "quinze", "dezesseis", "dezessete", _
"dezoito", "dezenove")

vArrDez2 = Array("vinte", "trinta", "quarenta", "cinquenta", "sessenta", _
"setenta", "oitenta", "noventa")

vArrCentena = Array("cem", "cento", "duzentos", "trezentos", "quatrocentos", _
"quinhentos", "seiscentos", "setecentos", "oitocentos", "novecentos")

'Pega o Valor a ser escrito e desmembra para o grupo numérico correto
iPosInicMid = Len(sValor) - ((3 * iGrupoDiv) - 1)
If iPosInicMid <= 1 Then
iTamMid = 2 + iPosInicMid
Else
iTamMid = 3
End If

If iPosInicMid < 1 Then iPosInicMid = 1

iValor = CInt(Mid(sValor, iPosInicMid, iTamMid))

Select Case iGrupoDiv
Case 2
sComplemento = " mil "
Case 3
If iValor = 1 Then
sComplemento = " milhão "
Else
sComplemento = " milhões "
End If
Case 4
If iValor = 1 Then
sComplemento = " bilhão "
Else
sComplemento = " bilhões "
End If
Case 5
If iValor = 1 Then
sComplemento = " trilhão "
Else
sComplemento = " trilhões "
End If
End Select

Select Case iValor
Case 0 To 19
sExtenso = vArrDez1(iValor)
Case 20 To 99
iDivInteiro = Fix(iValor / 10)
iDivResto = iValor Mod 10

If iDivResto = 0 Then
sExtenso = vArrDez2(iDivInteiro - 2)
Else
sExtenso = vArrDez2(iDivInteiro - 2) & " e " & vArrDez1(iDivResto)
End If
Case 100 To 999
iDivInteiro = Fix(iValor / 100)
iDivResto = iValor Mod 100

If iDivResto = 0 Then
If iDivInteiro = 1 Then
sExtenso = vArrCentena(0)   'Cem
Else
sExtenso = vArrCentena(iDivInteiro) 'inteiro maior que 100
End If
Else
sExtenso = vArrCentena(iDivInteiro) & " e "
Select Case iDivResto
Case 0 To 19
sExtenso = sExtenso & vArrDez1(iDivResto)
Case 20 To 99
iDivInteiro2 = Fix(iDivResto / 10)
iDivResto2 = iDivResto Mod 10

If iDivResto2 = 0 Then
sExtenso = sExtenso & vArrDez2(iDivInteiro2 - 2)
Else
sExtenso = sExtenso & vArrDez2(iDivInteiro2 - 2) & " e " & vArrDez1(iDivResto2)
End If
End Select
End If

End Select

If sExtenso = "um" And sComplemento = " mil " And Len(sValor) < 7 Then
sComplemento = "mil "
sExtenso = ""
End If

smilx = Right(sValor, 6)

If sComplemento = " milhão " Then
If Left(smilx, 2) = "00" And Right(smilx, 5) <> "00000" Then sComplemento = " milhão e " Else sComplemento = " milhão "
End If

If sComplemento = " milhões " Then
If Right(smilx, 6) = "000000" Then
sComplemento = " milhões "
Else
If Left(smilx, 2) = "00" And Right(smilx, 5) <> "00000" Then sComplemento = " milhões e " Else sComplemento = " milhões "
End If
End If

DesmembraValor = sExtenso & IIf(iValor > 0, sComplemento, "")

End Function

Private Function EscreveCentavos(sCent As String) As String
Dim sExtenso As String
Dim iDivResto As Integer
Dim iDivInteiro As Integer
Dim sComplemento As String
Dim vArrDez1 As Variant
Dim vArrDez2 As Variant
Dim iCent As Integer

vArrDez1 = Array("", "um", "dois", "três", "quatro", "cinco", "seis", "sete", "oito", "nove", _
"dez", "onze", "doze", "treze", "quatorze", "quinze", "dezesseis", "dezessete", _
"dezoito", "dezenove")

vArrDez2 = Array("vinte", "trinta", "quarenta", "cinquenta", "sessenta", _
"setenta", "oitenta", "noventa")

'Adequando para duas casas decimais
iCent = Fix(sCent & String(2 - Len(sCent), "0"))

'Escrevendo Singular ou plural
If iCent = 1 Then
sComplemento = " centavo"
Else
sComplemento = " centavos"
End If

'Calculando os valores
Select Case iCent
Case 0 To 19
sExtenso = vArrDez1(iCent)
Case 20 To 99
iDivInteiro = Fix(iCent / 10)
iDivResto = iCent Mod 10

If iDivResto = 0 Then
sExtenso = vArrDez2(iDivInteiro - 2)
Else
sExtenso = vArrDez2(iDivInteiro - 2) & " e " & vArrDez1(iDivResto)
End If
End Select

EscreveCentavos = IIf(iCent > 0, sExtenso & sComplemento, "")

End Function

Código da sub WValorExtenso criado por mim.

Código da função ConverterParaExtenso obtido em http://www.exceldoseujeito.com.br/2008/12/22/escrever-numero-por-extenso/ com adaptações feitas por mim.

Depois é só atribuir um atalho de teclado para ela, por exemplo CTRL+0, da seguinte forma:

1) clique com o botão direito do mouse sobre a faixa de opções e selecione "Personalizar a Faixa de Opções";

2) Embaixo, à esquerda, clique em Atalhos de Teclado: "PERSONALIZAR";

3) Na janela que se abrirá, na lista da esquerda, role até embaixo e selecione MACRO;

4) Na lista da direita, selecione WValorExtenso;

5) Entre no campo "Pressione a nova tecla de atalho" e tecle CTRL+0;

6) Tcle ATRIBUIR e, depois, FECHAR.

Agora bastará teclar CTRL+0 ao lado de uma valor para formatá-lo e escrevê-lo por extenso automaticamente.

Exemplo:

O micro vale 1200,00

Resultado: O micro vale R$ 1.200,00 (mil e duzentos reais)

(observe que a macro formata o número direitinho e que o cursor deve estar imediatamente após o último dígito do valor antes de teclar CTRL+0)

Espero que seja útil para vocês.

Att.

Eduardo

O micro ficou bem mais silencioso, ou menos barulhento, nao ha silencio total, mas houve reducao sim perceptivel.

Não é over nem ficar ligado direto que queima a fonte, e sim haver variacoes de energia, especificamente a subtensão (diminuição momentanea da energia eletrica, tipo caindo de 127v para 90v, 70v, quando a luzes ficam mais fracas e alguns aparelhos desligam, por exemplo).

Acabei comprando o único desses recomendados que encontrei no rio.

O Cooler Master SickleFlow 120 R4-C2R-20AC-GP Preto sem leds.

Semana passada tava R$ 35,00, mas hoje consegui por apenas R$ 28,00, quase o preço de um genérico rsrsrsrs.

Aproveitei fiz uma "limpa" no meu gabinete, como minha fonte é modular e como o cabo de força IDE so servia para alimentar os cooler, eu tirei ele, conectando o cooler direto na placa-mãe, inclusive o coolerzinho de HD que eu tenho.

Também tirei uma 'gambiarra" que fiz aqui com um monte de fios e um controle de ventoinha antigo da Thermaltake.

Nossa ficou outra coisa o interior do gabinete. Os fans ligados direto na mobo economiza muitos fios, ainda mais que minha fonte é modular.

O RPM dele com o Asus Q-FAN desabilitado ficou em torno de 1960 rpm.

Ligando o Q-FAN o rpm baixou para 1400, mesmo assim me parece ter um fluxo de ar suficiente.

É bem silencioso, mas não sei ter precisão de o quanto é silencioso, mas é bem mais que o genérico que eu tinha.

O único ponto fraco dele é que os buracos dos parafusos não são pré-rosqueados, ou seja, o parafuso encaixa, mas voce tem que fazer forçar para "rosquear" eles, apenas exige mais força para aparafusar eles, e tem que ter cuidado pro parafuso não entrar desalinhado/empenado senão pode quebrar o cooler aí já era.

Ele tem 3 pinos e vem com um adaptador para pluga-lo direto numa ponta comum da fonte de alimentacao, bem como com 4 parafusos pra fixação.

Amanha de manhã com o silencio total eu vou ligar o micro e perceber se ficou bem silencioso.

Obrigado a todos pelas dicas.

O Akasa é silencioso?