Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #SingleInstance force
- #NoEnv
- ;lädt API.dll automatisch, wenn Sie nicht vorhanden ist:
- FileGetSize, OutputVar, API.dll
- If (OutputVar == "")
- URLDownloadToFile, http://samp-api.net/downloads/current_api/API.dll, API.dll
- #include API.ahk
- SetTimer, readChat, 100
- SetTimer, Box, 900
- SetTimer, Ping, 900
- SetTimer, Zone, 900
- SetTimer, ID, 900
- SetTimer, Level, 900
- ; TIMER ;
- getplayerdata()
- box_Overlay := -1
- Ping_Overlay := -1
- Zone_Overlay := -1
- ID_Overlay := -1
- Level_Overlay:= -1
- FileRead,playername,name.txt
- FileDelete,name.txt
- Fileappend,%playername%,name.txt
- FileRead,dmunition,2deagle_munition.txt
- FileRead,amunition,2ak_munition.txt
- FileRead,smunition,2shotgun_munition.txt
- FileRead,mmunition,2m4_munition.txt
- FileDelete,2deagle_munition.txt
- FileDelete,2ak_munition.txt
- FileDelete,2m4_munition.txt
- FileDelete,2shotgun_munition.txt
- If (dmunition == "")
- dmunition := 293
- If (amunition == "")
- amunition := 470
- If (mmunition == "")
- mmunition := 470
- If (smunition == "")
- smunition := 199
- Fileappend,%dmunition%,2deagle_munition.txt
- Fileappend,%amunition%,2ak_munition.txt
- Fileappend,%mmunition%,2m4_munition.txt
- Fileappend,%smunition%,2shotgun_munition.txt
- RegisterTextBind("/gate", 1285.747070,-2054.785889,58.713394, 6, 1, 6000)
- RegisterTextBind("/loadweapons 5",219.7454,7.5686,2.6884, 10.5, 1, 10000)
- RegisterTextBind("/unloadweapons", 1119.6101,-1173.0078,22.6565, 10.5, 1, 30000)
- RegisterTextBind("/zoll", 57.5687,-1538.6981,5.0971, 6, 1, 6000)
- RegisterTextBind("/zoll", 1739.4640,510.8497,28.5648, 6, 1, 6000)
- RegisterTextBind("/zoll", 1748.4053,507.3607,28.5840, 6, 1, 6000)
- RegisterTextBind("/zoll", 1733.5543,521.0560,28.1247, 6, 1, 6000)
- RegisterTextBind("/zoll", 1724.6410,524.2784,28.1106, 6, 1, 6000)
- RegisterTextBind("/zoll", 66.7720,-1527.6808,4.8815, 6, 1, 6000)
- ~1::
- If (IsChatOpen() == 1 || IsDialogOpen() == 1 || IsMenuOpen() == 1)
- return
- if(IsPlayerInRangeOfPoint2D(295.6162,-39.9934, 15))
- {
- AddChatMessage(0xffffff, "Es wird eine Deagle mit " dmunition " Munition erworben.")
- Send {Enter}
- sleep, 50
- Send, {f down}
- sleep, 50
- Send, {f up}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 10)
- {
- Send, {f down}
- sleep, 50
- Send, {f up}
- }
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0301) - " i)
- return
- }
- }
- Send, {Down} {Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 10)
- {
- Send, {Down} {Enter}
- }
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0302) - " i)
- return
- }
- }
- Send, {Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 10)
- {
- Send, {Enter}
- }
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0303) - " i)
- return
- }
- }
- Send, {Pgdn}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 200
- i+= 1
- If (i == 10)
- {
- Send, {Pgdn}
- AddChatMessage(0xffffff, "Dialog-Handling wurde wiederholt (e0304) - " i)
- }
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0304) - " i)
- return
- }
- }
- Send, {Enter}
- i := 0
- sleep, 200
- Send, {f down}
- sleep, 50
- Send, {f up}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 10)
- {
- Send, {f down}
- sleep, 50
- Send, {f up}
- }
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0306) - " i)
- return
- }
- }
- Send, {Down}{Down}{Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 10)
- {
- Send, {Down}{Down}{Enter}
- }
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0307) - " i)
- return
- }
- }
- Send, {Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 10)
- {
- Send, {Enter}
- }
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0308) - " i)
- return
- }
- }
- Send, {pgdn}{enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 10)
- {
- Send, {pgdn}{enter}
- }
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0309) - " i)
- return
- }
- }
- Send, %dmunition%{enter}
- return
- }
- return
- ~2::
- If (IsChatOpen() == 1 || IsDialogOpen() == 1 || IsMenuOpen() == 1 )
- return
- if(IsPlayerInRangeOfPoint2D(295.6162,-39.9934, 15))
- {
- AddChatMessage(0xffffff, "Es wird eine Schutzweste erworben.")
- Send, {f down}
- sleep, 50
- Send, {f up}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Weste wurde nicht erworben. (e0301) - " i)
- return
- }
- }
- If (IsDialogOpen() == 0)
- return
- Send, {Pgdn}{Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Weste wurde nicht erworben. (e0302) - " i)
- return
- }
- }
- Send, {Pgdn}{Enter}
- If (next == 2)
- {
- next := 0
- }
- return
- }
- return
- ~3::
- If (IsChatOpen() == 1 || IsDialogOpen() == 1 || IsMenuOpen() == 1 )
- return
- if(IsPlayerInRangeOfPoint2D(295.6162,-39.9934, 15))
- {
- AddChatMessage(0xffffff, "Es wird eine AK mit " amunition " Munition erworben.")
- Send, {f down}
- sleep, 50
- Send, {f up}
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0301) - " i)
- return
- }
- }
- Send, {Down}{Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0302) - " i)
- return
- }
- }
- Send, {down}{down}{enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0303) - " i)
- return
- }
- }
- Send, {Enter}
- sleep, 100
- Send, {f down}
- sleep, 100
- Send, {f up}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0304) - " i)
- return
- }
- }
- If (IsDialogOpen() == 0)
- sleep, 150
- Send, {Down}{Down}{Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0305) - " i)
- return
- }
- }
- Send, {Down}{Down}{Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0306) - " i)
- return
- }
- }
- Send, {Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0307) - " i)
- return
- }
- }
- Send, %amunition%{Enter}
- Return
- }
- return
- ~4::
- If (IsChatOpen() == 1 || IsDialogOpen() == 1 || IsMenuOpen() == 1 )
- return
- if(IsPlayerInRangeOfPoint2D(295.6162,-39.9934, 15))
- {
- AddChatMessage(0xffffff, "Es wird eine M4 mit " mmunition " Munition erworben.")
- Send, {f down}
- sleep, 50
- Send, {f up}
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0301) - " i)
- return
- }
- }
- Send, {Down}{Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0302) - " i)
- return
- }
- }
- Send, {down}{down}{enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0303) - " i)
- return
- }
- }
- Send, {down}{Enter}
- sleep, 100
- Send, {f down}
- sleep, 100
- Send, {f up}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0304) - " i)
- return
- }
- }
- If (IsDialogOpen() == 0)
- sleep, 150
- Send, {Down}{Down}{Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0305) - " i)
- return
- }
- }
- Send, {Down}{Down}{Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0306) - " i)
- return
- }
- }
- Send, {down}{Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0307) - " i)
- return
- }
- }
- Send, %mmunition%{Enter}
- Return
- }
- return
- ~5::
- If (IsChatOpen() == 1 || IsDialogOpen() == 1 || IsMenuOpen() == 1 )
- return
- if(IsPlayerInRangeOfPoint2D(295.6162,-39.9934, 15) && speecing < 1)
- {
- AddChatMessage(0xffffff, "Es wird eine Shotgun mit " smunition " Munition erworben.")
- Send, {f down}
- sleep, 50
- Send, {f up}
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0301) - " i)
- return
- }
- }
- Send, {Down}{Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0302) - " i)
- return
- }
- }
- Send, {down}{down}{down}{enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0303) - " i)
- return
- }
- }
- Send, {Enter}
- sleep, 100
- Send, {f down}
- sleep, 100
- Send, {f up}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0304) - " i)
- return
- }
- }
- If (IsDialogOpen() == 0)
- sleep, 150
- Send, {Down}{Down}{Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0305) - " i)
- return
- }
- }
- Send, {Down}{Down}{down}{Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0306) - " i)
- return
- }
- }
- Send, {Enter}
- i := 0
- While (IsDialogOpen() == 0)
- {
- sleep, 100
- i+= 1
- If (i == 20)
- {
- AddChatMessage(0xffffff, "Dialog-Timeout, Waffe wurde nicht erworben. (e0307) - " i)
- return
- }
- }
- Send, %smunition%{Enter}
- Return
- }
- return
- :*?:/keybinderhilfe::
- Suspend, Permit
- Send {enter}
- ShowDialog(0, "Keybinderhilfe", "°~ Keybinder Hilfe ~°`n***********************`n{FF0000}Waffen kaufen:{FFFFFF} `n | 1 Für eine Deagle mit 293 Schuss |`n | 2 Für eine volle Schutzweste |`n | 3 Für eine AK47 mit 470 Schuss |`n | 4 Für eine M4 mit 470 Schuss |`n | 5 Für eine Shotgun mit 199 Schuss |`n `n {00FF00}[Keybinder aus / ein [F12]{FFFFFF}`n `n {FF0000}Keybinds:{FFFFFF} `n | Alt + 1 = /takeflag |`n | Alt + 2 = /gangwar |`n | Alt + 3 = /faction |`n | Alt + 4 = .. |`n `n ", "OK")
- Suspend, Off
- Suspend, Off
- return
- ; KEYBINDS | Anfang ;
- !4::
- if(IsChatOpen() == 1|| IsDialogOpen() == 1)
- return
- SendInput t/smoke{enter}
- return
- ~NumpadAdd::
- if(IsChatOpen() == 1|| IsDialogOpen() == 1)
- return
- SendInput t/pickup{enter}
- SendInput tHallo sie sprechen mit %playername% | Triaden | Rank 7 |{enter}
- SendInput tWas kann ich für sie tun?{enter}
- return
- !3::
- if(IsChatOpen() == 1|| IsDialogOpen() == 1)
- return
- SendInput t/faction{enter}
- return
- !2::
- if(IsChatOpen() == 1|| IsDialogOpen() == 1)
- return
- SendInput t/gangwar{enter}
- return
- !1::
- if(IsChatOpen() == 1|| IsDialogOpen() == 1)
- return
- SendInput t/takeflag{enter}
- return
- ; KEYBINDS | Ende ;
- ; Gangwar Killzähler | Anfang ;
- readChat:
- Loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
- {
- If (CHATLOG_zeile >= A_Index)
- Continue
- CHATLOG_zeile := A_Index
- If (InStr(A_LoopReadLine, "tötet seinen Feind") && InStr(A_LoopReadLine,"Triaden"))
- {
- RegExMatch(A_LoopReadLine, "\[([0-9:]*)\]" ,var)
- FormatTime,timenow,,HHmmss
- logtime := RegExReplace(var1, ":", "")
- result := timenow - logtime
- If (result > 30)
- continue
- RegExMatch(A_LoopReadLine, "R\] (.*) tötet seinen Feind" ,var)
- IniRead,playerkills,kill-death-flag.ini,kills,%var1%
- if (playerkills == ERROR)
- playerkills = 0
- playerkills +=1
- IniWrite,%playerkills%,kill-death-flag.ini,kills,%var1%
- AddChatMessage(0xff00ff, "{00FF00}Das war der " playerkills ". Kill von {FFFFFF}" var1 "{00FF00}.{FFFFFF}")
- If (var1 = playername)
- SoundPlay, ring.mp3
- return
- }
- If (InStr(A_LoopReadLine, "Es wurde ein Gangwar ") && InStr(A_LoopReadLine,"Triaden"))
- FileDelete, kill-death-flag.ini
- }
- ; Gangwar Killzähler | Ende ;
- Box:
- {
- If(WinActive("GTA:SA:MP"))
- {
- If(box_Overlay == -1)
- {
- box_Overlay := BoxCreate()
- BoxSetPos(box_Overlay, 621, 211)
- BoxSetBorder(id, 2)
- BoxSetHeight(id, 90)
- BoxSetWidth(id, 150)
- BoxSetBorderColor(id, 0xFFFFFFFFCC)
- BoxSetColor(id, 0xFFFF000000)
- BoxShow(box_Overlay)
- }
- }
- return
- }
- return
- Ping:
- {
- If(WinActive("GTA:SA:MP"))
- {
- If(Ping_Overlay == -1)
- {
- Ping_Overlay := TextCreate("Comic Sans MS", 11, true, false)
- TextSetPos(Ping_Overlay, 623, 288)
- TextSetColor(Ping_Overlay, 0xFFFFFFFF)
- Textshow(Ping_Overlay)
- }
- TextSetString(Ping_Overlay, "Ping: " GetPlayerPing() " | " )
- }
- return
- }
- return
- Zone:
- {
- If(WinActive("GTA:SA:MP"))
- {
- If(Zone_Overlay == -1)
- {
- Zone_Overlay := TextCreate("Comic Sans MS", 11, true, false)
- TextSetPos(Zone_Overlay, 661, 288)
- TextSetColor(Zone_Overlay, 0xFFFFFFFF)
- Textshow(Zone_Overlay)
- }
- GetZoneName(MyZone)
- TextSetString(Zone_Overlay, " Zone: " MyZone " | " )
- }
- return
- }
- return
- ID:
- {
- If(WinActive("GTA:SA:MP"))
- {
- If(ID_Overlay == -1)
- {
- ID_Overlay := TextCreate("Comic Sans MS", 11, true, false)
- TextSetPos(ID_Overlay, 623, 210)
- TextSetColor(ID_Overlay, 0xFFFFFFFF)
- Textshow(ID_Overlay)
- }
- TextSetString(ID_Overlay, "ID: " GetPlayerID() " | ")
- }
- return
- }
- return
- Level:
- {
- If(WinActive("GTA:SA:MP"))
- {
- If(Level_Overlay == -1)
- {
- Level_Overlay := TextCreate("Comic Sans MS", 11, true, false)
- TextSetPos(Level_Overlay, 660, 210)
- TextSetColor(Level_Overlay, 0xFFFFFFFF)
- Textshow(Level_Overlay)
- }
- TextSetString(Level_Overlay, " Level: " GetPlayerScore() " | ")
- }
- return
- }
- return
- F12::Suspend
- return
- ; Keybinder aus / ein ;
Advertisement
Add Comment
Please, Sign In to add comment