Prozessorspeed ermitteln ? (+andere Fragen)

Übersicht

BlitzBasic

Allgemein

	E. Urbach ehemals "Basicprogger" Betreff: Prozessorspeed ermitteln ? (+andere Fragen)	Mo, Jun 13, 2005 14:53 Antworten mit Zitat
Gibt es eine Möglichkeit, die Geschwindigkeit des PCs zu errechnen (in BB)? Also die ganzen Daten da unter Rechtsklick auf Arbeitsplatz und Eigenschaften. Was ich zusätzlich gern wissen würde: Wie man den Namen der Grafikkarte herausfindet (nicht den Treiber). Wie viel Speicherplatz noch frei ist. Wie man z.B. japanische oder russische (allgm. Unicode) ohne Bitmaps (also aus Fonts) darstellen kann. Wie man BB dazu veranlasst eine Bitmap zu drucken. Danke im Voraus! [mod] Threadtitel angepasst. Bitte um eindeutige Titel, keinen kryptischen Schnickschnack. Gruss BladeRunner [/mod]

E. Urbach

ehemals "Basicprogger"

Betreff: Prozessorspeed ermitteln ? (+andere Fragen)

Mo, Jun 13, 2005 14:53
Antworten mit Zitat

Gibt es eine Möglichkeit, die Geschwindigkeit des PCs zu errechnen (in BB)?
Also die ganzen Daten da unter Rechtsklick auf Arbeitsplatz und Eigenschaften.

Was ich zusätzlich gern wissen würde:

Wie man den Namen der Grafikkarte herausfindet (nicht den Treiber).
Wie viel Speicherplatz noch frei ist.
Wie man z.B. japanische oder russische (allgm. Unicode) ohne Bitmaps (also aus Fonts) darstellen kann.
Wie man BB dazu veranlasst eine Bitmap zu drucken.

Danke im Voraus!

[mod] Threadtitel angepasst. Bitte um eindeutige Titel, keinen kryptischen Schnickschnack. Gruss BladeRunner [/mod]

	skey-z	Mo, Jun 13, 2005 15:19 Antworten mit Zitat
Drucken kann man mit der BlitzPrinter dll und die Werte für CPU und Ram mit der CPUspeed dll such mal danach hier im forum oder auf Blitzbasic.com für die Grafikkarte hat BB schon eigene Befehle drin: BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] AppTitle \"Grafik\" ; Grafikinformationen auslesen Graphics 800,600,16,0 Anzahl = CountGfxDrivers() For I = 1 To Anzahl Print I + \" - \" + GfxDriverName(I) Next Print \"\" Treiber = Input(\"Welcher Treiber soll verwendet werden?\") SetGfxDriver Treiber Print \"\" Anzahl = CountGfxModes() For I = 1 To Anzahl Print I + \" - \" + GfxModeWidth(I) + \"x\" + GfxModeHeight(I) + \"@\" + GfxModeDepth(I) + \" Bit\" Delay 300 Next Print \"\" Print \"Grafikspeicher insgesamt; \" + TotalVidMem() / 1024 + \" KB\" Print \"Grafikspeicher frei : \" + AvailVidMem() / 1024 + \" KB\" WaitKey End Damit bekommst du zuerst deine Grafikkarten ausgegeben, kannst dann die möglichen Auflösungen. Am Ende wird noch der gesamte und verfügbare VRam angezeigt wenn du die CPUspeed hast, kannst du mit folgendem Code den CPUspeed, den totalen/verfügbaren Ram, den totalen/verfügbaren VRAM und die Auflösung(apiGetSystemMetrics(Mode), .lib "user32.dll") in Echtzeit ausgeben. BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] AppTitle \"Systemrecourcen\" SetBuffer BackBuffer() Const SM_CXSCREEN = 0 ;Breite Const SM_CYSCREEN = 1 ;Höhe Repeat Cls speed% = CPUSpeed() ; CPU Speed in MHz ramavail% = AvailPhysicalRAM() ; verfügbarer Arbeitsspeicher ramtotal% = TotalPhysicalRAM() ; totaler Arbeitsspeicher vramavail%=AvailVidMem() ; verfügbarer Grafikspeicher vramtotal%=TotalVidMem() ; totaler Grafikspeicher ;alle nachfolgenden angegebenen Werte, werden in Megabyte dargestellt ramavail=(ramavail/(10241024)) ramtotal=(ramtotal/(10241024)) vramavail=(vramavail/(10241024)) vramtotal=(vramtotal/(10241024)) Text 20,20, \"CPU Speed: \"+speed Text 20,50, \"Arbeitsspeicher: \"+ramavail+\"/\"+ramtotal Text 20,80, \"Graka Speicher: \" +vramavail+\"/\"+vramtotal Text 20,110, \"Auflösung: \"+apiGetSystemMetrics(SM_CXSCREEN)+\"x\"+apiGetSystemMetrics(SM_CYSCREEN) Flip 0 Until KeyHit(1) End
Awards: Coffee's Monatswettbewerb Feb. 08: 1. Platz BAC#57: 2. Platz Twitter

skey-z

Mo, Jun 13, 2005 15:19
Antworten mit Zitat

Drucken kann man mit der BlitzPrinter dll und die Werte für CPU und Ram mit der CPUspeed dll

such mal danach hier im forum oder auf Blitzbasic.com

für die Grafikkarte hat BB schon eigene Befehle drin:
BlitzBasic: [AUSKLAPPEN]


AppTitle \"Grafik\"
; Grafikinformationen auslesen

Graphics 800,600,16,0

Anzahl = CountGfxDrivers()
For I = 1 To Anzahl
 Print I + \" - \" + GfxDriverName(I)
Next
Print \"\"
Treiber = Input(\"Welcher Treiber soll verwendet werden?\")
SetGfxDriver Treiber

Print \"\"

Anzahl = CountGfxModes()
For I = 1 To Anzahl
 Print I + \" - \" + GfxModeWidth(I) + \"x\" + GfxModeHeight(I) + \"@\" + GfxModeDepth(I) + \" Bit\"
 Delay 300
Next

Print \"\"

Print \"Grafikspeicher insgesamt; \" + TotalVidMem() / 1024 + \" KB\"
Print \"Grafikspeicher frei     : \" + AvailVidMem() / 1024 + \" KB\"

WaitKey

End

Damit bekommst du zuerst deine Grafikkarten ausgegeben, kannst dann die möglichen Auflösungen.
Am Ende wird noch der gesamte und verfügbare VRam angezeigt

wenn du die CPUspeed hast, kannst du mit folgendem Code den CPUspeed, den totalen/verfügbaren Ram, den totalen/verfügbaren VRAM
und die Auflösung(apiGetSystemMetrics(Mode), .lib "user32.dll") in Echtzeit ausgeben.

BlitzBasic: [AUSKLAPPEN]


AppTitle \"Systemrecourcen\"

SetBuffer BackBuffer()

Const SM_CXSCREEN = 0 ;Breite
Const SM_CYSCREEN = 1 ;Höhe

Repeat

	Cls

		speed% = CPUSpeed()			; CPU Speed in MHz
		ramavail% = AvailPhysicalRAM() ; verfügbarer Arbeitsspeicher
		ramtotal% = TotalPhysicalRAM() ; totaler Arbeitsspeicher
		vramavail%=AvailVidMem() ; verfügbarer Grafikspeicher
		vramtotal%=TotalVidMem() ; totaler Grafikspeicher
		
		;alle nachfolgenden angegebenen Werte, werden in Megabyte dargestellt

		ramavail=(ramavail/(1024*1024))
		ramtotal=(ramtotal/(1024*1024))
		vramavail=(vramavail/(1024*1024))
		vramtotal=(vramtotal/(1024*1024))
		
	
	Text 20,20, \"CPU Speed: \"+speed
	Text 20,50, \"Arbeitsspeicher: \"+ramavail+\"/\"+ramtotal
	Text 20,80, \"Graka Speicher: \" +vramavail+\"/\"+vramtotal
	Text 20,110, \"Auflösung: \"+apiGetSystemMetrics(SM_CXSCREEN)+\"x\"+apiGetSystemMetrics(SM_CYSCREEN)

	
	Flip 0

Until KeyHit(1)

End

Awards:
Coffee's Monatswettbewerb Feb. 08: 1. Platz
BAC#57: 2. Platz
Twitter

	D2006 Administrator	Di, Jun 14, 2005 8:32 Antworten mit Zitat
~VERSCHOBEN~ DLLs und Userlibs ist ein Archiv. Diskussionen sind hier fehl am Platz und sollten in Allgemein geführt werden. Des weiteren ist die Benutzung der Suche zu empfehlen. Dies hätte dir die Antwort auf mindestens eine Frage gebracht. MfG D2006

D2006

Administrator

Di, Jun 14, 2005 8:32
Antworten mit Zitat

~VERSCHOBEN~

DLLs und Userlibs ist ein Archiv. Diskussionen sind hier fehl am Platz und sollten in Allgemein geführt werden.
Des weiteren ist die Benutzung der user posted image

Suche zu empfehlen. Dies hätte dir die Antwort auf mindestens eine Frage gebracht.

MfG
D2006

	E. Urbach ehemals "Basicprogger"	Di, Jun 14, 2005 13:33 Antworten mit Zitat
@D2006 Tschuldige, das wusste ich nicht! @skey-z Danke für die Info! Ich muss mich für die schlecht formulierte Frage mit der Grafikkarte entschuldigen. Wie kann man den GrafikkartenHERSTELLER abfragen?

E. Urbach

ehemals "Basicprogger"

Di, Jun 14, 2005 13:33
Antworten mit Zitat

@D2006
Tschuldige, das wusste ich nicht!
@skey-z
Danke für die Info!

Ich muss mich für die schlecht formulierte Frage mit der Grafikkarte entschuldigen.

Wie kann man den GrafikkartenHERSTELLER abfragen?

	Jan_ Ehemaliger Admin	Di, Jun 14, 2005 14:17 Antworten mit Zitat
BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] For I = 1 To Anzahl If Instr(Upper( GfxDriverName(I) ),\"RADEON\") Then gfx_hersteller=1 If Instr(Upper( GfxDriverName(I) ),\"FORCE\") Then gfx_hersteller=2 Next If gfx_hersteller =0 Then RuntimeError \"scheiß Grafikkarte hast du.\" If gfx_hersteller =1 Then RuntimeError \"ATI Grafikkarte hast du.\" If gfx_hersteller =2 Then RuntimeError \"N-VIDIA Grafikkarte hast du.\"
between angels and insects

Jan_

Ehemaliger Admin

Di, Jun 14, 2005 14:17
Antworten mit Zitat

BlitzBasic: [AUSKLAPPEN]


For I = 1 To Anzahl 
 If Instr(Upper( GfxDriverName(I) ),\"RADEON\") Then gfx_hersteller=1
 If Instr(Upper( GfxDriverName(I) ),\"FORCE\") Then gfx_hersteller=2
Next
If gfx_hersteller =0 Then RuntimeError \"scheiß Grafikkarte hast du.\"
If gfx_hersteller =1 Then RuntimeError \"ATI Grafikkarte hast du.\"
If gfx_hersteller =2 Then RuntimeError \"N-VIDIA Grafikkarte hast du.\"

between angels and insects

	D2006 Administrator	Di, Jun 14, 2005 15:36 Antworten mit Zitat
Funktioniert nicht. Hab ne ATI, aber der sagt mir ich habe ne scheiß Karte (was auf der anderen Hand auch wieder stimmt) MfG
Intel Core i5 2500 \| 16 GB DDR3 RAM dualchannel \| ATI Radeon HD6870 (1024 MB RAM) \| Windows 7 Home Premium Intel Core 2 Duo 2.4 GHz \| 2 GB DDR3 RAM dualchannel \| Nvidia GeForce 9400M (256 MB shared RAM) \| Mac OS X Snow Leopard Intel Pentium Dual-Core 2.4 GHz \| 3 GB DDR2 RAM dualchannel \| ATI Radeon HD3850 (1024 MB RAM) \| Windows 7 Home Premium Chaos Interactive :: GoBang :: BB-Poker :: ChaosBreaker :: Hexagon :: ChaosRacer 2

D2006

Administrator

Di, Jun 14, 2005 15:36
Antworten mit Zitat

Funktioniert nicht. Hab ne ATI, aber der sagt mir ich habe ne scheiß Karte (was auf der anderen Hand auch wieder stimmt)

MfG

Übersicht

BlitzBasic

Allgemein

Nach Oben

BlitzBasic Portal

Prozessorspeed ermitteln ? (+andere Fragen)

E. Urbach

Betreff: Prozessorspeed ermitteln ? (+andere Fragen)

skey-z

D2006

E. Urbach

Jan_

D2006