Beiträge von Sithlord95

Sithlord95

steht doch schön in der hilfe

[autoit]

GUICtrlCreateCombo("herunterfahren", 10, 10) ; Erstellt das erste Item
GUICtrlSetData(-1, "abmelden|ruhezustand", "ruhezustand") ; Fügt andere Items hinzu und setzt einen neuen Standard

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

Sithlord95

häh gehts genauer? ich versteht kein wort

also du willst ne gui mit combo ? ....

Sithlord95

ungefähr so

[autoit]

$passwort = InputBox("Passwort eingabe", "Es klingt komisch warum das passwort falls es ein Absturz gibt wird automatisch reloggt und dafür wird das PW benötigt")
while 1
if not winexists("Gta") then ;ich wieß ncih wie das fenster heißt is nur ein beispiel
processclose("gta.exe") ;genauen namen fügst du selber ein
sleep(1000)
MouseClick("LEFT", 300, 97, 10, 1)
send("{Enter}")
sleep(60000)
Send("T")
Send("/login ")
send("{enter}")
Else
$state = wingetstate("gta")

If BitAnd($state, 16) Then
winsetstate("gta","",@sw_restore)
endif
endif
wend

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

ich hoffe ich hab dich richtig verstanden

Sithlord95

danke ja ich wieß das die falsch sind ,nachdem die normalen sachen nich gingen hab ich halt ein bissel quatsch versucht

Sithlord95

hallo ich versuche ordner zu erstellen mit dem namen a-z
ich hab schon paar sachen ausprobiert doch irgendwie klappt es nicht

[autoit]

#include <array.au3>
;versuch 1
global $buchstaben[3] = ["a","b","c"]

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

for $i = 1 to $buchstaben[$i-1] step 1
dircreate(@scriptdir & $i)
next
;versuch 1 ende
;versuch 2
global $buchdings[5]
$buchdings[0] = "a"
$buchdings[1] = "b"
$buchdings[2] = "c"
$buchdings[3] = "d"
$buchdings[4] = "e"

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

for $id = 1 to ubound($buchdings[$id-1]) step 1
dircreate(@scriptdir & _ArrayToString($buchdings[$i]))
next
;versuch 2 ende

[/autoit]

Sithlord95

versuchs mal so

[autoit]

$passwort = InputBox("Passwort eingabe", "Es klingt komisch warum das passwort falls es ein Absturz gibt wird automatisch reloggt und dafür wird das PW benötigt")
while 1
if not winexists("Gta") then ;ich wieß ncih wie das fenster heißt is nur ein beispiel
processclose("gta.exe") ;genauen namen fügst du selber ein
sleep(1000)
MouseClick("LEFT", 300, 97, 10, 1)
send("{Enter}")
sleep(60000)
Send("T")
Send("/login ")
send("{enter}")
endif
wend

[/autoit]

nich getestet sollte aber ungefähr so aussehen denk dran den richtigen fensternamen zu wählen und den richtigen prozess ,außerdem die richtige koordinate für den teil wo es reingeschreiben werden soll

Sithlord95

omg deepred das sieht genial aus ..... ich würde sowas ja nich aufgeben ,aber irgendwann bekomsmt du ja vielleicht wieder lust drauf

Sithlord95

guten abend

weiß jemand ob es ein gdi+ tut gibt? wenn ja bitte bescheid geben

mfg sithlord95

Sithlord95

kann es sein das es bei vista home premium nicht geht???
ich habs mehrmals gemacht mit 4 ordnern doch nichts hat geklappt naja die idee finde ich gut ....

Sithlord95

ganz erlich irgendwie bist du lustig so viel durchhaltevermögen aber irgendwie nervt es auch ....

ich werde dir jetzt helfen damit du endlich ruhe gibst!!!

dein code is nich falsch sondern die zahlen stimmen einfach nicht

verusch mal das 0x000000
dann sucht er ein schwarzes feld ..... und denk dran er nimmt immer das erste das er entdeckt
wenn du die hex bzw dez zahlen nich kennst nimmst du einfach das window tool oder du bastelst dir etwas
das bei einem bestimmten tastendruck(_ispressed) die mausposition(mousegetpost) aufnimmt und dann sucht (pixelsearch)

und bitte frage nie mehr nach so etwas ...

Sithlord95

fileopendialog anschauen .....

und dann ungefähr so $pfad1 = fileopendialog(...............)
und dann guictrlsetdata angucken dann kansnt du es damit reinschreiben in das inputfeld

Sithlord95

1)also run funktioniert nur mit dem ersten teil wenn das programm das du starten willst im win32 ordner ist sonst musst du den pfad mit exe angeben
und dann nach dem komma das folgt nochmal den pfad

2)und ich vermute mal du hast zb wenn du zb f5 als hotkey haben willst f5 eingetippt aber es ist {f5} genau wie die send befehle

ich habe das so gemacht also den hotkey zum senden und dann ging es also der fehler liegt wohl darin das du die tasten falsch benannt hast

[autoit]

Func start()
send($p1)
EndFunc

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

naja mfg

Sithlord95

schön das dir meine vorarbeit gefällt doch das is nur für lieder auf deinem pc du müsstest dir ne internet adresse besorgen und es dann warscheinlich mit ienavigate holen dann würde es sich abspielen lassen .... frag doch deepred er hat ein ganz gutes gemacht ....

Sithlord95

bitte schön

[autoit]

;zu 1
$x = InputBox("", "X-Koordinate:")

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

$y = InputBox("", "Y-Koordinate:")

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

MouseMove(guictrlread($x),guictrlread( $y))
;zu 2
#include <GUIConstantsEx.au3>
opt("guioneventmode",1)
GUICreate("My GUI Checkbox")
guisetonevent($GUI_EVENT_CLOSE ,"_exit")
$checkCN = GUICtrlCreateCheckbox("CHECKBOX 1", 10, 10, 120, 20)
guictrlsetonevent(-1,"_enable")
$input=GUICtrlCreateInput("",50,50)
guictrlsetstate($input,$gui_disable)
GUISetState()

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

while 1
wend

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

func _enable()
guictrlsetstate($input,$gui_enable)
endfunc

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

func _exit()
Exit
endfunc

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

Sithlord95

er meint das du zb mit gdi+ ein paar noten anzeigst in deinem programm die er dann nachspielen kann ....

Sithlord95

danke ich gucks mir dann mal an

Sithlord95

also version 1.6 ist jetzt da dort könnt ihr das design nach belieben zusammenstellen und paar andere kleinigkeiten wurden verbessert

,leider fehlt wieder die hälfte des postes von mir im teil 1 also nicht wundern warum da nichts steht .......

Sithlord95

ich habs jetzt

[autoit]

#cs ----------------------------------------------------------------------------

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

AutoIt Version: 3.3.0.0
Author: Marcel Böhm

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

#ce ----------------------------------------------------------------------------

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

$Version = "1.22 Beta"

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

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Global $sons[9], $sch[5], $ex[5], $zn[3]
opt("guioneventmode",1)
#Region ### START Koda GUI section ###
$Form1 = GUICreate("Notenschnittberechner " & $Version, 622, 287, 190, 123)
guisetonevent($GUI_EVENT_CLOSE,"_exit")
$Group1 = GUICtrlCreateGroup("", 8, 24, 609, 233)
$Label1 = GUICtrlCreateLabel("Bitte einfach die enstsprechende Note in das Feld eintragen, falls keine Note vorhanden ist einfach Feld freilassen", 16, 32, 540, 17)
$Label2 = GUICtrlCreateLabel("1. Schulaufgabe", 11, 56, 82, 17)
$Label3 = GUICtrlCreateLabel("2. Schulaufgabe", 11, 81, 82, 17)
$Label4 = GUICtrlCreateLabel("3. Schulaufgabe", 11, 105, 82, 17)
$Label5 = GUICtrlCreateLabel("4. Schulaufgabe", 11, 129, 82, 17)
$sch[1] = GUICtrlCreateInput("", 104, 56, 41, 21)
$sch[2] = GUICtrlCreateInput("", 104, 80, 41, 21)
$sch[3] = GUICtrlCreateInput("", 104, 104, 41, 21)
$sch[4] = GUICtrlCreateInput("", 104, 128, 41, 21)
$Label7 = GUICtrlCreateLabel("1. Ex", 24, 152, 28, 17)
$ex[1] = GUICtrlCreateInput("", 104, 152, 41, 21)
$ex[2] = GUICtrlCreateInput("", 104, 176, 41, 21)
$ex[3] = GUICtrlCreateInput("", 104, 200, 41, 21)
$ex[4] = GUICtrlCreateInput("", 104, 224, 41, 21)
$Label8 = GUICtrlCreateLabel("2. Ex", 24, 176, 28, 17)
$Label9 = GUICtrlCreateLabel("3. Ex", 24, 200, 28, 17)
$Label10 = GUICtrlCreateLabel("4. Ex", 24, 224, 28, 17)
$Sonstige = GUICtrlCreateLabel("Sonstige: (zählt als mündliche Note!)", 184, 56, 178, 17)
$sons[1] = GUICtrlCreateInput("", 376, 56, 33, 21)
$sons[2] = GUICtrlCreateInput("", 424, 56, 33, 21)
$sons[3] = GUICtrlCreateInput("", 472, 56, 33, 21)
$sons[4] = GUICtrlCreateInput("", 520, 56, 33, 21)
$sons[5] = GUICtrlCreateInput("", 376, 88, 33, 21)
$sons[6] = GUICtrlCreateInput("", 424, 88, 33, 21)
$sons[7] = GUICtrlCreateInput("", 472, 88, 33, 21)
$sons[8] = GUICtrlCreateInput("", 520, 88, 33, 21)
$Group2 = GUICtrlCreateGroup("", 176, 128, 393, 113)
$Label11 = GUICtrlCreateLabel("Bitte gebe die Note ein, mit der dein neuer Schnitt berechnet werden soll Freilassen um aktuellen Schnitt anzeigen zu lassen", 184, 144, 345, 35)
$Label12 = GUICtrlCreateLabel("Schulaufgabe:", 184, 176, 73, 17)
$Label13 = GUICtrlCreateLabel("Ex:", 184, 208, 19, 17)
$zn[1] = GUICtrlCreateInput("", 272, 176, 49, 21) ;die neue Note bei Schulaufgabe
$zn[2] = GUICtrlCreateInput("", 272, 208, 49, 21) ; die neue note bei ex
$chk1 = GUICtrlCreateCheckbox("Berechne für alle Noten", 344, 176, 185, 17)
GUICtrlSetOnEvent(-1,"_check1")
$chk2 = GUICtrlCreateCheckbox("Berechne für alle Noten", 344, 208, 137, 17)
GUICtrlSetOnEvent(-1,"_check2")
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label6 = GUICtrlCreateLabel("Marcel Böhm", 40, 264, 127, 17)
$Generieren = GUICtrlCreateButton("Generieren", 480, 264, 97, 21, $WS_GROUP)
guictrlsetonevent(-1,"_buttongedrueckt")
;$info = GUICtrlCreateButton("Info", 392, 264, 81, 21, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$checker1 = 0
$checker2 = 0
func _check1()
guictrlsetstate($chk2,$gui_disable)
guictrlsetstate($zn[2],$gui_disable)
$checker1 = 1
EndFunc

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

func _check2()
guictrlsetstate($chk1,$gui_disable)
guictrlsetstate($zn[1],$gui_disable)
$checker2 = 1
EndFunc

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

func _exit()
Exit
endfunc

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

While 1
if $checker1 = 1 then
if guictrlread($chk1) = $gui_unchecked Then
guictrlsetstate($chk2,$gui_enable)
guictrlsetstate($zn[2],$gui_enable)
$checker1 = 0
EndIf
endif

if $checker2 = 1 then
if guictrlread($chk2) = $gui_unchecked Then
guictrlsetstate($chk1,$gui_enable)
guictrlsetstate($zn[1],$gui_enable)
$checker2 = 0
EndIf
endif
WEnd

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

func _buttongedrueckt()
if BitAND(GUICtrlRead($chk1), $GUI_CHECKED) = $GUI_CHECKED then
_ausrechnenalleschulaufgabe()
Elseif BitAND(GUICtrlRead($chk2), $GUI_CHECKED) = $GUI_CHECKED then
_ausrechnenalleex()
guictrlsetstate($zn[1],$GUI_enABLE)
Else
_ausrechnen()
endif
endfunc

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

Func _ausrechnenalleschulaufgabe()
;------------------------Schuli Note 1--------------------------------
Local $sNotenAnzahls1 = 0, $sNotenGesamts1 = 0
For $i = 1 To 4
If GUICtrlRead($sch[$i]) <> "" Then
$sNotenAnzahls1 += 2
$sNotenGesamts1 += GUICtrlRead($sch[$i]) * 2
EndIf
If GUICtrlRead($ex[$i]) <> "" Then
$sNotenAnzahls1 += 1
$sNotenGesamts1 += GUICtrlRead($ex[$i])
EndIf
Next
For $i = 1 To 8
If GUICtrlRead($sons[$i]) <> "" Then
$sNotenAnzahls1 += 1
$sNotenGesamts1 += GUICtrlRead($sons[$i])
EndIf
Next
$sNotenAnzahls1 += 2
$sNotenGesamts1 += 1*2
$durchschnitts1 = $sNotenGesamts1 / $sNotenanZahls1
;----------------------------Schuli Note 2------------------------------------
Local $sNotenAnzahls2 = 0, $sNotenGesamts2 = 0
For $i = 1 To 4
If GUICtrlRead($sch[$i]) <> "" Then
$sNotenAnzahls2 += 2
$sNotenGesamts2 += GUICtrlRead($sch[$i]) * 2
EndIf
If GUICtrlRead($ex[$i]) <> "" Then
$sNotenAnzahls2 += 1
$sNotenGesamts2 += GUICtrlRead($ex[$i])
EndIf
Next
For $i = 1 To 8
If GUICtrlRead($sons[$i]) <> "" Then
$sNotenAnzahls2 += 1
$sNotenGesamts2 += GUICtrlRead($sons[$i])
EndIf
Next
$sNotenAnzahls2 += 2
$sNotenGesamts2 += 2*2
$durchschnitts2 = $sNotenGesamts2 / $sNotenanZahls2
;-----------------------------Schuli Note 3-------------------------------------
Local $sNotenAnzahls3 = 0, $sNotenGesamts3 = 0
For $i = 1 To 4
If GUICtrlRead($sch[$i]) <> "" Then
$sNotenAnzahls3 += 2
$sNotenGesamts3 += GUICtrlRead($sch[$i]) * 2
EndIf
If GUICtrlRead($ex[$i]) <> "" Then
$sNotenAnzahls3 += 1
$sNotenGesamts3 += GUICtrlRead($ex[$i])
EndIf
Next
For $i = 1 To 8
If GUICtrlRead($sons[$i]) <> "" Then
$sNotenAnzahls3 += 1
$sNotenGesamts3 += GUICtrlRead($sons[$i])
EndIf
Next
$sNotenAnzahls3 += 2
$sNotenGesamts3 += 3*2
$durchschnitts3 = $sNotenGesamts3 / $sNotenanZahls3
;--------------------------Schuli Note 4-------------------------------------------
Local $sNotenAnzahls4 = 0, $sNotenGesamts4 = 0
For $i = 1 To 4
If GUICtrlRead($sch[$i]) <> "" Then
$sNotenAnzahls4 += 2
$sNotenGesamts4 += GUICtrlRead($sch[$i]) * 2
EndIf
If GUICtrlRead($ex[$i]) <> "" Then
$sNotenAnzahls4 += 1
$sNotenGesamts4 += GUICtrlRead($ex[$i])
EndIf
Next
For $i = 1 To 8
If GUICtrlRead($sons[$i]) <> "" Then
$sNotenAnzahls4 += 1
$sNotenGesamts4 += GUICtrlRead($sons[$i])
EndIf
Next
$sNotenAnzahls4 += 2
$sNotenGesamts4 += 4*2
$durchschnitts4 = $sNotenGesamts4 / $sNotenanZahls4
;-------------------------Schuli Note 5------------------------------------
Local $sNotenAnzahls5 = 0, $sNotenGesamts5 = 0
For $i = 1 To 4
If GUICtrlRead($sch[$i]) <> "" Then
$sNotenAnzahls5 += 2
$sNotenGesamts5 += GUICtrlRead($sch[$i]) * 2
EndIf
If GUICtrlRead($ex[$i]) <> "" Then
$sNotenAnzahls5 += 1
$sNotenGesamts5 += GUICtrlRead($ex[$i])
EndIf
Next
For $i = 1 To 8
If GUICtrlRead($sons[$i]) <> "" Then
$sNotenAnzahls5 += 1
$sNotenGesamts5 += GUICtrlRead($sons[$i])
EndIf
Next
$sNotenAnzahls5 += 2
$sNotenGesamts5 += 5*2
$durchschnitts5 = $sNotenGesamts5 / $sNotenanZahls5
;------------------------Schuli Note 6-----------------------------------
Local $sNotenAnzahls6 = 0, $sNotenGesamts6 = 0
For $i = 1 To 4
If GUICtrlRead($sch[$i]) <> "" Then
$sNotenAnzahls6 += 2
$sNotenGesamts6 += GUICtrlRead($sch[$i]) * 2
EndIf
If GUICtrlRead($ex[$i]) <> "" Then
$sNotenAnzahls6 += 1
$sNotenGesamts6 += GUICtrlRead($ex[$i])
EndIf
Next
For $i = 1 To 8
If GUICtrlRead($sons[$i]) <> "" Then
$sNotenAnzahls6 += 1
$sNotenGesamts6 += GUICtrlRead($sons[$i])
EndIf
Next
$sNotenAnzahls6 += 2
$sNotenGesamts6 += 6*2
$durchschnitts6 = $sNotenGesamts6 / $sNotenanZahls6
;-----------------------------EndeSchuli-------------------------------------------
msgbox(0, "Schnitt mit Schulaufgabe", "Note 1: " & Round($durchschnitts1,2) & @LF & "Note 2: " & Round($durchschnitts2,2) & @LF & "Note 3: " & Round($durchschnitts3,2) & @LF & "Note 4: " & Round($durchschnitts4,2) & @LF & "Note 5: " & Round($durchschnitts5,2) & @LF & "Note 6: " & Round($durchschnitts6,2))
EndFunc
Func _ausrechnenalleex()
;------------------------ex Note 1--------------------------------
Local $sNotenAnzahle1 = 0, $sNotenGesamte1 = 0
For $i = 1 To 4
If GUICtrlRead($sch[$i]) <> "" Then
$sNotenAnzahle1 += 2
$sNotenGesamte1 += GUICtrlRead($sch[$i]) * 2
EndIf
If GUICtrlRead($ex[$i]) <> "" Then
$sNotenAnzahle1 += 1
$sNotenGesamte1 += GUICtrlRead($ex[$i])
EndIf
Next
For $i = 1 To 8
If GUICtrlRead($sons[$i]) <> "" Then
$sNotenAnzahle1 += 1
$sNotenGesamte1 += GUICtrlRead($sons[$i])
EndIf
Next
$sNotenAnzahle1 += 1
$sNotenGesamte1 += 1
$durchschnitte1 = $sNotenGesamte1 / $sNotenanZahle1
;----------------------------ex Note 2------------------------------------
Local $sNotenAnzahle2 = 0, $sNotenGesamte2 = 0
For $i = 1 To 4
If GUICtrlRead($sch[$i]) <> "" Then
$sNotenAnzahle2 += 2
$sNotenGesamte2 += GUICtrlRead($sch[$i]) * 2
EndIf
If GUICtrlRead($ex[$i]) <> "" Then
$sNotenAnzahle2 += 1
$sNotenGesamte2 += GUICtrlRead($ex[$i])
EndIf
Next
For $i = 1 To 8
If GUICtrlRead($sons[$i]) <> "" Then
$sNotenAnzahle2 += 1
$sNotenGesamte2 += GUICtrlRead($sons[$i])
EndIf
Next
$sNotenAnzahle2 += 1
$sNotenGesamte2 += 2
$durchschnitte2 = $sNotenGesamte2 / $sNotenanZahle2
;-----------------------------ex Note 3-------------------------------------
Local $sNotenAnzahle3 = 0, $sNotenGesamte3 = 0
For $i = 1 To 4
If GUICtrlRead($sch[$i]) <> "" Then
$sNotenAnzahle3 += 2
$sNotenGesamte3 += GUICtrlRead($sch[$i]) * 2
EndIf
If GUICtrlRead($ex[$i]) <> "" Then
$sNotenAnzahle3 += 1
$sNotenGesamte3 += GUICtrlRead($ex[$i])
EndIf
Next
For $i = 1 To 8
If GUICtrlRead($sons[$i]) <> "" Then
$sNotenAnzahle3 += 1
$sNotenGesamte3 += GUICtrlRead($sons[$i])
EndIf
Next
$sNotenAnzahle3 += 1
$sNotenGesamte3 += 3
$durchschnitte3 = $sNotenGesamte3 / $sNotenanZahle3
;--------------------------ex Note 4-------------------------------------------
Local $sNotenAnzahle4 = 0, $sNotenGesamte4 = 0
For $i = 1 To 4
If GUICtrlRead($sch[$i]) <> "" Then
$sNotenAnzahle4 += 2
$sNotenGesamte4 += GUICtrlRead($sch[$i]) * 2
EndIf
If GUICtrlRead($ex[$i]) <> "" Then
$sNotenAnzahle4 += 1
$sNotenGesamte4 += GUICtrlRead($ex[$i])
EndIf
Next
For $i = 1 To 8
If GUICtrlRead($sons[$i]) <> "" Then
$sNotenAnzahle4 += 1
$sNotenGesamte4 += GUICtrlRead($sons[$i])
EndIf
Next
$sNotenAnzahle4 += 1
$sNotenGesamte4 += 4
$durchschnitte4 = $sNotenGesamte4 / $sNotenanZahle4
;-------------------------ex Note 5------------------------------------
Local $sNotenAnzahle5 = 0, $sNotenGesamte5 = 0
For $i = 1 To 4
If GUICtrlRead($sch[$i]) <> "" Then
$sNotenAnzahle5 += 2
$sNotenGesamte5 += GUICtrlRead($sch[$i]) * 2
EndIf
If GUICtrlRead($ex[$i]) <> "" Then
$sNotenAnzahle5 += 1
$sNotenGesamte5 += GUICtrlRead($ex[$i])
EndIf
Next
For $i = 1 To 8
If GUICtrlRead($sons[$i]) <> "" Then
$sNotenAnzahle5 += 1
$sNotenGesamte5 += GUICtrlRead($sons[$i])
EndIf
Next
$sNotenAnzahle5 += 1
$sNotenGesamte5 += 5
$durchschnitte5 = $sNotenGesamte5 / $sNotenanZahle5
;------------------------ex Note 6-----------------------------------
Local $sNotenAnzahle6 = 0, $sNotenGesamte6 = 0
For $i = 1 To 4
If GUICtrlRead($sch[$i]) <> "" Then
$sNotenAnzahle6 += 2
$sNotenGesamte6 += GUICtrlRead($sch[$i]) * 2
EndIf
If GUICtrlRead($ex[$i]) <> "" Then
$sNotenAnzahle6 += 1
$sNotenGesamte6 += GUICtrlRead($ex[$i])
EndIf
Next
For $i = 1 To 8
If GUICtrlRead($sons[$i]) <> "" Then
$sNotenAnzahle6 += 1
$sNotenGesamte6 += GUICtrlRead($sons[$i])
EndIf
Next
$sNotenAnzahle6 += 1
$sNotenGesamte6 += 6
$durchschnitte6 = $sNotenGesamte6 / $sNotenanZahle6
;-----------------------------Endeex-------------------------------------------
msgbox(0, "Schnitt mit Extemporale", "Note 1: " & Round($durchschnitte1,2) & @LF & "Note 2: " & Round($durchschnitte2,2) & @LF & "Note 3: " & Round($durchschnitte3,2) & @LF & "Note 4: " & Round($durchschnitte4,2) & @LF & "Note 5: " & Round($durchschnitte5,2) & @LF & "Note 6: " & Round($durchschnitte6,2))

EndFunc

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

Func _ausrechnen()

Local $sNotenAnzahl = 0, $sNotenGesamt = 0
For $i = 1 To 4
If GUICtrlRead($sch[$i]) <> "" Then
$sNotenAnzahl += 2
$sNotenGesamt += GUICtrlRead($sch[$i]) * 2
EndIf
If GUICtrlRead($ex[$i]) <> "" Then
$sNotenAnzahl += 1
$sNotenGesamt += GUICtrlRead($ex[$i])
EndIf
Next
For $i = 1 To 8
If GUICtrlRead($sons[$i]) <> "" Then
$sNotenAnzahl += 1
$sNotenGesamt += GUICtrlRead($sons[$i])
EndIf
Next
If GUICtrlRead($zn[1]) <> "" Then
$sNotenAnzahl += 2
$sNotenGesamt += GUICtrlRead($zn[1]) * 2
EndIf
If GUICtrlRead($zn[2]) <> "" Then
$sNotenAnzahl += 1
$sNotenGesamt += GUICtrlRead($zn[2])
EndIf
$durchschnitt = $sNotenGesamt / $sNotenanZahl

if GUICtrlRead($zn[1]) = 0 Then

msgbox(0, "", "Dein Durchschnitt liegt bei " & Round($durchschnitt,2))
EndIf
if GUICtrlRead($zn[1]) > 0 Then
MsgBox(0,"", "Dein Durchschnitt würde bei " & Round($durchschnitt,2) & " liegen")
EndIf

EndFunc ;==>_ausrechnen

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

Sithlord95

na gut ich machs ..... auch wenn es um die giftzettel geht wenn cih dran denke was ihc bekomme schnitt ovn 3,7^^

Sithlord95

es wäre gut wenn man den beep solange hört wie gedrückt wird (ich habs beim alle meine entschen spielen eben gemerkt das es nicht so ganz optimal ist mit der länge man kann ja nciht so schnell die länge an der seite ändern

und es wäre gut wenn du auf die tasten irgendwie noch die noten(in buchstaben) draufsetzen könntest
und es wäre gut wenn es zb oben rechts angezeigt wird was für eine note es ist mit linien und auch mit dauer zb viertel

das mit der dauer würde ich so machen

[autoit]

Case $c_1, $c_2
while _ispressed("01")
Beep (261.63,100) ; du solltest vielleciht ne bessere msec raussuchen so klingt das wie ne triole^^
wend

[/autoit]

Beiträge von Sithlord95

Combo

Combo

Brauche dringend hilfe!

ordner erstellen mit namen a - z

ordner erstellen mit namen a - z

Brauche dringend hilfe!

Projektidee: AutoIT Setup Builder

gibts ein gdi+ tut?

Ordner Hintergund ändern

Input box spinnt, es wird anderes angeziegt !!??? hää

Hotkey Programm

Hotkey Programm

Radio hören ?

Inputboxen-Fragen

Mein klitzekleiner Beitrag zum AutoIt Kinderprojekt

5 probleme mit meinem player

AutoIt Taskmanager 1.6

Checkbox Fragen

Checkbox Fragen

Mein klitzekleiner Beitrag zum AutoIt Kinderprojekt