Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Wenn du hier die Kommentare weg machst, wirst du aufgefordert, das Overlay als Administrator auszuführen.
- Dies kann zur stabilisierung und zu weniger Bugs seitens des Overlays führen.
- if(!A_IsAdmin)
- {
- MsgBox, 0, Info, Du musst den Keybinder als Administrator ausführen!`nDas Programm wird sich jetzt schließen.
- ExitApp
- }
- SetWorkingDir, %A_ScriptDir% ;Gibt als "current working directory", den Dateipfad des Overlays an.
- #NoEnv ;"It significantly improves performance whenever empty variables are used in an expression or command."
- #SingleInstance, Force ;Sorgt dafür, dass die Anwendung nur einmal gestartet werden kann.
- #include SAMP-API.ahk ;Fügt die SAMP-UDF hinzu.
- #Include Overlay-API.ahk ;Fügt die Overlay-API hinzu.
- DestroyAllVisual() ;Bereits bestehende Overlay-Elemente werden hier gelöscht.
- global Overlay := 0 ;Das Overlay wird auf "noch nicht erstellt" eingestellt.
- global FontSizeText := 8 ;Hier wird die FontSize/Text Größe, der Informationen, definiert.
- SetParam("use_window", "1")
- SetParam("window", "GTA:SA:MP") ;Der SAMP Client wird als Ziel zur Erstellung des Overlays ausgewählt
- while(1)
- {
- if(WinActive("GTA:SA:MP") && IsSAMPAvailable()) ;Wenn SAMP gestartet, gerade gespielt wird und der Chat geladen ist, dann wird fortgefahren.
- {
- if(Overlay == 0) ;Wenn die TextLabel noch nicht erstellt wurden, werden diese hier erstellt
- {
- PlayerInfo := TextCreate("Geneva", FontSizeText, 1, 0, 5, 585, 0xFFFFFFFF, "", 1, 1)
- HealthInfo := TextCreate("Geneva", FontSizeText, 1, 0, 0, 100, 0xFFFFFFFF, "", 1, 1)
- Overlay := 1 ;Setzt den Status, des Overlays, auf "wurde erstellt".
- }
- PlyInfoStr := "{FFFFFF}Name: {B0B0B0}" GetPlayerName() " (" "ID: " GetPlayerId() ")"
- PlyInfoStr .= "{FFFFFF}Ping: {B0B0B0}" GetPlayerPingById(GetPlayerId()) ""
- PlyInfoStr .= "{FFFFFF}Waffe: {B0B0B0}" GetPlayerWeaponName() " (" "ID: " GetPlayerWeaponId() ")"
- PlyInfoStr .= "{FFFFFF}Skin-Id: {B0B0B0}" GetPlayerSkinId() ""
- PlyInfoStr .= "{FFFFFF}Interior-Id: {B0B0B0}" GetPlayerInteriorId() ""
- PlyInfoStr .= "{FFFFFF}Stadt: {B0B0B0}" GetPlayerCity() ""
- PlyInfoStr .= "{FFFFFF}Stadtteil: {B0B0B0}" GetPlayerZone() ""
- PlyInfoStr .= "{FFFFFF}FPS: {B0B0B0}" GetFrameRate() ""
- TextSetString(PlayerInfo, PlyInfoStr)
- HealthInfoStr .= "{FFFFFF}Weste: {B0B0B0}" GetPlayerArmor() ""
- HealthInfoStr .= "{FFFFFF}Leben: {B0B0B0}" GetPlayerHealth() ""
- TextSetString(HealthInfo, HealthInfoStr)
- }
- else ;Wenn GTA nicht offen ist, oder gerade gespielt wird, oder der Chat noch nicht geladen ist, wird gecheckt, ob das Overlay bereits erstellt worden ist.
- {
- if(Overlay) ;Wenn das Overlay bereits erstellt worden ist, wird es hier gelöscht und der Status auf "noch nicht erstellt" eingestellt.
- {
- DestroyAllVisual()
- Overlay := 0
- }
- }
- Sleep, 1 ;Verringert die Ressourcennutzung des Prozessors deutlich (Ohne Sleep, ~5%, mit 0-0.1% Auslastung des Prozessors).
- }
- ;Wenn ein GUI hinzugefügt wird und man auf das "X" drückt, wird das bestehende Overlay gelöscht und die Anwendung beendet sich.
- GuiClose:
- DestroyAllVisual()
- ExitApp
- return
- ;Wird die Anwendung geschlossen, dann wird das Overlay gelöscht(funktioniert aber nur teilweise).
- ExitApp:
- DestroyAllVisual()
- ExitApp
- return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement