九轉序列(通達信版).doc

《九轉序列(通達信版).doc》由會員上傳分享，免費在線閱讀，更多相關內(nèi)容在教育資源-天天文庫。

1、A1:=C>REF(C,4);NT:=BARSLASTCOUNT(A1);TJ11:=NT=9;TJ13:=ISLASTBARANDBETWEEN(NT,5,8);AY:=(BACKSET(TJ11>0,9)ORBACKSET(TJ13>0,NT))*NT;DRAWTEXT(AY>0,H*1.02,VAR2STR(AY,0)),COLORFF00FF;DRAWTEXT(NT=9,H*1.02,'9'),COLORGREEN;B1:=C

2、;TJ23:=ISLASTBARANDBETWEEN(NT0,5,8);AY1:=(BACKSET(TJ21>0,9)ORBACKSET(TJ23>0,NT0))*NT0;DRAWTEXT(AY1>0,L*0.98,VAR2STR(AY1,0)),COLORFF00FF;DRAWTEXT(NT0=9,L*0.98,'9'),COLORGREEN;