SoloCodigo
		Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: karen81 en Sábado 21 de Junio de 2003, 07:56
		
			
			- 
				no se si alguien de ustedes ya hizo un proyecto de un generador de funciones en visual basic y utilizo el dispositivo de entrada/salida PPI :ayuda:
			
- 
				Debe definir el puerto a trabajar como una constante, por ejemplo para el caso del puerto paralelo sería: 
 
 Const puerto = &H378
 
 Luego activar un timer para ir dibujando los datos que ingresan por el puerto, por ejemplo de esta manera (es sólo un ejemplo):
 
 _________________________________
 
 Private Sub Timer1_Timer()
 Out puerto + 2, 32
 D = Inp(puerto)
 x = x + 1
 If D = 255 Then
 y = D / 11.590909
 Else
 y = D - 22
 End If
 
 If x = 250 Then
 x = 0
 Picture1.CurrentX = 0
 Picture1.CurrentY = 22
 Picture1.Refresh
 End If
 
 Picture1.Line -(x, y), vbWhite
 Text1.Text = D
 End Sub
 
 _________________________________
 
 Puede encontrar más información acerca de la librería en la dirección www.logix4u.net (http://www.logix4u.net)
 
 Aquí adjunto el archivo que se descarga de allí. Mucha suerte y Chao! :clown: