fedek13245
Дата: Среда, 25.01.2017, 17:34 | Сообщение # 1
Любитель
Сообщений: 36
Статус: Offline
Думаю, суть понятна. Cкрин: У скрипта есть два режима: один умеренный. Другой - нет. Оба режима рассчитаны как на русский, так и на английский. Чтобы сменить режим нужно показать интерфейс - SH, выбрать и на жать на |2|_||\|.Пример умеренного . Пишем: привет, как дела, как погода, азаза Получаем: nрив3т, |<а|< д3/\а, |<а|< n0r0да, а3а3аПример не умеренного : run - |2|_||\|, режим - |>3||/|/\/\ Пишем: привет, как дела, как погода, азаза Получаем:n|>|/|в3т, |<а|< д3/\а, |<а|< n0r0да, а3а3а!Важные примечания : - Скрипт не рассчитан на большие буквы. - Чтобы сменить режим или выйти из скрипта - EX или SH, нужно остановить его - OF. - Работает не только в samp. Ссылка. Проверено yandexdisk. - https://yadi.sk/d/DeiCMiH6yuazv Скрипт делал достаточно долго из за синхронизации, потому что при одном hotkey производилось 2 действия ( неудачно). Пришлось менять систему два раза. Код leet.ahk -
#SingleInstance force #HotkeyInterval 1500 #InputLevel 10 #MaxThreadsPerHotkey 5 #UseHook if not A_IsAdmin { If A_IsCompiled DllCall(ShellExecute, uint, 0, str, "RunAs", str, A_ScriptFullPath, str, params , str, A_WorkingDir, int, 1) Else DllCall(ShellExecute, uint, 0, str, "RunAs", str, A_AhkPath, str, """" . A_ScriptFullPath . """" . A_Space . params, str, A_WorkingDir, int, 1) } if not A_IsAdmin { Run *RunAs "%A_ScriptFullPath%" ExitApp } SetTimer, isexist, 100 FileInstall, 1.ico, %A_Temp%\1.ico FileInstall, 2.ico, %A_Temp%\2.ico FileInstall, on.ico, %A_Temp%\on.ico FileInstall, off.ico, %A_Temp%\off.ico FileInstall, leet1.exe, %A_Temp%\ahkleet1.exe,1 FileInstall, leet2.exe, %A_Temp%\ahkleet2.exe,1 Gui, Color, ffA500 Gui, Font, S16 CDefault, Verdana Gui, Add, Radio, x32 y40 w150 h30 vr1, Умеренный Gui, Add, Radio, x32 y80 w180 h30 vr2, Не умеренный Gui, Add, Text, x32 y0 w170 h30 , Выбор режима Gui, Add, Button, x220 y40 w130 h70 gRun, |2|_||\| Gui, Show, w358 h133, Leet pro TrayTip,Авто 1337,Выключить скрипт - OFF`nВключить - ON`nЗакрыть - EX`nПоказать интерфейс`, чтобы изменить режим - SH, 15 Menu, Tray, Icon, %A_Temp%\off.ico return ~sc12 & ~sc2D:: SoundBeep Process, close, %pid1% WinKill, ahk_exe ahkleet1.exe WinKill, ahk_exe ahkleet2.exe Process, close, %pid2% Sleep 100 Process, close, %pid1% Process, close, %pid2% SLeep 100 ExitApp return SetTimer, isexist,100 isexist: Process, Exist, ahkleet1.exe If (Errorlevel <> 0) { Hotkey, ~vk4F & ~vk4E, Off Menu, Tray, Icon, %A_Temp%\on.ico,1,1,1,1, } else { Hotkey, ~vk4F & ~vk4E, On Menu, Tray, Icon, %A_Temp%\off.ico,1,1,1,1, } if (Errorlevel <> 0) return Process, Exist, ahkleet2.exe If (Errorlevel <> 0) { Hotkey, ~vk4F & ~vk4E, Off Menu, Tray, Icon, %A_Temp%\on.ico,1,1,1,1, } else { Hotkey, ~vk4F & ~vk4E, On Menu, Tray, Icon, %A_Temp%\off.ico,1,1,1,1, } return ~vk4F & ~vk4E:: If (r1 = 1) Run, %A_Temp%\ahkleet1.exe, , ,pid1 else Run, %A_Temp%\ahkleet2.exe, , ,pid2 SoundBeep Menu, Tray, Icon, %A_Temp%\on.ico,1,1,1,1, TrayTip,Авто 1337,Скрипт запущен., 5 return ;~~sc18:: ;Sleep 100 ;GetKeyState,state ,vk46, P ;If (state = D) ;Menu, Tray, Icon, %A_Temp%\off.ico ;return ~sc1F & ~sc23:: Gui, Show return Run: Gui, Submit, NoHide Gui, Hide If (r1 = 0) and (r2 = 0) { MsgBox, Выбери что-нибудь, иначе зачем тебе этот скрипт? Reload return } If (r1 = 1) Run, %A_Temp%\ahkleet1.exe, , ,pid1 if (r2 = 1) Run, %A_Temp%\ahkleet2.exe, , ,pid2 if (r1 = 1) and (r2 = 1) { Reload return } SoundBeep Menu, Tray, Icon, %A_Temp%\on.ico,1,1,1,1, TrayTip,Авто 1337,Скрипт запущен., 5 return GuiClose: ExitApp return
Код 1 режима - ahkleet1.ahk (exe сохранён в %A_temp %)
#SingleInstance Force #InputLevel 10 #MaxThreadsPerHotkey 5 #UseHook if not A_IsAdmin { If A_IsCompiled DllCall(ShellExecute, uint, 0, str, "RunAs", str, A_ScriptFullPath, str, params , str, A_WorkingDir, int, 1) Else DllCall(ShellExecute, uint, 0, str, "RunAs", str, A_AhkPath, str, """" . A_ScriptFullPath . """" . A_Space . params, str, A_WorkingDir, int, 1) } if not A_IsAdmin { Run *RunAs "%A_ScriptFullPath%" ExitApp } Menu, Tray, Icon, 1.ico,,1 return ~sc18 & ~sc21:: SoundBeep ExitApp return ; Умеренный англ :?*:A::4 :?*:C::< :?*:E::3 :?*:G::6 :?*:I::! :?*:L::1 :?*:O::0 :?*:P::|> :?*:S: :$ :?*:T::7 :?*:X::>< :?*:Z::2 :?*:мягкий::m99k11 :?*:это::3t0 :?*:очень::043n :?*:весело: :v 35310 :?*:пират: :p 1r8 :?*:пока::KKTHXBYE :?*:след::7R4C3 :?*:подожди::w8 :?*:заткнись::stfu :?* :o mg::OMGWTF :?*:порно: :p 0rn :?*:нуб::n00b :?*:easy: :p wned :?*:согласен::yus :?*:хакер::hax0r :?*:элитный::31337 :?*:your::j0r :?*:твой::j0r :?*:Г::r :?*:З::3 :?*:К::|< :?*:к::|< :?*:Л::/\ :?*:П::n :?*:Ф: :o |o :?*:Ч::4 :?*:Е::3 :?*:Ш::w :?*:C::< :?*:С::< :?*:Ъ::'b :?*:b::b :?*:О::0 :?*:Я::9I return
Код ahkleet2 ( Также в %A_temp %) :
#SingleInstance Force #InputLevel 10 #MaxThreadsPerHotkey 5 if not A_IsAdmin { If A_IsCompiled DllCall(ShellExecute, uint, 0, str, "RunAs", str, A_ScriptFullPath, str, params , str, A_WorkingDir, int, 1) Else DllCall(ShellExecute, uint, 0, str, "RunAs", str, A_AhkPath, str, """" . A_ScriptFullPath . """" . A_Space . params, str, A_WorkingDir, int, 1) } if not A_IsAdmin { Run *RunAs "%A_ScriptFullPath%" ExitApp } Menu, Tray, Icon, 2.ico,,1 return ~sc18 & ~sc21:: ExitApp return ~sc18 & ~sc31:: SoundBeep ; Ne Умеренный англ :?*:A::4 :?*:B::I3 :?*:C::< :?* :D ::|) :?*:E::3 :?*:F::|= :?*:G::6 :?*:H::/-/ :?*:I::! :?*:J::] :?*:K::|< :?*:L::1 :?*:M::/\/\ :?*:N::|\| :?*:O::0 :?*:P::|> :?* :Q : :( _,) :?*:R::|2 :?*:S: :$ :?*:T::7 :?*:U::|_| :?*:V::\/ :?*:W: :v v :?*:X::>< :?*:Х::>< :?*:Z::2 :?*:С::¢ :?*:Г::r :?*:З::3 :?*:Ж::`}|`{ :?*:И::|/| :?*:К::|< :?*:Л::/\ :?*:П::n :?*:Ф: :o|o :?*:Ч::4 :?*:М::/\/\ :?*:Н::/-/ :?*:Е::3 :?*:Р::|> :?*:Ш::w :?*:C::< :?*:Ъ::'b :?*:Ы::b| :?*:Ь::b :?*:О::0 :?*:Ю::|-0 :?*:Я::9I :?*:мягкий::m99k11 :?*:это::3t0 :?*:очень::043n :?*:весело: :v 35310 :?*:пират: :p 1r8 :?*:пока::KKTHXBYE ::nока::KKTHXBYE :?*:след::7R4C3 :?*:подожди::w8 :?*:заткнись::stfu :?* :o mg::OMGWTF :?*:порно: :p 0rn :?*:нуб::n00b :?*:easy: :p wned :?*:согласен::yus :?*:хакер::hax0r :?*:элитный::31337 :?*:your::j0r :?*:твой::j0r return
Добавлено (25.01.2017, 17:34) --------------------------------------------- go up
-------------------------- Advance RP Chocolade,Purlpe. Ставьте + плиз. Мои темы: http://cheat-master.ru/forum/150-643136-1 - MVD v3. http://cheat-master.ru/forum/150-657057-1 - auto leet http://cheat-master.ru/forum/150-648405-1 - Создать любую шпору.
Сообщение отредактировал fedek13245 - Четверг, 26.01.2017, 23:14