8 TRUCOS CON EL BLOC DE NOTAS - BROMA INFORMÁTICA


Pequeñas bromas informáticas que fueron creadas solo para asustar, no daña el equipo, tampoco borra archivos, solo es para jugar una broma o piensen que eres hacker.

Recomiendo ver el vídeo antes de probar cada archivo.  😆

Matrix.bat

Se abrirá una venta y empezara a mostrar números aleatorios como si estuvieras hackeando una pc, pero solo es un efecto.

@echo off
color 02
:matrix
echo %random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%%random%
goto matrix

Voz.vbs

La computadora empezará a leer lo que esta escrito en var1 y lo volverá a repetir hasta que tu mismo termines el proceso.

do
Dim var1, var2
var1="Ora ora ora ora ora ora ora ora ora ora ora ora ora ora ora ora ora ora ora ora ora ora ora ora ora"
Set var2=CreateObject("sapi.spvoice")
var2.Speak var1
loop

SonidoTroll.bat

Lo que hará esto es reproducir un sonido una y otra vez sin parar, puedes modificar el sonido en la parte de "file=Salto.wav" en vez de Salto.wav.

@echo off
:sonido
set "file=Salto.wav"
( echo Set Sound = CreateObject("WMPlayer.OCX.7"^)
     echo Sound.URL = "%file%"
     echo Sound.Controls.play
     echo do while Sound.currentmedia.duration = 0
     echo wscript.sleep 100
     echo loop
     echo wscript.sleep (int(Sound.currentmedia.duration^)+1^)*1000) >sound.vbs
start /min sound.vbs
goto sonido

Este archivo sound.vbs suele crearse por si solo cuando usas SonidoTroll.bat 

Set Sound = CreateObject("WMPlayer.OCX.7")
Sound.URL = "Salto.wav"
Sound.Controls.play
do while Sound.currentmedia.duration = 0
wscript.sleep 100
loop
wscript.sleep (int(Sound.currentmedia.duration)+1)*1000

Mensajes.vbs

Aparecerá diferentes ventanas con el mensaje que dejemos en el código.

do
Mensaje=msgbox("Hola",16,"Mensaje")
Mensaje=msgbox("Que haces?",16,"Mensaje")
Mensaje=msgbox("Quiere salir?",16,"Mensaje")
Mensaje=msgbox("Nope",16,"Mensaje")
Mensaje=msgbox("xD",16,"Mensaje")
loop

Fantasma.vbs

Se abrirá el bloc de notas y empezará a escribir H O L A una y otra vez.

Set wshshell = wscript.CreateObject("wscript.shell")
do
wshshell.run "Notepad"
wscript.sleep 500
wshshell.AppActivate "Notepad"
WshShell.SendKeys "H"
WScript.Sleep 200
WshShell.SendKeys "O"
WScript.Sleep 200
WshShell.SendKeys "L"
WScript.Sleep 200
WshShell.SendKeys "A"
loop

AbrirPaginas.bat

Se abrirá toda las paginas que dejemos en el código una y otra vez.

@echo off
:bucle
start www.google.com
start www.facebook.com
goto bucle

AbrirImagen.bat

Es un bucle que abrirá una imagen varias veces hasta saturar tu equipo, puedes modificar la imagen en donde dice "cat.jpg".

@echo off
:imgx
start cat.jpg
goto imgx

Supremo.bat

Este código abrirá los anteriores archivos al mismo tiempo.

@echo off
:bucle 
start Matrix.bat
start Mensajes.vbs
start Fantasma.vbs
start Voz.vbs
start AbrirImagen.bat
start SonidoTroll.bat
start AbrirPaginas.bat
goto bucle

Recuerda 👀

Estos archivos solo son para jugar una broma, para detener o finalizar cada uno de estos archivos debes de usar el administrador de tareas o simplemente reiniciar el equipo.







  • Bloc de notas


  • Nombre          : TrucosBlocDeNotas.rar
  • Tamaño          : 205 KB