咨詢內容:
?九轉序列,以前讓老師做過一個信號,找不到了,麻煩老師再給做一個:出信號1的時候做個聲音提示,謝謝 A1:=C>REF(C,4);NT:=BARSLASTCOUNT(A1);TJ11:=9;TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT;MM:=BACKSET(NT=9,9);DRAWNUMBER(MM=1&&AY>0,H,NT,0,COLORYELLOW);NX:=BACKSET(ISLASTBAR,NT);DRAWNUMBER(NX&&REFX1(NT<9,100),H,NT,0,COLORYELLOW);DRAWICON(NT=9,H+2,'CO9',COLORGREEN; B1:=C<REF(C,4);NT0:=BARSLASTCOUNT(B1);TJ21:=NT0=9 ;NN:=BACKSET(NT0=9,9);TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0;DRAWNUMBER(NN=1&&AY1>0,L,NT0,0,COLORFF00FF),VALIGN0;ND:=BACKSET(ISLASTBAR,NT0);DRAWNUMBER(ND&&REFX1(NT0<9,100),L,NT0,0,COLORFF00FF),VALIGN0;DRAWICON(NT0=9,L-2,'CO112',COLORGREEN;
?
?來源:程序化99
文華技術人員:
?該數字標注為未來函數編寫,不支持實時的聲音提示。
?
?來源: www.tumamayizhan.com
文華客服:
?了勝于無,老師以前幫我編過,我找了半天沒找到,麻煩老師寫一下
?
網友回復:參考: A1:=C>REF(C,4);NT:=BARSLASTCOUNT(A1);TJ11:=9;TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT;MM:=BACKSET(NT=9,9);DRAWNUMBER(MM=1&&AY>0,H,NT,0,COLORYELLOW);NX:=BACKSET(ISLASTBAR,NT);DRAWNUMBER(NX&&REFX1(NT<9,100),H,NT,0,COLORYELLOW);DRAWICON(NT=9,H+2,'ICO9'),COLORGREEN;NT=1,SOUND('A');B1:=C<REF(C,4);NT0:=BARSLASTCOUNT(B1);TJ21:=NT0=9 ;NN:=BACKSET(NT0=9,9);TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0;DRAWNUMBER(NN=1&&AY1>0,L,NT0,0,COLORFF00FF),VALIGN0;ND:=BACKSET(ISLASTBAR,NT0);DRAWNUMBER(ND&&REFX1(NT0<9,100),L,NT0,0,COLORFF00FF),VALIGN0;DRAWICON(NT0=9,L-2,'ICO112'),COLORGREEN;NT0=1,SOUND('A');