만우절이 코앞으로 다가왔습니다! 장난과 유쾌한 소동을 기대해야 할 때입니다. 올해에는 누군가에게 약간의 불편함이나 재미를 선사하는, 무해한 장난을 계획하고 실행해 보는 건 어떨까요? 사무실에서 가볍게 즐길 수 있는 장난으로, 마우스 센서 아래에 종이를 붙이는 방법도 있지만, 좀 더 색다르고 재미있는 장난을 원한다면 오랫동안 사랑받아온 CD/DVD 드라이브 장난을 강력히 추천합니다.
주의사항
이 장난을 소개하기 전에, 몇 가지 주의사항을 말씀드립니다. 장난으로 인해 발생할 수 있는 결과에 대한 책임은 본인에게 있습니다. 만약 장난 대상자가 좌절하여 컴퓨터 화면을 던지는 극단적인 상황이 발생하더라도, 우리는 어떠한 책임도 지지 않습니다.
장난 준비 및 실행 방법
이 장난을 실행하려면, 주변에 사람이 없는 틈을 타 5분 정도 다른 사람의 컴퓨터에 접근할 수 있어야 합니다. 먼저 본인의 컴퓨터에서 장난을 위한 준비 작업을 진행합니다. 메모장을 열어 아래의 코드를 복사하여 붙여 넣습니다.
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
wscript.sleep 600000
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 120000
loop
작성한 코드를 임의의 이름과 확장자 VBS로 저장한 후, 대상 컴퓨터의 적당한 위치에 복사해 둡니다. 이것으로 장난 준비는 완료됩니다.
위의 코드는 2분마다 CD/DVD 드라이브를 자동으로 열도록 설정되어 있습니다. 좀 더 재밌는 효과를 위해 드라이브가 열릴 때마다 팝업 메시지를 표시할 수도 있습니다. 메시지를 추가하려면 위 코드 맨 첫 줄에 다음 코드를 추가하십시오.
MsgBox("Happy April Fools' Day!")
장난 대상자가 스크립트를 눈치채지 못하는 한, 드라이브는 계속해서 열렸다 닫혔다 할 것입니다. 하지만 만약 상대방이 컴퓨터 스크립트에 대한 지식이 있다면, 이 장난은 큰 웃음을 주지 못할 수 있습니다. 최악의 경우, 마우스 밑에 종이를 붙이는 소소한 장난으로 끝내야 할지도 모릅니다.
마지막으로
만우절에 친구들에게 장난을 치기로 결정했다면, 장난이 굴욕적이거나 심각한 정신적, 신체적 피해를 주는 것이 아닌 유쾌한 경험이 되도록 주의해야 합니다.