Beiträge von Skilkor

  • Info Tool

    Hallo liebe AutoIt Com
    Mal wieder hab ich was kleines gebastelt, ob es nützlich ist, naja, für den einen vll schon, für den anderen wohl eher nicht :whistling:

    Was dass Info Toll kann / macht:

    • (Group: Maus / Cursor) - Gibt die x-y Pos des Cursors aus.
    • (Group: Cliboard) - Zeigt was in deiner Zwischenablage ist.
    • Clipboard Gui: Inerhalb dieser Gui kann man den inhalt der Zwischenablage Editieren (Nicht vergessen Ctrl+v oder "Copy to Clipboard" zu machen) und man kann url's zu Verlinkten Namen für die SB bereitstellen
    • Die Hardware Group:
    Hardware Group Elemente
    3a: Physikalischer RAM


    3a1: Eine Progressbar welche die Physikalische RAM angibt die in gebrauch ist.
    3a2: Ein Label welches die RAM die gerade in gebrauch ist und die Gesamte Physische RAM angibt. (in GB)

    3b: Auslagerungs Datei


    3b1: Eine Progressbar welche die Auslagerungs Datei angibt die in gebrauch ist.
    3b2: Ein Label welches die Auslagerungs Datei die in gebrauch ist und die Gesamt Grösse der Auslagerungs Datei angibt. (in GB)

    3c: Virtueller RAM


    3c1: Eine Prograssbar welche die Virtuelle RAM angibt die in gebrauch ist.
    3c2: Ein Label welches die Vituelle RAM die in gebrauch ist und die Gesamte Virtuelle RAM angibt. (in GB)

    3d: CPU Auslastung (Gesamt)


    3d1: Eine Progressbar welche die Gesamte CPU auslasstung wiedergibt
    3d2: Ein Label welches die Gesamt CPU auslastung in % angibt.

    3e: Die auslastung der einzelnen CPU Kerne


    3e1: Progressbar die die Auslastung der einzelnen CPU Kern auslastung wiedergibt.
    3e2: Label mit % angaben der einzelnen CPU Kern auslastung in %.
    (Dies ist aufgrund der auslessung NICHT genau zu 100% richtig,abweichung etwa bei 2-3% (Bei Dual-Core))


    *Note*
    Ich kann nicht zu 100% Garantieren dass die CPU Kern auflistung (Core0 bis Core3 (Quad-Core)) richtig erfolgt. Da ich selbst nur Besitzer eines Dual-Core's bin, deswegen hoffe ich auf Rückmeldung (Mit evt Screen) ob bei Tri-Core / Quad-Core / Hexa-Core & Octa-Core die ausgabe Richtig erfolg, sprich, ob alle Kerne angegeben werden und auch "Funktionieren".

    Some Screen Maybe?


    [Blockierte Grafik: https://dl.dropbox.com/u/49201990/Aut…Info%20Tool.jpg]


    Und hier der Code, nichts besonderes :3

    Info Tool.au3
    [autoit]


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

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

    AutoIt Version: 3.3.8.1
    Author: Skilkor (Pascal Vollenweider)

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

    Script Function:
    Einfaches Info Tool :3

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

    #ce ----------------------------------------------------------------------------
    #region ### #include ###
    #include <GUIConstantsEx.au3>
    #include <Constants.au3>
    #include <WindowsConstants.au3>
    #include <StaticConstants.au3>
    #include <Array.au3>
    #include <Misc.au3>
    #include 'usage.au3' ;Danke an Bitboy für die 'usage.au3'UDF
    #include '_GetGlobalResolution.au3' ;Dank an Oscar
    #endregion ### #include ###
    ;==========
    #region ### Global ###
    Global $hGui, $eGui
    ;~
    Global $WGP = WinGetPos($hGui)
    ;~
    Global $dll = DllOpen("user32.dll")
    ;~
    Global $aRes = _GetGlobalResolution()
    Global $CPU = _GetCPUUsage()
    Global $RAM = MemGetStats()
    ;~
    Global $CPU[3] = [2, 1, 1]
    ;~
    Global $width = 400
    Global $heigth = 250 + $CPU[0] * 20
    Global $left = @DesktopWidth / 2 - 215
    Global $top = @DesktopHeight / 2 - 120
    ;~
    Global $Hware_Group_heigth = 105 + $CPU[0] * 20
    ;~
    Global $Cleft = 15
    Global $Ctop[8] = [235, 255, 275, 295, 315, 335, 355, 375]
    Global $Cwidth = 215
    Global $Cheight = 20
    ;~
    Global $CoreProgress[8] = ['1', '2', '3', '4', '5', '6', '7', '8']
    Global $CoreProz[8] = ['1', '2', '3', '4', '5', '6', '7', '8']
    Global $CPleft = 135
    Global $CPwidth = 140
    ;~
    Global $CLleft = 285
    Global $CLwidth = 100
    ;~
    Global $eGui_Style = BitOR($WS_SYSMENU, $WS_POPUP, $WS_POPUPWINDOW, $WS_BORDER)
    Global $eGui_ExStyle = $WS_EX_WINDOWEDGE
    Global $Label_Style = $SS_CENTER
    Global $Label_ExStyle = $SS_BLACKFRAME
    ;~
    Global $AdLibFunk[8] = ['_ClipGet', '_Cursor', '_WinPos', '_While', '_Core', '_MemUsedRead','_SB','_Pressed']
    Global $Pressed[2] = ['7A','7B']
    Global $aFunktions[2] = ['_Free', '_Trap']
    #endregion ### Global ###
    ;==========
    #region ### hGui ###
    $hGui = GUICreate('Info Tool', $width, $heigth, $left, $top)
    #region ### Maus / Cursor Group ###
    GUICtrlCreateGroup('Maus / Cursor', 5, 5, 170, 125)
    $x = GUICtrlCreateLabel('0', 15, 20, 150, 20, $Label_Style, $Label_ExStyle)
    $y = GUICtrlCreateLabel('0', 15, 40, 150, 20, $Label_Style, $Label_ExStyle)
    GUICtrlCreateLabel('Cursor Trapen = F12', 15, 80, 150, 20, $Label_Style, $Label_ExStyle)
    GUICtrlCreateLabel('Cursor Loslassen = F11', 15, 100, 150, 20, $Label_Style, $Label_ExStyle)
    #endregion ### Maus / Cursor Group ###
    ;~
    #region ### Clibboard Group ###
    GUICtrlCreateGroup('Clipboard', 175, 5, 220, 125)
    $Clipboard = GUICtrlCreateLabel('', 185, 20, 200, 80, '', $Label_ExStyle)
    $Show_All_Clipbiard = GUICtrlCreateLabel('Zeige ganzes Clipboard', 185, 100, 200, 20, $Label_Style, $Label_ExStyle)
    #endregion ### Clibboard Group ###
    ;~
    #region ### Hardware Group ###
    GUICtrlCreateGroup('Hardware', 5, 140, 390, $Hware_Group_heigth)
    GUICtrlCreateLabel('Physikalischer RAM', 15, 155, 120, 20, $Label_Style, $Label_ExStyle)
    GUICtrlCreateLabel('Auslagerungs Datei', 15, 175, 120, 20, $Label_Style, $Label_ExStyle)
    GUICtrlCreateLabel('Virtueler RAM', 15, 195, 120, 20, $Label_Style, $Label_ExStyle)
    GUICtrlCreateLabel('CPU Auslastung', 15, 215, 120, 20, $Label_Style, $Label_ExStyle)
    ;~
    $UsePhysRAMProgress = GUICtrlCreateProgress(135, 155, 150, 20)
    $UsePhysRAM = GUICtrlCreateLabel('', 285, 155, 100, 20, $Label_Style, $Label_ExStyle)
    ;~
    $Used_PageFile_Progress = GUICtrlCreateProgress(135, 175, 150, 20)
    $Used_PageFile = GUICtrlCreateLabel('', 285, 175, 100, 20, $Label_Style, $Label_ExStyle)
    ;~
    $Used_Virtual_RAM_Progress = GUICtrlCreateProgress(135, 195, 150, 20)
    $Used_Virtual_RAM = GUICtrlCreateLabel('', 285, 195, 100, 20, $Label_Style, $Label_ExStyle)
    ;~
    $CPU_Ges_Progress = GUICtrlCreateProgress(135, 215, 150, 20)
    $CPU_Ges = GUICtrlCreateLabel('', 285, 215, 100, 20, $Label_Style, $Label_ExStyle)
    ;~
    For $i = 0 To $CPU[0] - 1
    GUICtrlCreateLabel('Core ' & $i, 15, $Ctop[$i], 120, 20, $Label_Style, $Label_ExStyle)
    $CoreProgress[$i] = GUICtrlCreateProgress(135, $Ctop[$i], 150, 20)
    $CoreProz[$i] = GUICtrlCreateLabel('', 285, $Ctop[$i], 100, 20, $Label_Style, $Label_ExStyle)
    Next
    ;~
    #endregion ### Hardware Group ###
    ;~
    #region ### eGui ###
    $eGui = GUICreate('', 400, 255, $left, $top - 4, $eGui_Style, $eGui_ExStyle)
    $Edit = GUICtrlCreateEdit(ClipGet(), 0, 0, 400, 200)
    ;~
    GUICtrlCreateGroup('', 10, 205, 375, 45)
    $Back = GUICtrlCreateLabel('Close', 20, 220, 100, 20, $Label_Style, $Label_ExStyle)
    $Copy_Cliboard = GUICtrlCreateLabel('Copy to Cliboard', 145, 220, 100, 20, $Label_Style, $Label_ExStyle)
    $SB_Link = GUICtrlCreateLabel('SB URL Kürzung', 265, 220, 100, 20, $SS_CENTER, $SS_BLACKFRAME)
    #endregion ### eGui ###
    ;~
    #endregion ### hGui ###
    GUISetState(@SW_HIDE, $eGui)
    GUISetState(@SW_SHOW, $hGui)
    #endregion ### #include ###
    For $i = 0 To UBound($AdLibFunk) - 1
    AdlibRegister($AdLibFunk[$i])
    Next
    While 1
    $nMsg = GUIGetMsg($hGui)
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    DllClose($dll)
    Exit
    Case $Back
    GUISetState(@SW_HIDE, $eGui)
    Case $Show_All_Clipbiard
    GUISetState(@SW_SHOW, $eGui)
    Case $Copy_Cliboard
    ClipPut(GUICtrlRead($Edit))
    Case $SB_Link
    _SB_Link()
    EndSwitch
    WEnd

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

    #region ### _While() ###
    Func _While()
    While 1
    $WGP = WinGetPos($hGui)
    $RAM = MemGetStats()
    $CPU = _GetCPUUsage()
    ExitLoop
    WEnd
    EndFunc ;==>_While
    #endregion ### _While() ###
    ;==========
    #region ### _Pressed() ###
    Func _Pressed()
    For $i = 0 To 1
    If BitAND(_IsPressed($Pressed[$i], $dll), $GUI_CHECKED) Then Call($aFunktions[$i])
    Next
    EndFunc ;==>_Pressed
    #endregion ### _Pressed() ###
    ;==========
    #region ### _Trap() ###
    Func _Trap()
    _MouseTrap(MouseGetPos(0), MouseGetPos(1), MouseGetPos(0) + 1, MouseGetPos(1) + 1) ;Fange Maus auf den Coord X & Y auf $Label_x / $Label_y und $Label_x +1(Pixel) / $Label_y +1(Pixel)
    EndFunc ;==>_Trap
    #endregion ### _Trap() ###
    ;==========
    #region ### _Free() ###
    Func _Free()
    _MouseTrap()
    MouseClick('Left')
    EndFunc ;==>_Free
    #endregion ### _Free() ###
    ;==========
    #region ### _Cursor() ###
    Func _Cursor()
    GUICtrlSetData($x, 'Cursor Pos x: ' & MouseGetPos(0) & ' (Breite)') ;Gibt alle 0,05Secunden die X Possition vom Curser auf $x über
    GUICtrlSetData($y, 'Cursor Pos y: ' & MouseGetPos(1) & ' (Höhe)') ;Gibt alle 0,05Secunden die Y Possition vom Curser auf $y über
    EndFunc ;==>_Cursor
    #endregion ### _Cursor() ###
    ;==========
    #region ### _WinPos() ### ;Diese Function Lagt leider einwenig wenn sie nach Links von der $hGui Possitioniert wird...Ja Child hätts genauso getan, aber Child und ich sind keine guten Freunde :(
    Func _WinPos()
    Local $p = WinGetPos($hGui) ;Ermitelt die x-y Possition von $hGui
    If $p[1] <> $WGP[0] Then ;Wenn zwischen der Localen Pos Y von $hGui und der Neuen Pos Y von $hGui ein Unterschied besteht dann
    WinMove($eGui, '', $WGP[0] + 412, $WGP[1] - 4) ;erschiebt $eGui nach Rechts von $hGui
    EndIf
    If $p[0] >= $aRes[2] - 800 And $p[0] <= $aRes[2] Then ;Wenn zuwenig Pixel Zwischen $hGui und der Definitiven Desktop Breite besteht
    WinMove($eGui, '', $WGP[0] - 412, $WGP[1] - 4) ;Verschiebt $eGui nach Links von $hGui
    EndIf
    EndFunc ;==>_WinPos
    #endregion ### _WinPos() ###
    ;==========
    #region ### _ClipGet() ###
    Func _ClipGet()
    Local $Get = ClipGet() ;gibt den Inhalt der Zwischenablage wieder
    If $Get <> GUICtrlRead($Clipboard) Then ;Wenn zwischen der Zwischenablage und dem Label $Clipboard ein unterschied besteht, dann
    GUICtrlSetData($Clipboard, $Get) ;Ersetze Alten inhalt des Label's $Clipboard mit Neuem Inhalt der Zwischenablage
    GUICtrlSetData($Edit, $Get)
    EndIf
    EndFunc ;==>_ClipGet
    #endregion ### _ClipGet() ###
    ;==========
    #region ### _SB_Link() ###
    Func _SB_Link()
    Local $url = ClipGet()
    Local $l_String = StringLen($url)
    Local $s_String = StringTrimRight($url,$l_String-7)
    If $s_String = 'http://' Or $s_String = 'https:/' Then
    $name = InputBox('Name wählen', 'Wählen sie einen Namen', 'Hier', ' M10', 100, 125)
    If @error Then
    $msg = MsgBox(4 + 48 ,'InputBox Error','InputBox ist Leer' & @CRLF & 'Neuer Versuch?')
    If $msg = 6 Then
    _SB_Link()
    Else
    Return
    EndIf
    EndIf
    ClipPut("" & $name & "")
    Else
    MsgBox(48, 'ClipGet', 'Enthält keine URL')
    EndIf
    EndFunc
    #endregion ### _SB_Link() ###
    ;==========
    #region ### _Core() ###
    Func _Core()
    If $CPU[0] = 1 Then
    GUICtrlSetData($CoreProgress[0], $CPU[1])
    GUICtrlSetData($CoreProz[0], $CPU[1] & ' %')
    ;~
    GUICtrlSetData($CPU_Ges_Progress, $CPU[1])
    ElseIf $CPU[0] = 2 Then
    $Dual_Core = Floor($CPU[1] + $CPU[2] / 2)
    ;~
    GUICtrlSetData($CoreProgress[0], $CPU[1])
    GUICtrlSetData($CoreProz[0], $CPU[1] & ' %')
    GUICtrlSetData($CoreProgress[1], $CPU[2])
    GUICtrlSetData($CoreProz[1], $CPU[2] & ' %')
    ;~
    GUICtrlSetData($CPU_Ges_Progress, $Dual_Core)
    GUICtrlSetData($CPU_Ges, $Dual_Core & ' %')
    ElseIf $CPU[0] = 3 Then
    $Tri_Core = Floor($CPU[1] + $CPU[2] + $CPU[3] / 3)
    ;~
    GUICtrlSetData($CoreProgress[0], $CPU[1])
    GUICtrlSetData($CoreProz[0], $CPU[1] & ' %')
    GUICtrlSetData($CoreProgress[1], $CPU[2])
    GUICtrlSetData($CoreProz[1], $CPU[2] & ' %')
    ;~
    GUICtrlSetData($CoreProgress[2], $CPU[3])
    GUICtrlSetData($CoreProz[2], $CPU[3] & ' %')
    ;~
    GUICtrlSetData($CPU_Ges_Progress, $Tri_Core)
    GUICtrlSetData($CPU_Ges, $Tri_Core & ' %')
    ElseIf $CPU[0] = 4 Then
    $Quad_Core = Floor($CPU[1] + $CPU[2] + $CPU[3] + $CPU[4] / 4)
    ;~
    GUICtrlSetData($CoreProgress[0], $CPU[1])
    GUICtrlSetData($CoreProz[0], $CPU[1] & ' %')
    GUICtrlSetData($CoreProgress[1], $CPU[2])
    GUICtrlSetData($CoreProz[1], $CPU[2] & ' %')
    ;~
    GUICtrlSetData($CoreProgress[2], $CPU[3])
    GUICtrlSetData($CoreProz[2], $CPU[3] & ' %')
    GUICtrlSetData($CoreProgress[3], $CPU[4])
    GUICtrlSetData($CoreProz[3], $CPU[4] & ' %')
    ;~
    GUICtrlSetData($CPU_Ges_Progress, $Quad_Core)
    GUICtrlSetData($CPU_Ges, $Quad_Core & ' %')
    ElseIf $CPU[0] = 6 Then
    $Hexa_Core = Floor($CPU[1] + $CPU[2] + $CPU[3] + $CPU[4] + $CPU[5] + $CPU[6] / 6)
    ;~
    GUICtrlSetData($CoreProgress[0], $CPU[1])
    GUICtrlSetData($CoreProz[0], $CPU[1] & ' %')
    GUICtrlSetData($CoreProgress[1], $CPU[2])
    GUICtrlSetData($CoreProz[1], $CPU[2] & ' %')
    ;~
    GUICtrlSetData($CoreProgress[2], $CPU[3])
    GUICtrlSetData($CoreProz[2], $CPU[3] & ' %')
    GUICtrlSetData($CoreProgress[3], $CPU[4])
    GUICtrlSetData($CoreProz[3], $CPU[4] & ' %')
    ;~
    GUICtrlSetData($CoreProgress[4], $CPU[5])
    GUICtrlSetData($CoreProz[4], $CPU[5] & ' %')
    GUICtrlSetData($CoreProgress[5], $CPU[6])
    GUICtrlSetData($CoreProz[5], $CPU[6] & ' %')
    ;~
    GUICtrlSetData($CPU_Ges_Progress, $Hexa_Core)
    GUICtrlSetData($CPU_Ges, $Hexa_Core & ' %')
    ElseIf $CPU[0] = 8 Then
    $Octa_Core = Floor($CPU[1] + $CPU[2] + $CPU[3] + $CPU[4] + $CPU[5] + $CPU[6] + $CPU[7] + $CPU[8] / 8)
    ;~
    GUICtrlSetData($CoreProgress[0], $CPU[1])
    GUICtrlSetData($CoreProz[0], $CPU[1] & ' %')
    GUICtrlSetData($CoreProgress[1], $CPU[2])
    GUICtrlSetData($CoreProz[1], $CPU[2] & ' %')
    ;~
    GUICtrlSetData($CoreProgress[2], $CPU[3])
    GUICtrlSetData($CoreProz[2], $CPU[3] & ' %')
    GUICtrlSetData($CoreProgress[3], $CPU[4])
    GUICtrlSetData($CoreProz[3], $CPU[4] & ' %')
    ;~
    GUICtrlSetData($CoreProgress[4], $CPU[5])
    GUICtrlSetData($CoreProz[4], $CPU[5] & ' %')
    GUICtrlSetData($CoreProgress[5], $CPU[6])
    GUICtrlSetData($CoreProz[5], $CPU[6] & ' %')
    ;~
    GUICtrlSetData($CoreProgress[6], $CPU[7])
    GUICtrlSetData($CoreProz[6], $CPU[7] & ' %')
    GUICtrlSetData($CoreProgress[7], $CPU[8])
    GUICtrlSetData($CoreProz[7], $CPU[8] & ' %')
    ;~
    GUICtrlSetData($CPU_Ges_Progress, $Octa_Core)
    GUICtrlSetData($CPU_Ges, $Octa_Core & ' %')
    EndIf
    ; Sihe "( http://de.wikipedia.org/wiki/Mehrkernprozessor )"
    EndFunc ;==>_Core
    #endregion ### _Core() ###
    ;==========
    #region ### _MemUsedRead ###
    Func _MemUsedRead()
    Local $Bit = (1024 ^ 2)
    #region ### Phys RAM ###
    Local $Phys_RAM = Ceiling(StringMid($RAM[1] / $Bit, 1, 3))
    Local $Phys_RAM_Used = StringMid($RAM[1] / $Bit - $RAM[2] / $Bit, 1, 3)
    ;~
    GUICtrlSetData($UsePhysRAM, $Phys_RAM_Used & ' GB / ' & $Phys_RAM & ' GB')
    GUICtrlSetData($UsePhysRAMProgress, $RAM[0])
    #endregion ### Phys RAM ###
    ;==========
    #region ### Auslagerung ###
    Local $PageFile = Ceiling(StringMid($RAM[3] / $Bit, 1, 3))
    Local $PageFile_Used = StringMid($RAM[3] / $Bit - $RAM[4] / $Bit, 1, 3)
    ;~
    GUICtrlSetData($Used_PageFile, $PageFile_Used & ' GB / ' & $PageFile & ' GB')
    GUICtrlSetData($Used_PageFile_Progress, $PageFile_Used * 10)
    #endregion ### Auslagerung ###
    ;==========
    #region ### Virtueller RAM ###
    Local $Virtual_Memory = Ceiling(StringMid($RAM[5] / $Bit, 1, 3))
    Local $Virtual_Memory_Used = StringMid($RAM[5] / $Bit - $RAM[6] / $Bit, 1, 3)
    ;~
    GUICtrlSetData($Used_Virtual_RAM, $Virtual_Memory_Used & ' GB / ' & $Virtual_Memory & ' GB')
    GUICtrlSetData($Used_Virtual_RAM_Progress, $Virtual_Memory_Used * 10)
    #endregion ### Virtueller RAM ###
    EndFunc ;==>_MemUsedRead
    #endregion ### _MemUsedRead ###

    [/autoit]

    P.s.
    Wenn IHR noch Ideen hab, was evt noch von Nutzen ist / sei, sagt mir Bescheid, und ich Versuch es Umzusetzen / Einzubauen :D

  • Variablendeklaration

    Wenn du das Problem nur allgemein mit den MsgBox'en hast, geb ich dir den Tip, die MsgBox Direkt unter die Variable zu setzen,welche du in der MsgBox verwendest.
    Es bringt nicht viel wen du z.b. auf zeile 1 ne msg mit ner variable hast, welche sich auf zeile....50? befindet? Dann ises ganz klar dass SciTe dir sagt, das auf zeile 1 die Variable $xY nicht Deklariert ist.....
    Das selbe gild auch für _ArrayDisplay().

    Greez

  • Problem beim Afragen von For erstellten Variablen / ID's / Elementen

    heiho

    Ich bin ma wieder an nem "kleinen" projekt dran :D is bis jetz auch zimlich cool geworden.
    Doch stehe ich vor nem Problem :S
    Ich erstelle via

    [autoit]


    Global $Picleft[31] = [15,35,55,75,95,115,135,155,175,15,35,55,75,95,115,135,155,175,15,35,55,75,95,115,135,155,175,15,35,55,75] ;Ich weiss geht auch anderst :D
    Global $Pictop[31] = [20,20,20,20,20,20,20,20,20,40,40,40,40,40,40,40,40,40,60,60,60,60,60,60,60,60,60,80,80,80,80] ;Dass geht auch anderst :D
    Global $pic[31] = ['1','23','4','5','6','7','8','9','10','11','12','13','14','15','16','17','18','19','20','21','22','23','24','25','26','27','28','29','30','31']
    ;~ Global $PicName[31] = [Die 31 namen der smileys]
    For $i = 0 To 31 ;(Original ist es mit UBound($var)-1 welches die grösse 31 hat)
    $Pic[$i] = GuiCtrlCreatePic(@ScriptDir & '\Smileys\' & $Picname[$i],$Picleft[$i],$Pictop[$i],20,20)
    Next

    [/autoit]

    Nun möchte ich nicht

    [autoit]


    While 1
    $nMsg = GUIGetMsg($hGui)
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case 31
    _Pic('31')
    Case 32
    _Pic('32')
    ;usw bis 62
    EndSwitch
    WEnd

    [/autoit]


    machen...
    Da meine GUI vorher noch Speziefisch abfragt wieviele CPU Core's vorhanden sind und dementsprechend auch neue ID's hinzukommen von 1 - 8.... wass dazu führen würde, dass sämmtliche ID's sich wieder verschieben und das erste Smiley nichtmehr die ID 31 sondern evt 36 o. 39 hat.

    Func _Pic()
    [autoit]


    Func _Pic($nr)
    ;$nr wird zuvor mit ner For durchgegangen um $nr vor ClipPut($nr) neu zu Deklarieren, "Lediglich die passenden syntaxe zu den Smiley's"
    ClipGet($nr)
    EndFunc

    [/autoit]

    bei Checkboxen weiss ich Dank Oscar seit gut nehm Jahr wie man das anstellen könnte

    Oscar bsp
    [autoit]


    For $i = 0 To 4
    If BitAND(GUICtrlRead($ahCheckbox[$i]), $GUI_CHECKED) Then Call($aFunktions[$i])
    Next

    [/autoit]


    Leider weiss ich nicht wie ich dass so umsetze wie ich mir das vorstelle :S
    Hoffe mir kann jmd Helfen :D


    #seit etwas nachsichtig, hab die Nacht durchgemacht, war etwas vertieft in das "Preojekt" ^^ und aufeinmal wars Morgen X(

    Greez

  • Problemlösung bei 2.GUIs und Maus

    Weill du die _MouseGetPos() nicht updatest.

    Spoiler anzeigen
    [autoit]


    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <Array.au3>
    #include <Misc.au3>

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

    #region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("NLT", 105, 116, 192, 133, $GUI_SS_DEFAULT_GUI, BitOR($WS_EX_TOPMOST, $WS_EX_WINDOWEDGE))
    $Label1 = GUICtrlCreateLabel("Nova Lüftungstool", 9, 8, 91, 17)
    $lblstatus = GUICtrlCreateLabel("Status: On", 18, 32, 73, 17)
    $Button1 = GUICtrlCreateButton("Tastenbelegung", 5, 72, 83, 17)
    $Button2 = GUICtrlCreateButton("Hilfe", 5, 96, 83, 17)
    $Label3 = GUICtrlCreateLabel("v.0.4", 40, 48, 28, 17)
    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###

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

    #region ### START Koda GUI section ### Form=
    $Form2 = GUICreate("Nova Lüftungstool Tastenbelegung", 540, 230, 666, 394, $GUI_SS_DEFAULT_GUI, BitOR($WS_EX_TOPMOST, $WS_EX_WINDOWEDGE))
    $Label1 = GUICtrlCreateLabel("Nova Lüftungstool", 152, 32, 133, 24)
    GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
    $Label2 = GUICtrlCreateLabel("Tastenbelegung", 160, 64, 103, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    $Label3 = GUICtrlCreateLabel("Eckig: Kanal=a; Bogen=s; Übergang=ü; Übergang eckig>rund=p; T-Stück=t; Hosenstück=h", 56, 104, 449, 17)
    $Label4 = GUICtrlCreateLabel("Rund: Rohr=w; Bogen=r; T-Stück=e; Übergang=u", 56, 144, 456, 17)
    $Label5 = GUICtrlCreateLabel("Konstruktionshilfe: Linie=l; K-Linie=k; Verbinder=v; Messen=m; Draggen=d; Drehen=y; Spiegeln=g", 56, 184, 463, 17)
    $Label6 = GUICtrlCreateLabel("Textmodus=q; Beenden=Einfg", 144, 200, 371, 17)
    GUISetState(@SW_HIDE)
    #endregion ### END Koda GUI section ###

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

    #region ### START Koda GUI section ### Form=
    $Form3 = GUICreate("Nova Lüftungstool Hilfe", 369, 146, 192, 114, $GUI_SS_DEFAULT_GUI, BitOR($WS_EX_TOPMOST, $WS_EX_WINDOWEDGE))
    $Label1 = GUICtrlCreateLabel("Nova Lüftungstool", 48, 16, 133, 24)
    GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
    $Label2 = GUICtrlCreateLabel("Hilfe", 48, 48, 31, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    $Label3 = GUICtrlCreateLabel("Programmierer E-Mail-Adresse: Daniel.Machner@t-online.de", 48, 80, 285, 17)
    $Label4 = GUICtrlCreateLabel("(c) by Daniel Machner", 48, 104, 108, 17)
    GUISetState(@SW_HIDE)
    #endregion ### END Koda GUI section ###

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

    WinSetTrans($Form1, "", 200)
    Global $bPause

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

    HotKeySet("q", "pause")
    HotKeySet("{INS}", "ende")
    _HotKeys(1)

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

    While 1
    $avMsg = GUIGetMsg(1)
    Switch $avMsg[0]
    Case $GUI_EVENT_CLOSE
    If $avMsg[1] = $Form1 Then
    Exit
    ElseIf $avMsg[1] = $Form2 Then
    GUISetState(@SW_HIDE, $Form3)
    GUISetState(@SW_HIDE, $Form2)
    GUISetState(@SW_SHOW, $Form1)
    ElseIf $avMsg[1] = $Form3 Then
    GUISetState(@SW_HIDE, $Form3)
    GUISetState(@SW_HIDE, $Form2)
    GUISetState(@SW_SHOW, $Form1)

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

    EndIf
    Case $Button1
    GUISetState(@SW_HIDE, $Form3)
    GUISetState(@SW_HIDE, $Form1)
    GUISetState(@SW_SHOW, $Form2)
    Case $Button2
    GUISetState(@SW_SHOW, $Form3)
    GUISetState(@SW_HIDE, $Form1)
    GUISetState(@SW_HIDE, $Form2)
    EndSwitch
    Global $Cursor_x = MouseGetPos(0)
    Global $Cursor_y = MouseGetPos(1)
    WEnd

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

    While 1
    Sleep(1000)
    WEnd

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

    ;/////////////////////////////////////////////////////////////////////////////////////////////////////////////////System

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

    Func _HotKeys($bState = False)
    If $bState Then
    HotKeySet("a", "kanal")
    HotKeySet("s", "bogen")
    HotKeySet("v", "verbinder")
    HotKeySet("w", "rohr")
    HotKeySet("ur", "urohr")
    HotKeySet("r", "rbogen")
    HotKeySet("l", "linie")
    HotKeySet("k", "klinie")
    HotKeySet("ü", "uegang")
    HotKeySet("e", "trund")
    HotKeySet("m", "messen")
    HotKeySet("t", "teckig")
    HotKeySet("p", "uegangeckigrund")

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

    HotKeySet("y", "drehen")
    HotKeySet("g", "spiegeln")
    HotKeySet("d", "draggen")

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

    Else
    HotKeySet("a")
    HotKeySet("s")
    HotKeySet("v")
    HotKeySet("w")
    HotKeySet("u")
    HotKeySet("r")
    HotKeySet("l")
    HotKeySet("k")
    HotKeySet("ü")
    HotKeySet("e")
    HotKeySet("m")
    HotKeySet("t")
    HotKeySet("p")

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

    HotKeySet("y")
    HotKeySet("g")
    HotKeySet("d")

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

    EndIf
    EndFunc ;==>_HotKeys

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

    Func pause()
    If Not $bPause Then
    _HotKeys()
    GUICtrlSetData($lblstatus, "Status: Off")
    Else
    _HotKeys(1)

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

    GUICtrlSetData($lblstatus, "Status: On")
    EndIf
    $bPause = Not $bPause
    EndFunc ;==>pause

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

    Func ende()
    Exit
    EndFunc ;==>ende

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

    ;/////////////////////////////////////////////////////////////////////////////////////////////////////////////////Kanal

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

    Func kanal()

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

    HotKeySet("a")
    HotKeySet("k")
    _MouseTrap($Cursor_x, $Cursor_y);, $pos[0] + 1, $pos[1] + 1)
    Send("!u")
    ;send ("r")
    ;send ("{right}")
    Send("k")
    Send("{ENTER}")
    Send("k")
    HotKeySet("a", "kanal")
    HotKeySet("k", "klinie")
    _MouseTrap()

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

    EndFunc ;==>kanal

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

    Func bogen()
    HotKeySet("k")
    _MouseTrap($Cursor_x, $Cursor_y);, $Cursor_x + 1, $Cursor_y + 1)
    Send("!u")
    Send("b")
    Send("b")
    Send("{ENTER}")
    Send("k")
    HotKeySet("k", "klinie")
    _MouseTrap()
    EndFunc ;==>bogen

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

    Func uegang()
    HotKeySet("a")
    HotKeySet("k")
    HotKeySet("r")
    _MouseTrap($Cursor_x, $Cursor_y, $Cursor_x + 1, $Cursor_y + 1)
    Send("!u")
    Send("r")
    Send("{right}")
    Send("{DOWN}")
    Send("{DOWN}")
    Send("{DOWN}")
    Send("{DOWN}")
    Send("{ENTER}")
    Send("k")
    HotKeySet("a", "kanal")
    HotKeySet("k", "klinie")
    HotKeySet("r", "rbogen")
    _MouseTrap()
    EndFunc ;==>uegang

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

    Func uegangeckigrund()
    HotKeySet("r")
    HotKeySet("k")
    HotKeySet("ü")
    _MouseTrap($Cursor_x, $Cursor_y, $Cursor_x + 1, $Cursor_y + 1)
    Send("!u")
    Send("r")
    Send("{right}")
    Send("ü")
    Send("ü")
    Send("{ENTER}")
    Send("k")
    HotKeySet("r", "rbogen")
    HotKeySet("k", "klinie")
    HotKeySet("ü", "uegang")
    _MouseTrap()
    EndFunc ;==>uegangeckigrund

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

    Func teckig()
    HotKeySet("r")
    HotKeySet("t")
    HotKeySet("k")
    _MouseTrap($Cursor_x, $Cursor_y, $Cursor_x + 1, $Cursor_y + 1)
    Send("!u")
    Send("r")
    Send("{RIGHT}")
    Send("t")
    Send("k")
    HotKeySet("r", "rbogen")
    HotKeySet("t", "teckig")
    HotKeySet("k", "klinie")
    _MouseTrap()
    EndFunc ;==>teckig

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

    ;//////////////////////////////////////////////////////////////////////////////////////////////////////////////////Rohr

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

    Func rohr()
    HotKeySet("r")
    HotKeySet("k")
    Send("!u")
    Send("r")
    Send("r")
    Send("{RIGHT}")
    Send("{ENTER}")
    Send("k")
    HotKeySet("r", "rbogen")
    HotKeySet("k", "klinie")
    EndFunc ;==>rohr

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

    Func rbogen()
    HotKeySet("r")
    HotKeySet("k")
    Send("!u")
    Send("r")
    Send("r")
    Send("{right}")
    Send("r")
    Send("{ENTER}")
    Send("k")
    HotKeySet("r", "rbogen")
    HotKeySet("k", "klinie")
    EndFunc ;==>rbogen

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

    Func trund()
    HotKeySet("a")
    HotKeySet("r")
    HotKeySet("k")
    Send("!u")
    Send("r")
    Send("r")
    Send("{ENTER}")
    Send("a")
    Send("k")
    HotKeySet("a", "kanal")
    HotKeySet("r", "rbogen")
    HotKeySet("k", "klinie")
    EndFunc ;==>trund

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

    Func urohr()
    HotKeySet("r")
    HotKeySet("k")
    HotKeySet("ü")
    Send("!u")
    Send("r")
    Send("r")
    Send("{right}")
    Send("ü")
    Send("{ENTER}")
    Send("k")
    HotKeySet("r", "rbogen")
    HotKeySet("k", "klinie")
    HotKeySet("ü", "uegang")
    EndFunc ;==>urohr

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

    ;/////////////////////////////////////////////////////////////////////////////////////////////////////////////////Konstruktionshilfen

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

    Func linie()
    HotKeySet("l")
    Send("!+l")
    Send("l")
    Send("l")
    HotKeySet("l", "linie")
    EndFunc ;==>linie

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

    Func klinie()
    HotKeySet("k")
    HotKeySet("l")
    Send("!+l")
    Send("l")
    Send("k")
    HotKeySet("k", "klinie")
    HotKeySet("l", "linie")
    EndFunc ;==>klinie

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

    Func verbinder()
    HotKeySet("v")
    Send("!u")
    Send("v")
    Send("v")
    Send("v")
    Send("{ENTER}")
    HotKeySet("v", "verbinder")
    EndFunc ;==>verbinder

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

    Func messen()
    Send("!m")
    EndFunc ;==>messen

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

    Func drehen()
    Send("!y")
    EndFunc ;==>drehen

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

    Func spiegeln()
    Send("!x")
    EndFunc ;==>spiegeln

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

    Func draggen()
    Send("!d")
    EndFunc ;==>draggen

    [/autoit]

    Ich kanns nicht wirklich "Austesten", aber so sollte es funktionieren....
    Falls es zu CPU Lastig, setz einfach ein Sleep(50) nach den Global $Cursor_y = MouseGetPos(1) auf Zeile 79, das bringt die GUIGetMsg() nicht durcheinander

    Greez

  • ListviewItem nach best. Spalte sortieren

    Ich frage mich wieso So Kompliziert?

    Du Meintest sicher Sowas oder?
    [autoit]


    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <GuiListView.au3>
    #include <ListViewConstants.au3>

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

    $hGui = GuiCreate('',240,140,-1,-1) ;Erstellt die Gui
    Global $Header = '1|2|3|4' ;Titel der ListView Tabs
    Global $ListView = GUICtrlCreateListView($Header,10,10,220,120) ;ListView erstellung
    GUICtrlSendMsg($ListView, $LVM_SETCOLUMNWIDTH, 0, 50) ;|
    GUICtrlSendMsg($ListView, $LVM_SETCOLUMNWIDTH, 1, 50) ;> Stellt die "Länge" der ListView Tabs ein
    GUICtrlSendMsg($ListView, $LVM_SETCOLUMNWIDTH, 2, 50) ;| GUICtrlSendMsg($ListView = Das ListView welches du erstellst, $LVM_SETCOLUMNWIDTH = Sagt was du machen willst, 0 = Tab(In diesemfall 0-3, Tab ID's beginnen immer mit 0, 50 = Die breite (In Pixel))
    GUICtrlSendMsg($ListView, $LVM_SETCOLUMNWIDTH, 3, 50) ;|
    GUICtrlCreateListViewItem('Item 1a|Item 1b|Item 1c|Item 1d',$ListView) ;|
    GUICtrlCreateListViewItem('Item 2a|Item 2b|Item 2c|Item 2d',$ListView) ;> Erstellt die ListView Items (ListView Einträge)
    GUICtrlCreateListViewItem('Item 3a|Item 3b|Item 3c|Item 3d',$ListView) ;|
    GUICtrlCreateListViewItem('Item 4a|Item 4b|Item 4c|Item 4d|',$ListView) ;|
    _GUICtrlListView_RegisterSortCallBack($ListView) ;Wie Sortiert wird (IN Diesemfall standard da kein wer bei $fArrows angegeben wurde // _GUICtrlListView_RegisterSortCallBack($hWnd[, $fNumbers = True[, $fArrows = True]]) //)

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

    GUISetState(@SW_SHOW,$hGui)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $ListView ;Wen du auf einen 'Header' (1|2|3|4) der ListView Klickst, führe aus
    _GUICtrlListView_SortItems($ListView, GUICtrlGetState($ListView)) ;Startet die Sortier-Callback Funktion und setzt den Pfeil in der Kopfzeile(Tab)
    EndSwitch
    WEnd
    ;~ _GUICtrlListView_UnRegisterSortCallBack($hGui) ;Eigentlich sollte das aktiv sein, aber geht auch ohne

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

    ;Wichtig ist dass Case $ListView ohne dass, wird nicht Sortiert

    [/autoit]


    hab ich schnell hingezaubert, hoffe es hilft weiter ^^

    Greez

  • Problemlösung bei 2.GUIs und Maus

    Hallo Stuuhl

    Hier
    [autoit]


    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <Array.au3>
    #include <Misc.au3>

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

    Global $Cursor_x, $Cursor_y, $File
    Global $Date = @MDAY & '.' & @MON & '.' & @YEAR
    Global $Time = 'Time: ' & @HOUR & ':' & @MIN

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

    $hGui = GUICreate('Maus Coords', 200, 80, -1, -1) ;Haupt Gui
    GUICtrlCreateLabel('x:', 10, 10, 10, 15)
    GUICtrlCreateLabel('y:', 10, 25, 10, 15)
    $Label_x = GUICtrlCreateLabel('0', 20, 10, 60, 14)
    $Label_y = GUICtrlCreateLabel('0', 20, 25, 60, 14)
    $Save = GUICtrlCreateButton('Speichern = F12', 10, 50, 180, 20) ;Zi8mlich nutzlos aber naja immerhin n Hinweis
    GUISetState(@SW_SHOW, $hGui)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Save
    _Save()
    EndSwitch
    Sleep(50)
    GUICtrlSetData($Label_x, MouseGetPos(0)) ;Gibt alle 0,05Secunden die X Possition vom Curser auf $Label_x über
    GUICtrlSetData($Label_y, MouseGetPos(1)) ;Gibt alle 0,05Secunden die Y Possition vom Curser auf $Label_y über
    $dll = DllOpen('user32.dll')
    If _IsPressed('7B', $dll) Then ;Wenn F12 Gedrückt wird dann
    _Save() ;Ruf Function _Save() auf
    _MouseTrap() ;Gibt die Maus wieder frei
    EndIf
    If _IsPressed('7A', $dll) Then ;Wenn F11 Gedrückt wird dann
    _MouseTrap(GUICtrlRead($Label_x), GUICtrlRead($Label_y), GUICtrlRead($Label_x) + 1, GUICtrlRead($Label_y) + 1) ;Fange Maus auf den Coord X & Y auf $Label_x / $Label_y und $Label_x +1(Pixel) / $Label_y +1(Pixel)
    EndIf
    WEnd

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

    Func _Save()
    FileWrite('Maus_Pos_Protokol.txt', '---------------------' & @CRLF)
    FileWrite('Maus_Pos_Protokol.txt', $Date & @CRLF)
    FileWrite('Maus_Pos_Protokol.txt', '---------------------' & @CRLF)
    FileWrite('Maus_Pos_Protokol.txt', '=====================' & @CRLF)
    FileWrite('Maus_Pos_Protokol.txt', $Time & 'x: ' & GUICtrlRead($Label_x) & @CRLF)
    FileWrite('Maus_Pos_Protokol.txt', $Time & 'y: ' & GUICtrlRead($Label_y) & @CRLF)
    FileWrite('Maus_Pos_Protokol.txt', '=====================' & @CRLF)
    EndFunc ;==>_Save

    [/autoit]

    Hab ich Ihrwan mal gemacht, alls ich nochnichts von

    [autoit]

    ControlClick

    [/autoit]


    wusste :D und für dich geupdated (_MouseTrap Hinzugefügt)
    Mit
    F12 = Läst deine maus wieder Frei und Erstellt ein Protokol eintrag, welcher sich dort befinden wird wo das Script / .exe ist.
    F11 = _MousTrap (Fängt deine Maus auf der Cursor Possition)


    ** Ich bin nicht dafür verantwortlich was mit dem Tool gemacht wird.
    Greez

    *Edit:
    1: -Mann diese Schreibfehler ._.
    2: -Habs noch Kommentare dazu Geschrieben

  • Farben ändern

    Hey :D

    Niiiiijaaaaa..... Weisst du, PixelGetPos oder andere Funktionen welche mit Pixeln zu tun haben in Kombination von MouseMove oder ähnlichem....ist immer ein heikles thema :D

    Greez

  • der Nächste, bitte...

    Willkommen im Forum 80x25

    Was das "Coden" angeht, nun... Jeder hat seine eigene Art und Weise zu Coden, sollange man alles schön auskommentiert (Im falle einer Veröffentlichung) so dürfte es eigentlich keine grossen "Debaten" über "Wie code ich sauber" geben.

    In diesem Sinne, sei frei von Fesseln und Code nach deiner eigenen Nase :thumbup:

    Greez

  • Simples Hochzählen

    Du kannst das ganze aber auch mit einer

    [autoit]

    For To Next

    [/autoit]


    Schleife machen, je nachdem wie halt dein Script aufgebaut ist :D
    Aber (nicht böse gemeint) als neuling ist James variante nur zu Empfehlen :D

  • Minecraft Item ID Liste

    Hey BadBunny,
    Ja dass hab ich mir auch schon Überlegt, ich weiss allerdings nicht wie die Minecraft Wiki aufgebaut ist, hab auch wneig Ahnung von xml oder html, geschweige denn Flash oder Java xD

    Ich glaube ich werde mich bei minecraft Wiki melden, Sprich eine Anfrage starten, ihnen das kleine Script zeigen und darauf hoffen das sie mir evt den direkten Link zu den Datensätzen geben :D
    (Man kanns ja versuchen :P)

    Greez

  • Minecraft Item ID Liste

    Nach einer kleinen Partie Minecraft, gefolgt von MCEdit Spielchen, hab ich mir schnell einmal dieses Hübsche kleine ding gescriptet.
    Es ist eine Liste, der Derzeit Implementierten Item's mit ID.
    Das ganze als 1 Array (Welches nicht gerade Übersichtlich ist) in ein Listwiev Gepackt.
    Lässt sich über den Jeweiligen Header (Blockname | ID) Sortieren.
    Hoffe das wird auch einigen anderen Minecraft Spielern helfen :D

    MC ID List.au3
    [autoit]


    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Icon=ico\prog.ico
    #AutoIt3Wrapper_Outfile=MC ID List.exe
    #AutoIt3Wrapper_UseUpx=n
    #AutoIt3Wrapper_Compile_Both=y
    #AutoIt3Wrapper_UseX64=y
    #AutoIt3Wrapper_Res_Fileversion=1.4.5.0
    #AutoIt3Wrapper_Res_LegalCopyright=Skilkor(http://www.autoit.de)
    #AutoIt3Wrapper_Res_Language=1031
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    ;==============
    #region ### include ###
    #include <Array.au3>
    #include <GuiListView.au3>
    #include <ListViewConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #endregion ### include ###
    ;==========
    #region ### Block Array ###
    Global $aTemp[482][2] = [['1','Stone'],['2','Grass'],['3','Dirt'],['4','Cobblestone'],['5','Wooden Plank (Oak)'],['5:1','Wooden Plank (Spruce)'],['5:2','Wooden Plank (Birch)'],['5:3','Wooden Plank (Jungle)'],['6','Sapling (Oak)'],['6:1','Sapling (Spruce)'],['6:2','Sapling (Birch)'],['6:3','Sapling (Jungle)'],['7','Bedrock'],['8','Water'],['9','Water (No Spread)'],['10','Lava'],['11','Lava (No Spread)'],['12','Sand'],['13','Gravel'],['14','Gold Ore'],['15','Iron Ore'],['16','Coal Ore'],['17','Wood (Oak)'],['17:1','Wood (Spruce)'],['17:2','Wood (Birch)'],['17:3','Wood (Jungle)'],['18','Leaves (Oak)'],['18:1','Leaves (Spruce)'],['18:2','Leaves (Birch)'],['18:3','Leaves (Jungle)'],['19','Sponge'],['20','Glass'],['21','Lapis Lazuli Ore'],['22','Lapis Lazuli Block'],['23','Dispenser'],['24','Sandstone'],['24:1','Sandstone (Chiseled)'],['24:2','Sandstone (Smooth)'],['25','Note Block'],['26','Bed (Block)'],['27','Powered Rail'],['28','Detector Rail'],['29','Sticky Piston'],['30','Web'],['31','Tall Grass (Dead Shrub)'],['31:1','Tall Grass'],['31:2','Tall Grass (Fern)'],['32','Dead Shrub'],['33','Piston'],['34','Piston (Head)'],['35','Wool'],['35:1','Orange Wool'],['35:2','Magenta Wool'],['35:3','Light Blue Wool'],['35:4','Yellow Wool'],['35:5','Lime Wool'],['35:6','Pink Wool'],['35:7','Gray Wool'],['35:8','Light Gray Wool'],['35:9','Cyan Wool'],['35:10','Purple Wool'],['35:11','Blue Wool'],['35:12','Brown Wool'],['35:13','Green Wool'],['35:14','Red Wool'],['35:15','Black Wool'],['36','Piston (Moving)'],['37','Dandelion'],['38','Rose'],['39','Brown Mushroom'],['40','Red Mushroom'],['41','Block of Gold'],['42','Block of Iron'],['43','Stone Slab (Double)'],['43:1','Sandstone Slab (Double)'],['43:2','Wooden Slab (Double)'],['43:3','Cobblestone Slab (Double)'],['43:4','Brick Slab (Double)'],['43:5','Stone Brick Slab (Double)'],['43:6','Nether Brick Slab (Double)'],['43:7','Quartz Slab (Double)'],['44','Stone Slab'],['44:1','Sandstone Slab'],['44:2','Wooden Slab'],['44:3','Cobblestone Slab'],['44:4','Brick Slab'],['44:5','Stone Brick Slab'],['44:6','Nether Brick Slab'],['44:7','Quartz Slab'],['45','Brick'],['46','TNT'],['47','Bookcase'],['48','Moss Stone'],['49','Obsidian'],['50','Torch'],['51','Fire'],['52','Mob Spawner'],['53','Wooden Stairs (Oak)'],['54','Chest'],['55','Redstone Wire'],['56','Diamond Ore'],['57','Block of Diamond'],['58','Workbench'],['59','Wheat (Crop)'],['60','Farmland'],['61','Furnace'],['62','Furnace (Smelting)'],['63','Sign (Block)'],['64','Wood Door (Block)'],['65','Ladder'],['66','Rail'],['67','Cobblestone Stairs'],['68','Sign (Wall Block)'],['69','Lever'],['70','Stone Pressure Plate'],['71','Iron Door (Block)'],['72','Wooden Pressure Plate'],['73','Redstone Ore'],['74','Redstone Ore (Glowing)'],['75','Redstone Torch (Off)'],['76','Redstone Torch'],['77','Button (Stone)'],['78','Snow'],['79','Ice'],['80','Snow Block'],['81','Cactus'],['82','Clay Block'],['83','Sugar Cane (Block)'],['84','Jukebox'],['85','Fence'],['86','Pumpkin'],['87','Netherrack'],['88','Soul Sand'],['89','Glowstone'],['90','Portal'],['91','Jack-O-Lantern'],['92','Cake (Block)'],['93','Redstone Repeater (Block Off)'],['94','Redstone Repeater (Block On)'],['95','Locked Chest'],['96','Trapdoor'],['97','Silverfish Stone'],['97:1','Silverfish Cobblestone'],['97:2','Silverfish Stone Brick'],['98','Stone Bricks'],['98:1','Mossy Stone Bricks'],['98:2','Cracked Stone Bricks'],['98:3','Chiseled Stone Brick'],['99','Brown Mushroom (Block)'],['100','Red Mushroom (Block)'],['101','Iron Bars'],['102','Glass Pane'],['103','Melon (Block)'],['104','Pumpkin Vine'],['105','Melon Vine'],['106','Vines'],['107','Fence Gate'],['108','Brick Stairs'],['109','Stone Brick Stairs'],['110','Mycelium'],['111','Lily Pad'],['112','Nether Brick'],['113','Nether Brick Fence'],['114','Nether Brick Stairs'],['115','Nether Wart'],['116','Enchantment Table'],['117','Brewing Stand (Block)'],['118','Cauldron (Block)'],['119','End Portal'],['120','End Portal Frame'],['121','End Stone'],['122','Dragon Egg'],['123','Redstone Lamp'],['124','Redstone Lamp (On)'], _
    ['125','Oak-Wood Slab (Double)'],['125:1','Spruce-Wood Slab (Double)'],['125:2','Birch-Wood Slab (Double)'],['125:3','Jungle-Wood Slab (Double)'],['126','Oak-Wood Slab'],['126:1','Spruce-Wood Slab'],['126:2','Birch-Wood Slab'],['126:3','Jungle-Wood Slab'],['127','Coca Plant'],['128','Sandstone Stairs'],['129','Emerald Ore'],['130','Ender Chest'],['131','Tripwire Hook'],['132','Tripwire'],['133','Block of Emerald'],['134','Wooden Stairs (Spruce)'],['135','Wooden Stairs (Birch)'],['136','Wooden Stairs (Jungle)'],['137','Command Block'],['138','Beacon'],['139','Cobblestone Wall'],['139:1','Mossy Cobblestone Wall'],['140','Flower Pot (Block)'],['141','Carrot (Crop)'],['142','Potatoes (Crop)'],['143','Button (Wood)'],['144','Head Block (Skeleton)'],['144:1','Head Block (Wither)'],['144:2','Head Block (Zombie)'],['144:3','Head Block (Steve)'],['144:4','Head Block (Creeper)'],['145','Anvil'],['146','Trapped Chest'],['147','Weighted Pressure Plate (Light)'],['148','Weighted Pressure Plate (Heavy)'],['149','Redstone Comparator (Off)'],['150','Redstone Comparator (On)'],['151','Daylight Sensor'],['152','Block of Redstone'],['153','Nether Quartz Ore'],['154','Hopper'],['155','Quartz Block'],['155:1','Chiseled Quartz Block'],['155:2','Pillar Quartz Block'],['156','Quartz Stairs'],['157','Activator Rail'],['256','Iron Shovel'],['257','Iron Pickaxe'],['258','Iron Axe'],['259','Flint and Steel'],['260','Apple'],['261','Bow'],['262','Arrow'],['263','Coal'],['263:1','Charcoal'],['264','Diamond Gem'],['265','Iron Ingot'],['266','Gold Ingot'],['267','Iron Sword'],['268','Wooden Sword'],['269','Wooden Shovel'],['270','Wooden Pickaxe'],['271','Wooden Axe'],['272','Stone Sword'],['273','Stone Shovel'],['274','Stone Pickaxe'],['275','Stone Axe'],['276','Diamond Sword'],['277','Diamond Shovel'],['278','Diamond Pickaxe'],['279','Diamond Axe'],['280','Stick'],['281','Bowl'],['282','Mushroom Stew'],['283','Gold Sword'],['284','Gold Shovel'],['285','Gold Pickaxe'],['286','Gold Axe'],['287','String'],['288','Feather'],['289','Gunpowder'],['290','Wooden Hoe'],['291','Stone Hoe'],['292','Iron Hoe'],['293','Diamond Hoe'],['294','Gold Hoe'],['295','Wheat Seeds'],['296','Wheat'],['297','Bread'],['298','Leather Helmet'],['299','Leather Chestplate'],['300','Leather Leggings'],['301','Leather Boots'],['302','Chainmail Helmet'],['303','Chainmail Chestplate'],['304','Chainmail Leggings'],['305','Chainmail Boots'],['306','Iron Helmet'],['307','Iron Chestplate'],['308','Iron Leggings'],['309','Iron Boots'],['310','Diamond Helmet'],['311','Diamond Chestplate'],['312','Diamond Leggings'],['313','Diamond Boots'],['314','Gold Helmet'],['315','Gold Chestplate'],['316','Gold Leggings'],['317','Gold Boots'],['318','Flint'],['319','Raw Porkchop'],['320','Cooked Porkchop'],['321','Painting'],['322','Golden Apple'],['322:1','Enchanted Golden Apple'],['323','Sign'],['324','Wooden Door'],['325','Bucket'],['326','Bucket (Water)'],['327','Bucket (Lava)'],['328','Minecart'],['329','Saddle'],['330','Iron Door'],['331','Redstone Dust'],['332','Snowball'],['333','Boat'],['334','Leather'],['335','Bucket (Milk)'],['336','Clay Brick'],['337','Clay'],['338','Sugar Cane'],['339','Paper'],['340','Book'],['341','Slime Ball'],['342','Storage Minecart'],['343','Powered Minecart'],['344','Egg'],['345','Compass'],['346','Fishing Rod'],['347','Watch'],['348','Glowstone Dust'],['349','Raw Fish'],['350','Cooked Fish'],['351','Ink Sack'],['351:1','Rose Red Dye'],['351:2','Cactus Green Dye'],['351:3','Coca Bean'],['351:4','Lapis Lazuli'],['351:5','Purple Dye'],['351:6','Cyan Dye'],['351:7','Light Gray Dye'],['351:8','Gray Dye'],['351:9','Pink Dye'],['351:10','Lime Dye'],['351:11','Dandelion Yellow Dye'],['351:12','Light Blue Dye'],['351:13','Magenta Dye'],['351:14','Orange Dye'],['351:15','Bone Meal'],['352','Bone'],['353','Sugar'],['354','Cake'],['355','Bed'],['356','Redstone Repeater'],['357','Cookie'],['358','Map'],['359','Shears'],['360','Melon (Slice)'],['361','Pumpkin Seeds'],['362','Melon Seeds'],['363','Raw Beef'],['364','Steak'],['365','Raw Chicken'], _
    ['366','Cooked Chicken'],['367','Rotten Flesh'],['368','Ender Pearl'],['369','Blaze Rod'],['370','Ghast Tear'],['371','Gold Nugget'],['372','Nether Wart Seeds'],['373','Water Bottle'],['373:16','Awkward Potion'],['373:32','Thick Potion'],['373:64','Mundane Potion'],['373:8193','Regeneration Potion (0:45)'],['373:8194','Swiftness Potion (3:00)'],['373:8195','Fire Resistance Potion (3:00)'],['373:8196','Poison Potion (0:45)'],['373:8197','Healing Potion'],['373:8198','Night Vision Potion (3:00)'],['373:8200','Weakness Potion (1:30)'],['373:8201','Strength Potion (3:00)'],['373:8202','Slowness Potion (1:30)'],['373:8204','Harming Potion'],['373:8206','Invisibility Potion (3:00)'],['373:8225','Regeneration Potion II (0:22)'],['373:8226','Swiftness Potion II (1:30)'],['373:8228','Poison Potion II (0:22)'],['373:8229','Healing Potion II'],['373:8233','Strength Potion II (1:30)'],['373:8236','Harming Potion II'],['373:8257','Regeneration Potion (2:00)'],['373:8258','Swiftness Potion (8:00)'],['373:8259','Fire Resistance Potion (8:00)'],['373:8260','Poison Potion (2:00)'],['373:8262','Night Vision Potion (8:00)'],['373:8264','Weakness Potion (4:00)'],['373:8265','Strength Potion (8:00)'],['373:8266','Slowness Potion (4:00)'],['373:8270','Invisibility Potion (8:00)'],['373:16385','Regeneration Splash (0:33)'],['373:16386','Swiftness Splash (2:15)'],['373:16387','Fire Resistance Splash (2:15)'],['373:16388','Poison Splash (0:33)'],['373:16389','Healing Splash'],['373:16390','Night Vision Splash (2:15)'],['373:16392','Weakness Splash (1:07)'],['373:16393','Strength Splash (2:15)'],['373:16394','Slowness Splash (1:07)'],['373:16396','Harming Splash'],['373:16398','Invisibility Splash (2:15)'],['373:16417','Regeneration Splash II (0:16)'],['373:16418','Swiftness Splash II (1:07)'],['373:16420','Poison Splash II (0:16)'],['373:16421','Healing Splash II'],['373:16425','Strength Splash II (1:07)'],['373:16428','Harming Splash II'],['373:16449','Regeneration Splash (1:30)'],['373:16450','Swiftness Splash (6:00)'],['373:16451','Fire Resistance Splash (6:00)'],['373:16452','Poison Splash (1:30)'],['373:16454','Night Vision Splash (6:00)'],['373:16456','Weakness Splash (3:00)'],['373:16457','Strength Splash (6:00)'],['373:16458','Slowness Splash (3:00)'],['373:16462','Invisibility Splash (6:00)'],['374','Glass Bottle'],['375','Spider Eye'],['376','Fermented Spider Eye'],['377','Blaze Powder'],['378','Magma Cream'],['379','Brewing Stand'],['380','Cauldron'],['381','Eye of Ender'],['382','Glistering Melon (Slice)'],['383:50','Spawn Egg (Creeper)'],['383:51','Spawn Egg (Skeleton)'],['383:52','Spawn Egg (Spider)'],['383:54','Spawn Egg (Zombie)'],['383:55','Spawn Egg (Slime)'],['383:56','Spawn Egg (Ghast)'],['383:57','Spawn Egg (Zombie Pigmen)'],['383:58','Spawn Egg (Endermen)'],['383:59','Spawn Egg (Cave Spider)'],['383:60','Spawn Egg (Silverfish)'],['383:61','Spawn Egg (Blaze)'],['383:62','Spawn Egg (Magma Cube)'],['383:65','Spawn Egg (Bat)'],['383:66','Spawn Egg (Witch)'],['383:90','Spawn Egg (Pig)'],['383:91','Spawn Egg (Sheep)'],['383:92','Spawn Egg (Cow)'],['383:93','Spawn Egg (Chicken)'],['383:94','Spawn Egg (Squid)'],['383:95','Spawn Egg (Wolf)'],['383:96','Spawn Egg (Mooshroom)'],['383:98','Spawn Egg (Ocelot)'],['383:120','Spawn Egg (Villager)'],['384','Bottle of Enchanting'],['385','Fire Charge'],['386','Book and Quill'],['387','Written Book'],['388','Emerald'],['389','Item Frame'],['390','Flower Pot'],['391','Carrot'],['392','Potato'],['393','Baked Potato'],['394','Poisonous Potato'],['395','Empty Map'],['396','Golden Carrot'],['397','Head (Skeleton)'],['397:1','Head (Wither)'],['397:2','Head (Zombie)'],['397:3','Head (Steve)'],['397:4','Head (Creeper)'],['398','Carrot on a Stick'],['399','Nether Star'],['400','Pumpkin Pie'],['401','Firework Rocket'],['402','Firework Star'],['403','Enchanted Book'],['404','Redstone Comparator'],['405','Nether Brick (Item)'],['406','Nether Quartz'],['407','TNT Minecart'],['2256','Music Disk (13)'],['2257','Music Disk (Cat)'],['2258','Music Disk (Blocks)'], _
    ['2259','Music Disk (Chirp)'],['2260','Music Disk (Far)'],['2261','Music Disk (Mall)'],['2262','Music Disk (Mellohi)'],['2263','Music Disk (Stal)'],['2264','Music Disk (Strad)'],['2265','Music Disk (Ward)'],['2266','Music Disk (11)'],['2267','Music Disk (Wait)']]
    #endregion ### Block Array ###
    ;==========
    #region ### Gui ###
    $hGui = GUICreate('Minecraft Items', 240, 500, -1, -1)
    #endregion ### Gui ###
    ;==========
    #region ### ListView ###
    Global $LV_Style = BitOR($WS_EX_DLGMODALFRAME, $WS_EX_CLIENTEDGE)
    Global $LV_EX_STYLE = BitOR($LVS_EX_SUBITEMIMAGES, $LVS_EX_DOUBLEBUFFER, $LVS_EX_FULLROWSELECT)
    Global $Header = 'Block Name|ID'
    Global $ListView = GUICtrlCreateListView($Header, 10, 10, 221, 480, $LV_Style, $LV_EX_STYLE)
    For $i = 0 To UBound($aTemp) - 1
    $Item = $aTemp[$i][1] & '|' & $aTemp[$i][0]
    GUICtrlCreateListViewItem($Item, $ListView)
    Next

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

    _GUICtrlListView_SetExtendedListViewStyle($ListView, $LV_EX_STYLE)
    _GUICtrlListView_RegisterSortCallBack($ListView)
    GUICtrlSendMsg($ListView, $LVM_SETCOLUMNWIDTH, 0, 150)
    GUICtrlSendMsg($ListView, $LVM_SETCOLUMNWIDTH, 1, 50)
    #endregion ### ListView ###
    ;==========
    GUISetState(@SW_SHOW, $hGui)
    ;==========
    #region ### GUI_Event ###
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $ListView
    _GUICtrlListView_SortItems($ListView, GUICtrlGetState($ListView))
    EndSwitch
    WEnd
    #endregion ### GUI_Event ###

    [/autoit]
    Download


    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist. Das .au3 File (Kaum zu übersehn :P)
    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist. Ein .7z Archiv, das sämmtliche Dateien beinhaltet.


    Viel Spass damit :D
    Ich hoffe ich vergessen nicht das ganze nach jedem Minecraft Patch zu Updaten :P

  • Redliche Heimseite

    Zitat von ohforf

    Dein Mobilgerät hat unbrauchbare Software. :thumbdown:


    :rofl::rofl::rofl: Der ist gut, muss ich mir merken :thumbup:

    Zum eingeltichen thema.
    Ich kann dazu nur sagen dasses einfach nur lachhaft ist (meiner meinung nach) Ich mache mir nichts grosses aus solch seiten, ich selber bin atheist.
    Ostern, Weinachten,Silvester, selbst mein eigener Geburtstag ist für mich nurn Tag wie jeder andere.

    Wer sich gern von solch einer Seite einlullen ässt, von mir aus, nur zu :D
    Ich habe gelehrnt den glauben anderer zu respektieren und ihnen einen gewissen standard an höfflichkeit entgegen zu tretten, insofern man mir gegenüber auch häöfflich ist und meinen nicht religiösen (naja, stimmt evt nicht ganz, nennen wir es, nicht Christliche oder übliche glaubens richtung).

    Über dass thema religion kann sich der mensch die köpfe einschlagen, jeder behauptet sein glaube sei richt (was es auch in einer gewissen art und weisse ist) doch, bei genauer betrachtung der vergangenheit / Mythiologie vieler glaubensrichtungen, leiten sich sehr viel von einem einzigen ab.

    Ich behaupte nicht das meine meinung zu 100% stimmt,deswegen gehe ich nicht genauer auf das thema "mythologie"ein.Falls jemand besser bescheid weis, nur zu,ich halt niemanden davon ab mich zu korigieren oder so ^^

    Greez

  • Language [UDF] v1.0

    Hey TheLuBu
    Danke für den hinweiss :D
    Das Programm "DescribeIt" wird sicher nützlich sein.

    Allerdings denke ich nicht das ich es auf die jetzige UDF anwenden werde, da ich gestern beim verwenden der UDF was herausgefunden habe.... und das gefählt mir ganz und garnicht.
    Was ich herrausgefunden habe:
    Als ich die UDF verwenden wollte und NICHT jedes Array davon gebrauchen konnte, Setzte die UDF trotzdem alles nach reihe ein, was dazu führte das es nichtmehr die Beschriftung hatte welche vorgesehen war.

    Ergo, ich muss die gesammte UDF nocheinmal überarbeiten.
    Jetz habe ich allerdings einen vorteil, ich weiss mehr oder minder wie, da ich das wissen der "v1.0" habe.
    Es betrübt mich, dases nicht so funktioniert wie gedacht, janu, ich muss den Rückschlag wegstecken und weiter gehen ^^

    Greez

  • Language [UDF] v1.0

    Hey CyRoX
    Danke für deine Rückmeldung :D
    Das mit den beschreibungen kann ich sicherlich noch machen :D

    Was _StringAsign angeht, so wie ich das sehe, ist es sicherlich eine Gute möglichkeit zu Kürzen oder ID's zuzu weisen.

    Ich möchte aber nicht Spezifisch ID's zuweisen, da dies dem Verwender der UDF einen grossen teil an Freiraum der Scripting art wegnehme, deswegen habe ich es auch so gemacht, das ich die ID's auslessen lasse, somit, kann der benutzer auch einfach sagen, von verlecher Variable er Beginnen und Ende möchte.

    Spoiler anzeigen
    [autoit]


    ;$cLang = First Variable
    ;$gCombo = Last Variable
    _LanguageID($cLang, $gCombo, GUICtrlRead($gCombo))

    [/autoit]


    Somit lesse ich jede Variable vom Anfang bis Ende aus und kann dem user ne gewisse freiheit geben.

    Greez