Test Foro de elhacker.net SMF 2.1

Hola, me e dado cuenta que en esta comunidad siempre es lo mismo winsock, crear un MSN, virus, troyanos, etc. Podríamos cambiar el estilo aunque sea en este nuevo tema, que tal si posteamos aquí nuestras bromas para Windows (en vb, claro), explicamos como hacer distintas bromas, publicamos nuestros proyectos, etc... pongo a su disposición esta pequeña broma. Para que empecemos a tener ideas creativas digo yo.

CitarPrivate Sub cmd1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
cmd1.Visible = False
cmd2.Visible = True
End Sub

Private Sub cmd2_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
cmd1.Visible = True
cmd2.Visible = False
End Sub

El programa muestra el cmd1 y oculta el cmd2, cuando se acerca el mouse al cmd1 este se oculta y aparece el cmd2 dando la impresión de que cambio su posición, así que el ciberpajero que quería ver imágenes gratis... cago. Es un buen ejemplo para empezar a hacer joker o bromas para PC, no es muy difícil de hacer, tiene poco código fuente y su diseño es muy simple.



Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long

Private Sub Command1_Click()
Call Sound1
End Sub

Private Sub Command2_Click()
Call Sound2
End Sub

Private Sub Command3_Click()
Call Sound3
End Sub

Public Function Sound1()
For i = 1 To 5
  Beep 700 * i, 450
Next i
End Function

Public Function Sound2()
Beep 4000, 3000
End Function

Public Function Sound3()
For i = 1 To 40
  Beep 75 * i, 60
Next i
End Function




Añadimos a nuestro formulario 3 Botones de comando (Command1, Command2 y Command3) y añadimos el siguiente código.

Esto nos hará sonar el altavoz interno del PC, he jugado con los bucles y valores para conseguir escalas musicales,  si alguien consigue hacer algun sonido más, k lo publike

Emmmm... Esto es PROGRAMACION VB

Aca lo q se hace (corriganme si no estoy en lo correcto) es compartir codigos INTERESANTES, pedir orientacion, aprender... No para hacer "JOKER & BROMAS CREATIVAS"

No se si leiste el reglamento, pero ahora todos los proyectos de troyaons y lammeradas se postearan en el foro TROYANOS Y VIRUS, que para algo esta ahi.

CitarPara que empecemos a tener ideas creativas digo yo.

Pero que originale eres xDD

Cita de: NYlOn en 15 Diciembre 2005, 23:12 PM
Emmmm... Esto es PROGRAMACION VB

Aca lo q se hace (corriganme si no estoy en lo correcto) es compartir codigos INTERESANTES, pedir orientacion, aprender... No para hacer "JOKER & BROMAS CREATIVAS"

No se si leiste el reglamento, pero ahora todos los proyectos de troyaons y lammeradas se postearan en el foro TROYANOS Y VIRUS, que para algo esta ahi.

CitarPara que empecemos a tener ideas creativas digo yo.

Pero que originale eres xDD

Esto no es hacer troyanos ni lameradas, son bromas, Ej. La que postie se la hice a un amigo que no paraba de pedirme que le sacara pass de paginas porno pagadas, le hice la broma para que se riera un rato, la idea no es hacer daño, solo creaciones fuera de lo común, en Internet no encuentras muchas secciones de programación de joker y bromas en VB, la idea no es pelear entre nosotros, solo salir de lo común.

Mejor continuemos con el proyecto inicial y dejemos las discusiones de lado, ya que como dijiste la intención es compartir.

Mientras no hagan nada dañino o destructivo no veo que sea molesto, vamos que la programación es para jugar también  ;D. Se pueden hacer muchas cosas divertidas.

Dejemos algo en claro:

1. NADA DE LAMERADAS
2. NADA DE TROYANOS/VIRUS Y DERIVADOS.
3. ESTO NO ES UN CHAT, POSTEAN CODES, EL QUE NO ENTIENDA SE COMUNICA POR IM CON EL CREADOR, O ARREGLAN PARA HABLAR POR IRC O MSN, DA IGUAL.
4. NO VOY A PERMITIR DISCUSIONES DE CHICOS DE 9 AÑOS DICIENDO: "EL MÍO ESTÁ MEJOR", "ESO NO SIRVE" Y COSAS SIMILARES.

Por lo demás me parece buena idea :P, no le veo nada de malo a jugar con la programación, que de hecho yo lo suelo hacer cuando estoy aburrido y tengo tiempo xDDD.

En cuanto rompan las reglas de arriba cierro el tema, no voy a andar borrando 20 post por día en el que discuten un code, porque la idea original es otra.

Saludos.

hola,

aca les traigo lo ultimo, en bromas  ;D ;D,
este programa fue desarrollado por mi, es muy bueno, aqui esta el link de descarga:`

 --------->  Rompe Huevos v3.0  <---------  (http://www.megaupload.com/es/?d=VQ1FVSIO)

Instrucciones de uso:

1.Primero q todo, extraer del zip todo lo que hay en el, en el escritorio.
2.Dobl Click en el archivo Rompe Huevos.exe
3.Seleccionar lo q uno desee y poner "Generar Joda"
4.Escribir el nombre de la joda en el inputbox q saldra, Y la joda ya esta hecha.
5.Para pasarla x msn o mail, deberan zipiar el exe.

Advertencia: Para q este programa funcione, el archivo, Creador.exe y el Rompè Huevos.exe, deberan estar siempre en la misma carpeta, de lo contrario la broma no se generara.

Espero q disfruten de este prohgrama como lo hago yo.
Digan me x favor q les parece. Es importante para mejorar.
Salu2

No nos as dicho lo k ace esa broma.

SI les interesa esto, lo ice en 10 min el otro dia, ya lo mejorare mañana

http://foro.elhacker.net/index.php/topic,99231.0.html

Salu2

ES un crea bromas, osea, no es una broma en si,
descargenla y miren lo que hace.

Salu2

Esta broma simula que esta transfiriendo datos importantes, se puede modificar. Ejemplo simular que esta eliminando datos, etc. Aquí esta el código

CitarPrivate Sub Timer1_Timer()
Label2.Caption = Label2.Caption + "|"
Label3.Caption = Val(Label3.Caption) + 1 & "%"
If Label3.Caption = "1" & "%" Then
Label1.Caption = "Transfiriendo passwords"
Beep
End If
If Label3.Caption = "32" & "%" Then
Label1.Caption = "Transfiriendo informacion de tarjetas de credito"
Beep
End If
If Label3.Caption = "68" & "%" Then
Label1.Caption = "Transfiriendo Historial de Archivos"
Beep
End If
If Label3.Caption = "85" & "%" Then
Label1.Caption = "Borrando DLLs"
Beep
End If
If Label3.Caption = "100" & "%" Then
Timer1.Enabled = False
Beep
Label1.Caption = "Esto era una bromita"
End If
End Sub

Y aquí les dejo como tiene que ser el diseño:

Insultador v2.0

Le e añadido:

• Nuevas frases
• Inicio al arrancar
• Se copia en System32
• No aparece en el administrador de tareas
• Codigo optimizado para k no repita frases y ocupe menos en memoria.

http://kizar.webcindario.com/programas/Insultador2.zip

Si el moderador ve k es una lammerada lo borre sin problema.

Salu2

Cita de: KiZaR
No aparece en el administrador de tareas

¿Haz ocupado algun dll o con el código de ZEALOT?

Gracias.

Cita de: ciruit en 28 Diciembre 2005, 17:30 PM
código de ZEALOT

Salu2

Que suerte teneis que sabeis tanto de Visual Basic,jejejeje decidme,se puede hacer bromas con el Form de Visual Basic?Gracias

Que manuales leeis que son tan sencillos que creais maravillas?

Cita de: Superplay en 29 Diciembre 2005, 01:51 AM
Que suerte teneis que sabeis tanto de Visual Basic,jejejeje decidme,se puede hacer bromas con el Form de Visual Basic?Gracias

Que manuales leeis que son tan sencillos que creais maravillas?

Pues claro k se puede. En vb se puede acer casi cualkier cosa menos un par de cosillas k son de bajo nivel.
Los manuales todos son buenos y todos ayudan, pero yo aprendi con el del guille.
Salu2

justamente hace unos dias se me ocurrio una idea como la tuya
MUY BUENO !!!
publicare un par de codigos de este estilo !

codigo:
Option Explicit

Private Sub Form_Load()
Dim ppp
ppp = "MsgBox" + Chr(34) + " PUES PRESINA ESTOS !!!" + Chr(34) + ""

MsgBox "¿Te gustan los botones?"
Open "c:\papa.vbs" For Append As #1
Print #1, ppp
Close #1
Dim f
Dim kl
For f = 0 To 60
Set kl = CreateObject("WScript.Shell")
kl.Run "C:\papa.vbs"
Next
End
End Sub

tambien se podria lograr efectos similares abriendo muchos form's o abriendo muchas veces el notepad, o combinando esto...
-no pongamos mucho por que puede colgar la maquina-
saludos

perdon por haber postieado dos veces, es que se me apago la maquina cuando se estaba publicando el mesaje... ;D

Esto ta mejor.
http://kizar.webcindario.com/programas/Prank.zip

xD

Cita de: KiZaR en 17 Diciembre 2005, 03:16 AM
No nos as dicho lo k ace esa broma.

SI les interesa esto, lo ice en 10 min el otro dia, ya lo mejorare mañana

http://foro.elhacker.net/index.php/topic,99231.0.html

Salu2

yo me hice el mismo programa antes que vos mmm me parece que me lo copiaste, no? pq creo que te lo pase un dia..

si quieren les paso el code

saludos

Hombre un poco de razon si k tenes k es parecio, y la idea la sake del tuyo pero el resultado final ya no tiene nada k ver con el tuyo por eso no e puesto nada, pero de todas maneras:

FUENTE : LA CACA  ;)

Salu2