[решено] скрипт открытия закрытия сд ром

[Pozia]

подскажите пожалуйста скрипт который будет открывать и закрывать сдром циклически пока не убьешь процесс в диспетчере. Причем время на открытие будет формироваться произвольно допустим из интервала до трех минут

[madmasles]

Pozia,
Наверное, так:#NoTrayIcon (http://www.autoitscript.com/autoit3/docs/keywords.htm##notrayicon)
$aCD_ROM = DriveGetDrive (http://www.autoitscript.com/autoit3/docs/functions/DriveGetDrive.htm)('CDROM')
If (http://www.autoitscript.com/autoit3/docs/keywords.htm#If) @error (http://www.autoitscript.com/autoit3/docs/macros.htm#@error) Then (http://www.autoitscript.com/autoit3/docs/keywords.htm#Then)
MsgBox (http://www.autoitscript.com/autoit3/docs/functions/MsgBox.htm)(16, '', 'Error')
Exit (http://www.autoitscript.com/autoit3/docs/keywords.htm#Exit)
EndIf (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndIf)

$iTimeMin = 60000 ; 1 min
$iTimeMax = 180000 ; 3 min

$iTimeStart = TimerInit (http://www.autoitscript.com/autoit3/docs/functions/TimerInit.htm)()
$iChange = Random (http://www.autoitscript.com/autoit3/docs/functions/Random.htm)($iTimeMin, $iTimeMax, 1)
While (http://www.autoitscript.com/autoit3/docs/keywords.htm#While) 1
If (http://www.autoitscript.com/autoit3/docs/keywords.htm#If) TimerDiff (http://www.autoitscript.com/autoit3/docs/functions/TimerDiff.htm)($iTimeStart) >= $iChange Then (http://www.autoitscript.com/autoit3/docs/keywords.htm#Then)
For (http://www.autoitscript.com/autoit3/docs/keywords.htm#For) $i = 1 To (http://www.autoitscript.com/autoit3/docs/keywords.htm#To) $aCD_ROM[0]
CDTray (http://www.autoitscript.com/autoit3/docs/functions/CDTray.htm)($aCD_ROM[$i], 'open')
Sleep (http://www.autoitscript.com/autoit3/docs/functions/Sleep.htm)(2000)
CDTray (http://www.autoitscript.com/autoit3/docs/functions/CDTray.htm)($aCD_ROM[$i], 'closed')
Next (http://www.autoitscript.com/autoit3/docs/keywords.htm#Next)
$iTimeStart = TimerInit (http://www.autoitscript.com/autoit3/docs/functions/TimerInit.htm)()
$iChange = Random (http://www.autoitscript.com/autoit3/docs/functions/Random.htm)($iTimeMin, $iTimeMax, 1)
EndIf (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndIf)
Sleep (http://www.autoitscript.com/autoit3/docs/functions/Sleep.htm)(100)
WEnd (http://www.autoitscript.com/autoit3/docs/keywords.htm#WEnd)

[Pozia]

madmasles, можно немножко подправить? Нужно чтобы сидюк после открытия сразу же закрылся, а рандомное время было только для открытия? И можно ли как нибудь сделать чтобы скрипт запускался как системный процесс, чтобы в диспетчере его было сложнее отследить?

[madmasles]

Pozia,
Поправил.

[kaster]

что за шутки :unsure:

[Pozia]

kaster, да хочу на работе разрядить обстановку, а то все хмурые с этим кризисом... Вы не подумайте, мне вирус не нужен ))