Delphi-PRAXiS
Seite 6 von 7   « Erste     456 7      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   core2duotemp.c to core2duotemp.pas (https://www.delphipraxis.net/97137-core2duotemp-c-core2duotemp-pas.html)

hathor 29. Mai 2008 21:30

Re: core2duotemp.c to core2duotemp.pas
 
Zitat:

Zitat von Razor
...I've made it 2 months ago.. aswell my driver and the K8(Athlon 64,Athlon X2) and K10(Phenom X4 and X3 and Opteron) readings all internal sensor.Shows same as coretemp..I did it my own no forum asking nothing..so yes :lol:

:gruebel:
...and what about TJunction := 105, if NOT TJunction := 100 and NOT TJunction := 85 ??? :gruebel:

Razor 29. Mai 2008 21:32

Re: core2duotemp.c to core2duotemp.pas
 
Zitat:

Zitat von hathor
Zitat:

Zitat von Razor
...I've made it 2 months ago.. aswell my driver and the K8(Athlon 64,Athlon X2) and K10(Phenom X4 and X3 and Opteron) readings all internal sensor.Shows same as coretemp..I did it my own no forum asking nothing..so yes :lol:

:gruebel:
...and what about TJunction := 105, if NOT TJunction := 100 and NOT TJunction := 85 ??? :gruebel:

What!:D You cant read the code...

Use this.

Delphi-Quellcode:
var
tjunction:integer;<<must be global var

Rdmsr($EE,msrvalue);
IF msrvalue.HiPart and $40000000 = 0 then TJunction := 100 Else TJunction := 85;

hathor 29. Mai 2008 22:20

Re: core2duotemp.c to core2duotemp.pas
 
Zitat:

Zitat von Razor
Zitat:

Zitat von hathor
Zitat:

Zitat von Razor
...I've made it 2 months ago.. aswell my driver and the K8(Athlon 64,Athlon X2) and K10(Phenom X4 and X3 and Opteron) readings all internal sensor.Shows same as coretemp..I did it my own no forum asking nothing..so yes :lol:

:gruebel:
...and what about TJunction := 105, if NOT TJunction := 100 and NOT TJunction := 85 ??? :gruebel:

What!:D You cant read the code...

Use this.

Delphi-Quellcode:
var
tjunction:integer;<<must be global var

Rdmsr($EE,msrvalue);
IF msrvalue.HiPart and $40000000 = 0 then TJunction := 100 Else TJunction := 85;

I'm sorry - but YOU can't read Your own code - where is a value of 105???

Muetze1 30. Mai 2008 01:41

Re: core2duotemp.c to core2duotemp.pas
 
Zitat:

Zitat von Razor
I've made it 2 months ago.. aswell my driver and the K8(Athlon 64,Athlon X2) and K10(Phenom X4 and X3 and Opteron) readings all internal sensor.Shows same as coretemp..I did it my own no forum asking nothing..so yes :lol:

Yes, no forum asking - just ICQ...

devidespe 30. Mai 2008 10:45

Re: core2duotemp.c to core2duotemp.pas
 
Zitat:

Zitat von hathor
I'm sorry - but YOU can't read Your own code - where is a value of 105???

@Razor: The technical way of reading MSR's with a driver is one thing, the correct detection of TjMax is another one. In the meantime I'm having no doubt, that you've managed the first thing well.

But the correct detection of TjMax is a huge discussion within the web, and we have here 2 ways of doing this. The first one is the creation of a CPUID table, where you can set the TjMax value for various processor types and steppings. The other way is the usage of MSR EEh, where you have to different between 85, 100 and 105 °C. Some programs use 95 °C as well. Please see the following links to read the discussions and extend your knowledge:

RealTemp Discussion
SpeedFan discussion
Everest discussion

Razor 30. Mai 2008 14:22

Re: core2duotemp.c to core2duotemp.pas
 
How to detect all of these Deltas can some one please tell me? :o

My read temperature is the same as core temp's so there isnt no bad code in my code.
Yes Muetze you gave me tips but you didnt code it;).

devidespe 30. Mai 2008 14:54

Re: core2duotemp.c to core2duotemp.pas
 
Why don't you simply upload your application for all of us ?

Its hard to give a solid feedback if you haven't any practical application, just source parts.

Razor 30. Mai 2008 14:55

Re: core2duotemp.c to core2duotemp.pas
 
Yes however how can i SetThreadAffinityMask with JVCL thread timer?
Devidespe can you help me with this?Does this mean i have to use 4 threads?
After this i upload the app

I tryed this

SetThreadAffinityMask(jvthreadtimer1.Thread.Handle ,$0001);
SetThreadAffinityMask(jvthreadtimer1.Thread.Handle ,$0001);

Muetze1 30. Mai 2008 15:16

Re: core2duotemp.c to core2duotemp.pas
 
Zitat:

Zitat von Razor
Yes Muetze you gave me tips but you didnt code it;).

Yes, I did this all before and I even send the correct code, but it was scrambled by ICQ emoicons.

Zitat:

Zitat von Razor
I tryed this
Code:
SetThreadAffinityMask(jvthreadtimer1.Thread.Handle,$0001);
SetThreadAffinityMask(jvthreadtimer1.Thread.Handle,$0001);

RTFM. This is just so ease to change, you just have to read the MSDN. And the best thing: we dealed with this together with icq, it seems to me, that you have not read or understand the whole session.

But anyway, this is not the way to solve the actual problem discussed here.

Razor 30. Mai 2008 15:25

Re: core2duotemp.c to core2duotemp.pas
 
1 shl ProcNumber(CPUIndex) } like this?

Zitat:

RTFM. This is just so ease to change, you just have to read the MSDN. And the best thing: we dealed with this together with icq, it seems to me, that you have not read or understand the whole session.
Its not easy for me and i have read it 3 times.Nothing about the dwaffinity mask parameter.
It doesnt change even if i put in $0001,$0002,$0004,$0008 it just wont change.


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:22 Uhr.
Seite 6 von 7   « Erste     456 7      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz