PIC18F1230 Assembler ersetzten oder Header?

[Tobias W. (wintertime)]

Hallo an alle,

ich war schon lange nicht mehr in der C-Programmierung tätig und dann 
auch nur mit AVR.
Jetzt bin ich allerdings beruflich in einen Bereich gekommen bei dem es 
Bestandteil ist allerdings mit Microchip PIC. Um da wieder rein zu 
kommen hab ich mir ein kleines Projekt ausgedacht, das allerdings 
ausbaufähig sein soll.
benutzt wird
-MPLAP X
-ein PIC18F1230
Projekt sind 7 LED's als Lauflicht, die später allerdings als LED 
Laufschrift mit evtl. einigen Register usw ausgebaut werden.

Mein Problem ist sozusagen eine Wartezeit "ordentlich" zu Programieren, 
und diese als Funktion oder dergleichen aufzurufen.

Habe schon einiges ausprobiert ala Timer0, Timer1 oder auch einer 
Zählfunktion was aber soz. bescheiden ist. Mit dem Rest hats auch nich 
funktioniert. Nun bin ich auf die Idee gekommen ein kleines Assembler 
Progrämmchen zu machen. Am besten als eine Header-Datei oder dies sonst 
irgendwie einzubinden, am liebsten wäre mir etwas ohne Assembler.

Bin für alles offen, wie gesagt ich brauch halt ne ordentliche 
Grundlage.

/* PIC18f1230 tw 02.05.2013 LED  */




#include <p18cxxx.h>     //Header File für PIC18F1230

#pragma config OSC = INTIO2 //interner OSC wählen
//#pragma config FOSC=HS   //Taktbereich
#pragma config PWRT=ON   //Power on timer
#pragma config BOR=OFF   //Brown out reset
#pragma config WDT=OFF   //Watchdog timer
//#pragma config LVP=OFF   //Low voltage progr.
#pragma config MCLRE=ON  //Master clear reset
//#pragma config FOSC = INTOSC_EC    // internal oscillator

/*TRISA = 0x50;      //Port RA5 als Eingang gesetzt für MCLR

TRISB = 0x20;      //Port RB1 als Eingang gesetzt für LVP
TRISB = 0x70;      //Port RB6 als Eingang gesetzt für PGC
TRISB = 0x80;*/      //Port RB7 Als Eingang gesetzt für PGD

// oder auch:



//Macht evtl. das Leben einfacher ?!

#define LED1 LATAbits.LATA0
#define LED2 LATAbits.LATA1
#define LED3 LATAbits.LATA2
#define LED4 LATAbits.LATA3
#define LED5 LATAbits.LATA4
#define LED6 LATBbits.LATB5
#define LED7 LATBbits.LATB4

#define LED1_ON()     (LED1 = 1);
#define LED1_OFF()    (LED1 = 0);
#define LED1_Toggle()   (LED1 = !LED1);

#define LED2_ON()     (LED2 = 1);
#define LED2_OFF()    (LED2 = 0);
#define LED2_Toggle()   (LED2 = !LED2);

#define LED3_ON()     (LED3 = 1);
#define LED3_OFF()    (LED3 = 0);
#define LED3_Toggle()   (LED3 = !LED3);

#define LED4_ON()     (LED4 = 1);
#define LED4_OFF()    (LED4 = 0);
#define LED4_Toggle()   (LED4 = !LED4);

#define LED5_ON()     (LED5 = 1);
#define LED5_OFF()    (LED5 = 0);
#define LED5_Toggle()   (LED5 = !LED5);

#define LED6_ON()     (LED6 = 1);
#define LED6_OFF()    (LED6 = 0);
#define LED6_Toggle()   (LED6 = !LED6);

#define LED7_ON()     (LED7 = 1);
#define LED7_OFF()    (LED7 = 0);
#define LED7_Toggle()   (LED7 = !LED7);


void ALLON()
{
  LED1_ON();
  Wait();
  LED2_ON();
  Wait();
  LED3_ON();
  Wait();
  LED4_ON();
  Wait();
  LED5_ON();
  Wait();
  LED6_ON();
  Wait();
  LED7_ON();
  Wait();
}

void ALLOFF()
{
  LED7_OFF();
  Wait();
  LED6_OFF();
  Wait();
  LED5_OFF();
  Wait();
  LED4_OFF();
  Wait();
  LED3_OFF();
  Wait();
  LED2_OFF();
  Wait();
  LED1_OFF();
  Wait();
}

void Lauflicht()
{
        LED1_ON();
    Wait();
        LED1_Toggle();
        Wait();
    LED2_ON();
    Wait();
        LED2_Toggle();
        Wait();
    LED3_ON();
    Wait();
        LED3_Toggle();
        Wait();
    LED4_ON();
    Wait();
        LED4_Toggle();
        Wait();
    LED5_ON():
    Wait();
        LED5_Toggle();
        Wait()
    LED6_ON();
    Wait();
        LED6_Toggle();
        Wait();
    LED7_ON();
    Wait();
        LED7_Toggle();
        Wait();
}

void OC()
{
    OSCCON = 0xF2;       // internal oscillator, 8MHz
}
/*******************************************************************************************************/
void Wait()    //100ms
{

        movlw   .221;
        movwf   mytime;

Loop    nop;nop;nop;nop;nop;nop;

        decfsz  mytime, F;
        goto    Loop;
}

/*******************************************************************************************************/
}
void main()
{
    TRISB = 0xC2;      //RB 1,6,7 als Eingang 1100 0010 ??????

// PORT A
LATAbits.LATA0 = 1;    //Port RA0 als Ausgang gesetzt für LED1
LATAbits.LATA1 = 1;    //Port RA1 als Ausgang gesetzt für LED2
LATAbits.LATA2 = 1;    //Port RA2 als Ausgang gesetzt für LED3
LATAbits.LATA3 = 1;    //Port RA3 als Ausgang gesetzt für LED4
LATAbits.LATA4 = 1;    //Port RA4 als Ausgang gesetzt für LED5

//PORT B
LATBbits.LATB4 = 1;    //PORT RB4 als Ausgang gesetzt für LED7
LATBbits.LATB5 = 1;    //PORT RB5 als Ausgang gesetzt für LED6
    OC();
    int i,j;
    for (i=0; i<=5; i++)
    {
        ALLON();
    ALLOFF();
    }
    for (j=0; j<=5; i++)
    {
        Lauflicht();
    }

    return();
}

Hier der Assembler code den ich erst als fFunktion eingebunden habe, 
aber da meckert er.

void Wait()    //100ms
{

        movlw   .221;
        movwf   mytime;

Loop    nop;nop;nop;nop;nop;nop;

        decfsz  mytime, F;
        goto    Loop;
}

[Chris B. (dekatz)]

Tobias W. schrieb:
> movlw   .221;
>
>         movwf   mytime;
>
>
>
> Loop    nop;nop;nop;nop;nop;nop;
>
>
>
>         decfsz  mytime, F;
>
>         goto    Loop;

Das ist sicher nicht die richtige Schreibweise für Inline-Assembler beim 
XC8!  Siehe XC8-manual Seite 202ff !
Und eine Lösung mit einem Timer würde ich dem auch vorziehen bzw. gibt 
es beim XC8 auch ein __delay_ms() u.ä. Funktionen. Auch dafür siehe 
XC8-manual bzw. Help-Funktion im MPLABX.

[Tobias W. (wintertime)]

Wie gesagt Timer würde mir auch besser gefallen, da ich ihn später 100% 
noch brauche.

Hab da mal angefangen, weis jedoch nicht weiter :

/*

    Timer 1 Initialisierung
    
*/

void timer_1()
{
  RD = 1 ;          // 16-Bit
  T1RUN = 1;          // Timer 1 OSC (intern)
  T1CKPS1, T1CKPS0 = 1;    // Vorteiler 1:8 
  T1=SCEN = 1;        // Timer 1 OSC enabled
  //T1SYNC = 1;        // Nur bei externem OSC
  TMR1CS = 0;          // Internal clock (FOSC/4)
  TMR1ON = 1;          // Start Timer 1
}