hola, hace varias dias habia posteado porque no podia pasar un programa de visual basic 3 al 6 , bueno ahora estoy tratando de entender el codigo del programa, el programa lee una tarjeta que tiene el chip sle4442 con un PIC12CE518 , bueno en el codigo hay una funcion que se llama CardInsert y detecta si esta conectado el dispositivo y tambien si es que esta metida la tarjeta, el codigo es el sgte:
Sub CardInsert()
PortOut PortAddress, &H30 'Pone a 1 bit 1,2,3,4,6 Y 7 para poder leer ACK y PE (Es invertido)
CardON = PortIn(PortAddress2)
CardON = CardON And &H60
'*******Para saber si está conectado el interface
If CardON = 96 Then
If Principal!LabelConect.Caption = "TARJETA OK" Then
ReadM
End If
Principal!LabelConect.Caption = "No está conectada la interfaz"
Principal!LabelErrors.Visible = False 'No muestra Contador de errores
Principal!TextErrors.Visible = False
'*******Para saber si está colocada la tarjeta
ElseIf CardON = 0 Then
If Principal!LabelConect.Caption = "TARJETA OK" Then
ReadM
End If
Principal!LabelConect.Caption = "INSERTAR TARJETA"
Principal!LabelErrors.Visible = False
Principal!TextErrors.Visible = False
ElseIf CardON = 32 Then
If Principal!LabelConect.Caption <> "TARJETA OK" Then
ReadM
End If
Principal!LabelConect.Caption = "TARJETA OK"
Principal!LabelErrors.Visible = True
Principal!TextErrors.Visible = True
End If
End Sub
por ejemplo no se que significa "es invertido" (en la explicacion de la primera linea), o tambien porque cuando CardOn es 96,0 o 32 significa tal cosa.
No entiendo mucho porque no he programado en este campo. quizas las preguntas sean basicas pero necesito ayuda
Desde ya muchas gracias.
