Исходник Софт Другое Dota Scripts Loader | Лаунчер скриптов для игр [AHK]

BASS_DEVSOFTWARE

https://bassmiroslav.pro/
Автор темы
Модератор
211
253



36359



Лаунчер скриптов написанных для Dota 2 в среде разработки AutoHotkey.
Поддержка других игр, кроме Доты 2
Особенности:
  • Простота в использовании.
    • Для запуска первого скрипта необходимо: запустить лаунчер; скачать скрипт, перейдя по Download from server --> Download; нажать Launch.
  • Удобная настройка.
    • Меню settings позволит настроить все необходимые клавиши, координаты и функции скрипта под вас. При этом сам файл остаётся нетронутым, а для сохранения настроек создаётся конфиг-файл, что крайне удобно.
  • Своя библиотека скриптов.
  • Оптимизация.
    • Скрипты не конфликтуют между собой, даже если запустить их все одновременно.
  • Открытый исходный код.

* Это относится ко всем скриптам, написанным в среде AutoHotkey *​

  1. В отличии от читов/скриптов для Доты, что есть в общем доступе/на продаже, скрипты написанные в среде AutoHotkey - НЕ являются запрещёнными и их можно использовать!
  2. Зная справку AutoHotkey даже на базовом уровне, написать свой скрипт для Доты не составит особого труда. Особенно если вы используете библиотеку DOTA Scripts Builder.

:mad: Выкладывать на сторонних ресурсах запрещаю. Исключение - сервис youtube.com с указанием моего GitHub.​




36360


2.png3.png


Исходный код:
Для просмотра скрытого содержимого необходимо Войти или Зарегистрироваться.
Для просмотра скрытого содержимого необходимо Войти или Зарегистрироваться.







Планы на будущее:

  1. Расширить список доступных скриптов.​
  2. Перевести лаунчер полностью на английский язык.​
  3. Автоматическая загрузка скриптов при перезапуске лаунчера.​
  4. Загрузка собственных скриптов.​
  5. Добавить разделы под скрипты для других игр.

Поддержка других игр, кроме Доты 2
 

Вложения

Последнее редактирование:

bu3ka3

black call to your code
Проверенный
522
267
Было в планах это сделать, но ты опередил. Теперь можно полноценно стать дота-скриптером
 

Lunoul228

Новичок
1
0
Вроде чисто
; <COMPILER: v1.1.29.01>
if A_AhkPath =
{
MsgBox, 8244, Dota Scripts Loader | Installer, AutoHotkey.exe not found.`nPlease`, install AutoHotkey & try again.`n---`nYes - Open autohotkey.com`nNo - Close
IfMsgBox, Yes
run, https://www.autohotkey.com/
ExitApp
}
Gui, Add, Progress, x12 y80 w500 h20 , 0
Gui, Add, Text, x12 y60 w300 h20 , Default dir %A_MyDocuments%\DotaSL
Gui, Font, S8 CDefault Bold, Verdana
Gui, Font, S10 CDefault Bold, Verdana
Gui, Font, S11 Cgreen Bold, Verdana
Gui, Add, Button, x442 y55 w70 h20 gstart, Start
Gui, Add, Button, x372 y55 w70 h20 gcancel, Cancel
Gui, Add, Button, x302 y55 w70 h20 gdir, Dir
Gui, Add, Text, x115 y20 w500 h20 , Install files.
Gui, Add, GroupBox, x12 y0 w505 h50 ,
Gui, Show, w529 h109, Dota Scripts Loader | Installer
IfNotExist, %A_MyDocuments%\DotaSL
FileCreateDir, %A_MyDocuments%\DotaSL
return
dir:
gui, +disabled
FileSelectFolder, dir, , 4
if dir !=
{
FileDelete, %dir%\config.txt
sleep 10
FileAppend, %dir%, %dir%\config.txt
TrayTip, Selected DIR, %dir%, 3
}
gui, -disabled
return
start:
gui, +disabled
if dir !=
SetWorkingDir, %dir%
else
SetWorkingDir, %A_WorkingDir%
oWhr := ComObjCreate("WinHttp.WinHttpRequest.5.1")
oWhr.Open("GET", "https://raw.githubusercontent.com/MirchikAhtung/dotasl/master/compiler.bat", false)
oWhr.Send()
compiler := oWhr.ResponseText
IfExist, compiler.bat
FileDelete, compiler.bat
ahkfolder := A_AhkPath
StringReplace, ahkfolder, ahkfolder, AutoHotkey.exe, Compiler, All
StringReplace, compiler, compiler, &, %ahkfolder%\, All
FileAppend, %compiler%, compiler.bat
guicontrol,, msctls_progress321, 20
guicontrol,, static1, github / compiler.bat
sleep 100
IfExist, uninstall.exe
FileDelete, uninstall.exe
oWhr := ComObjCreate("WinHttp.WinHttpRequest.5.1")
oWhr.Open("GET", "https://raw.githubusercontent.com/MirchikAhtung/dotasl/master/uninstall.ahk", false)
oWhr.Send()
uninstall := oWhr.ResponseText
IfExist, uninstall.ahk
FileDelete, uninstall.ahk
FileAppend, %uninstall%, uninstall.ahk
guicontrol,, msctls_progress321, 40
guicontrol,, static1, github / uninstall.ahk
sleep 100
IfExist, LauncherDOTASL.exe
FileDelete, LauncherDOTASL.exe
oWhr := ComObjCreate("WinHttp.WinHttpRequest.5.1")
oWhr.Open("GET", "https://raw.githubusercontent.com/MirchikAhtung/dotasl/master/LauncherDOTASL.ahk", false)
oWhr.Send()
LauncherDOTASL := oWhr.ResponseText
IfExist, LauncherDOTASL.ahk
FileDelete, LauncherDOTASL.ahk
FileAppend, %LauncherDOTASL%, LauncherDOTASL.ahk
guicontrol,, msctls_progress321, 60
guicontrol,, static1, github / LauncherDOTASL.ahk
sleep 100
run, compiler.bat,, UseErrorLevel
if errorlevel
MsgBox, 8208, Dota Scripts Loader | Installer, Error run compiler.bat
sleep 2000
oWhr := ComObjCreate("WinHttp.WinHttpRequest.5.1")
oWhr.Open("GET", "https://raw.githubusercontent.com/MirchikAhtung/dotasl/master/README.md", false)
oWhr.Send()
README := oWhr.ResponseText
IfExist, readme.txt
FileDelete, readme.txt
FileAppend, %README%, readme.txt
guicontrol,, msctls_progress321, 80
FileDelete, compiler.bat
FileDelete, uninstall.ahk
FileDelete, LauncherDOTASL.ahk
guicontrol,, msctls_progress321, 100
guicontrol,, static1, completion...
IfNotExist, config.txt
FileAppend, , config.txt
MsgBox, 4160, Dota Scripts Loader | Installer, Installation was successful.
run, LauncherDOTASL.exe,, UseErrorLevel
if errorlevel
MsgBox, 8208, Dota Scripts Loader | Installer, Error run LauncherDOTASL.exe
cancel:
ExitApp
 

BASS_DEVSOFTWARE

https://bassmiroslav.pro/
Автор темы
Модератор
211
253
Вроде чисто
; <COMPILER: v1.1.29.01>
if A_AhkPath =
{
MsgBox, 8244, Dota Scripts Loader | Installer, AutoHotkey.exe not found.`nPlease`, install AutoHotkey & try again.`n---`nYes - Open autohotkey.com`nNo - Close
IfMsgBox, Yes
run, https://www.autohotkey.com/
ExitApp
}
Gui, Add, Progress, x12 y80 w500 h20 , 0
Gui, Add, Text, x12 y60 w300 h20 , Default dir %A_MyDocuments%\DotaSL
Gui, Font, S8 CDefault Bold, Verdana
Gui, Font, S10 CDefault Bold, Verdana
Gui, Font, S11 Cgreen Bold, Verdana
Gui, Add, Button, x442 y55 w70 h20 gstart, Start
Gui, Add, Button, x372 y55 w70 h20 gcancel, Cancel
Gui, Add, Button, x302 y55 w70 h20 gdir, Dir
Gui, Add, Text, x115 y20 w500 h20 , Install files.
Gui, Add, GroupBox, x12 y0 w505 h50 ,
Gui, Show, w529 h109, Dota Scripts Loader | Installer
IfNotExist, %A_MyDocuments%\DotaSL
FileCreateDir, %A_MyDocuments%\DotaSL
return
dir:
gui, +disabled
FileSelectFolder, dir, , 4
if dir !=
{
FileDelete, %dir%\config.txt
sleep 10
FileAppend, %dir%, %dir%\config.txt
TrayTip, Selected DIR, %dir%, 3
}
gui, -disabled
return
start:
gui, +disabled
if dir !=
SetWorkingDir, %dir%
else
SetWorkingDir, %A_WorkingDir%
oWhr := ComObjCreate("WinHttp.WinHttpRequest.5.1")
oWhr.Open("GET", "https://raw.githubusercontent.com/MirchikAhtung/dotasl/master/compiler.bat", false)
oWhr.Send()
compiler := oWhr.ResponseText
IfExist, compiler.bat
FileDelete, compiler.bat
ahkfolder := A_AhkPath
StringReplace, ahkfolder, ahkfolder, AutoHotkey.exe, Compiler, All
StringReplace, compiler, compiler, &, %ahkfolder%\, All
FileAppend, %compiler%, compiler.bat
guicontrol,, msctls_progress321, 20
guicontrol,, static1, github / compiler.bat
sleep 100
IfExist, uninstall.exe
FileDelete, uninstall.exe
oWhr := ComObjCreate("WinHttp.WinHttpRequest.5.1")
oWhr.Open("GET", "https://raw.githubusercontent.com/MirchikAhtung/dotasl/master/uninstall.ahk", false)
oWhr.Send()
uninstall := oWhr.ResponseText
IfExist, uninstall.ahk
FileDelete, uninstall.ahk
FileAppend, %uninstall%, uninstall.ahk
guicontrol,, msctls_progress321, 40
guicontrol,, static1, github / uninstall.ahk
sleep 100
IfExist, LauncherDOTASL.exe
FileDelete, LauncherDOTASL.exe
oWhr := ComObjCreate("WinHttp.WinHttpRequest.5.1")
oWhr.Open("GET", "https://raw.githubusercontent.com/MirchikAhtung/dotasl/master/LauncherDOTASL.ahk", false)
oWhr.Send()
LauncherDOTASL := oWhr.ResponseText
IfExist, LauncherDOTASL.ahk
FileDelete, LauncherDOTASL.ahk
FileAppend, %LauncherDOTASL%, LauncherDOTASL.ahk
guicontrol,, msctls_progress321, 60
guicontrol,, static1, github / LauncherDOTASL.ahk
sleep 100
run, compiler.bat,, UseErrorLevel
if errorlevel
MsgBox, 8208, Dota Scripts Loader | Installer, Error run compiler.bat
sleep 2000
oWhr := ComObjCreate("WinHttp.WinHttpRequest.5.1")
oWhr.Open("GET", "https://raw.githubusercontent.com/MirchikAhtung/dotasl/master/README.md", false)
oWhr.Send()
README := oWhr.ResponseText
IfExist, readme.txt
FileDelete, readme.txt
FileAppend, %README%, readme.txt
guicontrol,, msctls_progress321, 80
FileDelete, compiler.bat
FileDelete, uninstall.ahk
FileDelete, LauncherDOTASL.ahk
guicontrol,, msctls_progress321, 100
guicontrol,, static1, completion...
IfNotExist, config.txt
FileAppend, , config.txt
MsgBox, 4160, Dota Scripts Loader | Installer, Installation was successful.
run, LauncherDOTASL.exe,, UseErrorLevel
if errorlevel
MsgBox, 8208, Dota Scripts Loader | Installer, Error run LauncherDOTASL.exe
cancel:
ExitApp
Проверь ещё раз, ты думаешь я кейлоггер так палевно бы вставлял в этот exeшник?