k01debug.ino

Go to the documentation of this file.

/* k01
    One task printing own usage of stak
*/
 
#include <krnl.h>
 
#define STKSIZE 100
 
#define TASKPRIO 10
 
char stak[STKSIZE];
struct k_t * pStak;
 
void task()
{
  char flipflop = 0;
  while (1) {
    k_eat_msec_time(10);  // consume 10 millisec of CPU time
    k_sleep(30); // sleep 100 ticks - replacement for delay bq k_seelp releases CPU
 
    if (flipflop) {
      flipflop = 0;
      digitalWrite(13, HIGH);
    }
    else {
      flipflop = 1;
      digitalWrite(13, LOW);
    }
  }
}
 
void setup() {
  // for debugging - ON UNO led ON PIN 8,9,...,13
  for (int i = 8; i < 14; i++)
    pinMode(i, OUTPUT);
 
  Serial.begin(9600);
 
  k_init(1, 0, 0); // 1 task, 0 semaphores, 0 messaegQueues */
  pStak = k_crt_task(task, TASKPRIO, stak, STKSIZE);
  k_start(1); /* start krnl timer speed 1 milliseconds*/
 
  Serial.println("If you see this then krnl didnt start :-( ");
}
 
void loop() {}
 
/***** DEBUGGING PART - LED ON 8-12**********/
/************************ DEBUG CALLBACK BREAKOUT PART ****************/
// must be extern C ! its not mandatory to supply with these  functions - only if you need
 
extern "C" {
 
  // called when a semphore is clipping - nr is id of semaphore and i os nr of times clip has occured
  unsigned char led13;
  void k_sem_clip(unsigned char nr, int i)
  {
    return;
    if (nr == 2)
      led13 |= 0x20;
  }
 
  void k_sem_noclip(unsigned char nr)
  {
    return;
    if (nr == 2)
      led13 = 0x00;
  }
 
 
  /* void k_send_Q_clip(unsigned char nr, int i) {} */
 
  // task numbering is in creation order: dummy: 0,  first of yours 1, next 2,...
  void k_breakout() // called every task shift from dispatcher
  {
    unsigned char c;
    PORTB  = (1 << pRun->nr); // arduino uno !! specific usage of PORTB
  }
  // for a MEGA you have to find another port :-)
  // port K (adc8-15) seems feasible
  // get inspired at http://kom.aau.dk/~jdn/edu/doc/arduino/ards.html
}