Beiträge von FelipeCapone

    FelipeCapone: du tauscht "www.meinedomain.de/.." aber schon aus oder? Sonst wird das auch nicht funktionieren.



    Ja tue ich,
    Habe problem schon gelöst

    GUI öffnet sich nicht...


    version := 4.0 ;immer in der versionsupdate.txt anpassen, sonst wird nicht geupdatet!
    Filedelete,update.bat


    UrlDownloadToFile,www.meinedomain.de/versionupdate.txt, versionupdate.txt
    FileRead, newver, versionupdate.txt
    FileDelete, versionupdate.txt
    if (version < newver)
    {
    newververfügbar := 1
    MsgBox, 4,Aktuelle Version, Lieber Benutzer,`n`nEs ist eine aktuellere Version deines Keybinders verfügbar, (Version %newver%).`nMöchtest du diese jetzt herunterladen?
    IfMsgBox, Yes
    {

    MsgBox, 64, Update Download, Das Update wird nun heruntergeladen ,dies kann bis zu 20 Sekunden dauern..., 3
    Urldownloadtofile,www.meinedomain.de/keybinder.exe, %A_ScriptName%.new
    UrlDownloadToFile, LINK ZUR DLL, \API.dll ;Dies ist nicht nötig sondern freiwillig
    BatchFile=
    (
    Ping 127.0.0.1
    Del "%A_ScriptName%"
    Rename "%A_ScriptName%.new" "%A_ScriptName%
    cd "%A_ScriptFullPath%"
    "%A_ScriptName%"
    Del update.bat
    )

    FileDelete,update.bat

    FileAppend,%BatchFile%,update.bat
    MsgBox, 64, Update ausführen, Das Update wird nun ausgeführt...bitte warten..., 3
    Run,update.bat,,hide
    Exitapp
    }
    }
    else
    newververfügbar := 0
    Gui, Add, Button, x72 y220 w160 h50 , Keybinder
    ; Generated using SmartGUI Creator 4.0
    Gui, Show, x91 y73 h954 w1824, New GUI Window
    Return


    @Chopper:

    Hallo
    Habe mir ein Update Funktion für AHK geholt geht aber nicht


    version := 2.0 ;immer in der versionsupdate.txt anpassen, sonst wird nicht geupdatet!

    UrlDownloadToFile, http://domain.de/versionsupdate.txt, versionsupdate.txt ;lädt versionsupdate.txt runter
    FileRead, newver, versionsupdate.txt ; ließt ob eine neue Version verfügbar ist
    FileDelete, versionsupdate.txt ; löscht die versionsupdate.txt datei

    ; Ist eine neue Version Verfügbar, fragt er nach ob man Updaten will. Links Anpassen auf euren!

    if (version < newver)
    {
    newververfügbar := 1
    MsgBox, 4,, Hinweiß: Die Version %newver% ist Verfügbar! Möchten Sie diese herunterladen?
    IfMsgBox, Yes
    {

    MsgBox, 64, Update, Das Update wird heruntergeladen`, Dies kann einen moment dauern..., 3
    Urldownloadtofile,http://domain.de/DeinKeybinderName.exe, %A_ScriptName%.new
    BatchFile=
    (
    Ping 127.0.0.1
    Del "%A_ScriptName%"
    Rename "%A_ScriptName%.new" "%A_ScriptName%"
    cd "%A_ScriptFullPath%"
    "%A_ScriptName%"
    )

    FileDelete,update.bat
    FileAppend,%BatchFile%,update.bat
    MsgBox, 64, Update, Das Update wird Ausgeführt... Bitte warten..., 3
    Run,update.bat,,hide
    Exitapp
    }
    }
    else
    {
    newververfügbar := 0
    FileDelete,update.bat
    }


    versionupdate:


    2.0


    Der Keybinder startet einfach ohne eine Meldung zum Updaten.

    Moin,


    Ich bräuchte Hilfe beim AHK Overlay,
    Ich habe ein HP Overlay gefunden und es auch eingefügt nur das Problem ist, das Overlay wird Ingame nicht angezeigt.


    > Falls es der Falsche Bereich ist bitte verschieben


    :?:/overlayoff::
    Suspend Permit
    DestroyAllVisual() //
    SetTimer, Alles, off
    SetTimer, hpoverlay, off
    return



    :?:/overlay::
    Suspend Permit
    ;;;;;;;;;;;;;;;;;;;;;;Orts anzeige;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    zone := Textcreate("Arial", 15, false, false)
    Textsetpos(zone, 650, 430 )
    TextSetColor(zone, 0xFFFFFFFF )
    TextShow(zone )//
    ;;;;;;;;;;;;;;;;;;;;;HP Overlay;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    hp := Textcreate("Arial", 9, false, false)
    Textsetpos(hp, 713, 90)
    TextSetColor(hp, 0xFFFFFFFF)
    TextShow(hp)



    SetTimer, Alles, 150
    SetTimer, hpoverlay, 20
    return

    hpoverlay:
    #IfWinActive, GTA:SA:MP
    {
    TextSetString(hp, GetPlayerHealth())

    }
    return

    Alles:
    #IfWinActive, GTA:SA:MP
    {
    GetZoneName(Zone)
    TextSetString(zone, Zone)
    }
    return

    Guten Tag
    Ich suche einen neuen Root Server er sollte nicht zu teuer sein & gute Leistung bringen ( max 30€ im Monat)
    2-4GB Ram
    50GB Festplatte ( reicht )
    Software: linux oder windows
    * DDos Schutz ( nur ein kleiner)
    Mfg