PIC a PORTB

[Admin HWnews]

Ja to nepisu v asm, ale Mikroe Psacalu - dival jsem se do asm vypisu po 
prekladu a jediny rozdil je v tom, ze bud dela BSF a nebo MOWF. Tohle 
zatim je jen takove pocatecni testovani DPS casti co jsou na ni. Je to 
az na konci cele smycky - kdy jsem si chtel jen otestovat LED - blik 
100ms a zhasnuto 900ms.

//============main===============================
begin
   TRISA:=%11111111;
   ADCON1:=%10000000;
   TRISC:=%00000000;
   PORTC:=0;
   SetBit(PORTC,4);                 //pridrzim napajeni zapnute
   Delay_ms(500);                   //

   TRISB:=%11111000;

   UART1_Init(9600);             // Initialize UART module at 9600 bps
   Delay_ms(500);                // Wait for UART module to stabilize
   UART1_Write_Text('www.CNCnet.info - MPPT fw: 1.0');
   UART1_Write(10);
   UART1_Write(13);

   while (TRUE) do               // Endless loop
     begin
       CtiAD;
       SendRS;

       if (analog[3]<484) then
         begin
           UART1_Write_Text('Podpeti baterie - odpojuji rizeni');
           UART1_Write(10);
           UART1_Write(13);
           ClearBit(PORTC,4);     //rozpojim napajeni
         end;

       PORTB:=255;            //tohle chodi MOWF
       SetBit(PORTB,2);       //tohle nechodi BSF
       Delay_ms(100);
       PORTB:=0;
       Delay_ms(900);
     end;
end.

Dne 19.12.2012 11:12, Miroslav Draxal napsal(a):
> Kousek programu by nebylo? (standardně to chodí)
>
> Míra
>
> Ps bacha na paměťové banky
>