編程思路破譯

輸出最新:收盤價(jià),COLORFFFF00,線寬為9
如果收盤價(jià)>=1日前的收盤價(jià),返回收盤價(jià),否則返回?zé)o效數(shù),COLOR0000FF,線寬為9
AA賦值:成交額(元)的收盤價(jià)的有效數(shù)據(jù)周期數(shù)日累和/成交量(手)*100的收盤價(jià)的有效數(shù)據(jù)周期數(shù)日累和
BB賦值:收盤價(jià)/AA位于收盤價(jià)+最高價(jià)和收盤價(jià)-最高價(jià)之間
當(dāng)滿足條件ISLASTBARANDC>1日前的收盤價(jià)時(shí),在收盤價(jià)位置畫1號(hào)圖標(biāo)
當(dāng)滿足條件ISLASTBARANDC<1日前的收盤價(jià)時(shí),在收盤價(jià)位置畫2號(hào)圖標(biāo)
輸出壓力:1日前的30日內(nèi)收盤價(jià)的最高值的2日簡(jiǎn)單移動(dòng)平均,DOTLINE,COLOR8080FF,線寬為1
輸出支撐:1日前的30日內(nèi)收盤價(jià)的最低值的2日簡(jiǎn)單移動(dòng)平均,DOTLINE,COLORAAAA00,線寬為1
HH賦值:0日內(nèi)收盤價(jià)的最高值的最后一日取值設(shè)為常數(shù)
LL賦值:0日內(nèi)收盤價(jià)的最低值的最后一日取值設(shè)為常數(shù)
HL賦值:HH-LL
輸出頂:HH,NODRAW

當(dāng)滿足條件收盤價(jià)=HH時(shí),在HH位置畫35號(hào)圖標(biāo)

當(dāng)滿足條件收盤價(jià)=LL時(shí),在LL位置畫34號(hào)圖標(biāo)

當(dāng)滿足條件時(shí)間(時(shí)分秒)=94100ANDREF(收盤價(jià),上次時(shí)間(時(shí)分秒)=94100距今天數(shù))>=上次時(shí)間(時(shí)分秒)=93100距今天數(shù)日前的收盤價(jià)時(shí),在前收盤價(jià)*1.03和前收盤價(jià)*0.97位置之間畫柱狀線,寬度為0.5,-1不為0則畫空心柱.,畫紅色

當(dāng)滿足條件時(shí)間(時(shí)分秒)=94100ANDREF(收盤價(jià),上次時(shí)間(時(shí)分秒)=94100距今天數(shù))<上次時(shí)間(時(shí)分秒)=93100距今天數(shù)日前的收盤價(jià)時(shí),在前收盤價(jià)*1.03和前收盤價(jià)*0.97位置之間畫柱狀線,寬度為0.5,-1不為0則畫空心柱.,畫綠色

當(dāng)滿足條件時(shí)間(時(shí)分秒)=95100ANDREF(收盤價(jià),上次時(shí)間(時(shí)分秒)=95100距今天數(shù))>=上次時(shí)間(時(shí)分秒)=94100距今天數(shù)日前的收盤價(jià)時(shí),在前收盤價(jià)*1.03和前收盤價(jià)*0.97位置之間畫柱狀線,寬度為0.5,-1不為0則畫空心柱.,畫紅色

當(dāng)滿足條件時(shí)間(時(shí)分秒)=95100ANDREF(收盤價(jià),上次時(shí)間(時(shí)分秒)=95100距今天數(shù))<上次時(shí)間(時(shí)分秒)=94100距今天數(shù)日前的收盤價(jià)時(shí),在前收盤價(jià)*1.03和前收盤價(jià)*0.97位置之間畫柱狀線,寬度為0.5,-1不為0則畫空心柱.,畫綠色

當(dāng)滿足條件時(shí)間(時(shí)分秒)=100100ANDREF(收盤價(jià),上次時(shí)間(時(shí)分秒)=100100距今天數(shù))>=上次時(shí)間(時(shí)分秒)=95100距今天數(shù)日前的收盤價(jià)時(shí),在前收盤價(jià)*1.03和前收盤價(jià)*0.97位置之間畫柱狀線,寬度為0.5,-1不為0則畫空心柱.,畫紅色

當(dāng)滿足條件時(shí)間(時(shí)分秒)=100100ANDREF(收盤價(jià),上次時(shí)間(時(shí)分秒)=100100距今天數(shù))<上次時(shí)間(時(shí)分秒)=95100距今天數(shù)日前的收盤價(jià)時(shí),在前收盤價(jià)*1.03和前收盤價(jià)*0.97位置之間畫柱狀線,寬度為0.5,-1不為0則畫空心柱.,畫綠色

SJ1賦值:時(shí)間(時(shí)分秒)=93100

T1賦值:上次SJ1距今天數(shù)

SJ2賦值:時(shí)間(時(shí)分秒)=94100

SJ4賦值:時(shí)間(時(shí)分秒)=95100

T2賦值:上次SJ2距今天數(shù)

T4賦值:上次SJ4距今天數(shù)

H1賦值:如果時(shí)間(時(shí)分秒)=94100,返回T2日前的收盤價(jià),否則返回?zé)o效數(shù)=收盤價(jià)

H2賦值:如果時(shí)間(時(shí)分秒)=95100,返回T4日前的收盤價(jià),否則返回?zé)o效數(shù)=收盤價(jià)

CS2賦值:T2日前的收盤價(jià)的最后一日取值設(shè)為常數(shù)

CS4賦值:T4日前的收盤價(jià)的最后一日取值設(shè)為常數(shù)

GL2賦值:H1的T2日反向過濾

GL4賦值:H2的T4日反向過濾

L1賦值:如果時(shí)間(時(shí)分秒)=93100,返回T1日前的收盤價(jià),否則返回?zé)o效數(shù)=收盤價(jià)

CS1賦值:T1日前的收盤價(jià)的最后一日取值設(shè)為常數(shù)

GL1賦值:L1的T1日反向過濾

DA賦值:如果上次GL2距今天數(shù)日前的GL2,返回上次GL2距今天數(shù)日前的上次GL1距今天數(shù),否則返回?zé)o效數(shù)的最后一日取值設(shè)為常數(shù)

DA1賦值:如果上次GL4距今天數(shù)日前的GL4,返回上次GL4距今天數(shù)日前的上次GL2距今天數(shù),否則返回?zé)o效數(shù)的最后一日取值設(shè)為常數(shù)

A賦值:如果上次GL1距今天數(shù)>=0ANDBARSLAST(GL1)<=DA,返回((CS2-CS1)/DA)*上次GL1距今天數(shù)+CS1,否則返回?zé)o效數(shù)

B賦值:如果上次GL2距今天數(shù)>=0ANDBARSLAST(GL2)<=DA1,返回((CS4-CS2)/DA1)*上次GL2距今天數(shù)+CS2,否則返回?zé)o效數(shù)

如果A>=1日前的A,返回A,否則返回?zé)o效數(shù)畫淡洋紅色,線寬為3

如果A<1日前的A,返回A,否則返回?zé)o效數(shù)畫綠色,線寬為5

如果B>=1日前的B,返回B,否則返回?zé)o效數(shù)畫淡洋紅色,線寬為3

如果B<1日前的B,返回B,否則返回?zé)o效數(shù)畫綠色,線寬為3

XSJ1賦值:時(shí)間(時(shí)分秒)=95100

XT1賦值:上次XSJ1距今天數(shù)

XSJ2賦值:時(shí)間(時(shí)分秒)=100100

XT2賦值:上次XSJ2距今天數(shù)

XCS2賦值:XT2日前的收盤價(jià)的最后一日取值設(shè)為常數(shù)

XL1賦值:如果時(shí)間(時(shí)分秒)=95100,返回XT1日前的收盤價(jià),否則返回?zé)o效數(shù)=收盤價(jià)

XH1賦值:如果時(shí)間(時(shí)分秒)=100100,返回XT2日前的收盤價(jià),否則返回?zé)o效數(shù)=收盤價(jià)

XCS1賦值:XT1日前的收盤價(jià)的最后一日取值設(shè)為常數(shù)

XGL1賦值:XL1的XT1日反向過濾

XGL2賦值:XH1的XT2日反向過濾

XDA賦值:如果上次XGL2距今天數(shù)日前的XGL2,返回上次XGL2距今天數(shù)日前的上次XGL1距今天數(shù),否則返回?zé)o效數(shù)的最后一日取值設(shè)為常數(shù)

XA賦值:如果上次XGL1距今天數(shù)>=0ANDBARSLAST(XGL1)<=XDA,返回((XCS2-XCS1)/XDA)*上次XGL1距今天數(shù)+XCS1,否則返回?zé)o效數(shù)

如果XA>=1日前的XA,返回XA,否則返回?zé)o效數(shù)畫淡洋紅色,線寬為3

如果XA<1日前的XA,返回XA,否則返回?zé)o效數(shù)畫綠色,線寬為3

時(shí)間賦值:時(shí)間(時(shí)分秒)=100100

N賦值:上次時(shí)間距今天數(shù)

輸出C1:如果N,返回N+1日前的0日內(nèi)最高價(jià)的最高值和開盤價(jià)的較大值,否則返回0日內(nèi)最高價(jià)的最高值的最后一日取值設(shè)為常數(shù),DOTLINE,畫紅色

輸出C2:如果N,返回N+1日前的0日內(nèi)最低價(jià)的最低值和開盤價(jià)的較小值,否則返回0日內(nèi)最低價(jià)的最低值的最后一日取值設(shè)為常數(shù),DOTLINE,畫綠色

輸出C3:(C1+C2)/2,DOTLINE,畫黃色

VV賦值:0日內(nèi)成交量(手)的最高值

ZF賦值:(C1/C2-1)*100

當(dāng)滿足條件到最后交易的周期=2時(shí),在C1位置書寫文字,畫紅色

當(dāng)滿足條件到最后交易的周期=2時(shí),在C3位置書寫文字,畫黃色

當(dāng)滿足條件到最后交易的周期=2時(shí),在C2位置書寫文字,畫綠色

當(dāng)滿足條件C1/C2<=1.03ANDCROSS(收盤價(jià),C1)ANDV>=VV時(shí),在C1*1.005位置書寫文字畫紅色

當(dāng)滿足條件C1/C2<=1.03ANDCROSS(C2,收盤價(jià))ANDV>=VV時(shí),在C2*0.998位置書寫文字畫綠色

當(dāng)滿足條件C1/C2<1.03ANDCROSS(收盤價(jià),C1)ANDV>=VV時(shí),在前收盤價(jià)*1.03和前收盤價(jià)*0.97位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫紅色

攻擊量賦值:((HSL*0.50+1日前的HSL*0.33)+(2日前的HSL*0.17))*收盤價(jià)的當(dāng)前離開盤分鐘數(shù)日累和/當(dāng)前離開盤分鐘數(shù)

攻擊量A賦值:如果收盤價(jià)>1日前的收盤價(jià),返回攻擊量*成交量(手),否則返回0的當(dāng)前離開盤分鐘數(shù)日累和,COLOR0000FF,線寬為0

攻擊量B賦值:-如果收盤價(jià)<1日前的收盤價(jià),返回攻擊量*成交量(手),否則返回0的當(dāng)前離開盤分鐘數(shù)日累和,COLOR00FF00,線寬為0

攻擊流量賦值:攻擊量A+攻擊量B,COLORSTICK

攻擊比賦值:攻擊流量/成交量(手)的當(dāng)前離開盤分鐘數(shù)日累和*100,畫紅色,線寬為1

資金攻擊度賦值:如果攻擊比>=0,返回(攻擊比+50),否則返回100-(攻擊比-50)的絕對(duì)值

資金流入賦值:如果收盤價(jià)>1日前的收盤價(jià),返回成交量(手),否則返回0的當(dāng)前離開盤分鐘數(shù)日累和,STICK,畫紅色

資金流出賦值:-如果收盤價(jià)<1日前的收盤價(jià),返回成交量(手),否則返回0的當(dāng)前離開盤分鐘數(shù)日累和,STICK,COLOR00FF00

資金出入賦值:資金流入+資金流出,COLORSTICK

資金比賦值:資金出入/成交量(手)的當(dāng)前離開盤分鐘數(shù)日累和*100,COLOR00FFFF,線寬為1

資金流量比賦值:如果資金比>=0,返回(資金比+100)/2,否則返回100-(資金比-100)/2的絕對(duì)值

當(dāng)滿足條件1時(shí),在橫軸0.250縱軸0.88位置書寫文字,畫青色

當(dāng)滿足條件1時(shí),在橫軸0.000縱軸0.88位置書寫文字,畫青色

輸出XG:480日內(nèi)最高價(jià)的最高值,DOTLINE,畫紅色

當(dāng)滿足條件收盤價(jià)上穿1日前的XG的10日過濾ANDC>1日前的XG時(shí),在收盤價(jià)*0.99和收盤價(jià)位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫綠色

當(dāng)滿足條件收盤價(jià)上穿1日前的XG的10日過濾ANDC>1日前的XG時(shí),在收盤價(jià)*0.99位置書寫文字,畫黃色

FF賦值:(收盤價(jià)-5日前的收盤價(jià))/5日前的收盤價(jià)

當(dāng)滿足條件FF>0時(shí),在前收盤價(jià)和前收盤價(jià)*(1+FF)位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,畫紅色

當(dāng)滿足條件FF<0時(shí),在前收盤價(jià)和前收盤價(jià)*(1+FF)位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,畫綠色

程序源碼

最新:C,COLORFFFF00,LINETHICK9;

IF(C>=REF(C,1),C,DRAWNULL),COLOR0000FF,LINETHICK9;

AA:=SUM(AMOUNT,BARSCOUNT(C))/SUM(vol*100,BARSCOUNT(C));

BB:=BETWEEN(C/AA,C+H,C-H);

DRAWICON(ISLASTBAR AND C>REF(C,1),C,1);

DRAWICON(ISLASTBAR AND C<REF(C,1),C,2);

壓力:MA(REF(HHV(C,30),1),2),DOTLINE,COLOR8080FF,LINETHICK1;

支撐:MA(REF(LLV(C,30),1),2),DOTLINE,COLORAAAA00,LINETHICK1;

HH:=CONST(HHV(C,0));

LL:=CONST(LLV(C,0));

HL:=HH-LL;

頂:HH,NODRAW;

DRAWICON(C=HH,HH,35);

DRAWICON(C=LL,LL,34);

STICKLINE(TIME2=94100 AND REF(C,BArslAST(TIME2=94100))>=REF(C,BARSLAST(TIME2=93100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORRED;

STICKLINE(TIME2=94100 AND REF(C,BARSLAST(TIME2=94100))<REF(C,BARSLAST(TIME2=93100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORGREEN;

STICKLINE(TIME2=95100 AND REF(C,BARSLAST(TIME2=95100))>=REF(C,BARSLAST(TIME2=94100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORRED;

STICKLINE(TIME2=95100 AND REF(C,BARSLAST(TIME2=95100))<REF(C,BARSLAST(TIME2=94100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORGREEN;

STICKLINE(TIME2=100100 AND REF(C,BARSLAST(TIME2=100100))>=REF(C,BARSLAST(TIME2=95100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORRED;

STICKLINE(TIME2=100100 AND REF(C,BARSLAST(TIME2=100100))<REF(C,BARSLAST(TIME2=95100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,0.5,-1),COLORGREEN;

SJ1:=TIME2=93100;T1:=BARSLAST(SJ1);SJ2:=TIME2=94100;

SJ4:=TIME2=95100;T2:=BARSLAST(SJ2);T4:=BARSLAST(SJ4);

H1:=IF(TIME2=94100,REF(C,T2),DRAWNULL)=C;

H2:=IF(TIME2=95100,REF(C,T4),DRAWNULL)=C;

CS2:=CONST(REF(C,T2));

CS4:=CONST(REF(C,T4));

GL2:=FILTERX(H1,T2);

GL4:=FILTERX(H2,T4);

L1:=IF(TIME2=93100,REF(C,T1),DRAWNULL)=C;

CS1:=CONST(REF(C,T1));

GL1:=FILTERX(L1,T1);

DA:=CONST(IF(REF(GL2,BARSLAST(GL2)),REF(BARSLAST(GL1),BARSLAST(GL2)),DRAWNULL));

DA1:=CONST(IF(REF(GL4,BARSLAST(GL4)),REF(BARSLAST(GL2),BARSLAST(GL4)),DRAWNULL));

A:=IF(BARSLAST(GL1)>=0 AND BARSLAST(GL1)<=DA,((CS2-CS1)/DA)*BARSLAST(GL1)+CS1,DRAWNULL);

B:=IF(BARSLAST(GL2)>=0 AND BARSLAST(GL2)<=DA1,((CS4-CS2)/DA1)*BARSLAST(GL2)+CS2,DRAWNULL);

IF(A>=REF(A,1),A,DRAWNULL)COLORLIMAGENTA,LINETHICK3;

IF(A<REF(A,1),A,DRAWNULL)COLORGREEN,LINETHICK5;

IF(B>=REF(B,1),B,DRAWNULL)COLORLIMAGENTA,LINETHICK3;

IF(B<REF(B,1),B,DRAWNULL)COLORGREEN,LINETHICK3;

XSJ1:=TIME2=95100;

XT1:=BARSLAST(XSJ1);

XSJ2:=TIME2=100100;

XT2:=BARSLAST(XSJ2);

XCS2:=CONST(REF(C,XT2));

XL1:=IF(TIME2=95100,REF(C,XT1),DRAWNULL)=C;

XH1:=IF(TIME2=100100,REF(C,XT2),DRAWNULL)=C;

XCS1:=CONST(REF(C,XT1));

XGL1:=FILTERX(XL1,XT1);

XGL2:=FILTERX(XH1,XT2);

XDA:=CONST(IF(REF(XGL2,BARSLAST(XGL2)),REF(BARSLAST(XGL1),BARSLAST(XGL2)),DRAWNULL));

XA:=IF(BARSLAST(XGL1)>=0 AND BARSLAST(XGL1)<=XDA,((XCS2-XCS1)/XDA)*BARSLAST(XGL1)+XCS1,DRAWNULL);

IF(XA>=REF(XA,1),XA,DRAWNULL)COLORLIMAGENTA,LINETHICK3;

IF(XA<REF(XA,1),XA,DRAWNULL)COLORGREEN,LINETHICK3;

時(shí)間:=TIME2=100100;

N:=BARSLAST(時(shí)間);

C1:CONST(IF(N,MAX(REF(HHV(H,0),N+1),DYNAINFO(4)),HHV(H,0))),DOTLINE,COLORRED;

C2:CONST(IF(N,MIN(REF(LLV(L,0),N+1),DYNAINFO(4)),LLV(L,0))),DOTLINE,COLORGREEN;

C3:(C1+C2)/2,DOTLINE,COLORYELLOW;

VV:=HHV(V,0);

ZF:=(C1/C2-1)*100;

DRAWTEXT(CURRBARSCOUNT=2,C1,VARCAT(VARCAT(VARCAT(VARCAT('上限:',VAR2STR(C1,2)),'元,'),VARCAT('振幅:',VAR2STR(ZF,2))),'%')),COLORRED;

DRAWTEXT(CURRBARSCOUNT=2,C3,VARCAT(VARCAT('中限:',VAR2STR(C3,2)),'元')),COLORYELLOW;

DRAWTEXT(CURRBARSCOUNT=2,C2,VARCAT(VARCAT('下限:',VAR2STR(C2,2)),'元')),COLORGREEN;

DRAWTEXT(C1/C2<=1.03 AND crOSS(C,C1) AND V>=VV,C1*1.005,'★買入')COLORRED;

DRAWTEXT(C1/C2<=1.03 AND CROSS(C2,C) AND V>=VV,C2*0.998,'★賣出')COLORGREEN;

STICKLINE(C1/C2<1.03 AND CROSS(C,C1) AND V>=VV,DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,0),COLORRED;

攻擊量:=((HSL*0.50+REF(HSL,1)*0.33)+(REF(HSL,2)*0.17))*SUM(C,FROMOPEN)/FROMOPEN;

攻擊量A:=SUM(IF(C>REF(C,1),攻擊量*V,0),FROMOPEN),COLOR0000FF,LINETHICK0;

攻擊量B:=-SUM(IF(C<REF(C,1),攻擊量*V,0),FROMOPEN),COLOR00FF00,LINETHICK0;

攻擊流量:=攻擊量A+攻擊量B,COLORSTICK;

攻擊比:=攻擊流量/SUM(V,FROMOPEN)*100,COLORRED,LINETHICK1;

資金攻擊度:=IF(攻擊比>=0,(攻擊比+50),100-Abs((攻擊比-50)));

資金流入:=SUM(IF(C>REF(C,1),V,0),FROMOPEN),STICK,COLORRED;

資金流出:=-SUM(IF(C<REF(C,1),V,0),FROMOPEN),STICK,COLOR00FF00;

資金出入:=資金流入+資金流出,COLORSTICK;

資金比:=資金出入/SUM(V,FROMOPEN)*100,COLOR00FFFF,LINETHICK1;

資金流量比:=IF(資金比>=0,(資金比+100)/2,100-ABS((資金比-100)/2));

DRAWTEXT_FIX(1,0.250,0.88,0,STRCAT(STRCAT('【資金流量比】',CON2STR(資金流量比,2)),'％買')),COLORCYAN;

DRAWTEXT_FIX(1,0.000,0.88,0,STRCAT(STRCAT('【資金攻擊度】',CON2STR(資金攻擊度,2)),' ％買')),COLORCYAN;

XG:HHV(H,480),DOTLINE,COLORRED;

STICKLINE(FILTER(CROSS(C,REF(XG,1)),10) AND C>REF(XG,1),C*0.99,C,8,0),COLORGREEN;

DRAWTEXT(FILTER(CROSS(C,REF(XG,1)),10) AND C>REF(XG,1),C*0.99,'突破'),COLORYELLOW;

FF:=(C-REF(C,5))/REF(C,5);

STICKLINE(FF>0,DYNAINFO(3),DYNAINFO(3)*(1+FF),0.5,0),COLORRED;

STICKLINE(FF<0,DYNAINFO(3),DYNAINFO(3)*(1+FF),0.5,0),COLORGREEN;

注：

       館內(nèi)各種公式為學(xué)習(xí)編程而保存，實(shí)戰(zhàn)使用前一定要看其中是否有未來函數(shù)并自己親自測(cè)試成功率，決不能依據(jù)公式名稱的描述和形容去投資，據(jù)此入市造成投資損失由投資者自己承擔(dān)。

       發(fā)文不易，如獲益，歡迎贊賞，贊賞必復(fù)！