![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#14
|
|||
|
|||
|
perdon lo borre pero intento generar de nuevo el error con mikropascal pro 2009 y no lo hace !! voy a volver a instalar mikropascal 8.0.0.1 para ver si de nuevo me genera el error !
era algo asi el codigo Código:
program probar1;
{ Declarations section }
begin
SetBit(TRISA, 3);
SetBit(TRISA, 2);
begin
while true do
begin
while TestBit(PORTB,3) = 1 Do
begin
PORTA := PORTA Or %00010010;
end;
end;
end;
begin
while true do
begin
while TestBit(PORTB,2) = 1 do
begin
PORTA := PORTA Or %11101101;
end;
end;
end;
end.
gracias ! Última edición por gaston260 fecha: 06-01-2010 a las 06:40:14. |
|
|
Temas Similares
|
||||
| Tema | Autor | Foro | Respuestas | Último mensaje |
| [Z80 Pascal] Proyecto de compilador | Ñuño Martínez | ASM y Microcontroladores | 6 | 11-05-2010 14:37:47 |
| Mikro Pascal 8051 | JoseFco | ASM y Microcontroladores | 9 | 19-10-2008 00:43:50 |
| primer programa y primer empleo | josi | La Taberna | 36 | 17-07-2008 22:30:41 |
| Comparativa entre Free Pascal 2.2.0 y Turbo Pascal 7.0 | esocrates | Varios | 2 | 14-07-2008 14:56:24 |
| manual de excepciones de object pascal para free pascal??? | Garion | OOP | 3 | 27-05-2005 00:42:29 |
|