您現在的位置：程序化交易>> 股票公式>> 其他>> 其他軟件公式>>正文內容

自用贏富指標公式源碼[其他軟件公式]

作者：飛狐來源：cxh99.com 發布時間：2021年03月30日點擊數：　【收藏到本網的會員中心】

相關標簽:

原理解析：

填充背景

輸出INPUT:X(2009,1990,2020),M(0.7,0.3,0.9),N(3.3,3.1,3.6)

VAR1賦值:成交量(手)/((最高價-最低價)*2-收盤價-開盤價的絕對值)

輸出成交:成交量(手),POINTDOT,COLORE4C1EE

輸出主買:如果收陽線,返回VAR1*(最高價-最低價),否則返回如果收陰線,返回VAR1*((最高價-開盤價)+(收盤價-最低價)),否則返回成交量(手)/2,畫紅色,POINTDOT

輸出主賣:如果收陽線,返回VAR1*((最高價-收盤價)+(開盤價-最低價)),否則返回如果收陰線,返回VAR1*(最高價-最低價),否則返回成交量(手)/2,COLOR00FF00,POINTDOT

當滿足條件成交量(手)>0時,在成交量(手)和0位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLORE4C1EE

當滿足條件主買>0時,在0和主買位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR1B07E2

當滿足條件主賣>0時,在0和主賣位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR00D11F

VOLUME賦值:成交量(手)

VAR2賦值:VOLUME的5日簡單移動平均

VAR3賦值:VOLUME的10日簡單移動平均

VAR4賦值:VOLUME的20日簡單移動平均

VAR5賦值:VOLUME的60日簡單移動平均

前量比賦值:成交量(手)/1日前的成交量(手)

五量比賦值:成交量(手)/VAR2

六量比賦值:成交量(手)/VAR5

PARTLINE(成交量(手)的5日簡單移動平均>=1日前的成交量(手)的5日簡單移動平均,成交量(手)的5日簡單移動平均),畫紅色,線寬為3

PARTLINE(成交量(手)的5日簡單移動平均<=1日前的成交量(手)的5日簡單移動平均,成交量(手)的5日簡單移動平均),COLOR00C700,線寬為3

輸出換手率:如果當前流通股本(手)=0,返回大盤的成交量/ESTDATA(12),否則返回成交量(手)/流通股本(股),PRECISION2,線寬為0

輸出VARIABLE:WDAY[7]='星期六'

賦值:'星期日'

賦值:'星期一'

賦值:'星期二'

賦值:'星期三'

賦值:'星期四'

賦值:'星期五'

FY賦值:年份

FM賦值:月份

FD賦值:日

WD賦值:星期

P賦值:SYSPARAM(1)

BB賦值:BARPOS

STR1賦值:''+NUMTOSTR(FY[P],0)+'年'+NUMTOSTR(FM[P],0)+'月'+NUMTOSTR(FD[P],0)+'日 '+WDAY[WD[P]+1]

SJ賦值:OPENMINUTES(CURRENTTIME)>1 AND OPENMINUTES(CURRENTTIME)<239

LJ0賦值:成交量(手)/如果最高價=最低價,返回4,否則返回最高價-最低價

JJ賦值:(最高價+最低價+收盤價)/3

輸出特大:如果當前流通股本(手)=0,返回LJ0*(JJ-收盤價和開盤價的較小值),否則返回LJ0*如果最高價=最低價,返回1,否則返回(開盤價和收盤價的較小值-最低價),PRECISION0,COLOR0000FF,線寬為0

輸出大戶:如果當前流通股本(手)=0,返回LJ0*(開盤價和收盤價的較小值-最低價),否則返回LJ0*如果最高價=最低價,返回1,否則返回(JJ-收盤價和開盤價的較小值),PRECISION0,COLORFF00FF,線寬為0

輸出中戶:如果當前流通股本(手)=0,返回LJ0*(最高價-開盤價和收盤價的較大值),否則返回LJ0*如果最高價=最低價,返回1,否則返回(最高價-開盤價和收盤價的較大值),PRECISION0,COLOR00FF00,線寬為0

輸出散戶:如果當前流通股本(手)=0,返回LJ0*(收盤價和開盤價的較大值-JJ),否則返回LJ0*如果最高價=最低價,返回1,否則返回(收盤價和開盤價的較大值-JJ),PRECISION0,COLORFF6600,線寬為0

總1賦值:(特大+大戶)-(中戶+散戶)

總賦值:成交量(手)

WW賦值:SYSPARAM(2)

N1賦值:SYSPARAM(3)

NN賦值:N1-WW+1

HH賦值:NN日內總的最高值

LL賦值:NN日內總的最低值

ZG賦值:HH[N1]

ZD賦值:LL[N1]

中0賦值:ZD+(ZG-ZD)*0.5

中賦值:中0*0.05

CM賦值:總1的25日累和

ZJ賦值:1日前的總1

ZSB賦值:(總1-1日前的總1)/總*100

ZSA賦值:CM/如果STKTYPE=0,返回成交量(手)的25日累和,否則返回如果STKTYPE=13,返回成交量(手)的10日累和,否則返回當前流通股本(手)

CC賦值:上次FM>1日前的FM距今天數日前的收盤價

主力成本賦值:(CC*(特大+大戶)*100)/(特大+大戶)/100

DF1賦值:收盤價的12日指數移動平均-收盤價的26日指數移動平均

DA1賦值:DF1的9日指數移動平均

LJ6賦值:DF1>DA1 AND DA1<0

LJ7賦值:"KDJ的K">"KDJ的D" AND "KDJ的D"<30

LJ8賦值:DF1<DA1

LJ9賦值:"KDJ的K"<"KDJ的D" AND "KDJ的K">80

W1賦值:大戶的5日累和+特大的5日累和

W2賦值:散戶的5日累和+中戶的5日累和

量振1賦值:特大>大戶 AND 大戶>散戶

量振2賦值:特大<散戶 AND 大戶<散戶

標振1賦值:LJ6 AND LJ7

標振2賦值:LJ8 AND LJ9

A賦值:W1-W2

A0賦值:如果A>0,返回A,否則返回0

B0賦值:如果A<0,返回A,否則返回0

當滿足條件BB=WW時,在中*0.2和中*9.2位置之間畫柱狀線,寬度為(散戶[P]/總*200)*1.02,1不為0則畫空心柱.,畫白色,線寬為2

當滿足條件BB=WW時,在中*0.8和中*8.6位置之間畫柱狀線,寬度為散戶[P]/總*200,0不為0則畫空心柱.,COLORFF8800

當滿足條件BB=WW時,在中*10.2和中*19.2位置之間畫柱狀線,寬度為(中戶[P]/總*200)*1.02,1不為0則畫空心柱.,畫白色,線寬為2

當滿足條件BB=WW時,在中*10.8和中*18.6位置之間畫柱狀線,寬度為中戶[P]/總*200,0不為0則畫空心柱.,COLORFF00FF

當滿足條件BB=WW時,在中*20.2和中*29.2位置之間畫柱狀線,寬度為(大戶[P]/總*200)*1.02,1不為0則畫空心柱.,畫白色,線寬為2

當滿足條件BB=WW時,在中*20.8和中*28.6位置之間畫柱狀線,寬度為大戶[P]/總*200,0不為0則畫空心柱.,COLOR0088FF

當滿足條件BB=WW時,在中*30.2和中*39.2位置之間畫柱狀線,寬度為(特大[P]/總*200)*1.02,1不為0則畫空心柱.,畫白色,線寬為2

當滿足條件BB=WW時,在中*30.8和中*38.6位置之間畫柱狀線,寬度為特大[P]/總*200,0不為0則畫空心柱.,COLOR0000FF

DRAWTEXTEX(收盤價,1,420,0,STR1),COLORFFFF00

DRAWTEXTEX(收盤價,1,200,0,STKLABEL+' '+品種名稱+''),COLORFFFF00

當滿足條件BB=WW時,在中*36位置書寫文字,COLOR00FF00

當滿足條件BB=WW時,在中*26位置書寫文字,COLOR00FF00

當滿足條件BB=WW時,在中*16位置書寫文字,COLOR00FF00

當滿足條件BB=WW時,在中*6位置書寫文字,COLOR00FF00

DIFF賦值:收盤價的12日指數移動平均-收盤價的26日指數移動平均

DEA賦值:DIFF的9日指數移動平均

MACD1賦值:2*(DIFF-DEA)

CS1賦值:100

CS2賦值:CS1日內MACD1的絕對值的最高值

CS3賦值:100/CS2的絕對值

輸出平滑異同平均:(MACD1*CS3+100)/2,線寬為5,COLOR00FF00

CS賦值:MACD

日紅賦值:CS>=1日前的CS

日轉紅賦值:日紅 AND 1日前的日紅=0

PARTLINE(日紅,CS),線寬為5,畫紅色

AA賦值:0

V1賦值:10日內最低價的最低值

V2賦值:25日內最高價的最高值

價位線賦值:(收盤價-V1)/(V2-V1)*4的4日指數移動平均

當滿足條件價位線上穿M時,在AA位置書寫文字,COLORFFFFFF

當滿足條件N上穿價位線時,在AA位置書寫文字,COLOR07F6FF

VERTLINE(價位線上穿M),COLOR0000FF,LINEDASHDOT

VERTLINE(N上穿價位線),COLORFF00,LINEDASHDOT

輸出DRAWTEXTEX(收盤價,1,200,130,'主力成本:'+NUMTOSTR(主力成本[P],2)),COLOR00FF00

輸出DRAWTEXTEX(收盤價,1,420,130,'主力籌碼占流通:'+NUMTOSTR(如果ZSA>0,返回ZSA[P]*100,否則返回0,2)+' %'),COLOR00FF00

輸出DRAWTEXTEX(收盤價,1,720,130,'較昨日增減:'+NUMTOSTR(ZSB[P],2)+' %'),COLOR00FF00

DRAWTEXTEX(收盤價 AND 總1[P]<0,1,720,0,'散戶主買主力主賣'),COLORFFEE00

DRAWTEXTEX(收盤價 AND 總1[P]>0,1,720,0,'主力主買散戶主賣'),COLOR0000FF

周倉賦值:總1的5日累和

月倉賦值:總1的25日累和

年倉賦值:總1的240日累和

上周賦值:1日前的周倉

上月賦值:1日前的月倉

上年賦值:上次FY=X距今天數日前的年倉

周增賦值:周倉-上周

月增賦值:月倉-上月

年增賦值:年倉-上年

EXPLAIN(1,''''''''''''''''''='),畫白色 fy:=YEAR;fm:=MONTH;fd:=DAY;wd:=WEEKDAY;p:=SYSPARAM(1);BB:=BARPOS;
str1:=''+NUMTOSTR(fy[p],0)+'年'+NUMTOSTR(fm[p],0)+'月'+NUMTOSTR(fd[p],0)+'日 '+wday[wd[p]+1];
SJ:=OPENMINUTES(CURRENTTIME)>1 and OPENMINUTES(CURRENTTIME)<239;
lj0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);jj:=(HIGH+LOW+CLOSE)/3;
特大:IF(CAPITAL=0,lj0*(jj-MIN(CLOSE,OPEN)),lj0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW))),PRECISION0,COLOR0000FF,LINETHICK;
大戶:IF(CAPITAL=0,lj0*(MIN(OPEN,CLOSE)-LOW),lj0*IF(HIGH=LOW,1,(jj-MIN(CLOSE,OPEN)))),PRECISION0,COLORFF00FF,LINETHICK;
中戶:IF(CAPITAL=0,lj0*(HIGH-MAX(OPEN,CLOSE)),lj0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE)))),PRECISION0,COLOR00FF00,LINETHICK;
散戶:IF(CAPITAL=0,lj0*(MAX(CLOSE,OPEN)-jj),lj0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-jj))),PRECISION0,COLORFF6600,LINETHICK;
總1:=(特大+大戶)-(中戶+散戶);總:=vol;
ww:=SYSPARAM(2);n1:=SYSPARAM(3);nn:=n1-ww+1;hh:=HHV(總,nn);ll:=LLV(總,nn);
ZG:=hh[n1];ZD:=ll[n1];中0:=ZD+(ZG-ZD)*0.5;中:=中0*0.05;CM:=SUM(總1,25);
ZJ:=REF(總1,1);ZSB:=(總1-REF(總1,1))/總*100;
ZSA:=cm/IF(STKTYPE=0,SUM(VOL,25),IF(STKTYPE=13,SUM(VOL,10),CAPITAL));
cc:=REF(CLOSE,BARSLAST(fm>REF(fm,1)));主力成本:=(cc*(特大+大戶)*100)/(特大+大戶)/100;
DF1:=EMA(CLOSE,12)-EMA(CLOSE,26);DA1:=EMA(DF1,9);
lj6:=df1>da1 and da1<0;lj7:="kdj.k">"kdj.d" and "kdj.d"<30;
lj8:=df1<da1;lj9:="kdj.k"<"kdj.d" and "kdj.k">80;
w1:=SUM(大戶,5)+SUM(特大,5);w2:=SUM(散戶,5)+SUM(中戶,5);
量振1:=特大>大戶 and 大戶>散戶;量振2:=特大<散戶 and 大戶<散戶;
標振1:=lj6 and lj7;標振2:=lj8 and lj9;
a:=w1-w2;a0:=IF(a>0,a,0);b0:=IF(a<0,a,0);
STICKLINE(BB=ww,中*0.2,中*9.2,(散戶[P]/總*200)*1.02,1),COLORWHITE,LINETHICK2;
STICKLINE(BB=ww,中*0.8,中*8.6,散戶[P]/總*200,0),COLORFF8800;
STICKLINE(BB=ww,中*10.2,中*19.2,(中戶[P]/總*200)*1.02,1),COLORWHITE,LINETHICK2;
STICKLINE(BB=ww,中*10.8,中*18.6,中戶[P]/總*200,0),COLORFF00FF;
STICKLINE(BB=ww,中*20.2,中*29.2,(大戶[P]/總*200)*1.02,1),COLORWHITE,LINETHICK2;
STICKLINE(BB=ww,中*20.8,中*28.6,大戶[P]/總*200,0),COLOR0088FF;
STICKLINE(BB=ww,中*30.2,中*39.2,(特大[P]/總*200)*1.02,1),COLORWHITE,LINETHICK2;
STICKLINE(BB=ww,中*30.8,中*38.6,特大[P]/總*200,0),COLOR0000FF;
DRAWTEXTEX(CLOSE,1,420,0,str1),ColorffFF00;
DRAWTEXTEX(CLOSE,1,200,0,STKLABEL+' '+STKNAME+''),ColorffFF00;
DRAWTEXT(BB=ww,中*36,'特大:'+NUMTOSTR(特大[P]/總*100,2)+' %'),COLOR00FF00;
DRAWTEXT(BB=ww,中*26,'大戶:'+NUMTOSTR(大戶[P]/總*100,2)+' %'),COLOR00FF00;
DRAWTEXT(BB=ww,中*16,'中戶:'+NUMTOSTR(中戶[P]/總*100,2)+' %'),COLOR00FF00;
DRAWTEXT(BB=ww,中*6,'散戶:'+NUMTOSTR(散戶[P]/總*100,2)+' %'),COLOR00FF00;
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD1:=2*(DIFF-DEA);
CS1:=100;
CS2:=HHV(ABS(MACD1),CS1);
CS3:=ABS(100/CS2);
MACD:(MACD1*CS3+100)/2,LINETHICK5,color00FF00;
CS:=MACD;
日紅:=CS>=REF(CS,1);
日轉紅:=日紅 AND REF(日紅,1)=0;
PARTLINE(日紅,CS),LINETHICK5,colorred;
AA:=0;
V1:=LLV(LOW,10);
V2:=HHV(HIGH,25);
價位線:=EMA((CLOSE-V1)/(V2-V1)*4,4);
DRAWTEXT(CROSS(價位線,M),AA,'買'),colorFFFFFF;
DRAWTEXT(CROSS(N,價位線),AA,'賣'),color07F6FF;
VERTLINE(CROSS(價位線,M)),color0000FF,LINEDASHDOT;
VERTLINE(CROSS(N,價位線)),colorFF00,LINEDASHDOT;
DRAWTEXTEX(CLOSE,1,200,130,'主力成本:'+NUMTOSTR(主力成本[p],2)),COLOR00FF00;
DRAWTEXTEX(CLOSE,1,420,130,'主力籌碼占流通:'+NUMTOSTR(IF(ZSA>0,ZSA[P]*100,0),2)+' %'),COLOR00FF00;
DRAWTEXTEX(CLOSE,1,720,130,'較昨日增減:'+NUMTOSTR(ZSB[P],2)+' %'),COLOR00FF00;
DRAWTEXTEX(c and 總1[P]<0,1,720,0,'散戶主買主力主賣'),COLORffee00;
DRAWTEXTEX(c and 總1[P]>0,1,720,0,'主力主買散戶主賣'),COLOR0000ff;
周倉:=SUM(總1,5);月倉:=SUM(總1,25);年倉:=SUM(總1,240);上周:=REF(周倉,1);上月:=REF(月倉,1);
上年:=REF(年倉,BARSLAST(fy=X));周增:=周倉-上周;月增:=月倉-上月;年增:=年倉-上年;
EXPLAIN(1,'==================================='),colorwhite;EXPLAIN(1,'昨日增減:'+NUMTOSTR(zj[p]*100/10000,2)+' 萬股'),ColorFF8B00;
EXPLAIN(1,'==================================='),colorwhite;EXPLAIN(1,'上周:'+NUMTOSTR(上周[p]*100/10000,2)+' 萬股'),COLORred;
EXPLAIN(1,'增減:'+NUMTOSTR(周增[p]*100/10000,2)+' 萬股'),COLORred;
EXPLAIN(1,'==================================='),colorwhite;EXPLAIN(1,'上月:'+NUMTOSTR(上月[p]*100/10000,2)+' 萬股'),COLORFF00FF;
EXPLAIN(1,'增減:'+NUMTOSTR(月增[p]*100/10000,2)+' 萬股'),COLORFF00FF;
EXPLAIN(1,'==================================='),colorwhite;EXPLAIN(1,'上年:'+NUMTOSTR(上年[p]*100/10000,2)+' 萬股'),COLOR00EE00;
EXPLAIN(1,'增減:'+NUMTOSTR(年增[p]*100/10000,2)+' 萬股'),COLOR00EE00;
EXPLAIN(1,'==================================='),colorwhite;

有思路，想編寫各種指標公式，交易模型，選股公式，還原公式的朋友

可聯系技術人員 QQ: 262069696 或微信：cxhjy888 進行有償收費編寫！(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)

（怎么收費，代編流程等詳情請點擊查閱！）

(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)

【字體：小大】【打印文章】【查看評論】

沒有相關內容

中文字幕av无码不卡免费_蜜臀AV无码精品人妻色欲_亚洲成AV人片在线观看无码不卡_无码专区天天躁天天躁在线

自用贏富指標公式源碼[其他軟件公式]

相關文章

欄目導航

本月熱門排行

用戶常看內容

會員登錄/注冊