Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros entornos y lenguajes > ASM y Microcontroladores
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 30-12-2009
gaston260 gaston260 is offline
Miembro
 
Registrado: ene 2008
Posts: 169
Poder: 17
gaston260 Va por buen camino
Como usar un solo pin con mikropascal ?

Como se hace para que se ponga solo un pin en un nivel logico 1 ? , el pic es el 16f84a ! .
Responder Con Cita
  #2  
Antiguo 30-12-2009
Avatar de donald shimoda
donald shimoda donald shimoda is offline
Miembro
 
Registrado: jul 2008
Ubicación: Argentino en Santa Cruz de la Sierra
Posts: 1.083
Poder: 18
donald shimoda Va por buen camino
Con mikropaskal PRO :

Ejemplo para el pin 1 del port A

RA1_bit := 1;

Antes obviamente setear el pin como salida:

TRISA1_bit := 0;

Para versiones previas

TRISA.RA1 := 0;
PORTA.RA1 := 1;

Espero que te sirva.

Saludos
__________________
Donald Shimoda [Team RO] - Blogs: Remobjects Pascal
Responder Con Cita
  #3  
Antiguo 30-12-2009
gaston260 gaston260 is offline
Miembro
 
Registrado: ene 2008
Posts: 169
Poder: 17
gaston260 Va por buen camino
Muchisimas gracias señor donald !! estoy seguro que me servira ! .
Responder Con Cita
  #4  
Antiguo 30-12-2009
gaston260 gaston260 is offline
Miembro
 
Registrado: ene 2008
Posts: 169
Poder: 17
gaston260 Va por buen camino
me da los siguientes errores en mikropascal for pic !

4:1 E-3 Identifier 'TRISA1_bit' was not declared LED_Blinking_1_pin.ppas
5:1 E-3 Identifier 'RA1_bit' was not declared LED_Blinking_1_pin.ppas
10:8 E-4 Syntax error: Expected 'end' but '.' found LED_Blinking_1_pin.ppas
12:2 E-4 Syntax error: Expected '.' but 'end' found LED_Blinking_1_pin.ppas

este es el codigo

program LED_Blinking_1_pin;

begin
TRISA1_bit := 0; // configuro PORTA como salida (output)
RA1_bit := 0; // inicializa PORTA
//ANSEL := 0; // configuro un pin como entrada/salida digital
//ANSELH := 0;
WHILE TRUE DO
begin
RA1 := NOT PORTA; //toggle PORTA
Delay_ms(1000); // retardo de 1 segundo
end;
end.

Última edición por gaston260 fecha: 30-12-2009 a las 04:44:52.
Responder Con Cita
  #5  
Antiguo 05-01-2010
Avatar de fenixariel
fenixariel fenixariel is offline
Miembro
 
Registrado: mar 2007
Posts: 77
Poder: 18
fenixariel Va por buen camino
Hola gaston, deberias fijarte en la version de tu MikroPascal. Si tu version es la 8.0.0 o inferior:

Código Delphi [-]
program LED_Blinking_1_pin;

begin

   TRISA := %00000010;  

   PORTA.1 := 0; // solo para el pin A1
   //PORTA := 0; // tordo el puerto A
   ADCON1 := %-------------//ver datasheet del PIC
 
   WHILE TRUE DO
   begin
      SetBit(PORTA, 1); 
      Delay_mS(1000); 
      ClearBit(PORTA, 1);
   end;

end.

En la carpeta de instalacion puedes encontrar una multitud de ejemplos.........

Última edición por fenixariel fecha: 06-01-2010 a las 23:10:10.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Presentando a Mikropascal rretamar ASM y Microcontroladores 31 30-12-2009 04:31:48
No solo de Mikropascal vive Delphi sino tambien de MikroC y MikroBasic! fenixariel ASM y Microcontroladores 4 11-02-2009 23:33:18
se puede usar un solo TSQL_Connection para todos los formularios en una apli MDI??? Mitsuomi Conexión con bases de datos 3 28-12-2007 21:48:11
Como usar solo dos posiciones decimales alcides Varios 9 02-04-2007 20:31:31
Usar componente teniendo solo la dcu eMax Varios 1 20-04-2005 18:30:47


La franja horaria es GMT +2. Ahora son las 00:48:45.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi