Beiträge von Waluev

Waluev

schön schön

Will denn sonst diesmal niemand weiter mitmachen?

WALle

Waluev

Im Post über mir ist also das typische Opfer von den Folgen der Agressionsverherrlichung in Gewaltspielen zu sehen....

KATASTROPHAL

Waluev

erstmal ruhig bleiben und nicht gleich beleidigen *peace*

Also ich kann mir nicht vorstellen das das einstellbar ist, aber wenn es vorher anders war wird es das sein. Mein Tipp ist aber mal in einem CS Forum zu fragen, da hier die wenigsten Leute spielen und dann auch kaum CS und wenn CS dann vermutlich zu 90% 1.6

Walle

Waluev

wir verraten mal soviel: Sie ist von jemandem aus dem Forum hier, dass reicht ja

Walle

Waluev

Moment!

Also ihr dürft udfs verwenden. Es geht am Ende darum, dass ihr wenn einer schon ein ganzes Programm so erstellt hat ihr das nicht kopieren sollt. UDF`s sind legitim.

Spoiler anzeigen

Includes und DLL`s jeglicher Art sind erlaubt

In FremdIncludes stehen auch zig UDF`s!

UDF`s sind legitim!!!

Walle

Waluev

wie gesagt: es zählt der Gesamteindruck^^

Walle

Waluev

erstmal big *wow* an Oscar, eine Realisierung jenseits meiner Vorstellung

Mal noch so ein kleiner Tipp:^^
Auch die Antowort-Möglichkeiten sollten unterschiedlich sein, hatte grade den Fall das B das richtige war und A und C jeweils der gleiche Vorschlag waren

Walle

BTW: Ich dachte mir auch, dass diese Augfgabe wirklich mal zu einem Programm führt was man immer mal zum Spaß nutzen kann^^

Waluev

erstmal big *wow* an Oscar, eine Realisierung jenseits meiner Vorstellung

Mal noch so ein kleiner Tipp:^^
Auch die Antowort-Möglichkeiten sollten unterschiedlich sein, hatte grade den Fall das B das richtige war und A und C jeweils der gleiche Vorschlag waren

Walle

Waluev

na denn auf auf, limettes programm ist schonmal sehr schön^^

Walle

Waluev

*puh* Dachte schon die Aufgabe ist so dumm, dass keiner mitmachen will^^

Walle

Waluev

µit - August

Aufgabe für August 2008...

Erstelle ein Musikquiz.

Nähere Infos:

Ich stelle mir das so vor wie das Musikquiz vom iPod. Aber ich schreibe es gleich mal im direkten Bezug für die Aufgabe, da das vom iPod eigentlich egal ist. Es soll ein Programm entwickelt werden, welches aus einem Ordner mit ordentlich ID3getagten mp3-Datei eine auswählt und aus dieser Datei Interpret und Titel rausfiltert. Zusätzlich macht das Programm das dann noch bei 2 anderen Datein und spiel von der ersten MP3 eine kurze Zeit mitten im Lied an (z.B ab Minute 1 etc).
Nach oder während des Hörens bietet mir das Quiz dann 3 Auswahlmöglichkeiten (jeweils Titel und Interpret, welche zuvor ja rausgefiltert wurden). Ich sollte dann die Möglichkeit haben auszuwählen aus min. 3 Liedern welches, der gehörte Song ist.
Wichtig ist, dass der Computer die Datein selbst aus einem pool von Liedern auswählt und dies selbständig; Runde für Runde. (Natürlich gebe ich zu Beginn, den Pfad zum Ordner mit den Files an)

Ansich habt ihr von der weiteren Gestaltung her sehr viel Freiraum. Ihr könnt zusätzliche Dinge einbringen wie ein Fortschrittsbalken, der je nach Länge des Hörens weniger Punkte gibt und, bspw., wenn man länger als 10 Sekunden hört auflöst. Natürlich sind euch auch in der grafischen Realisierung keine Grenzen gesetzt.

Bewertungskategorien:
Diesmal werde ich nichts bezüglich der Größe bewerten, sondern es wird schlicht weg der subjektive Gesamteindruck (meinerseits) zählen.

Abgabetermin:

Freitag, 22. August 2008, 20.00 Uhr

WICHTIG!!!:
Regeln für den µit Wettbewerb

Wenn ihr das Programm fertig habt bitte als rar Archiv mit PW geschützt posten und dann eine PN mit dem PW an mich, damit ich schonmal anfangen kann die Programme zu studieren. Das Programm kann bis zum Abgabetermin, auch wenn es schonmal veröffentlicht wurde immer wieder verändert werden. Dies sollte aber im Post (z.B durch Versions Nummer) erkennbar sein - das PW bleibt dabei bitte gleich, damit ich dann nich wieder zig PN`s bekomme

Für Fragen zur Aufgabe oder dem Wettbewerb an sich, einfach hier posten oder eine PN an mich.

Viel Spaß und Erfolg beim Lösen der Aufgabe.
Walle

Waluev

Gorillaz - Clint Eastwood

Waluev

hehe das macht Spaß

kannste noch paar Versionen zum raten machen?

Waluev

Loosing my religion - R.E.M.

?

Waluev

Auswertung

Zunächst einmal möchte ich mich wieder bei allen bedanken, die am Wettbewerb teilgenommen haben. Diesmal waren es immerhin 6 Leute, die sich dieser kniffligen Aufgabe stellten.
Die wärend des Wettbewerbs gegeben Hinweise bezüglich Caret und Sonderzeichen sowie DLL wurden weitgehend berücksichtigt und auch die Skripte funktionieren im Großen und Ganzen alle.
Gut ist auch das sich alle Teilnehmer an die Regeln gehalten haben und die Skripte entsprechend den Vorgaben abgegeben wurden (endlich mal mit Profis arbeiten^^)

Jetzt aber der eigentlich wichtige Teil, die Auswertung der Einzelnen Arbeiten:

progandy:

Skriptgröße: 627Byte - auf 21 Zeilen
Zusätzliche Datein: /
Bugs: /

Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

Das Kontextmenu, wurde leider nicht deaktiviert und behinderte somit immer etwas die Sicht, sonst einwandfrei.

Spoiler anzeigen

[autoit]

$g=GUICreate("")
$e=GUICtrlCreateEdit("",0,0)
$p=GUICtrlCreateLabel("",9,200,200,20)
GUISetState()
Do
If GUIGetMsg()=-3 Then Exit
$r=GUIGetCursorInfo()
If $r<>0 And $r[3]And $r[4]=$e Then
$x=BitAND(GUICtrlSendMsg($e,215,0,BitOR(BitShift($r[1],-16),BitAND($r[0],0xFFFF))),0xFFFF)
$z=StringRegExpReplace(GUICtrlRead($e),"[][.-;:,·¿?!¡„“»«,’/\(){}]|\s"," ")
If StringMid($z,$x,1)=" "Then ContinueLoop
$a=StringInStr(StringLeft($z,$x),' ',1,-1)+1
$b=StringInStr(StringTrimLeft($z,$x),' ')
$c=($b>0)*($x-$a+$b)-($b=0)
$s=StringMid($z,$a,$c)
For $i=1 To StringLen($s)
$r=StringMid($s,$i,1)&$r
Next
GUICtrlSetData($p,$r)
EndIf
Until 0

[/autoit]

McPoldy:

971 Byte - auf 28 Zeilen
zusätzliche Datein: user32.dll - 567KB
Bugs: Einige Sonderzeichen werden mit zum Wort gezählt beim Reverse.

Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

Das Kontextmenu überlagerte manchmal das Reversemenu.

Spoiler anzeigen

[autoit]

$w = 800
$h = 600
$gui = GUICreate(@ScriptName, $w, $h, -1, -1)
$E = GUICtrlCreateEdit("", 0, 0, $w, $h, BitOR(4096, 1048576, 2097152))
$d = GUICtrlCreateDummy()
$C = GUICtrlCreateContextMenu($d)
$a = GUICtrlCreateMenuItem("Disabled", $C)
$l = DllOpen("user32.dll")
GUISetState()
$is = False
Do
Local $a_R = DllCall($l, "int", "GetAsyncKeyState", "int", '0x02')
If Not @error And BitAND($a_R[0], 0x8000) = 0x8000 Then
$m = MouseGetPos()
MouseClick("left", $m[0], $m[1], 2, 0)
Send("^c")
MouseClick("left", $m[0], $m[1], 1, 0)
$is = False
$t1 = ClipGet()
$t2 = ''
For $x = 0 To StringLen($t1)
$t2 &= StringMid($t1, StringLen($t1) - $x, 1)
Next
GUICtrlSetData($a,StringRegExpReplace(StringStripWS($t2, 3), "[!?.,]", ""))
DllCall($l, "int", "TrackPopupMenuEx", "hwnd", GUICtrlGetHandle($C), "int", 0, "int", $m[0], "int",$m[1], "hwnd", $gui, "ptr", 0)
EndIf
Until GUIGetMsg() = -3
DllClose($l)

[/autoit]

goliath:

1,07 KByte - auf ca. 44 Zeilen
zusätzliche Datein:/
Bugs: /

Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

Großes WOW! Er hatte eine ganz ander Herangehesweise. Bei goliath konnte man ohne GUI in jedem beliebigen Windows fenster jeden beliebigen Text umdrehen lassen.

Spoiler anzeigen

[autoit]

#include<GuiEdit.au3>
#include<GuiConstantsEx.au3>

[/autoit] [autoit][/autoit] [autoit]

Opt("GuiOnEventMode",1)

[/autoit] [autoit][/autoit] [autoit]

GuiCreate("",500,500)
GUISetOnEvent($GUI_EVENT_SECONDARYDOWN,"_click")
Guisetonevent($GUI_EVENT_CLOSE,"_exit")
$edit=GUICtrlCreatelabel("",0,0,500,500)
$cmenu=GUICtrlCreateContextMenu($edit)
$mitem = GUICtrlCreateMenuItem(" ",$cmenu)
$edit=GUICtrlCreateEdit("",0,0,500,500,$ES_MULTILINE)
Guisetstate()

[/autoit] [autoit][/autoit] [autoit]

While 1
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func _click()
$info=GUIGetCursorInfo()
if $edit=$info[4] Then
$aPos = _GUICtrlEdit_CharFromPos($Edit,$info[0],$info[1])
$c=StringSplit(GUICtrlRead($Edit),"")
$i=$aPos[0]
while $c[$i]<>" " and $i<>0
$i-=1
WEnd
$wort=""
While $i+1<=UBound($c)-1
$i+=1
if $c[$i]=" " or $c[$i]="." or $c[$i]="," or $c[$i]=":" or $c[$i]=";" Then exitloop
$wort=$c[$i]&$wort
WEnd
$bpos=_GUICtrlEdit_PosFromChar($edit,$aPos[0])
if $bpos[0]>$info[0]-19 and $bpos[0]<$info[0]+19 and $bpos[1]>$info[1]-19 and $bPos[1]<$info[1]+19 then
GUICtrlSetData($mitem,$wort)
Else
GUICtrlSetData($mitem,"")
EndIf
EndIf
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _exit()
Exit
endfunc

[/autoit]

eukalyptus:

498 Byte - auf 26 Zeilen
zusätzliche Datein:/
Bugs: /

Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

Das Edit-Kontextmenu wurde wunderschön entfernt

Spoiler anzeigen

[autoit]

GUICreate("")
GUICtrlCreateEdit("",0,0)
GUISetState()
Do
$M=GUIGetMsg(1)
If $M[0]=-9 Then
GUISetState(65)
Do
Until GUIGetMsg()=-10
GUISetState(64)
$S=BitAND(GUICtrlSendMsg(-1,0xD7,0,BitOR(BitAND(($M[4])*0x10000,0xFFFF0000),BitAND($M[3],0xFFFF))),0xFFFF)
$T=StringSplit(GUICtrlRead(-1),"")
$j=0
For $i In $T
$j+=1
If (StringIsAlNum($i)=0 And $j<=$S)Or $j=1 Then
$V=""
ContinueLoop
ElseIf StringIsAlNum($i)=0 Then
ExitLoop
EndIf
$V=$i&$V
Next
ToolTip($V)
EndIf
Until $M[0]=-3

[/autoit]

BugFix:

1,05 KByte - auf 48 Zeilen
zusätzliche Datein:/
Bugs: /

Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

Spoiler anzeigen

[autoit]

Opt("GUIOnEventMode",1)
Global $g=GUICreate('')
GUISetOnEvent(-3, 'off')
GUISetOnEvent(-9, 'down')
GUISetOnEvent(-10, 'up')
$e=GUICtrlCreateEdit("",9,9)
GUISetState()
While 1
Sleep(20)
WEnd
Func off()
Exit
EndFunc
Func down()
GUISetState(@SW_LOCK)
GUICtrlSetState($e, 128)
EndFunc
Func up()
GUICtrlSetState($e, 64)
GUISetState(@SW_UNLOCK)
$p=MouseGetPos()
MouseClick('left',$p[0],$p[1],1,1)
Rev_Word()
EndFunc
Func Rev_Word()
$t=ControlCommand($g,'',$e,"GetLine",ControlCommand($g,'',$e,"GetCurrentLine",""))
$s=ControlCommand($g,'',$e,"GetCurrentCol","")
$a=StringSplit($t,' ')
If Not IsArray($a) Then Return
$d=ObjCreate('Scripting.Dictionary')
For $n=1 To UBound($a)-1
$q=StringInStr($t,$a[$n])+1
For $j=$q To $q+StringLen($a[$n])-2
$d.Add($j,$a[$n])
Next
Next
If $d.Exists($s) Then
$ch=$d.Item($s)
$w=StringRegExpReplace($d.Item($s),'[\W_]+','')
Else
Return
EndIf
$o=''
For $n=StringLen($w) To 1 Step -1
$o&=StringMid($w,$n,1)
Next
WinSetTitle('','','Reverse von: '&$w&' = '&$o)
EndFunc

[/autoit]

Oscar:

619 Byte - auf 26 Zeilen
zusätzliche Datein:/
Bugs:

Fast hätte das Skript nicht gewertet werden können, da es nicht lief^^ ControlClick($z,'',$e,'primary',2,$p[0],$p[1]) muss ControlClick($z,'',$e,'left',2,$p[0],$p[1]) heißen. Dank dem pee, dass er diesen Fehler behoben hat und ich es dadurch testen konnte^^
Sonderzeichen wurden beim Reverse mitgezählt
Wenn man was geschrieben hatte und dann den reverse anzeigen gelassen hat konnte man später nichts mehr im Text bearbeiten.

Auch hier wurde das Kontextmenu einwandfrei entfernt.

Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

Spoiler anzeigen

[autoit]

Opt('GUIOnEventMode',1)
Opt('MouseCoordMode',2)
$z=GUICreate('',300,99)
GUISetOnEvent(-3,'Q')
$e=GUICtrlCreateEdit('',0,0,300,99,2097156)
GUISetState()
$y=GUICreate('',285,99,0,0,-2147483648,72,$z)
WinSetTrans($y,'',1)
GUISetOnEvent(-9,'A')
GUISetState()
While 1
Sleep(9)
WEnd
Func Q()
Exit
EndFunc
Func A()
Local $p=MouseGetPos(),$b,$a
ControlClick($z,'',$e,'left',2,$p[0],$p[1])
$a=StringRegExpReplace(ControlCommand($z,'',$e,'GetSelected',''),'[ \x27\.:",!?]','')
For $i=StringLen($a) To 1 Step -1
$b&=StringMid($a,$i,1)
Next
ControlClick($z,'',$e,'left',1,$p[0],$p[1])
ToolTip($b)
EndFunc

[/autoit]

---------------------------------------------

Gewinner im Juli ist:
eukalyptus
Natürlich trotzdem nochmal vielen Dank und Anerkennung an alle anderen Teilnehmer!
Walle

Waluev

Zitat

(da frag ich mich gerade was man wohl in Ländern mit 40° Raumtemperatur macht?)

Die haben doch da Klimaanlage

@Crazy-A:
Weißt du zufällig ob du diese Probleme auch in den "kalten" Monaten hattest? Wenn es draußen so extrem warm ist heizen sich ja auch die Räume auf und der Computer tut sein übriges.

Mach dich erstmal nicht verrückt und beobachte wie sich die Temp entwickelt. Wenns länger so bleibt kannste ja sonst mal, wenn es nicht zu laut wird, die Seitenteile vom Gehäuse nehmen.

Walle

Waluev

Zitat

Der wird aber wahrscheinlich wenns hoch kommt noch ein Jahr halten, und dann ist der wrkl weg vom Fenster.

Soweit ich weiß war der 6600er einer der ersten Quads von Intel und der wird bestimmt eher veralten als der E8XXX. Das dein exrem übertakteter Q6600 mehr Leistung hat als der E8400 glaub ich dir ohne Beanstandung, aber wer sagt, dass sich Fisch auch ne Wasserkühlung installieren will und ob er überhaupt übertakten will (das da die Garantie weg ist, weiß Fisch?! ) und standard ist der Q6600 nunmal einfach langsamer als der E8400

Walle

Waluev

Zitat von fabs

Ich kann dieses "Quadcore geht nicht zum Zocken"-Getue echt nichtmehr hören. Es mag vielleicht sein, dass man bei nur Dualcoreoptimierten Spielen 5 fps rausholen kann, aber mehr auch wieder nicht. Aktuell kann man mit einem Intel-Quadcore auf Standardtakt locker alles auf vollen Einstellungen (GPU-Leistung vorausgesetzt) zocken. Fakt ist jedoch, dass ein guter Dualcore (E8400, 3GHz) 125€ kostet. Der Quadcore mit 2,4GHz kostet grade mal 7€ mehr (Preise von Mindfactory). Ich weiß ja nicht wie ihr das seht - aber mir ist die Leistung in kommenden Spielen wichtiger als aktuell 5 fps mehr (die man ab 40fps eh nicht mehr merkt).

ÄHM.....anscheinend verstehst du es nicht so ganz. Mal Belege mit aktuellem Benchmark aus der PCGH:

E8400 - 130€ - 3GHz
16 Cinebench Punkte.

QX6850 - 750€ - 3GHz
9,5 Cinebench Punkte.

Ich glaube das ist wohl eindeutig. -.-

Mit nem E8400 hat er ohne Übertakterei und anderem generve im Vergleich zu nem Quad in der gleichen Preisklasse um Welten mehr Leistung PUNKT

MAN BEACHTE AUCH IMMER MAL BITTE PREIS/LEISTUNGS VERHÄLTNISS und auch das wir hier nicht den top Rechner finden sollen sondern einen PC der für aktuelle Dinge reicht nicht der aktuelle Anforderungen übertrifft

Waluev

allerdings zahlst du für nen Quadcore momentan deutlich mehr als nen Dualcore und der Dualcore hat dann in dem Preissegment in dem du dich bewegst noch deutlich mehr Leistung.

Ich würde mir erstmal nen Dualcore holen. Wenn du in nem halben Jahr oder so merkst, dass sich Quadcore entwickelt hat kannste dich immer noch dafür entscheiden.

Waluev

Wenn ihr das machen wollt; gerne. Ich würde nicht unbedingt mitmachen mir fehlt einfach etwas die Zeit.

Ein neuer Thread wäre aber sicher angebracht, denn der hier ist wrkl uralt

Walle

Beiträge von Waluev

µit - August

Counter Strike Source Fehler - Bitte um hilfe

Counter Strike Source Fehler - Bitte um hilfe

µit - August

µit - August

µit - August

µit - August

µit - August

µit - August

µit - August

µit - August

Musik Quiz!

Musik Quiz!

Musik Quiz!

µit - Juli

Mainbordtemperatur

neuen PC kaufen?

neuen PC kaufen?

neuen PC kaufen?

n00b Projekt