krnldebugled8to13full.ino

Go to the documentation of this file.

#include <krnl.h>
 
// LED  on pin 8 to 12 (and 13) used for indicating who is running
// pin 8 high = dmy
// pin 9 high = first task created
// pin 10 high = second
//
// if more than 6 task created they will no be shown individually but led 8 and 9 will be on
 
 
// NBNB 
 
// it can be wise to create tasks in order lwo priority first
// Then pin 8 will be dummy, pin9 will be lowest prio, pin 10 next lowest etc
 
struct k_t *p1, *p2, *p3;
char st1[100], st2[100], st3[100];
 
// LED 13 not used from user space bq we use led for indicating dummy i srunning
// when dummy is running it indicates enough cpu power
// if dummy is not running for a longer time you may have problems ....
void t1()
{
  while (1) {
 
    Serial.println("I am running");
    k_eat_msec_time(500);  // you are running
    Serial.println("dummy is now running");
    k_sleep(2000);     // you are NOT running so dummmy is running
  }
}
 
void setup()
{
 
  Serial.begin(9600);
  for (int i = 8; i < 14; i++) {
    pinMode(i, OUTPUT);
  }
 
  // set 8 to 13 to low  (PB0 to PB5
  //PORTB &= B11000000;  // 11 on PB6 and PB7 bq they might be high or low we do not know
 
  k_init(3, 0, 0); // init with space for one task
 
  // priority low number higher priority than higher number
  p1 = k_crt_task(t1, 10, st1, 100); // t1 as task, priority 10, 100 B stak
  p2 = k_crt_task(t1, 11, st2, 100); // t1 as task, priority 10, 100 B stak
  p3 = k_crt_task(t1, 12, st3, 100); // t1 as task, priority 10, 100 B stak
 
  k_start(1); // 1 milli sec tick speed
}
 
void loop() {
}
 
 
 
extern "C" {
 
  void k_breakout() // called every task shift from dispatcher
  {
 
    uint8_t c;
    // FOR UNO
    c = PORTB & B11000000;  // preserve PORTB bit 6 and 7
 
    if (pRun->nr < 6) {  // do we have more tasks than LEDs ?
      c |= (0x01 << pRun->nr);
      PORTB = c;
    }
    else {
      PORTB = c | B00000011; // on pin8 and 9 to indicate more than 6 tasks
    }
  }
}
 
 
/* or just LED13 if dummy ...
 *  
 *  both: pinMode(13,OUTPUT);
 *  uno mega
 *  
 *  if (pRun->nr == 0)
 *  PORTB = PORTB | B00100000;  // led on uno
 *                | B10000000;  // mega
 *                
 *  else
 *  
 *  PORTB = PORTB & B11011111;  // led off uno
 *                & B01111111;   / mega
 * 
 *  mega
 *
 */
 
/*
 
   Suggested PORTS TO USE
 
UNO
pin port
8   PB0
9   PB1
10  PB2
11  PB3
12  PB4
13  PB5  LED13
PB6 and 7  etc not to be used !
 
 
MEGA
pin port
78  PA0
77  PA1
76  PA2
75  PA3
74  PA4
73  PA5
72  PA6
71  PA7
13  PB7 LED13
 
MICRO
8  PB4
9  PB5
10 PB6
11 PB7
13 PC7 LED13
 
NANO
D8  PD0
D9  PD1
D2  PD2
D3  PD3
D4  PD4
D5  PD5
D6  PD6
D7  PD7
13  PB5  LED13
 
PRO MINI
2  PD2
3  PD3
4  PD4
5  PD5
6  PD6
13 PB5 LED13
 
 * */