Beiträge von Jam00

  • KMZ-Dateien Anzeigen

    Gibt es eine Möglichkeit KMZ-Dateien in einer AutoIt Gui anzuzeigen? In so einer Datei, kann man sowas ähnliches wie 3D objekte darstellen, hier eine genaue Beschreibung.
    Ich habe selber mal eine gemacht und hab sie als Dateianhang angehängt.

    Danke schon mal in Vorraus

  • Auto Ball Spiel

    Bei mir geht es auch nicht! Hast du vieleicht eine Schrift verwendet die nicht auf allen betriebsystem drauf ist? Oder vieleicht zb. Bei XP Home nicht aber bei XP Profesianal schon?

    EDIT:
    Upsa, ist mir gerad eingefallen das ich XP Pro habe^^ Und da geht es ja nicht

    EDIT:
    Deine Ballcolisions Teil da ist ja voll cool! Damit könnte man ja auch sowas wie Billjard machen^^
    Dieses Therad ist echt klasse!

  • Objektberührung

    Also ich denke es bleibt dir nur die möglichkeit die Positionen zu vergleichen! Die Positionen würde ich in Array speichern oder so, aber es währe bessen wenn du ein Script hättest

  • Auto Ball Spiel

    Das ist echt klasse! Wie hast du es hinbekommen die Bilder zu drehen? Kannst du da ein Beispiel machen? Weil der Code ist schon ein bischen lang um das alles zu verstehen^^

  • Schleifenproblem

    Probier mal so:

    Spoiler anzeigen
    [autoit]

    #include<Array.au3>
    #include<String.au3>

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

    $test = FileRead("eingang.txt"); "1A2B3C4D5E6"
    If StringRight($test,2) = @CRLF OR StringRight($test,2) = @CR OR StringRight($test,2) = @LF Then $test = StringTrimRight($test, 2)
    $1_len = StringLen($test)
    ;MsgBox(0, "Stringlänge:", $1_len) ; diese Zeile nur zum testen

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

    $pass = FileRead("passwort.txt"); "94736"
    If StringRight($pass,2) = @CRLF OR StringRight($pass,2) = @CR OR StringRight($pass,2) = @LF Then $pass = StringTrimRight($pass, 2)
    $2_len = StringLen($pass)
    ;MsgBox(0, "Stringlänge Passwort:", $2_len) ; diese Zeile nur zum testen

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

    $zwischensumme = Ceiling($1_len / $2_len)
    ;~ MsgBox(0, "Stringlänge Zwischenlänge:", $zwischensumme) ; diese Zeile nur zum testen

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

    $anwenderpass = _StringRepeat($pass,$zwischensumme)
    ;~ MsgBox(0, "Stringlänge Anwendung:", $anwenderpass) ; diese Zeile nur zum testen

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

    For $i = 1 to $1_len Step +1
    $v_s = StringMid($test, $i, 1)
    ;~ MsgBox(0, "aus Test:", $v_s) ; diese Zeile nur zum testen
    $v_w = StringMid($anwenderpass, $i, 1) ; diese Zeile nur zum testen
    ;MsgBox(0, "aus Passwort:", $v_w)

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

    ; Array: senkrecht / waagerecht
    ; alle 37 Zeichen werden in 37 Zeilen dargestellt, wobei das erste Zeichen immer an das Ende rutscht.
    Local $avArray[38][38]
    Local $avTemp[38] = [" ","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z","."]
    For $x = 0 To 37
    $y = 37-$x
    For $z = 0 To 37
    $y += 1
    If $y>37 Then $y=0
    $avArray[$x][$y] = $avTemp[$z]
    Next
    Next

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

    ; senkrecht
    $s_Index = _ArraySearch($avArray, $v_s, 0, 0, 0, 1)
    ;~ ConsoleWrite("$w_Index: " & $s_Index & @CRLF) ; diese Zeile nur zum testen
    ; waagerecht
    $w_Index = _ArraySearch($avArray, $v_w, 0, 0, 0, 1)
    ;~ ConsoleWrite("$w_Index: " & $w_Index & @CRLF) ; diese Zeile nur zum testen
    ;MsgBox(0,"Array-Zahlen","Array-Zahlen: " & $s_Index & " - " & $w_Index & @CRLF & "Mathe Zahlen: " & $s_Index +1 & " - " & $w_Index +1) ; diese Zeile nur zum testen

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

    ;MsgBox(0,"Schnittmenge", $avArray[$s_Index][$w_Index]) ; diese Zeile nur zum testen
    FileOpen("codiert.txt",1)
    sleep(50)
    FileWrite("codiert.txt", $avArray[$s_Index][$w_Index])
    sleep(50)
    FileClose("codiert.txt")
    sleep(50)
    Next
    Exit

    [/autoit]


    Bin alledings gerad an einem PC ohne AutoIt, kanns nicht testen :S

  • Shutdown

    Hier mal deine UpDowns

    Spoiler anzeigen
    [autoit]

    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>

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

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 172, 40, 193, 125)
    $Input1 = GUICtrlCreateInput("", 8, 8, 57, 21, BitOR($ES_AUTOHSCROLL,$ES_NUMBER))
    GUICtrlCreateUpdown (-1,0x20)
    GUICtrlSetLimit (-1,24,0)
    $Input2 = GUICtrlCreateInput("", 86, 8, 57, 21, BitOR($ES_AUTOHSCROLL,$ES_NUMBER))
    GUICtrlCreateUpdown (-1,0x20)
    GUICtrlSetLimit (-1,60,0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    EndSwitch
    WEnd

    [/autoit]

  • EuroEditor 3.1.0 Beta-Version

    @mazo09
    Oh ich glaube SiroCool!
    Das mit dem Setup sagt ja schon einniges aus! Und ich habe per ICQ viel mit SiroCool zu tun, wir haben auch ein Projekt zusammen gemacht und ich muss sagen er ist sehr nett und hatt mich (jedenfalls weiß ich davon nichts) angelogen oder schwachsinn Gesagt. War immer Hilfsbereit!

    Und dich kenn ich ja auch schon gut, hatte dich ja auch eine Zeit im ICQ (jetzt stehts du auf Igno) und hast da ja schon zimlichen schwachsinn geschreiben. Meinstest ja ich würde mich für was besonderes halten (eigentlich ist ja jeder etwas besonderes) nur weil ich dir nicht sofort geholfen habe oder dir nicht alles Gescriptet habe, sondern dir nur Stichpunkte gegeben habe und auf die Hilfe verwiesen habe! :S:thumbdown:

    Und du hast oft genug gefragt "Kannst du mir das mal gerad machen" und sowas will mal was werden :|
    Und dann auch noch den Code (wo warscheinlich eh 3/4 von kopiert sind, ohne kommentar wer es gemacht hat) nicht veröffentlichen :S