欧姆定律让各组件协同工作的AS程序

让各组件协同工作的AS程序//设定E=1.5V，E0与EE发生碰撞的检测语句。if(_root.E0.hitTest(_root.EE)){e=1.5;tellTarget(E0){gotoAndPlay(4);}tellTarget(_root.EE){gotoAndStop(1);}}//设定E=3V，E1与EE发生碰撞的检测语句。if(_root.E1.hitTest(_root.EE)){e=3;tellTarget(_root.EE){gotoAndStop(2);}tellTarget(E1){gotoAndPlay(4);}}//设定E=4.5V，E2与EE发生碰撞的检测语句。if(_root.E2.hitTest(_root.EE)){e=4.5;tellTarget(E2){gotoAndPlay(4);}tellTarget(_root.EE){gotoAndStop(3);}}//显示电源读数EX=e+V;//显示电阻R1读数R=int(300*(getProperty(YT,_x)-250));RR=R/1000;//显示电路电流读数，式中J为开关变量I=J*(E/(R+1000));//实际电流输出毫安数。IX=I*1000;//电流读数控制灯光。if(IX=3){tellTarget(_root.L){gotoAndStop(6);}//假如电流大于等于3mA，则告知灯泡影片组件L播放第6帧，灯泡损坏！}elseif(IX=1.2){tellTarget(_root.L){gotoAndStop(5);}//假如电流大于等于1.2mA，则告知灯泡影片组件L播放第5帧，灯泡明亮。}elseif(IX=1){tellTarget(_root.L){gotoAndStop(4);}//假如电流大于等于1mA，则告知灯泡影片组件L播放第4帧，灯泡稍暗。}elseif(IX=0.5){tellTarget(_root.L){gotoAndStop(3);}//假如电流大于等于0.5mA，则告知灯泡影片组件L播放第3帧，灯泡更暗。}elseif(IX=0.01){tellTarget(_root.L){gotoAndStop(2);}//以上假设读者可随意设置，要实现灯光渐变效果，L片段要另作设计。}else{tellTarget(_root.L){gotoAndStop(1);}}//如果以上条件不成立，则告知灯泡影片组件L播放第1帧，灯灭！