gsd

DRAWGBK(CURRBARSCOUNT=1, RGB(110,108,108),RGB(88,30,0),0,'',0);鎬昏偂鏈�:=STRCAT(STRCAT('鎬昏偂鏈�: ',CON2STR(TOTALCAPITAL/1000000,2)),'浜�');娴侀�氱洏:=STRCAT(STRCAT(' 娴侀�氱洏: ',CON2STR(CAPITAL/1000000,2)),'浜�');鍏ㄦ祦閫�:=STRCAT(' 鍏ㄦ祦閫�: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));甯傚��:=STRCAT(STRCAT(' 娴侀�氬競鍊�: ',CON2STR((CAPITAL/1000000)*C,2)),'浜�');涓婂競鏃ユ湡:=STRCAT(' 涓婂競澶╂暟: ',CON2STR(FINANCE(42),0));鑲℃湰甯傚��:=STRCAT('鑲℃湰甯傚��: ',STRCAT(STRCAT(STRCAT(STRCAT(鎬昏偂鏈�,娴侀�氱洏),鍏ㄦ祦閫�),甯傚��),涓婂競鏃ユ湡));{}甯傜泩鐜�:=STRCAT('甯傜泩鐜�: ',CON2STR(C/FINANCE(33),2));甯傞攢鐜�:=STRCAT(' 甯傞攢鐜�: ',CON2STR(C/(FINANCE(20)/FINANCE(1)),2));甯傚噣鐜�:=STRCAT(' 甯傚噣鐜�: ',CON2STR(C/FINANCE(34),2));鍑�璧勬敹鐩婄巼:=STRCAT(' 鍑�璧勬敹鐩婄巼: ',CON2STR(FINANCE(33)/FINANCE(34)*100,2));姣涘埄鐜�:=STRCAT(' 姣涘埄鐜�: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));鍑�鍒╂鼎鐜�:=STRCAT(' 鍑�鍒╂鼎鐜� ',CON2STR(FINANCE(30)/FINANCE(20)*100,2));涓昏惀鍒╂鼎鐜�:=STRCAT(' 涓昏惀鍒╂鼎鐜� ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));鍒╂鼎鍚屾瘮:=STRCAT(' 鍒╂鼎鍚屾瘮: ',CON2STR(FINANCE(43),2));鏀跺叆鍚屾瘮:=STRCAT(' 鏀跺叆鍚屾瘮: ',CON2STR(FINANCE(44),2));褰撳墠涓氱哗:=STRCAT('褰撳墠涓氱哗: ',STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(甯傜泩鐜�,甯傞攢鐜�),甯傚噣鐜�),鍑�璧勬敹鐩婄巼),姣涘埄鐜�),鍑�鍒╂鼎鐜�),涓昏惀鍒╂鼎鐜�), 鍒╂鼎鍚屾瘮), 鏀跺叆鍚屾瘮));{}X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{鐩堜綑鍏Н鐢ㄨ祫鏈叕绉噾浠ｆ浛};X3:=FINANCE(23)/FINANCE(10)*3.3;X4:=FINANCE(19)/FINANCE(15)*0.6;{缂洪暱鏈熻礋鍊烘垨璐熷�烘�婚}X5:=FINANCE(20)/FINANCE(15)*0.999;Z鍊�:=X1+X2+X3+X4+X5;棰勮:=IF(Z鍊�<1.2,'閲嶈',IF(Z鍊�>=1.2 AND Z鍊�<2.6,'杞昏','鏃犺'));璐㈠姟棰勮:=STRCAT('璐㈠姟棰勮: ',STRCAT(棰勮,STRCAT('-Z鍊�: ',CON2STR(Z鍊�,3))));浼樿川璧勪骇鐜�:=STRCAT(' 浼樿川璧勪骇鐜�: ',CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2));{鐞嗚涓婅秺澶ц秺濂戒絾涓嶅悓琛屼笟鏈変笉鍚屾爣鍑唥;鐜伴噾璐熷�烘瘮:=STRCAT(' 鐜伴噾璐熷�烘瘮: ',CON2STR(FINANCE(25)/FINANCE(15),3));{缂洪暱鏈熻礋鍊烘垨璐熷�烘�婚锛岀悊璁轰笂瓒婂ぇ瓒婂ソ浣嗕笉鍚岃涓氭湁涓嶅悓鏍囧噯};璐㈠姟绯绘暟:=STRCAT('椋庨櫓绯绘暟: ',STRCAT(STRCAT(璐㈠姟棰勮,浼樿川璧勪骇鐜�),鐜伴噾璐熷�烘瘮));{}DRAWTEXT_FIX(ISLASTBAR,0.005,0.01,0,璐㈠姟绯绘暟),COLORCYAN;DRAWTEXT_FIX(ISLASTBAR,0.005,0.06,0,褰撳墠涓氱哗),COLORLIMAGENTA;DRAWTEXT_FIX(ISLASTBAR,0.005,0.115,0,鑲℃湰甯傚��),COLORYELLOW;VAR1:=ZIG(3,10)REF(ZIG(3,10),2);{ZIG 鏈夋湭鏉VAR2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)TC2,HP,LP),LOWER1,UPPER1,0,0),COLOR628962;STICKLINE(IF(BC2>TC2,LP,HP),LOWER1,UPPER1,0,0),COLOR628962;NOD:=(IF(TC2>BC2,TC2,BC2)-IF(TC2>BC2,BC2,TC2));{鐢ㄦ椂}LR1:=FORCAST(C,NOD+1);NP:IF(CURRBARSCOUNT<=MAX(BC2,TC2),CONST(IF(MIN(TC2,BC2)=1,LR1,REF(LR1,MIN(TC2,BC2)-1))),DRAWNULL),POINTDOT,COLOR93BDA8;{杩戠偣}LR2:=SLOPE(C,NOD+1);LR3:=CONST(IF(MIN(TC2,BC2)=1,LR2,REF(LR2,MIN(TC2,BC2)-1)));FP:NP-LR3*(NOD),POINTDOT,COLOR93BDA8;{杩滅偣}EQU:(NP+FP)/2,POINTDOT,COLOR93BDA8;AD:=ABS(NP-FP);{楂樺樊};DBL:=BARSLAST(BC1!=DRAWNULL)+1;DBH:=BARSLAST(TC1!=DRAWNULL)+1;BSP:=IF(BC2>TC2,DBL,DBH)-1;LRL:=IF(NP>FP,FP+AD/NOD*BSP,FP-AD/NOD*BSP);AT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND H>LRL,H,LRL);AT2:=HHV(AT1-LRL,MAX(BC2,TC2));AT3:=CONST(BARSLAST(AT1-LRL=AT2));AT4:=CONST(IF(AT3=0,H,REF(H,AT3)));AT5:=CONST(IF(AT3=0,AT1-LRL,REF(AT1-LRL,AT3)));ATL:=LRL+AT5;UT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND L=MIN(BC2,TC2)-10,ATL,CONST(REF(ATL,MIN(BC2,TC2)-11)));{闄愬埗楂榼

RL:=IF(CURRBARSCOUNT>=MIN(BC2,TC2)-10,UTL,CONST(REF(UTL,MIN(BC2,TC2)-11)));{闄愬埗浣巬

涓建1:IF(NP>FP,IF(LRL<=RH,LRL,DRAWNULL),IF(LRL>=RL,LRL,DRAWNULL)),COLORF57474,LINETHICK1,CROSSDOT;

涓婅建1:IF(NP>FP,IF(ATL<=RH,ATL,DRAWNULL),IF(ATL>=RL,ATL,DRAWNULL)),COLORFF8000,LINETHICK1,CROSSDOT;

涓嬭建1:IF(NP>FP,IF(UTL<=RH,UTL,DRAWNULL),IF(UTL>=RL,UTL,DRAWNULL)),COLORMAGENTA ,LINETHICK1,CROSSDOT;

MA5:MA(CLOSE,5),COLORFFCC66,LINETHICK3;

MA14:MA(CLOSE,14),COLORFFFFFF,LINETHICK2;

涓婅建:MA(HIGH,20),POINTDOT,COLORBLUE,LINETHICK4;

涓嬭建:MA(LOW,20),POINTDOT,COLORCYAN,LINETHICK4;

DRAWICON(CROSS(MA5,涓婅建),MA5,1),LINETHICK2;

DRAWICON(CROSS(MA5,涓嬭建),MA5,1),LINETHICK2;

鍗曢槼:=C/REF(C,1)>=1.09 ;

涓嶇牬浠�:=REF(C,BARSLAST(鍗曢槼));

DRAWTEXT(鍗曢槼,H-H*0.02,'闃�'),COLOR00FFFF;

LS0:=BARSLAST(鍗曢槼);

LS11:=IF(1,LS0=1,鍗曢槼);

LS21:=IF(1,LLV(L,1)>REF(L,1),1);

鍗曢槼涓嶇牬:=LS11 AND LS21;

STICKLINE(鍗曢槼涓嶇牬,涓嶇牬浠�-涓嶇牬浠�*0.002,涓嶇牬浠�,4,0),COLORRED;

DRAWTEXT(鍗曢槼涓嶇牬,涓嶇牬浠�-涓嶇牬浠�*0.02,'1'),COLORGREEN;

LS12:=IF(2,LS0=2,鍗曢槼);

LS22:=IF(2,LLV(L,2)>REF(L,2),1);

鍗曢槼涓嶇牬2:=LS12 AND LS22;

STICKLINE(鍗曢槼涓嶇牬2,涓嶇牬浠�-涓嶇牬浠�*0.002,涓嶇牬浠�,4,0),COLORRED;

DRAWTEXT(鍗曢槼涓嶇牬2,涓嶇牬浠�-涓嶇牬浠�*0.02,'2'),COLORGREEN;

LS13:=IF(3,LS0=3,鍗曢槼);

LS23:=IF(3,LLV(L,3)>REF(L,3),1);

鍗曢槼涓嶇牬3:=LS13 AND LS23;

STICKLINE(鍗曢槼涓嶇牬3,涓嶇牬浠�-涓嶇牬浠�*0.002,涓嶇牬浠�,4,0),COLORRED;

DRAWTEXT(鍗曢槼涓嶇牬3,涓嶇牬浠�-涓嶇牬浠�*0.02,'3'),COLORGREEN;

LS14:=IF(4,LS0=4,鍗曢槼);

LS24:=IF(4,LLV(L,4)>REF(L,4),1);

鍗曢槼涓嶇牬4:=LS14 AND LS24;

STICKLINE(鍗曢槼涓嶇牬4,涓嶇牬浠�-涓嶇牬浠�*0.002,涓嶇牬浠�,4,0),COLORRED;

DRAWTEXT(鍗曢槼涓嶇牬4,涓嶇牬浠�-涓嶇牬浠�*0.02,'4'),COLORGREEN;

LS15:=IF(5,LS0=5,鍗曢槼);

LS25:=IF(5,LLV(L,5)>REF(L,5),1);

鍗曢槼涓嶇牬5:=LS15 AND LS25;

STICKLINE(鍗曢槼涓嶇牬5,涓嶇牬浠�-涓嶇牬浠�*0.002,涓嶇牬浠�,4,0),COLORRED;

DRAWTEXT(鍗曢槼涓嶇牬5,涓嶇牬浠�-涓嶇牬浠�*0.02,'5'),COLORGREEN;

LS16:=IF(6,LS0=6,鍗曢槼);

LS26:=IF(6,LLV(L,6)>REF(L,6),1);

鍗曢槼涓嶇牬6:=LS16 AND LS26;

STICKLINE(鍗曢槼涓嶇牬6,涓嶇牬浠�-涓嶇牬浠�*0.002,涓嶇牬浠�,4,0),COLORRED;

DRAWTEXT(鍗曢槼涓嶇牬6,涓嶇牬浠�-涓嶇牬浠�*0.02,'6'),COLORGREEN;

LS17:=IF(7,LS0=7,鍗曢槼);

LS27:=IF(7,LLV(L,7)>REF(L,7),1);

鍗曢槼涓嶇牬7:=LS17 AND LS27;

STICKLINE(鍗曢槼涓嶇牬7,涓嶇牬浠�-涓嶇牬浠�*0.002,涓嶇牬浠�,4,0),COLORRED;

DRAWTEXT(鍗曢槼涓嶇牬7,涓嶇牬浠�-涓嶇牬浠�*0.02,'7'),COLORGREEN;

LS18:=IF(8,LS0=8,鍗曢槼);

LS28:=IF(8,LLV(L,8)>REF(L,8),1);

鍗曢槼涓嶇牬8:=LS18 AND LS28;

STICKLINE(鍗曢槼涓嶇牬8,涓嶇牬浠�-涓嶇牬浠�*0.002,涓嶇牬浠�,4,0),COLORRED;

DRAWTEXT(鍗曢槼涓嶇牬8,涓嶇牬浠�-涓嶇牬浠�*0.02,'8'),COLORGREEN;

LS19:=IF(9,LS0=9,鍗曢槼);

LS29:=IF(9,LLV(L,9)>REF(L,9),1);

鍗曢槼涓嶇牬9:=LS19 AND LS29;

STICKLINE(鍗曢槼涓嶇牬9,涓嶇牬浠�-涓嶇牬浠�*0.002,涓嶇牬浠�,4,0),COLORRED;

DRAWTEXT(鍗曢槼涓嶇牬9,涓嶇牬浠�-涓嶇牬浠�*0.02,'9'),COLORGREEN;

LS110:=IF(10,LS0=10,鍗曢槼);

LS210:=IF(10,LLV(L,10)>REF(L,10),1);

鍗曢槼涓嶇牬10:=LS110 AND LS210;

STICKLINE(鍗曢槼涓嶇牬10,涓嶇牬浠�-涓嶇牬浠�*0.002,涓嶇牬浠�,4,0),COLORRED;

DRAWTEXT(鍗曢槼涓嶇牬10,涓嶇牬浠�-涓嶇牬浠�*0.02,'10'),COLORGREEN;

N1:=30;

TS:=BARSLAST(L=LLV(L,N));

寮�濮嬩俊鍙�:=FILTERX(TS=0,BARSSINCE(C));

寮�濮嬪ぉ鏁�:=BARSLAST(寮�濮嬩俊鍙�);

澶╂暟妯嚎:=CONST(寮�濮嬪ぉ鏁�);

浣庣偣:DRAWLINE(L=LLV(L,N),L,ISLASTBAR,REF(L,TS),1),COLORGRAY;

楂樼偣:DRAWLINE(L=LLV(L,N),CONST(HHV(H,澶╂暟妯嚎)),ISLASTBAR,REF(CONST(HHV(H,澶╂暟妯嚎)),

TS),1),COLORGRAY;

STICKLINE(寮�濮嬩俊鍙�,L,CONST(HHV(H,澶╂暟妯嚎)),0,0),COLORGRAY;

STICKLINE(ISLASTBAR,浣庣偣,楂樼偣,0,0),COLORGRAY;

DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

C2:=REF(C,1),NODRAW;

娑ㄥ仠1:=REF(C,11)*1.1-C<0.01 AND H=C,NODRAW;

STICKLINE(娑ㄥ仠1,OPEN,CLOSE,1,0),COLORRED;

STICKLINE(娑ㄥ仠1,H,L,0,0),COLORRED;

璺屽仠:=IF((C2-C)*100/C2>=(10-0.01*100/C2) AND L=C,1,0),NODRAW;

STICKLINE(璺屽仠,OPEN,CLOSE,1,0),COLORGREEN;

STICKLINE(璺屽仠,H,L,0,1),COLORGREEN;

宸�:=(楂樼偣-浣庣偣)/澶╂暟妯嚎;

鏀剁洏宸�:=CONST(C)-浣庣偣;

瀵硅宸�:=楂樼偣-浣庣偣;

瀵硅瑙掑害:ATAN((瀵硅宸�/(瀵硅宸�*((澶╂暟妯嚎-1)/澶╂暟妯嚎))-1)*100)*57.3,COLORFF00FF,NODRAW;

瀵硅绾�:IF(TS>=0 AND 浣庣偣+宸�*TS<=楂樼偣,浣庣偣+宸�*TS,DRAWNULL),COLORYELLOW,LINETHICK2;

{DRAWBAND(瀵硅绾�,RGB(255,0,255),瀵硅绾�,RGB(255,0,255)),LINETHICK2;}

JX1:=MA(C,5);

JX2:=MA(C,10);

JX3:=MA(C,20);

JTTJ1:=BARSLAST(CROSS(JX1,JX2));

JTTJ2:=BARSLAST(CROSS(JX1,JX3));

JTTJ3:=BARSLAST(CROSS(JX2,JX3));

JTTJ4:=JTTJ1>=JTTJ2;

JTTJ5:=JTTJ2>=JTTJ3;

JTTJ6:=JTTJ3=0;

鏈堜环鎵�:=JTTJ4 AND JTTJ5 AND JTTJ6;

JX4:=MA(C,40);

JX5:=MA(C,60);

JTTJ7:=BARSLAST(CROSS(JX3,JX4));

JTTJ8:=BARSLAST(CROSS(JX3,JX5));

JTTJ9:=BARSLAST(CROSS(JX4,JX5));

JTTJ10:=JTTJ7>=JTTJ8;

JTTJ11:=JTTJ8>=JTTJ9;

JTTJ12:=JTTJ9=0;

瀛ｄ环鎵�:=JTTJ10 AND JTTJ11 AND JTTJ12;

JTTJ13:=BARSLAST(CROSS(JX1,JX2));

JTTJ14:=BARSLAST(CROSS(JX1,JX5));

JTTJ15:=BARSLAST(CROSS(JX2,JX5));

JTTJ16:=JTTJ13>=JTTJ14;

JTTJ17:=JTTJ14>=JTTJ15;

JTTJ18:=JTTJ15=0;

鐭暱鎵�:=JTTJ16 AND JTTJ17 AND JTTJ18;

BOLL:=MA(C,20);

UPPER:=BOLL+2*STD(C,20);

LOWER:=BOLL-2*STD(C,20);

澶ч粦椹�:=CROSS(C,UPPER) AND C/REF(C,1)>1.05,COLORRED;

DRAWTEXT(澶ч粦椹� AND C>MA(C,60) AND C>MA(C,90) AND C>MA(C,120) AND C>MA(C,250),H*1.03,'鏁㈡闃�'),COLORYELLOW;

DRAWTEXT(鏈堜环鎵�,L*0.98,'鏈堜环鎵�'),COLORWHITE;

DRAWTEXT(瀛ｄ环鎵�,H+0.05,'瀛ｄ环鎵�'),COLORWHITE;

DRAWTEXT(鐭暱鎵�,L-0.1,'鐭暱鎵�'),COLORWHITE;

VARC01:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;

DRAWICON(CROSS(82,VARC01),H*1.02,2);

{DRAWTEXT(CROSS(82,VARC),2,'|閫冨簞'),COLORWHITE ;}

VAR034:=(INDEXC-REF(INDEXC, 1))/REF(INDEXC, 1);

VAR035:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1);

VAR036:=IF(VAR034>0.010, 0.900, 1) AND IF(VAR034>(-0.025), 1, 1.200);

VAR037:=VAR036*(VAR035-VAR034)*100;

VAR038:=SUM(VAR037, 10);

VAR310:=VAR038>20;

VAR326:=IF(CLOSE AND MA(VOL, 5)/240 AND CLOSE>REF(CLOSE, 1)*1.0 AND CLOSE,1,0);{VAR38>VAR39;}

绌�:=EMA(C,5);

VARA:=(CLOSE-REF(OPEN,29))/REF(OPEN,29)*100;

VARB:=EMA(0.667*REF(VARA,1)+0.333*VARA,5);

VARC:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;

VAR11:=(HIGH+LOW+OPEN+2*CLOSE)/5;

VAR12:=REF(VAR11,1);

VAR3:=SMA(MAX(VAR1-VAR12,0),10,1)/SMA(ABS(VAR11-VAR12),10,1)*100;

VAR4:=FILTER(IF(COUNT(VAR3<20,5)>=1 AND COUNT(VAR11=LLV(VAR11,10),10)>=1 AND CLOSE>=OPEN*1.038 AND VOL>MA(VOL,5)*1.2,1,0),5);

DRAWTEXT_FIX(1,0.02,0.90,0,'璐㈢705-姝ｅ搧鏍囧織'),COLOR00FFFF;

DRAWTEXT_FIX(1,0.00,0,0,'鎵�灞炶涓氾細')COLORCYAN;

DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK),COLORWHITE;

DRAWTEXT_FIX(1,0.14,0,0,'鎵�灞炲湴鍖猴細')COLORCYAN;

DRAWTEXT_FIX(1,0.20,0,0,DYBLOCK),COLORWHITE;

DRAWTEXT_FIX(ISLASTBAR,0.65,0.8,0,HYBLOCK),COLOR00FF00;

DRAWTEXT_FIX(ISLASTBAR,0.75,0.8,0,DYBLOCK),COLOR00FFFF;

DRAWTEXT_FIX(ISLASTBAR,0.65,0.9,0,GNBLOCK),COLORYELLOW;

{浠ヤ笂涓烘樉绀烘墍灞炴澘鍧楋紝鍦板煙锛屾蹇电瓑}

DRAWTEXT_FIX(1,0.00,0.05,0,'涓昏惀涓氬姟锛�'),COLORRED;

DRAWTEXT_FIX(1,0.06,0.05,0,EXTERNSTR(0,3)),COLORWHITE;