Сейчас во внешние жёсткие диска стали встраивать микропрограмму, которая при не активности диска в течение нескольких минут просто выключает его. А как известно давно - постоянные циклы включения и выключения жёсткого диска приводят к исчерпанию ресурсов механики (подшипников) и стрессу для электродвигателя и контроллера во время раскрутки шпинделя. Моя данная программа HDD ON позволяет не выключаться внешнему жёсткому диску во время простоя, потребляет минимум ресурсов и способна продлению службы жёсткому диску со встроенной микропрограммой его выключения при простое. Программа распространяется бесплатно и с исходниками. Это улучшенная версия. Загрузить для Windows можно отсюда Ссылка
DataSection
Icon:
IncludeBinary "Icon.ico"
EndDataSection
Procedure Write(Value)
Repeat
CreateFile(0, "dummy.bin")
WriteAsciiCharacter(0,0)
FlushFileBuffers(0)
CloseFile(0)
Delay(60000)
ForEver
EndProcedure
CreateThread(@Write(), 0)
OpenWindow(0,1,1,1,1,"", #PB_Window_Invisible)
CatchImage(0, ?Icon)
AddSysTrayIcon(0, WindowID(0), ImageID(0))
CreatePopupImageMenu(0, #PB_Menu_SysTrayLook)
MenuItem(0, "О...")
MenuItem(1, "Выход")
SysTrayIconMenu(0, MenuID(0))
Repeat
Select WaitWindowEvent()
Case #PB_Event_Menu
Select EventMenu()
Case 0
MessageRequester("HDD ON", "©2025 madpsychocell, psyj@rambler.ru")
Case 1
End
EndSelect
EndSelect
ForEver