Исходник Report list

sanders

Известный
Автор темы
238
111
Прив!
Когда-то давно в 2017 сделал этот скрипт по просьбе главного админа arizona rp red rock, так вот, сливаю мб кто-то сделает под свое нубо-рп или кому-то нужен скрипт

Выглядит он так
46979

Активации:
Alt + Numpad1 - начинает банить
Numpad2 - вызвать панель AHK

AutoHotKey:
#Persistent
#SingleInstance force
#Include SAMP-UDF-Developer.ahk

Gui, Add, Edit, x2 y79 w270 h30 vText,
Gui, Font, S8 CDefault, Times New Roman
Gui, Add, Text, x2 y59 w170 h20, Текст (Ник время/префикс)
;~ Gui, Add, Text, x92 y9 w150 h40, Задержка (отправления банов)
;~ Gui, Add, Edit, x92 y25 w150 h30 vWait,
Gui, Add, ListBox, x2 y9 w80 h50 vCommand, /banoff|/muteoff|/jailoff
Gui, Add, Button, x172 y119 w100 h30 gAccept, Добавить
Gui, Add, Button, x2 y119 w100 h30 gCancel, Отмена
Gui, Show, w290 h159, reportList by Sanders
return

Accept:
gui, Submit
;~ MsgBox, % command " " Text
text := command A_Space text "`n"
FileAppend, % text, BanList.txt
return

Numpad2::
GuiControl,, text,
gui, show
return

Cancel:
gui, cancel
return

GuiClose:
gui, hide
return

!Numpad1::
Loop, Read, BanList.txt
{
    addChatMessageEx("FFFFFF","Начинаю банить")
    Loop, Parse, A_LoopReadLine, `n
    {
        SendChat(A_LoopField)
        sleep, 10000
    }
    addChatMessageEx("FFFFFF","Конец банлиста")
}
return
Для работы требуется SAMP UDF(прикреплю)!
 

Вложения