Bablosoft

Куда пропадает память на жестком диске при использовании BAS?

Поддержка

  • NikolasN

    Скрипт на BAS засыпает при выключении экрана

    Поддержка
    0 Votes
    14 Posts
    989 Views
    NikolasN

    Может кому-то будет полезно вот код который делает бинд , юзая софты AutoHotkey и nircmd.exe на кнопках: F7 \F8\F9
    при нажатии на которых будет:
    Заставлять комп заснуть (режим "Сон"), либо снизить яркость до 0% , либо вернёт яркость до 100% , при этом (на кнопках F8\F9) открывается\закрывается на весь экран заранее сохранённый файл png черной картинки:

    ; Путь к лог-файлу (используем стандартную папку Documents) logFile := A_MyDocuments "\AutoHotkeyLog.txt" ; Полный путь к nircmd.exe в папке Downloads nirCmdPath := "C:\Users\Admin\Downloads\nircmd-x64\nircmd.exe" ; Полный путь к картинке, которую нужно открыть imagePath := "C:\Users\Admin\Downloads\black_screen.png" ; Код для F7: запуска режима сна на компьютере при этом процессы тоже засыпают F7:: Sleep 100 SendMessage, 0x112, 0xF170, 2,, Program Manager FileAppend, %A_Now%: F7 - Экран выключен`n, %logFile% return ; Код для F8: снижение яркости экрана до нуля и открытие картинки F8:: if FileExist(nirCmdPath) ; Проверяем, существует ли nircmd.exe { ; Устанавливаем яркость на 0 Run, %nirCmdPath% setbrightness 0 FileAppend, %A_Now%: F8 - Яркость снижена до нуля`n, %logFile% } else { FileAppend, %A_Now%: F8 - nircmd.exe не найден!`n, %logFile% MsgBox, 16, Ошибка, NirCmd не найден в папке Downloads. return } if FileExist(imagePath) ; Проверяем, существует ли картинка { ; Открываем картинку с помощью стандартного просмотрщика Windows Run, %imagePath% Sleep 500 ; Ждем полсекунды, чтобы приложение загрузилось Send, {F11} ; Включаем полноэкранный режим FileAppend, %A_Now%: F8 - Картинка открыта в полноэкранном режиме`n, %logFile% } else { FileAppend, %A_Now%: F8 - Картинка не найдена!`n, %logFile% MsgBox, 16, Ошибка, Картинка не найдена по пути: %imagePath%. } return ; Код для F9: повышение яркости экрана до максимума и закрытие картинки F9:: if FileExist(nirCmdPath) ; Проверяем, существует ли nircmd.exe { Run, %nirCmdPath% setbrightness 100 FileAppend, %A_Now%: F9 - Яркость увеличена до максимума`n, %logFile% } else { FileAppend, %A_Now%: F9 - nircmd.exe не найден!`n, %logFile% MsgBox, 16, Ошибка, NirCmd не найден в папке Downloads. } ; Закрываем картинку (закрывает активное окно) Sleep 500 ; Ждем, чтобы яркость обновилась Send, !{F4} ; Отправляем Alt+F4 для закрытия активного окна FileAppend, %A_Now%: F9 - Картинка закрыта`n, %logFile% return
  • A

    Цикл в BAS

    Поддержка
    0 Votes
    4 Posts
    775 Views
    Alex84A
    spoiler
  • A

    Отдельное приложение на BAS приём оплаты Paypal по подписке

    Поддержка
    1 Votes
    10 Posts
    959 Views
    AZANIRA

    @UserTrue а где вы сейчас сидите ?

  • F

    BAS + Capmonster + Recaptcha

    Поддержка
    0 Votes
    8 Posts
    2762 Views
    alliveA

    @staze

    @staze said in BAS + Capmonster + Recaptcha:

    что я купил модуль с sitekey и не знаю как его юзать в BAS

    @staze Чуть выше вас есть сообщение с картинкой. @sergodjan66 Попробуйте обратится к нему.

  • E

    Оповещение при событии

    Поддержка
    0 Votes
    5 Posts
    2117 Views
    supportS

    Отправка почта в ближайших планах. Звуки добавил в планы