Beiträge von Andy

  • arbeiten mit Ini-Dateien

    Hallo,
    da du deine bisherigen Postings in diesem Thread alle gelöscht hast, wäre es ggf sinnvoll, dein Script zu posten und eine Problembeschreibung zu erstellen.
    *GlaskugelmodusON*.....ich seh nix......*GlaskugelmodusOFF*
    ciao
    andy

  • Tagesschau-Player - Immer auf dem Laufenden

    Hmmm, das vermute ich nicht, denn seltsamerweise werden die direkt im Browser auf der "Tagesschau"-Seite laufenden Streams alle mit Ton abgespielt (Flash sowieso).
    Nur wenn ich dort auf "externen Player" klicke und den Mediaplayer auswähle, dann läuft im Browserfenster das Video incl. Ton, und im Mediaplayer nur Video ohne Ton...
    *EDIT*
    Wenn ich die url im script an einige eigene Videodateien anpasse, dann werden alle Kombinationen von Bild(ja/nein) und Ton(ja/nein) abgespielt^^
    Alle diese eigenen Videodateien laufen auf div. Playern ohne Probleme.....

  • In habbo normale msn Emotionen anzeigen?

    Hallo,
    ja das ist ggf. möglich. Allerdings würde ich das "Schreiben" von Smileys auf eine nicht in diesem Programm benutzte Tastenkombination (z.B. ALT+Y) legen.
    Wobei sich jetzt natürlich die Frage stellt, ob ALT+Y schneller ist wie ^+^ für den ^^-Smilie.
    Kann man in diesem Chat überhaupt grafische Smilies anzeigen?

    Spoiler anzeigen
    [autoit]

    ;bei CTRL+T wird ein :)-Smilie ins aktuelle Fenster geschrieben
    HotKeySet("^t", "_smilie")

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

    While True
    Sleep(1)
    WEnd

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

    Func _smilie()
    Send(":)", 1)
    Sleep(100)
    EndFunc ;==>_smilie

    [/autoit]

  • Pakete abfangen & auswerten

    Hallo,

    feine Idee, das mit dem vorlesen^^

    Allerdings habe ich noch einige Vorschläge:
    Wenn du die Builds.ini so

    Spoiler anzeigen

    [StealthAssassinRikimaru]
    item1=bos
    item2=wraith
    item3=pt
    item4=diffu
    item5=manta
    item6=bfly

    [SlithereenGuardSlardar]
    item1=bos
    item2=bracer
    item3=pt
    item4=hyper
    item5=assault
    item6=satanic
    item7=buri


    abspeicherst hast du die heros.txt gespart, und dann dieses

    Spoiler anzeigen
    [autoit]

    #include <Misc.au3>
    #include <File.au3>
    #include <array.au3>

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

    $bst = ""
    $hero = ""
    $count = 0
    Dim $herolist
    $herolist=IniReadsectionnames("builds.ini")

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

    While 1
    $key = _Taste()
    If $key <> "" Then ;buchstabe a-z
    $hero = $hero & $key
    EndIf
    If _IsPressed ("08") Then ;backspace
    While _IsPressed ("08")
    $pressed= 1
    WEnd
    $hero = StringTrimRight ($hero, 1)
    EndIf

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

    If _IsPressed("0D") Then ;enter
    ;MsgBox(0, $hero, "ENTER")
    $num = _ArraySearch($herolist, $hero, 0, UBound($herolist), 0, 1)
    If $num<>-1 then
    ;MsgBox(0, "herolist", $herolist[$num])
    _held($herolist[$num])
    endif
    $hero=""
    EndIf
    WEnd

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

    Func _Taste()
    $pressed = 0
    For $buchstabe = 65 To 91
    If _IsPressed(Hex($buchstabe)) Then
    While _IsPressed (Hex($buchstabe))
    $pressed= 1
    WEnd
    ExitLoop
    EndIf
    Next
    If $pressed = 1 Then
    Return Chr($buchstabe)
    Else
    Return ""
    EndIf
    EndFunc ;==>_Taste

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

    Func _held($kaska)
    Do
    $count = $count + 1
    $read = IniRead("builds.ini", $kaska, "item" & $count, "fertig")
    $endcheck = IniRead("builds.ini", $kaska, "item" & $count + 1, "fertig")
    If $endcheck = "fertig" Then
    _sound($read, 0)
    Else
    _sound($read, 1)
    EndIf
    Until $read = "fertig"
    $read = ""
    $count = 0
    EndFunc ;==>_held

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

    Func _sound($sound, $pause)
    SoundPlay("sounds\" & $sound & ".mp3", $pause)
    EndFunc ;==>_sound

    [/autoit]

    Script nutzt, funktioniert es auch.

    Andy

  • Hex umdrehen

    Post von mir war natürlich Müll!
    Richtig gedacht, Müll geschrieben^^

    so gehts....

    [autoit]

    $test=0xABCDEF

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

    msgbox(0,"",(StringToBinary(binarytostring($test))))

    [/autoit]

  • Hex umdrehen

    Hallo,

    Zitat

    $info = 7B 00 00 00


    Entweder ist deine $info = "7B 00 00 00" dann ist das ein String , dann mit Stringfunktion _stringreverse() umsortieren
    oder $info = 0x7B 00 00 00 so als hexzahl, dann mit _hextostring() in String umwandeln und umsortieren

    Andy

  • Karo einteilung

    Zitat

    Andy: Bei Dir fehlt die WM_PAINT-Funktion. Sonst wird die Graphic nicht neu gezeichnet, wenn das Fenster von einem anderen Fenster verdeckt und dann wieder sichtbar wird.


    *flüstermodeON*
    psssstttt...das kommt doch erst im nächsten Semester dran :rolleyes:
    *flüstermodeOFF*

  • So ziemlich mein erstes Programm

    Hallo Commander21,

    Zitat

    Da fällt mir ein, ich kapier das mit den Arraysimmer noch net, bin ich nu einfach zu blöd oder woran liegt das?


    Nein, blöd bist du sicher nicht. Wahrscheinlich hats Dir nur keiner verständlich erklärt.
    Ich versuche es mal^^
    Stell dir ein leeres Blatt Tabellenkalkulation vor.
    Eine einzelne "Zeile" entspricht dem eindimensionalen Array mit dem Inhalt [1],[2],[3],[4] usw.
    Das Tabellenblatt entspricht dem 2-dimensionalen Array. Die einzelnen "Felder" sprichst du an mit [A][1] oder [A][3] oder[C][5]....
    Hast du mehrere [T]abellenblätter, dann bist du in der 3. Dimension. [T1][A][3] oder[T4][C][5]....
    Zusätzlich hast du mehrere [D]ateien mit [T]abellenblättern. 4. Dimension [D2][T1][A][3] oder [D6][T4][C][5]....
    Auf deinem Rechner sind viele [O]rdner mit [D]ateien und [T]abellenblättern [O2][D2][T1][A][3] oder[O7][D6][T4][C][5]
    Dann hast du noch verschiedene [F]estplatten, [N]etzwerkrechner usw....

    Um jetzt auf ein einzelnes Feld zuzugreifen musst du nur die entsprechende "Adresse" wissen.
    [Array´s] sind garnicht schwer^^

    ciao
    Andy

  • Karo einteilung

    @ oscar
    Hilfe bemüht und for/to Schleife "ergänzt". Deins ist ein bissl "eleganter", aber meins dafür "wie von Hand gemalt"^^

    Spoiler anzeigen
    [autoit]

    #include <GuiConstantsEx.au3>
    #include <GDIPlus.au3>

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

    Opt('MustDeclareVars', 1)

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

    _Main()

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

    Func _Main()
    Local $hGUI, $hWnd, $hGraphic, $hPen

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

    ; Create GUI
    $hGUI = GUICreate("GDI+", 400, 400)
    $hWnd = WinGetHandle("GDI+")
    GUISetState()

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

    ; Draw line
    _GDIPlus_Startup ()
    $hGraphic = _GDIPlus_GraphicsCreateFromHWND ($hWnd)
    $hPen = _GDIPlus_PenCreate ()
    for $x=0 to 400 Step 20
    _GDIPlus_GraphicsDrawLine ($hGraphic, $x, 0, $x, 400, $hPen)
    Next
    For $y=0 to 400 Step 20
    _GDIPlus_GraphicsDrawLine ($hGraphic, 0, $y, 400, $y, $hPen)
    next
    ; Loop until user exits
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE

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

    ; Clean up resources
    _GDIPlus_PenDispose ($hPen)
    _GDIPlus_GraphicsDispose ($hGraphic)
    _GDIPlus_Shutdown ()

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

    EndFunc ;==>_Main

    [/autoit]

  • AutoIt-Programme aufspüren

    Hi MathiasG,

    guck dir mal das Projekt AutoItX an, viel Spass beim Erkennen sämtlicher mit irgendwelchen .Net-Sprachen erstellten "AutoIt-Scripten".
    Wenn dein Virenscanner schon beim Download(!) nicht sämtliche "zwielichtigen" Dateien scannt, dann hast du allerdings definitiv ein Problem! Auf welchem Rechner lässt sich denn heutzutage eine Datei speichern ohne vorher gescannt worden zu sein?
    Selbst ein verseuchter Anhang einer Mail landet doch i.d.R. nicht auf der Platte sondern ungefragt im >NUL-Device
    Und selbst wenn es "nur" um compilierte AutoIt-Scripte gehen sollte....No Sourcecode, No Go!
    Wahrscheinlich bin ich selbst auch paranoid, was dieses Thema angeht, aber ich werde alles erforderliche dafür tun um meine Existenz zu schützen!
    Daß ein gewisses Restrisiko bleibt, liegt in der Natur der Sache. Allerdings hat AutoIt damit m.E. nichts zu tun.

    ciao
    Andy