Decompile el SWF del theme red carpet que enciende el led y lo deja prendido, y extraje el codigo que segun creo...enciende el Led..
Espero que sirva de algo...Saludos
Código:// Action script... // [Action in Frame 1] lightNum = 0; lightMax = 5; call("init"); // [Action in Frame 2] call("resetvals"); call("movelights"); call("calclights"); call("showlights"); // [Action in Frame 3] gotoAndPlay(2); // [Action in Frame 10] /:beam1 = 15; /:beam2 = 15; /:beam3 = 15; /:beam4 = 15; /:beam5 = 15; // [Action in Frame 20] depth = depth + 1; if (depth == 15) { depth = 1; } // end if if (depth > 1) { newObject = "object" add depth; duplicateMovieClip("objects", newObject, depth); setProperty(newObject, _x, random(176)); setProperty(newObject, _y, random(144) - 50); if (random(6) == 0) { set(newObject add "/" add "objects" add "/" add "objects" add ":" add "color", 1); setProperty(newObject, _yscale, random(50) + 30); setProperty(newObject, _xscale, getProperty(newObject, _yscale)); } else { setProperty(newObject, _yscale, random(40) + 25); setProperty(newObject, _xscale, getProperty(newObject, _yscale)); } // end else if tellTarget(newObject add "/objects/objects/objects") { gotoAndStop(eval("/:objectFrame")); } // End of TellTarget tellTarget(newObject add "/objects/objects") { gotoAndStop(eval("/:Hours") + 1); } // End of TellTarget textVar = eval("/:objectFrame"); } // end if // [Action in Frame 30] for (sourceno = 1; eval("/:nosources") >= sourceno; sourceno = sourceno + 1) { for (beam = 1; beam <= 5; beam = beam + 1) { beamLightdist = beam * lightdist; l_s_pos = eval("light" add sourceno add "Pos"); l_s_span = eval("light" add sourceno add "span"); l_intensity = eval("intensity" add sourceno); if (beamLightdist - l_s_span < l_s_pos) { beamLightdist - l_s_span < l_s_pos; } // end if if (l_s_pos < beamLightdist + l_s_span) { position = l_s_pos - (beamLightdist - l_s_span); position = position / (2 * l_s_span) * (2 * l_intensity) - l_intensity; if (position > 0) { position = -position; } // end if brightness = l_intensity + position; set("beam" add beam, eval("beam" add beam) + brightness); } // end if if (eval("beam" add beam) > 100) { set("beam" add beam, 100); } // end if } // end of for } // end of for // [Action in Frame 40] /:$X = beam1; /:$X = beam2; /:$X = beam3; /:$X = beam4; /:$X = beam5; illuminate = "set?ledid=2&intensity=" add (eval("/:$X") < int(eval("/:$X")) ? (int(eval("/:$X") - 1)) : (int(eval("/:$X")))) add ";set?ledid=3&intensity=" add (eval("/:$X") < int(eval("/:$X")) ? (int(eval("/:$X") - 1)) : (int(eval("/:$X")))) add ";set?ledid=4&intensity=" add (eval("/:$X") < int(eval("/:$X")) ? (int(eval("/:$X") - 1)) : (int(eval("/:$X")))) add ";set?ledid=5&intensity=" add (eval("/:$X") < int(eval("/:$X")) ? (int(eval("/:$X") - 1)) : (int(eval("/:$X")))) add ";set?ledid=6&intensity=" add (eval("/:$X") < int(eval("/:$X")) ? (int(eval("/:$X") - 1)) : (int(eval("/:$X")))) add ";"; getURL("FSCommand:illumination", illuminate); // [Action in Frame 50] light1Pos = 1000; light1inc = (random(lightInc) + 4) / 10; light2Pos = 1000; light2inc = (random(lightInc) + 4) / 10; nosources = 2; lightdist = 10; light1span = 20; light2span = 20; intensity1 = random(50) + 51; intensity2 = random(50) + 51; baroffset = 0; movechange = 0; moveactual = 0; move1actual = 0; intensitychange1 = 0; sizechange1 = 0; lightInc = 30; // [Action in Frame 60] lightNum = lightNum + 1; if (lightMax < lightNum) { lightNum = 1; } // end if light1Pos = light1Pos + light1inc; light2Pos = light2Pos + light2inc; if (light1Pos > 100) { light1Pos = -50; light1Inc = (random(lightInc) + 1) / 10 + 1; intensity1 = random(50) + 51; } // end if if (light2Pos > 100) { light2Pos = -50; light2Inc = (random(lightInc) + 1) / 10 + 1; intensity2 = random(50) + 51; } // end if





RESPONDER

Marcadores