Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- FileEncoding, UTF-8
- URLDownloadToFile, https://docs.google.com/spreadsheets/d/1Hf3FcHZAEiKqJuNBMeXibnVOXQF_PpUlO_8GWjaGUa8/export?format=csv&id=1Hf3FcHZAEiKqJuNBMeXibnVOXQF_PpUlO_8GWjaGUa8&gid=365013835, %A_Temp%\blacklistbase.txt
- FileRead, blackl, %A_Temp%\blacklistbase.txt
- FileDelete, %A_Temp%\blacklistbase.txt
- URLDownloadToFile, https://docs.google.com/spreadsheets/d/1Hf3FcHZAEiKqJuNBMeXibnVOXQF_PpUlO_8GWjaGUa8/export?format=csv&id=1Hf3FcHZAEiKqJuNBMeXibnVOXQF_PpUlO_8GWjaGUa8&gid=1489322457, %A_Temp%\whitelistbase.txt
- FileRead, whitel, %A_Temp%\whitelistbase.txt
- FileDelete, %A_Temp%\whitelistbase.txt
- #SingleInstance, Force
- #Persistent
- #Include UDF.ahk
- #IfWinActive, GTA:SA:MP
- ~RButton & ~vk31::
- uname := getPlayerNameById(getIdByPed(getTargetPed()))
- rpname := RegExReplace(uname, "_", " ")
- If (uname <> "")
- {
- userscore := getPlayerScoreById(getIdByPed(getTargetPed()))
- URLDownloadToFile, https://classic.rp-gameworld.ru/online/, %A_Temp%\online.txt
- FileRead, checker, %A_Temp%\online.txt
- If RegExMatch(checker, "gameworld")
- {
- Loop, read, %A_Temp%\online.txt
- {
- If RegExMatch(A_LoopReadLine, "iS)/profile/" uname "/")
- {
- FileReadLine, fraction, %A_Temp%\online.txt, % A_Index+2
- RegExMatch(fraction, "<td>(.*)</td>", frac)
- If (frac1 <> "")
- userfraction := frac1
- break
- }
- }
- FileDelete, %A_Temp%\online.txt
- If (!RegExMatch(blackl, getUsername()) && !RegExMatch(bl, rpname))
- {
- If (!RegExMatch(whitel, getUsername()) && !RegExMatch(whitel, rpname))
- {
- If (userscore >= 1 && userscore <= 3)
- pasprice := 1
- else if (userscore >= 4 && userscore <= 10)
- pasprice := 20000
- else
- pasprice := 40000
- }
- else
- {
- pasprice := 1
- goto, giving
- }
- }
- else
- {
- SendChat("Плохие новости. Вы состоите в БДН, в дальнейшем получении/продлении паспорта отказано!")
- return
- }
- If RegExMatch(userfraction, "Ministry of Health|San Andreas Taxi Cab Company|Los Santos Police Department|Federal Bureau of Investigation|Cable News Network|Licenzers|National Guard of San Andreas")
- {
- pasmult := 1
- If (userfraction == "Ministry of Health")
- pasprice := 1
- If (userfraction == "San Andreas Taxi Cab Company")
- pasmult := 0.5
- If (userfraction == "Los Santos Police Department")
- pasprice := 1
- If (userfraction == "Federal Bureau of Investigation")
- pasprice := 1
- If (userfraction == "National Guard of San Andreas")
- pasmult := 0.5
- If (userfraction == "Cable News Network")
- pasmult := 0.5
- If (userfraction == "Licenzers")
- pasmult := 0.5
- addChatMessageEx("c0c0c0", "[PAS] Фракция: " userfraction "; Договор: Есть; Цена: $" pasprice "; Коэффициент: " pasmult ".")
- If (pasprice > 1)
- pasprice *= pasmult
- }
- else
- addChatMessageEx("c0c0c0", "[PAS] Фракция: " userfraction "; Договор: Отсутствует; Цена: $" pasprice ".")
- giving:
- SendChat("/givepas " getPlayerIdByName(uname) " " pasprice "")
- }
- }
- return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement