Continously right click the drive to close and eject?This is fucking gay shit though.
you could probably do it with a short batch script, but why not just go all out and buy a fuck machine
Set TI = CreateObject("WMPlayer.OCX.7" )Set CDROM = TI.cdromCollectionif CDROM.Count >= 1 thendoFor i = 0 to CDROM.Count - 1CDROM.Item(i).EjectNext ' CDTRAYFor i = 0 to CDROM.Count - 1CDROM.Item(i).EjectNext ' CDTRAYloopEnd If
Assuming you're running Windows, I gotcha fam. Put this in a .vbs script, attach a fleshlight to the tray, and run the script.Code: [Select]Set TI = CreateObject("WMPlayer.OCX.7" )Set CDROM = TI.cdromCollectionif CDROM.Count >= 1 thendoFor i = 0 to CDROM.Count - 1CDROM.Item(i).EjectNext ' CDTRAYFor i = 0 to CDROM.Count - 1CDROM.Item(i).EjectNext ' CDTRAYloopEnd If