Sveiki spocēni. Šajā rakstā jums parādīšu, kā nokaitināt cilvēkus, kas izmanto datorus (offisā, skolā, kautvai mājās). Ja vēlaties lai viss izdodas, tad sekojies visiem soļiem pēc kārtas.
P.S - ja manat kādas drukas kļūdas, tad droši ierakstat tās komentāros.
Sākam visu ar Notepad atvēršanu. Te tiks rakstīts viss Haosu izraisošais kods :D
Te nu tas ir! Šis kods ir visa vaininieks. Īsos vārdos: šis kods izraisa CD tray atvēršanos. sākumā paies 10 minūtes, kamēr tas aktivizēsies. tad ik pa 2 minūtēm atkārtoti atvērsies CD tray. Laika intervālus var mainīt. Vienīgais mīnuss - uz portatīvajiem datoriem tas nav tik interesanti, jo CD tray portatīvajiem pats neaiztaisās, tādēļ šo triku labāk mēģinat uz stacionārā datora.
Saglabājot šo failu ņemam All files, lai varētu saglabāt .vbs formātā.
Te nu ir gatavs fails. To var ielikt Startup mapē, lai katru reizi ieslēdzot datoru sāktos haoss, vai arī noslēp oriģinālfailu, uztaisi Shorcut un šim shortcutam nomaini ikonu, piemēram uz Google Chrome. attaisot ikonu nekas uz ekrāna neparādīsies, bet šis .vbs fails tiks aktivizēts.
Ja kas, te ir kods:
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
Have fun :D
