最新天堂中文在线丨午夜嘿嘿嘿影院丨亚洲国产精品高清久久久丨中文字幕人成乱码熟女app丨www91亚洲丨97成人资源丨成人中文字幕+乱码+中文字幕丨一区二区三区在线 | 日丨日韩免费大片丨亚洲欧美一区二区三区丨国产在线观看a丨亚洲成人第一区丨国内免费视频成人精品丨亚洲综合色网站丨午夜精品美女久久久久av福利丨国产午夜人做人免费视频网站丨国产又黄视频丨97se狼狼狼狼狼亚洲网丨狠狠亚洲婷婷综合色香五月丨中国一级毛片黄丨国产女人十八毛片丨国产色视频在线播放丨国产亚洲精久久久久久无码苍井空丨天天摸日日摸爽爽狠狠丨久久综合香蕉国产蜜臀av

現有10個搶答器，最先按按鈕的搶答器前燈亮。而且要知道10個搶答器的搶答先后順序。這程序怎么寫？？？？？

用腳本語言可以實現，遵守先進先出原則就可以

(* 呼叫編號暫存******************************************************************************)
hj[0]:=a11_hj; hj[1]:=a12_hj; hj[2]:=a13_hj; hj[3]:=a14_hj; hj[4]:=a15_hj;  hj[5]:=a16_hj;
hj[6]:=b11_hj; hj[7]:=b12_hj; hj[8]:=b13_hj; hj[9]:=b14_hj; hj[10]:=b15_hj; hj[11]:=b16_hj;
(*送料滿斗后，清料標志     ******************************************************************)
qingliao[0]:=a11_qingliao_finished;qingliao[1]:=a12_qingliao_finished;qingliao[2]:=a13_qingliao_finished;
qingliao[3]:=a14_qingliao_finished;qingliao[4]:=a15_qingliao_finished;qingliao[5]:=a16_qingliao_finished;
qingliao[6]:=b11_qingliao_finished;qingliao[7]:=b12_qingliao_finished;qingliao[8]:=b13_qingliao_finished;
qingliao[9]:=b14_qingliao_finished;qingliao[10]:=b15_qingliao_finished;qingliao[11]:=b16_qingliao_finished;
qingliao[12]:=c11_qingliao_finished;qingliao[13]:=c12_qingliao_finished;qingliao[14]:=c13_qingliao_finished;
qingliao[15]:=c14_qingliao_finished;qingliao[16]:=c15_qingliao_finished;qingliao[17]:=a16_qingliao_finished;
(*移位處理***********************************************************************************)
(*addr[0]存儲的是最先響應的料斗編號**********************************************************)
for k:=0 to 18 by 1 do
    if addr[k]=0 and addr[k+1]<>0 then
        addr[k]:=addr[k+1];
        addr[k+1]:=0;
    end_if;
end_for;
(********************************************************************************************)
(*先呼叫，先響應。12個呼叫存儲滿后，禁止再儲存呼叫號碼。*************************************)
for i:=0 to 18 by 1 do
    if j=0 then
        if hj=true then
            if addr[0]=0 then
                addr[0]:=i+1;
                j:=1;
            elsif addr[1]=0 then
                addr[1]:=i+1;
                j:=1;
            elsif addr[2]=0 then
                addr[2]:=i+1;
                j:=1;
            elsif addr[3]=0 then
                addr[3]:=i+1;
                j:=1;
            elsif addr[4]=0 then
                addr[4]:=i+1;
                j:=1;
            elsif addr[5]=0 then
                addr[5]:=i+1;
                j:=1;
            elsif addr[6]=0 then
                addr[6]:=i+1;
                j:=1;
            elsif addr[7]=0 then
                addr[7]:=i+1;
                j:=1;
            elsif addr[8]=0 then
                addr[8]:=i+1;
                j:=1;
            elsif addr[9]=0 then
                addr[9]:=i+1;
                j:=1;
            elsif addr[10]=0 then
                addr[10]:=i+1;
                j:=1;
            elsif addr[11]=0 then
                addr[11]:=i+1;
                j:=1;
            elsif addr[12]=0 then
                addr[12]:=i+1;
                j:=1;
            elsif addr[13]=0 then
                addr[13]:=i+1;
                j:=1;
            elsif addr[14]=0 then
                addr[14]:=i+1;
                j:=1;
            elsif addr[15]=0 then
                addr[15]:=i+1;
                j:=1;
            elsif addr[16]=0 then
                addr[16]:=i+1;
                j:=1;
            elsif addr[17]=0 then
                addr[17]:=i+1;
                j:=1;
            end_if;
        end_if;
    end_if;
    (*呼叫的清除************************************************************************************)
    (*外部呼叫結束：即外部下位電眼處已經有粉料，同時延時時間到達************************************)
        if not hj and qingliao=true then
            if addr[0]=i+1 then
                addr[0]:=0;
                j:=0;
            elsif addr[1]=i+1 then
                addr[1]:=0;
                j:=0;
            elsif addr[2]=i+1 then
                addr[2]:=0;
                j:=0;
            elsif addr[3]=i+1 then
                addr[3]:=0;
                j:=0;
            elsif addr[4]=i+1 then
                addr[4]:=0;
                j:=0;
            elsif addr[5]=i+1 then
                addr[5]:=0;
                j:=0;
            elsif addr[6]=i+1 then
                addr[6]:=0;
                j:=0;
            elsif addr[7]=i+1 then
                addr[7]:=0;
                j:=0;
            elsif addr[8]=i+1 then
                addr[8]:=0;
                j:=0;
            elsif addr[9]=i+1 then
                addr[9]:=0;
                j:=0;
            elsif addr[10]=i+1 then
                addr[10]:=0;
                j:=0;
            elsif addr[11]=i+1 then
                addr[11]:=0;
                j:=0;
            end_if;
        end_if;
end_for;
(*呼叫的影應****************************************************************************************)
case addr[0] of
    1:   a11_yd:=true;  
    2:   a12_yd:=true;
    3:   a13_yd:=true;    
    4:   a14_yd:=true;
    5:   a15_yd:=true;  
    6:   a16_yd:=true;  
    7:   b11_yd:=true;
    8:   b12_yd:=true;
    9:   b13_yd:=true;
   10:   b14_yd:=true;
   11:   b15_yd:=true;
   12:   b16_yd:=true;
   13:   c11_yd:=true;
   14:   c12_yd:=true;
   15:   c13_yd:=true;
   16:   c14_yd:=true;
   17:   c15_yd:=true;
   18:   c16_yd:=true;
    else
         a11_yd:=false; a12_yd:=false; a13_yd:=false; a14_yd:=false; a15_yd:=false; a16_yd:=false;
         b11_yd:=false; b12_yd:=false; b13_yd:=false; b14_yd:=false; b15_yd:=false; b16_yd:=false;
         c11_yd:=false; c12_yd:=false; c13_yd:=false; c14_yd:=false; c15_yd:=false; c16_yd:=false;end_case;
addrr0:=addr[0];