相關(guān)標(biāo)簽:

?

{均線主圖}{星期顯示}
yy1:=WEEKDAY;
IF BARSTATUS=2 and (yy1=5) THEN BEGIN DRAWTEXTREL(10,950,'■星期五■'),LINETHICK2,Color0048EE;end;
IF BARSTATUS=2 and (yy1=4) THEN BEGIN DRAWTEXTREL(10,950,'■星期四■'),LINETHICK2,Color3056FF;end;
IF BARSTATUS=2 and (yy1=3) THEN BEGIN DRAWTEXTREL(10,950,'■星期三■'),LINETHICK2,Color7156FF;end;
IF BARSTATUS=2 and (yy1=2) THEN BEGIN DRAWTEXTREL(10,950,'■星期二■'),LINETHICK2,Color936AFF;end;
IF BARSTATUS=2 and (yy1=1) THEN BEGIN DRAWTEXTREL(10,950,'■星期一■'),LINETHICK2,ColorD4A3FF;end;
IF BARSTATUS=2 and (yy1=6) THEN BEGIN DRAWTEXTREL(10,950,'■星期六■'),LINETHICK2,Color05FF00;end;
IF BARSTATUS=2 and (yy1=0) THEN BEGIN DRAWTEXTREL(10,950,'■星期日■'),LINETHICK2,Color0000FF;end;{均線語(yǔ)言 箱體空間}
if DISPSTATUS=2 then aaa:=BARPOS;
if DISPSTATUS=1 then bbb:=BARPOS;
ddd:=aaa-bbb;
ee:=hhv(h,ddd);
MSTATUS:=BARSTATUS=2;
MA5:MA(C,5),PRECIS2;
MA10:MA(C,10),PRECIS2;
MA30:MA(C,30),PRECIS2;
MA60:MA(C,60),PRECIS2,LINETHICK2;
MA125:MA(C,125),ColorFFFF00,PRECIS2,LINETHICK2;
MA250:MA(C,250),PRECIS2,LINETHICK2;
i:=1;
IF MSTATUS and (MA5 > MA10 and MA10 > MA30 and MA5 > MA30) THEN BEGIN DRAWTEXTABS(0,i*16,'短期均線多頭排列。股價(jià)高位謹(jǐn)防筑頂。中低位當(dāng)股價(jià)向上突破5、10、30日均線，均線呈多頭排列是最佳買(mǎi)入時(shí)機(jī)。'+ma5+' > '+ma10+' > '+ma30+';'),COLORRED,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA5 < MA10 and MA10 < MA30 and MA5 < MA30) THEN BEGIN DRAWTEXTABS(0,i*16,'短期均線空頭排列。股價(jià)高位謹(jǐn)防棄莊，賣(mài)盤(pán)涌出破位下跌。中低位當(dāng)股價(jià)向下突破5、10、30日均線，均線呈空頭排列時(shí)，注意觀察股價(jià)所處箱體位置。'+ma5+' < '+ma10+' < '+ma30+';'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA30 > MA60 and MA30 > MA125 and MA60 > MA125) THEN BEGIN DRAWTEXTABS(0,i*16,'中期均線多頭排列。注意股價(jià)突然下跌，當(dāng)股價(jià)回檔至當(dāng)前盤(pán)面30、60、125日任一均線獲得支撐，關(guān)注均線助漲，次日股價(jià)放量向上突破，是中長(zhǎng)期最佳買(mǎi)入時(shí)機(jī)。'+ma30+' > '+ma60+' > '+ma125+';'),COLORRED,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA30 < MA60 and MA30 < MA125 and MA60 < MA125) THEN BEGIN DRAWTEXTABS(0,i*16,'中期均線空頭列排。30、60、125日中長(zhǎng)期均線下行呈空頭排列，注意箱體上下?lián)螇夯驘o(wú)量空跌。'+ma30+' < '+ma60+' < '+ma125+';'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA60 > MA125 and MA125 > MA250 and MA60 > MA250) THEN BEGIN DRAWTEXTABS(0,i*16,'長(zhǎng)期均線多頭排列。即60，125，250日均線向上多頭排列。注意：當(dāng)股價(jià)處于箱體頂部，所有均線多頭排列，股價(jià)反復(fù)震蕩不能突破，可能頂部即將形成。'+ma60+' > '+ma125+' > '+ma250+';'),COLORRED,ALIGN0,LINETHICK1;
i:=i+1; END;
IF MSTATUS and (MA60 < MA125 and MA125 < MA250 and MA60 < MA250) THEN BEGIN DRAWTEXTABS(0,i*16,'長(zhǎng)期均線空頭排列。即60，125，250日均線向下空頭排列。注意：當(dāng)所有均線空頭排列的時(shí)候，股價(jià)處于箱體的一個(gè)次高位，中位，或箱體下沿，可能是階段底部的形成。 '+ma60+' < '+ma125+' < '+ma250+';'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (CROSS(MA5,MA10)) THEN BEGIN DRAWTEXTABS(0,i*16,'短期5日10日均線金叉。注意觀察股價(jià)在箱體的位置，30日和其他均線是否成為股價(jià)上漲的阻力，或股價(jià)在高位的運(yùn)行方向，判斷是反轉(zhuǎn)上漲還是下跌中途的小反彈。'),COLORRED,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (CROSS(MA10,MA5)) THEN BEGIN DRAWTEXTABS(0,i*16,'短期5日10日均線死叉。當(dāng)股價(jià)反彈遭遇30日和其他均線的阻力形成死叉，可能是股價(jià)下跌中途的小反彈。高位區(qū)死叉，必須逃頂或止損。'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (CROSS(C,MA125)) THEN BEGIN DRAWTEXTABS(0,i*16,'今日股價(jià)上穿半年線。在半年線上方運(yùn)行的個(gè)股被稱為強(qiáng)勢(shì)股。適合中小資金根據(jù)短線技術(shù)指標(biāo)套利操作。'),COLORFF00FF,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (CROSS(MA125,C)) THEN BEGIN DRAWTEXTABS(0,i*16,'今日股價(jià)跌破半年線。在半年線下方運(yùn)行的個(gè)股被稱為弱勢(shì)股。適合大資金進(jìn)場(chǎng)吸籌操作。'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (CROSS(C,MA250)) THEN BEGIN DRAWTEXTABS(0,i*16,'今日股價(jià)上穿年線。股票筑底后，股價(jià)經(jīng)過(guò)反復(fù)震蕩洗盤(pán)上穿年線，予以鎖定跟蹤。'),COLORFF00FF,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (CROSS(MA250,C)) THEN BEGIN DRAWTEXTABS(0,i*16,'今日股價(jià)跌破年線。跌破年線，證明深度調(diào)整格局可能形成。如果后市股價(jià)繼續(xù)深跌，調(diào)整時(shí)間和空間難以預(yù)測(cè)。'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (CROSS(C,MA60) and CROSS(C,MA125) and CROSS(C,MA250)) THEN BEGIN DRAWTEXTABS(0,i*16,'股價(jià)一陽(yáng)穿三線。5、10、30日均線三線合一，股價(jià)一陽(yáng)穿三線，向上反轉(zhuǎn)，可能變盤(pán)反轉(zhuǎn)在即。'),COLORRED,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA30 > REF(MA30,1)) THEN BEGIN DRAWTEXTABS(0,i*16,'30日均線趨勢(shì)向上。注意：如果股價(jià)在低位中位30日均線之上，圍繞另一條重要均線縮量橫盤(pán)，隨后5-10日均線金叉，所有均線向上呈多頭排列，是中長(zhǎng)期績(jī)優(yōu)牛股的搖籃。'),COLORRED,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA30 > REF(MA30,1) AND MA30 < REF(MA30,1)*1.001) THEN BEGIN DRAWTEXTABS(0,i*16,'30日均線趨勢(shì)走平。需觀察5日和10日均線方向，如30日均線發(fā)出趨勢(shì)向下信號(hào)，5日10日均線形成死叉，注意減倉(cāng)或出貨。'),COLORFFCC66,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA30 < REF(MA30,1)) THEN BEGIN DRAWTEXTABS(0,i*16,'30日均線趨勢(shì)向下。關(guān)注股價(jià)所處箱體位置，如股價(jià)當(dāng)前上漲或下跌時(shí)，則需觀察箱體阻力支撐位置。如果股價(jià)處于遠(yuǎn)離30日均線位置，一般情況下股價(jià)反彈空間有限。'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA5 > REF(MA5,1)*1.015) THEN BEGIN DRAWTEXTABS(0,i*16,'5日均線強(qiáng)勁向上。需觀察股價(jià)所處其他均線和箱體位置,如果收盤(pán)時(shí)股價(jià)突然跌破5日均線，則需觀察箱體下方支撐，提防空頭陷阱，股價(jià)轉(zhuǎn)向。'),COLORRED,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA5 > REF(MA5,1) AND MA5 < REF(MA5,1)*1.005) THEN BEGIN DRAWTEXTABS(0,i*16,'5日均線方向不明。當(dāng)股價(jià)連續(xù)跌破5日均線和箱體下沿，導(dǎo)致股價(jià)方向開(kāi)始向下，績(jī)優(yōu)股應(yīng)適當(dāng)做空；股價(jià)在箱體內(nèi)則需觀察股價(jià)下方的重要均線位置，可否獲得支撐。'),COLORYELLOW,ALIGN0,LINETHICK1;
i:=i+1;
END;
IF MSTATUS and (MA5 < REF(MA5,1)*0.985) THEN BEGIN DRAWTEXTABS(0,i*16,'5日均線快速向下，短線風(fēng)險(xiǎn)可能降臨。需結(jié)合其他均線運(yùn)行方向分析，如果股價(jià)在一個(gè)大箱體中，則需觀察下方均線支撐，偌收盤(pán)前股價(jià)獲得支撐，5-10均線金叉并數(shù)日向上，則可順勢(shì)而為做多。'),COLORGREEN,ALIGN0,LINETHICK1;
i:=i+1;
END;
if DISPSTATUS=2 then begin;
cxh100:='■所屬行業(yè)板塊：';
if inblock('電力')=1 then cxh100:=cxh100+'電力。';
if inblock('電力設(shè)備')=1 then cxh100:=cxh100+'電力設(shè)備。';
if inblock('電器')=1 then cxh100:=cxh100+'電器。';
if inblock('電子信息')=1 then cxh100:=cxh100+'電子信息。';
if inblock('房地產(chǎn)')=1 then cxh100:=cxh100+'房地產(chǎn)。';
if inblock('紡織服裝')=1 then cxh100:=cxh100+'紡織服裝。';
if inblock('鋼鐵')=1 then cxh100:=cxh100+'鋼鐵。';
if inblock('工程建筑')=1 then cxh100:=cxh100+'工程建筑。';
if inblock('供水供氣')=1 then cxh100:=cxh100+'供水供氣。';
if inblock('化工')=1 then cxh100:=cxh100+'化工。';
if inblock('化纖')=1 then cxh100:=cxh100+'化纖。';
if inblock('機(jī)械')=1 then cxh100:=cxh100+'機(jī)械。';
if inblock('計(jì)算機(jī)')=1 then cxh100:=cxh100+'計(jì)算機(jī)。';
if inblock('建材')=1 then cxh100:=cxh100+'建材。';
if inblock('交通工具')=1 then cxh100:=cxh100+'交通工具。';
if inblock('交通設(shè)施')=1 then cxh100:=cxh100+'交通設(shè)施。';
if inblock('教育傳媒')=1 then cxh100:=cxh100+'教育傳媒。';
if inblock('旅游酒店')=1 then cxh100:=cxh100+'旅游酒店。';
if inblock('煤炭石油')=1 then cxh100:=cxh100+'煤炭石油。';
if inblock('釀酒食品')=1 then cxh100:=cxh100+'釀酒食品。';
if inblock('農(nóng)林牧漁')=1 then cxh100:=v

?

公式導(dǎo)入教程: 【通達(dá)信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】

?