core2duotemp.c to core2duotemp.pas

[hathor]

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

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

[Razor]

Zitat von hathor:

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

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

What! 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]

Zitat von Razor:

Zitat von hathor:

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

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

What! 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]

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

Yes, no forum asking - just ICQ...

[devidespe]

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]

How to detect all of these Deltas can some one please tell me?

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]

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]

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]

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 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]

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.