Zylonenauge Solar

// ZylonenaugeSchneeanimationSolar V1.2 (c) Oliver Mezger 6.01.2020
// 4MHz externer Schwinger B.O.D. bei 1,8V
#include <avr/io.h>
#include <util/delay.h>
#include <avr/sleep.h>
 
#define KEYREADER (~PIND&0x70)>>4 // Einlesen, invertieren, maskieren zurecht schieben
unsigned char keyOld = 0;       // alter Tasten-Zustand 
unsigned char keyEnter,keyExit; // gedrueckte und losgelassene Tasten 
 
volatile unsigned int zeit=0; // zaehlt 0,1ms runter in my_delay
 
void my_delay(unsigned int z){ // 0,1 ms 
  zeit=z;
  while(zeit); 
}
 
void keyCheck(){                // Tastaturabfrage mit Flankendedektion  
  unsigned char keyTest,tmp; 
  keyEnter = 0, keyExit = 0; 
  keyTest = KEYREADER;          // Einlesen
  if (keyOld != keyTest){       // hat sich was getan 
    my_delay(100);              // Prellen abwarten 
    tmp = KEYREADER;            // noch mal Einlesen
    if (tmp == keyTest){        // ist es stabil? 
      keyEnter = (~keyOld) & keyTest; // steigende Flanke !alt und neu 
      keyExit = keyOld & (~keyTest);  // fallende Flanke alt und !neu 
      keyOld = keyTest; 
    } 
  } 
} 
unsigned char muster[]={0x78,0x74,0x72,0x71,0xb8,0xb4,0xb2,0xb1,0xd8,
0xd4,0xd2,0xd1,0xe8,0xe4,0xe2,0xe1};
unsigned char booster = 0; // Pulsbreite = 2µs*booster 
 
ISR(INT0_vect){ // wenn es dunkel ist wird ISR ausgelöst
  GIMSK &= ~(1 << INT0); // Interrupt wieder abschalten
  PORTD &= ~(1<<PD0); // Beleuchtung einschalten
}
ISR(TIMER0_COMPA_vect){ // Interrupt Service Routine
  unsigned char level;
  zeit--;
  if(booster){
  asm volatile ("sbi 0x12,1"); // sbi PORTD,1
  for(level=0;level<booster;level++) asm volatile ("nop");
  asm volatile ("cbi 0x12,1"); // cbi PORTD,1
  }
}
void enter_sleep(void){
  PORTD |= 1<<PD0; // Beleuchtung ausschalten
  GIMSK |= (1 << INT0); // Interrupt0 ermoeglichen
  MCUCR = (1<<SM0) | (1<<SE); // Schlafmodus auf PWR_Down
  sleep_mode(); // Schalfen schicken
  /* Aufgewacht! */
  MCUCR = 0;
}
 
int main(){
  DDRB=0xff;      // PORTB auf Ausgang
  signed char musterz=0; // Position 0
  char z=0,i,up=0;
  PORTD = 0b01111000; // Pullups an PD2 hat pullDown, PD0 an
  DDRD = 3; // PD0 und PD1 als Ausgang
  TCCR0A |= 1<<WGM01; // Timer im CTC-Mode
  TCCR0B |= 2; // Vorteiler 1: Phi/1; 2: Phi/8; 3: Phi/64; 4: Phi/256; 5: Phi/1024
  TIMSK |= 1<<OCIE0A; // Timer/Counter0 Output Compare Match A Interrupt Enable
  OCR0A = 49; // Wert bei dem der Timer wieder auf 0 gesetzt wird
  sei();
  while(1){
    if(PIND&4) enter_sleep(); // wenn es hell ist schlafen
    else{
      keyCheck(); // Maske,NLogik
      if(keyEnter&1){ // Taste0 gedrueckt?
        if(booster>0)booster--;
      }
      if(keyEnter&2){ // Taste1 gedrueckt?
        if(booster<15)booster++;
      }
      musterz=8+rand()%8;
      z=2+(rand()%32);
      for(i=0;i<=z;i++){
        my_delay(300);
      }
      z=2+(rand()%16);
      while (musterz>=0){
        PORTB=muster[musterz--];
        for(i=0;i<=z;i++){
          my_delay(200);
        } 
      }
      PORTB=0;
      if(up){ // Helligkeit veraendern
        booster++;
        if (booster>=10){
          up=0;
        }
      }
      else{
        if (booster>0) booster--;
        else up=1;
      }
    }
  }
}