Star Trek (2009) USS Enterprise Revell kit build - FINISHED! Page 3

/* Enterprise Blinkies

Flashes and fades multiple LEDs in sequence, connected to PWM pins, to emulate the strobe lights on the JJ Abrams Reboot starship enterprise.




created 2015
by Hugh Beauchamp




This code is in the public domain




*/










// set LED pins
const int doubleblink = 10;   //double blinking strobes on pin 10
const int pulse = 2;         //pulsing light on pin 2
const int nav = 9;            //navigation lights on pin 9
const int demark = 4;         //demarkation lights on pin 4
const int saucerflood = 6;    //saucer floodlights on pin 6
const int impulse = 7;        //impulse engines on pin 7
const int interior = 11;      //interior lights on pin 11
const int flood = 8;          //flood lights on pin 8
const int engine = 3;         //main engines on pin 3
const int dish = 5;           //deflector dish on pin 5








// set variables
int blinkstate = LOW;




long previousMillis = 0;        // stores last time LED updated




long blinkDuration = 30;    // blinking strobe on time
long blinkInterval = 120;    // blinking strobe time between short blinks
long blinkWait = 3000;        // blinking strobe time between cycles
long pulseWait = 1500;        // pulsing strobe time between cycles
long pulseSpeed = 3;        // pulsing strobe delay for each fade level. Shorter times mean a faster fade
long pulseOn = 0;               // pulsing strobe time to hold at maximum brightness
int blinkno = 0;                // blink counter stores the number of elapsed flashes




int brightness = 0;            // how bright the pulse LED is
int maxbrightness = 255;    // what the maximum brightness of the pulsing strobe is
int fadeAmount = 5;            // how many points to fade the LED by




// set lighting circuit brightnesses




int navbrightness = 4;
int demarkbrightness = 127;
int saucerfloodbrightness = 10;
int interiorbrightness = 255;
int floodbrightness = 255;
int enginebrightness = 255;
int dishbrightness = 255; 




// set impulse engine pulse maximum and minimum brightnesses and sine wave speed




int maximpulsebrightness = 255;
int minimpulsebrightness = 63;
float impulsespeed = 0.00025;




// set the display mode




int modecycle = 0;




long captime = 0;
long lastcaptime = 0;




void setup() {
  
// configure pin modes
  
  pinMode (doubleblink, OUTPUT);
  pinMode (pulse, OUTPUT);
  pinMode (nav, OUTPUT);
  pinMode (demark, OUTPUT);
  pinMode (saucerflood, OUTPUT);
  pinMode (impulse, OUTPUT);
  pinMode (interior, OUTPUT);
  pinMode (flood, OUTPUT);
  pinMode (engine, OUTPUT);
  pinMode (dish, OUTPUT);
 


}








void loop() {
  
  static float in = 4.712;
  float out;
  
// set current time to time since sketch began running
    unsigned long currentMillis = millis();




// check if time elapsed is greater than strobe time between cycles
    if(currentMillis - previousMillis > blinkWait && blinkno == 0) {




        previousMillis = currentMillis;           // save the time the LED switched 




        blinkstate = HIGH;                        // set LED state
   
        digitalWrite(doubleblink, blinkstate);     // set the LED
    
        blinkno = blinkno + 1;                    // increment blink counter
    }
 
// check if time elapsed is greater than strobe on time
    if(currentMillis - previousMillis > blinkDuration && blinkno == 1) {
        previousMillis = currentMillis;   
        blinkstate = LOW;
        digitalWrite(doubleblink, blinkstate);
        blinkno = blinkno + 1;
    }
  
// check if time elapsed is greater than strobe interval
    if(currentMillis - previousMillis > blinkInterval && blinkno == 2) {
        previousMillis = currentMillis;   
        blinkstate = HIGH;
        digitalWrite(doubleblink, blinkstate);
        blinkno = blinkno + 1;
    }




// check if time elapsed is greater than strobe on time - might be able to reuse statement above
    if(currentMillis - previousMillis > blinkDuration && blinkno == 3) {
        previousMillis = currentMillis;   
        blinkstate = LOW;
        digitalWrite(doubleblink, blinkstate);
        blinkno = blinkno + 1;
    }
  
// check if time elapsed is greater than pulse interval  
    if(currentMillis - previousMillis > pulseWait && blinkno == 4) {
        // fade up pulse LED
        for(brightness = 0; brightness <=maxbrightness; brightness+=fadeAmount) {        
            analogWrite(pulse, brightness);                                // set pulse LED brightness
            delay (pulseSpeed);                                            // wait to see fade effect
        }
        delay (pulseOn);                                                // wait while LED is at maximum brightness
        // fade down pulse LED
        for(brightness = maxbrightness; brightness >=0; brightness-=fadeAmount) {
            analogWrite(pulse, brightness);
            delay (pulseSpeed);
        }  
        blinkno = 0;                            // reset blink counter to zero
    }
    
// write static light brightnesses




analogWrite(nav, navbrightness);
analogWrite(demark, demarkbrightness);
analogWrite(saucerflood, saucerfloodbrightness);
analogWrite(interior, interiorbrightness);
analogWrite(flood, floodbrightness);
analogWrite(engine, enginebrightness);
analogWrite(dish, dishbrightness);




// sine wave pulsing for impulse engine light




  in = in + impulsespeed;
  if (in > 10.995)
    in = 4.712;
  out = sin(in) * ((maximpulsebrightness-minimpulsebrightness)/2) + ((maximpulsebrightness+minimpulsebrightness)/2);
  analogWrite(impulse,out);




}