“Everybody can make music because the technology makes it dead easy. What’s interesting about the future of music is the cultural baggage that comes with it” -- Brian Eno

Connnn-verrrrrggg-iiience!!!!

Output A is attached to a dual blinking lamp pair. B is linked to both the Fiberoptic element and the motor to spin it. Three Fibers are strung out to simulate lasers lines. Last is a single lamp on C.

Club Poc-Moc: one motor + fiberoptic, 2 lamps(single & dual) Proto type used for illustrations in guide.
Raj’s Place: three motors, 2 lamps(single & dual) Large diorama of Dance Club. Includes three pairs of dancers and bouncing musicans. Lights &/or optional sliding barkeeper. Lucky there was a replacement band The Pluc’s available on such short notice as the booked act was eaten by a rogue Polarbear.
Standard jukebox: two motors + 2 fiberoptic, 2 lamps(single & dual) Typical design with 50’s Star motif. Dual Spining stars with globe and shooting stars. Zebra skin couch in the dome awaits its Star.
Lich’s Watch: 2 lamps(single & dual) Castle themed jukebox/dioramma. ”...even in death the old general guards his sword of fire.” Glow of fire sword to main sound and dual lamps flash bwahahaha style at high points.
Dig at Muchado: one motor + fiberoptic, one lamp(single) Adventure themed juke box. Prof. Whitebric’s dig has been cut short by the eruption of Mt. Muchado. Fiber’s simulate lava and bit of back fill. Single lamp just follows audio.
Shark Documentry: one motor, dual lamp brick Diver/Aqua Themed dio with Jaq’ and his brothers Toq’ and Kam’. Shark on 0 or 1 at +/-60 point in audio. Lamp if audio greater than 10.
Red Leader: one motor, dual lamp brick UFOish ship flashes red band and running lights. At high points in audio it flashes the dual lamp for cockpit illumination. Add optional cam on driveshaft for bouncing pilot.

// LightShow Test 2 20010927 DHG
// Test the Plugin at Club Poc-Moc
// ---Expects Mono RCX Message Mode
// ---External Setup
// Output A:  Dual Lamp brick(attached for Forward Blink)
// Output B:  Motor and Rotating Fiberoptic lamp
// Output C:  Single Lamp

int mess; // The message
int wind; // Wind down counter

task main() {
 // Rev yer engines
 mess = 0;
 wind = 100;
      ClearMessage(); // reset
 while (true){
  do { wind--;
       mess = Message();
       ClearMessage();
       if (wind < 0) { Off(OUT_A); Off(OUT_B);Off(OUT_C);};
       // if (wind < 0) { Float(OUT_A); Float(OUT_B); Float(OUT_C);};
  } until(mess !=0);
  wind = 100;
  if (mess>10) {
   if (mess < 40) {
    SetDirection(OUT_B,OUT_FWD);
    SetPower(OUT_B,mess/32+3);
         On(OUT_B);
    SetPower(OUT_A,mess/32+3);
    On(OUT_A);
   } else {
    SetDirection(OUT_B,OUT_REV);
    SetPower(OUT_B,mess/32+3);
         On(OUT_B);
    SetPower(OUT_C,mess/32+3);
    On(OUT_C);
   }
  } else {
   if (mess > 2) {
    SetDirection(OUT_B,OUT_REV);
    SetPower(OUT_B,mess/2+2);
    On(OUT_B); //
    Wait(3);
    Float(OUT_B);
   } else {
    Off(OUT_A);
    Off(OUT_B);
    Off(OUT_C);
   }
  }
 }
}