|
{大智慧分时叠加K线主图指标，引用FSKY公式附后} {横盘上突} tt:=BARSCOUNT(C); CC:=CLOSE; zz:=SUM(AMOUNT,tt)/SUM(VOL*100,tt); zz1:=BETWEEN(C/zz,1.05,0.95); 均线:=IF(zz1=0,MA(C,TT),zz); 上均:=均线 + AVEDEV(C,tt)*2; 时长:=if(HOUR>=10.5 AND HOUR<15 ,1,0); 涨幅:=(close/DYNAINFO(3))>=1.03; 跌幅:=(close/DYNAINFO(3))<=0.97; 涨跌幅:=涨幅 OR 跌幅; yy:=SMA(vol,30,1); 放量:=(yy-LLV(Llv(yy,1),30))/(HHV(Hhv(yy,1),30)-LLV(Llv(yy,1),30))>0; 横盘:=((HHV(CLOSE,TT)-LLV(CLOSE,TT))/CLOSE)<=0.05; 横涨:=涨跌幅=0 and 横盘 and 时长 and 放量 and CROSS(CC,上均) and DYNAINFO(22)<DYNAINFO(23) ; 上突:=FILTER(横涨,100) ; DRAWTEXT(上突,上均,'★横盘上突'),COLOR0080FF; {主力扫盘} VAR23:=HHV(CLOSE,90); VAR24:=LLV(CLOSE,90); VAR25:=VAR23-VAR24; VAR26:=EMA((CLOSE-VAR24)/VAR25-0.5,14); ZLSP:=VAR26*20; VAR27:=REF(HHV(CLOSE,66),2); VAR28:=CROSS(CLOSE,VAR27) and (HHV(CLOSE,110)/LLV(CLOSE,110)-1)*100<45 and ZLSP<5.666; VAR31:=15*FILTER(VAR28,41)>10; 主力扫盘:=VAR31; DRAWTEXT(VAR31,C*1.001,'主力扫盘'),COLORMAGENTA; VERTLINE( var31,1),COLORMAGENTA; KP30:=TIME0<36000; KPGD:=H=HHV(H,0) AND KP30; GDSJ:=BARSLAST(KPGD); HH:REF(H,GDSJ),COLOR00FF00,POINTDOT,LINETHICK1; 过顶:=IF(CROSS(C,HH),1,0); 冲高:=IF(FILTER(CROSS(C,HH*1.01),15),1,0); DRAWTEXT(过顶,HH,'♂过顶'),COLOR0080FF,ALIGN1; DRAWTEXT(冲高,C,'♂冲高'),COLORRED,ALIGN1; {主力扫盘+突破} aa:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100; ab:=HHv(c,10)/llv(c,10)<1.50 and count(c>o,10)>=1 and count(c<o,10)>=1 and count(l>ref(l,1),10)<=3; 突破:=ref(aa,1) and c>o and (c-o)>ref(hhv(abs(c-o),10),1)*1.3 and c>ref(hhv(h,10),1); VAR32:=VAR31 AND 突破 ; VERTLINE( var32,1),COLOR008CFF; {量价新高} T:=BARSCOUNT(C); 分钟数:=IF(TIME0/60-570<=130,TIME0/60-570,TIME0/60-660); AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 主买a:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)); 主卖a:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)); 量:=VOL; 额:=AMOUNT/100000000; 流入额:=MA(主买a,4)/100000; 流出额:=MA((0-主卖a),4)/100000; 净流入:=SUM(流入额-流出额,0); 价新高:=COUNT(H=HHV(H,分钟数),30); 量新高:=COUNT(V=HHV(V,分钟数) ,30); 量价新高:=价新高=量新高 AND 价新高>0 AND 价新高>REF(价新高,1) AND 量新高>REF(量新高,1) AND 净流入>0; DRAWTEXT(量价新高,C,'★量价新高'),COLORRED,ALIGN1; {进场} VarF:=(2*CLOSE+HIGH+LOW)/4; Var10:=LLV(LOW,34); Var11:=HHV(HIGH,34); Var12:=EMA((VarF-Var10)/(Var11-Var10)*100,6); Var13:=EMA(0.667*REF(Var12,1)+0.333*Var12,4); Var14:=LLV(LOW,120); Var15:=HHV(HIGH,120); Var16:=Var15-Var14; DRAWTEXT(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>0.3 AND COUNT (Var12>Var13,3) AND REF(LOW,1)=LLV(LOW,120) AND CLOSE>OPEN,1,0),LOW,'☆进场'),Color00ffff; N1:=950; DRAWRECTREL(N1+4,(400-(DYNAINFO(4)/DYNAINFO(3)-1)*4000),N1+8,(400-(DYNAINFO(5)/DYNAINFO(3)-1)*4000),RGB(250,0,250)); DRAWRECTREL(N1+4,(400-(DYNAINFO(7)/DYNAINFO(3)-1)*4000),N1+8,(400-(DYNAINFO(6)/DYNAINFO(3)-1)*4000),RGB(0,255,0)); If DYNAINFO(7)>=DYNAINFO(4) then DRAWRECTREL(N1-10,(400-(DYNAINFO(4)/DYNAINFO(3)-1)*4000),N1+22,(400-(DYNAINFO(7)/DYNAINFO(3)-1)*4000),RGB(250,0,0)); else DRAWRECTREL(N1-10,(400-(DYNAINFO(4)/DYNAINFO(3)-1)*4000),N1+22,(400-(DYNAINFO(7)/DYNAINFO(3)-1)*4000),RGB(0,250,0)); ZO:="FSKY.ZO#DAY"; ZC:="FSKY.ZC#DAY"; ZH:="FSKY.ZH#DAY"; ZL:="FSKY.ZL#DAY"; ZKP:=400-("FSKY.ZO#DAY"/DYNAINFO(3)-1)*4000; ZCP:=400-(ZC/DYNAINFO(3)-1)*4000; ZZG:=400-(ZH/DYNAINFO(3)-1)*4000; ZZD:=400-(ZL/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-36,ZKP,N1-32,ZZG,RGB(255,0,255)); DRAWRECTREL(N1-36,ZCP,N1-32,ZZD,RGB(0,255,0)); If ZC>=ZO then DRAWRECTREL(N1-49,ZKP,N1-17,ZCP,RGB(255,0,0)); else DRAWRECTREL(N1-49,ZKP,N1-17,ZCP,RGB(0,255,0));; JO:="FSKY.JO#DAY"; JC:="FSKY.JC#DAY"; JH:="FSKY.JH#DAY"; JL:="FSKY.JL#DAY"; ZZKP:=400-(JO/DYNAINFO(3)-1)*4000; ZZCP:=400-(JC/DYNAINFO(3)-1)*4000; ZZZG:=400-(JH/DYNAINFO(3)-1)*4000; ZZZD:=400-(JL/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-76,ZZKP,N1-72,ZZZG,RGB(255,0,255)); DRAWRECTREL(N1-76,ZZCP,N1-72,ZZZD,RGB(0,255,0)); if JC>=JO then DRAWRECTREL(N1-89,ZZKP,N1-57,ZZCP,RGB(255,0,0)); else DRAWRECTREL(N1-89,ZZKP,N1-57,ZZCP,RGB(0,255,0)); JO3:="FSKY.JO3#DAY"; JC3:="FSKY.JC3#DAY"; JH3:="FSKY.JH3#DAY"; JL3:="FSKY.JL3#DAY"; ZZKP3:=400-(JO3/DYNAINFO(3)-1)*4000; ZZCP3:=400-(JC3/DYNAINFO(3)-1)*4000; ZZZG3:=400-(JH3/DYNAINFO(3)-1)*4000; ZZZD3:=400-(JL3/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-116,ZZKP3,N1-112,ZZZG3,RGB(255,0,255)); DRAWRECTREL(N1-116,ZZCP3,N1-112,ZZZD3,RGB(0,255,0)); if JC3>=JO3 then DRAWRECTREL(N1-129,ZZKP3,N1-97,ZZCP3,RGB(255,0,0)); else DRAWRECTREL(N1-129,ZZKP3,N1-97,ZZCP3,RGB(0,255,0)); JO4:="FSKY.JO4#DAY"; JC4:="FSKY.JC4#DAY"; JH4:="FSKY.JH4#DAY"; JL4:="FSKY.JL4#DAY"; ZZKP4:=400-(JO4/DYNAINFO(3)-1)*4000; ZZCP4:=400-(JC4/DYNAINFO(3)-1)*4000; ZZZG4:=400-(JH4/DYNAINFO(3)-1)*4000; ZZZD4:=400-(JL4/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-156,ZZKP4,N1-152,ZZZG4,RGB(255,0,255)); DRAWRECTREL(N1-156,ZZCP4,N1-152,ZZZD4,RGB(0,255,0)); if JC4>=JO4 then DRAWRECTREL(N1-169,ZZKP4,N1-137,ZZCP4,RGB(255,0,0)); else DRAWRECTREL(N1-169,ZZKP4,N1-137,ZZCP4,RGB(0,255,0)); JO5:="FSKY.JO5#DAY"; JC5:="FSKY.JC5#DAY"; JH5:="FSKY.JH5#DAY"; JL5:="FSKY.JL5#DAY"; ZZKP5:=400-(JO5/DYNAINFO(3)-1)*4000; ZZCP5:=400-(JC5/DYNAINFO(3)-1)*4000; ZZZG5:=400-(JH5/DYNAINFO(3)-1)*4000; ZZZD5:=400-(JL5/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-196,ZZKP5,N1-192,ZZZG5,RGB(255,0,255)); DRAWRECTREL(N1-196,ZZCP5,N1-192,ZZZD5,RGB(0,255,0)); if JC5>=JO5 then DRAWRECTREL(N1-209,ZZKP5,N1-177,ZZCP5,RGB(255,0,0)); else DRAWRECTREL(N1-209,ZZKP5,N1-177,ZZCP5,RGB(0,255,0)); JO6:="FSKY.JO6#DAY"; JC6:="FSKY.JC6#DAY"; JH6:="FSKY.JH6#DAY"; JL6:="FSKY.JL6#DAY"; ZZKP6:=400-(JO6/DYNAINFO(3)-1)*4000; ZZCP6:=400-(JC6/DYNAINFO(3)-1)*4000; ZZZG6:=400-(JH6/DYNAINFO(3)-1)*4000; ZZZD6:=400-(JL6/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-236,ZZKP6,N1-232,ZZZG6,RGB(255,0,255)); DRAWRECTREL(N1-236,ZZCP6,N1-232,ZZZD6,RGB(0,255,0)); if JC6>=JO6 then DRAWRECTREL(N1-249,ZZKP6,N1-217,ZZCP6,RGB(255,0,0)); else DRAWRECTREL(N1-249,ZZKP6,N1-217,ZZCP6,RGB(0,255,0)); JO7:="FSKY.JO7#DAY"; JC7:="FSKY.JC7#DAY"; JH7:="FSKY.JH7#DAY"; JL7:="FSKY.JL7#DAY"; ZZKP7:=400-(JO7/DYNAINFO(3)-1)*4000; ZZCP7:=400-(JC7/DYNAINFO(3)-1)*4000; ZZZG7:=400-(JH7/DYNAINFO(3)-1)*4000; ZZZD7:=400-(JL7/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-276,ZZKP7,N1-272,ZZZG7,RGB(255,0,255)); DRAWRECTREL(N1-276,ZZCP7,N1-272,ZZZD7,RGB(0,255,0)); if JC7>=JO7 then DRAWRECTREL(N1-289,ZZKP7,N1-257,ZZCP7,RGB(255,0,0)); else DRAWRECTREL(N1-289,ZZKP7,N1-257,ZZCP7,RGB(0,255,0)); JO8:="FSKY.JO8#DAY"; JC8:="FSKY.JC8#DAY"; JH8:="FSKY.JH8#DAY"; JL8:="FSKY.JL8#DAY"; ZZKP8:=400-(JO8/DYNAINFO(3)-1)*4000; ZZCP8:=400-(JC8/DYNAINFO(3)-1)*4000; ZZZG8:=400-(JH8/DYNAINFO(3)-1)*4000; ZZZD8:=400-(JL8/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-316,ZZKP8,N1-312,ZZZG8,RGB(255,0,255)); DRAWRECTREL(N1-316,ZZCP8,N1-312,ZZZD8,RGB(0,255,0)); if JC8>=JO8 then DRAWRECTREL(N1-329,ZZKP8,N1-297,ZZCP8,RGB(255,0,0)); else DRAWRECTREL(N1-329,ZZKP8,N1-297,ZZCP8,RGB(0,255,0)); JO9:="FSKY.JO9#DAY"; JC9:="FSKY.JC9#DAY"; JH9:="FSKY.JH9#DAY"; JL9:="FSKY.JL9#DAY"; ZZKP9:=400-(JO9/DYNAINFO(3)-1)*4000; ZZCP9:=400-(JC9/DYNAINFO(3)-1)*4000; ZZZG9:=400-(JH9/DYNAINFO(3)-1)*4000; ZZZD9:=400-(JL9/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-356,ZZKP9,N1-352,ZZZG9,RGB(255,0,255)); DRAWRECTREL(N1-356,ZZCP9,N1-352,ZZZD9,RGB(0,255,0)); if JC9>=JO9 then DRAWRECTREL(N1-369,ZZKP9,N1-337,ZZCP9,RGB(255,0,0)); else DRAWRECTREL(N1-369,ZZKP9,N1-337,ZZCP9,RGB(0,255,0)); JO10:="FSKY.JO10#DAY"; JC10:="FSKY.JC10#DAY"; JH10:="FSKY.JH10#DAY"; JL10:="FSKY.JL10#DAY"; ZZKP10:=400-(JO10/DYNAINFO(3)-1)*4000; ZZCP10:=400-(JC10/DYNAINFO(3)-1)*4000; ZZZG10:=400-(JH10/DYNAINFO(3)-1)*4000; ZZZD10:=400-(JL10/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-396,ZZKP10,N1-392,ZZZG10,RGB(255,0,255)); DRAWRECTREL(N1-396,ZZCP10,N1-392,ZZZD10,RGB(0,255,0)); if JC10>=JO10 then DRAWRECTREL(N1-409,ZZKP10,N1-377,ZZCP10,RGB(255,0,0)); else DRAWRECTREL(N1-409,ZZKP10,N1-377,ZZCP10,RGB(0,255,0)); JO11:="FSKY.JO11#DAY"; JC11:="FSKY.JC11#DAY"; JH11:="FSKY.JH11#DAY"; JL11:="FSKY.JL11#DAY"; ZZKP11:=400-(JO11/DYNAINFO(3)-1)*4000; ZZCP11:=400-(JC11/DYNAINFO(3)-1)*4000; ZZZG11:=400-(JH11/DYNAINFO(3)-1)*4000; ZZZD11:=400-(JL11/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-436,ZZKP11,N1-432,ZZZG11,RGB(255,0,255)); DRAWRECTREL(N1-436,ZZCP11,N1-432,ZZZD11,RGB(0,255,0)); if JC11>=JO11 then DRAWRECTREL(N1-449,ZZKP11,N1-417,ZZCP11,RGB(255,0,0)); else DRAWRECTREL(N1-449,ZZKP11,N1-417,ZZCP11,RGB(0,255,0)); JO12:="FSKY.JO12#DAY"; JC12:="FSKY.JC12#DAY"; JH12:="FSKY.JH12#DAY"; JL12:="FSKY.JL12#DAY"; ZZKP12:=400-(JO12/DYNAINFO(3)-1)*4000; ZZCP12:=400-(JC12/DYNAINFO(3)-1)*4000; ZZZG12:=400-(JH12/DYNAINFO(3)-1)*4000; ZZZD12:=400-(JL12/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-476,ZZKP12,N1-472,ZZZG12,RGB(255,0,255)); DRAWRECTREL(N1-476,ZZCP12,N1-472,ZZZD12,RGB(0,255,0)); if JC12>=JO12 then DRAWRECTREL(N1-489,ZZKP12,N1-457,ZZCP12,RGB(255,0,0)); else DRAWRECTREL(N1-489,ZZKP12,N1-457,ZZCP12,RGB(0,255,0)); JO13:="FSKY.JO13#DAY"; JC13:="FSKY.JC13#DAY"; JH13:="FSKY.JH13#DAY"; JL13:="FSKY.JL13#DAY"; ZZKP13:=400-(JO13/DYNAINFO(3)-1)*4000; ZZCP13:=400-(JC13/DYNAINFO(3)-1)*4000; ZZZG13:=400-(JH13/DYNAINFO(3)-1)*4000; ZZZD13:=400-(JL13/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-516,ZZKP13,N1-512,ZZZG13,RGB(255,0,255)); DRAWRECTREL(N1-516,ZZCP13,N1-512,ZZZD13,RGB(0,255,0)); if JC13>=JO13 then DRAWRECTREL(N1-529,ZZKP13,N1-497,ZZCP13,RGB(255,0,0)); else DRAWRECTREL(N1-529,ZZKP13,N1-497,ZZCP13,RGB(0,255,0)); JO14:="FSKY.JO14#DAY"; JC14:="FSKY.JC14#DAY"; JH14:="FSKY.JH14#DAY"; JL14:="FSKY.JL14#DAY"; ZZKP14:=400-(JO14/DYNAINFO(3)-1)*4000; ZZCP14:=400-(JC14/DYNAINFO(3)-1)*4000; ZZZG14:=400-(JH14/DYNAINFO(3)-1)*4000; ZZZD14:=400-(JL14/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-556,ZZKP14,N1-552,ZZZG14,RGB(255,0,255)); DRAWRECTREL(N1-556,ZZCP14,N1-552,ZZZD14,RGB(0,255,0)); if JC14>=JO14 then DRAWRECTREL(N1-569,ZZKP14,N1-537,ZZCP14,RGB(255,0,0)); else DRAWRECTREL(N1-569,ZZKP14,N1-537,ZZCP14,RGB(0,255,0)); JO15:="FSKY.JO15#DAY"; JC15:="FSKY.JC15#DAY"; JH15:="FSKY.JH15#DAY"; JL15:="FSKY.JL15#DAY"; ZZKP15:=400-(JO15/DYNAINFO(3)-1)*4000; ZZCP15:=400-(JC15/DYNAINFO(3)-1)*4000; ZZZG15:=400-(JH15/DYNAINFO(3)-1)*4000; ZZZD15:=400-(JL15/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-596,ZZKP15,N1-592,ZZZG15,RGB(255,0,255)); DRAWRECTREL(N1-596,ZZCP15,N1-592,ZZZD15,RGB(0,255,0)); if JC15>=JO15 then DRAWRECTREL(N1-609,ZZKP15,N1-577,ZZCP15,RGB(255,0,0)); else DRAWRECTREL(N1-609,ZZKP15,N1-577,ZZCP15,RGB(0,255,0)); JO16:="FSKY.JO16#DAY"; JC16:="FSKY.JC16#DAY"; JH16:="FSKY.JH16#DAY"; JL16:="FSKY.JL16#DAY"; ZZKP16:=400-(JO16/DYNAINFO(3)-1)*4000; ZZCP16:=400-(JC16/DYNAINFO(3)-1)*4000; ZZZG16:=400-(JH16/DYNAINFO(3)-1)*4000; ZZZD16:=400-(JL16/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-636,ZZKP16,N1-632,ZZZG16,RGB(255,0,255)); DRAWRECTREL(N1-636,ZZCP16,N1-632,ZZZD16,RGB(0,255,0)); if JC16>=JO16 then DRAWRECTREL(N1-649,ZZKP16,N1-617,ZZCP16,RGB(255,0,0)); else DRAWRECTREL(N1-649,ZZKP16,N1-617,ZZCP16,RGB(0,255,0)); JO17:="FSKY.JO17#DAY"; JC17:="FSKY.JC17#DAY"; JH17:="FSKY.JH17#DAY"; JL17:="FSKY.JL17#DAY"; ZZKP17:=400-(JO17/DYNAINFO(3)-1)*4000; ZZCP17:=400-(JC17/DYNAINFO(3)-1)*4000; ZZZG17:=400-(JH17/DYNAINFO(3)-1)*4000; ZZZD17:=400-(JL17/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-676,ZZKP17,N1-672,ZZZG17,RGB(255,0,255)); DRAWRECTREL(N1-676,ZZCP17,N1-672,ZZZD17,RGB(0,255,0)); if JC17>=JO17 then DRAWRECTREL(N1-689,ZZKP17,N1-657,ZZCP17,RGB(255,0,0)); else DRAWRECTREL(N1-689,ZZKP17,N1-657,ZZCP17,RGB(0,255,0)); {JO18:="FSKY.JO18#DAY"; JC18:="FSKY.JC18#DAY"; JH18:="FSKY.JH18#DAY"; JL18:="FSKY.JL18#DAY"; ZZKP18:=400-(JO18/DYNAINFO(3)-1)*4000; ZZCP18:=400-(JC18/DYNAINFO(3)-1)*4000; ZZZG18:=400-(JH18/DYNAINFO(3)-1)*4000; ZZZD18:=400-(JL18/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-716,ZZKP18,N1-712,ZZZG18,RGB(255,0,255)); DRAWRECTREL(N1-716,ZZCP18,N1-712,ZZZD18,RGB(0,255,0)); if JC18>=JO18 then DRAWRECTREL(N1-729,ZZKP18,N1-697,ZZCP18,RGB(255,0,0)); else DRAWRECTREL(N1-729,ZZKP18,N1-697,ZZCP18,RGB(0,255,0)); JO19:="FSKY.JO19#DAY"; JC19:="FSKY.JC19#DAY"; JH19:="FSKY.JH19#DAY"; JL19:="FSKY.JL19#DAY"; ZZKP19:=400-(JO19/DYNAINFO(3)-1)*4000; ZZCP19:=400-(JC19/DYNAINFO(3)-1)*4000; ZZZG19:=400-(JH19/DYNAINFO(3)-1)*4000; ZZZD19:=400-(JL19/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-756,ZZKP19,N1-752,ZZZG19,RGB(255,0,255)); DRAWRECTREL(N1-756,ZZCP19,N1-752,ZZZD19,RGB(0,255,0)); if JC19>=JO19 then DRAWRECTREL(N1-769,ZZKP19,N1-737,ZZCP19,RGB(255,0,0)); else DRAWRECTREL(N1-769,ZZKP19,N1-737,ZZCP19,RGB(0,255,0)); JO20:="FSKY.JO20#DAY"; JC20:="FSKY.JC20#DAY"; JH20:="FSKY.JH20#DAY"; JL20:="FSKY.JL20#DAY"; ZZKP20:=400-(JO20/DYNAINFO(3)-1)*4000; ZZCP20:=400-(JC20/DYNAINFO(3)-1)*4000; ZZZG20:=400-(JH20/DYNAINFO(3)-1)*4000; ZZZD20:=400-(JL20/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-796,ZZKP20,N1-792,ZZZG20,RGB(255,0,255)); DRAWRECTREL(N1-796,ZZCP20,N1-792,ZZZD19,RGB(0,255,0)); if JC20>=JO20 then DRAWRECTREL(N1-809,ZZKP20,N1-777,ZZCP20,RGB(255,0,0)); else DRAWRECTREL(N1-809,ZZKP20,N1-777,ZZCP20,RGB(0,255,0)); JO21:="FSKY.JO21#DAY"; JC21:="FSKY.JC21#DAY"; JH21:="FSKY.JH21#DAY"; JL21:="FSKY.JL21#DAY"; ZZKP21:=400-(JO21/DYNAINFO(3)-1)*4000; ZZCP21:=400-(JC21/DYNAINFO(3)-1)*4000; ZZZG21:=400-(JH21/DYNAINFO(3)-1)*4000; ZZZD21:=400-(JL21/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-836,ZZKP21,N1-832,ZZZG21,RGB(255,0,255)); DRAWRECTREL(N1-836,ZZCP21,N1-832,ZZZD21,RGB(0,255,0)); if JC21>=JO21 then DRAWRECTREL(N1-849,ZZKP21,N1-817,ZZCP21,RGB(255,0,0)); else DRAWRECTREL(N1-849,ZZKP21,N1-817,ZZCP21,RGB(0,255,0)); JO19:="FSKY.JO19#DAY"; JC19:="FSKY.JC19#DAY"; JH19:="FSKY.JH19#DAY"; JL19:="FSKY.JL19#DAY"; ZZKP19:=400-(JO19/DYNAINFO(3)-1)*4000; ZZCP19:=400-(JC19/DYNAINFO(3)-1)*4000; ZZZG19:=400-(JH19/DYNAINFO(3)-1)*4000; ZZZD19:=400-(JL19/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-756,ZZKP19,N1-752,ZZZG19,RGB(255,0,255)); DRAWRECTREL(N1-756,ZZCP19,N1-752,ZZZD19,RGB(0,255,0)); if JC19>=JO19 then DRAWRECTREL(N1-769,ZZKP19,N1-737,ZZCP17,RGB(255,0,0)); else DRAWRECTREL(N1-689,ZZKP17,N1-737,ZZCP19,RGB(0,255,0)); JO19:="FSKY.JO19#DAY"; JC19:="FSKY.JC19#DAY"; JH19:="FSKY.JH19#DAY"; JL19:="FSKY.JL19#DAY"; ZZKP19:=400-(JO19/DYNAINFO(3)-1)*4000; ZZCP19:=400-(JC19/DYNAINFO(3)-1)*4000; ZZZG19:=400-(JH19/DYNAINFO(3)-1)*4000; ZZZD19:=400-(JL19/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-756,ZZKP19,N1-752,ZZZG19,RGB(255,0,255)); DRAWRECTREL(N1-756,ZZCP19,N1-752,ZZZD19,RGB(0,255,0)); if JC19>=JO19 then DRAWRECTREL(N1-769,ZZKP19,N1-737,ZZCP17,RGB(255,0,0)); else DRAWRECTREL(N1-689,ZZKP17,N1-737,ZZCP19,RGB(0,255,0)); JO19:="FSKY.JO19#DAY"; JC19:="FSKY.JC19#DAY"; JH19:="FSKY.JH19#DAY"; JL19:="FSKY.JL19#DAY"; ZZKP19:=400-(JO19/DYNAINFO(3)-1)*4000; ZZCP19:=400-(JC19/DYNAINFO(3)-1)*4000; ZZZG19:=400-(JH19/DYNAINFO(3)-1)*4000; ZZZD19:=400-(JL19/DYNAINFO(3)-1)*4000; DRAWRECTREL(N1-756,ZZKP19,N1-752,ZZZG19,RGB(255,0,255)); DRAWRECTREL(N1-756,ZZCP19,N1-752,ZZZD19,RGB(0,255,0)); if JC19>=JO19 then DRAWRECTREL(N1-769,ZZKP19,N1-737,ZZCP17,RGB(255,0,0)); else DRAWRECTREL(N1-689,ZZKP17,N1-737,ZZCP19,RGB(0,255,0));} 分时均价线:SUM(C*V,240)/SUM(V,240),COLORYELLOW,LINETHICK1; 小单差:(1-BIGORDER(1,1)-(1-BIGORDER(2,1)))*100,colorgreen,LINETHICK0,precis1; 特大差:(BIGORDER(1,3)-BIGORDER(2,3))*100,LINETHICK0,coloryellow,precis1; 大单差:((BIGORDER(1,2)-BIGORDER(2,2))-(BIGORDER(1,3)-BIGORDER(2,3)))*100,LINETHICK0,ColorFF00FF,precis1; DRAWTEXTREL(20,750,'特大差:'+ NUMTOSTRN(特大差,3)+' 大单差:'+ NUMTOSTRN(大单差,3)+' 小单差:'+ NUMTOSTRN(小单差,3)),colorccff99; ddx:="WDDDX.DDX#day"; DDY:="WDDDY.DDY#day"; DDZ:="WDDDZ.DDZ#day"; DRAWTEXTREL(20,800,'DDX:'+ NUMTOSTRN(DDX,3)+' DDY:'+ NUMTOSTRN(DDY,3)+' DDZ:'+ NUMTOSTRN(DDZ,3)),colorccff99; DDX:=(ordervol(1,2)-ordervol(2,2))/capital*10; DDX累积:=SUM(ddx,0); BBD:DDX累积*DYNAINFO(3)+DYNAINFO(3),COLORMAGENTA,precis0,LINETHICK3; {主图指标引用公式FSKY源码} 昨开:REF(O,1); 昨收:REF(C,1); 前开:REF(O,2); 前收:REF(C,2); ZO:REF(O,1); ZC:REF(C,1); ZH:REF(H,1); ZL:REF(L,1); JO:REF(O,2); JC:REF(C,2); JH:REF(H,2); JL:REF(L,2); JO3:REF(O,3); JC3:REF(C,3); JH3:REF(H,3); JL3:REF(L,3); JO4:REF(O,4); JC4:REF(C,4); JH4:REF(H,4); JL4:REF(L,4); JO5:REF(O,5); JC5:REF(C,5); JH5:REF(H,5); JL5:REF(L,5); JO6:REF(O,6); JC6:REF(C,6); JH6:REF(H,6); JL6:REF(L,6); JO7:REF(O,7); JC7:REF(C,7); JH7:REF(H,7); JL7:REF(L,7); JO8:REF(O,8); JC8:REF(C,8); JH8:REF(H,8); JL8:REF(L,8); JO9:REF(O,9); JC9:REF(C,9); JH9:REF(H,9); JL9:REF(L,9); JO10:REF(O,10); JC10:REF(C,10); JH10:REF(H,10); JL10:REF(L,10); JO11:REF(O,11); JC11:REF(C,11); JH11:REF(H,11); JL11:REF(L,11); JO12:REF(O,12); JC12:REF(C,12); JH12:REF(H,12); JL12:REF(L,12); JO13:REF(O,13); JC13:REF(C,13); JH13:REF(H,13); JL13:REF(L,13); JO14:REF(O,14); JC14:REF(C,14); JH14:REF(H,14); JL14:REF(L,14); JO15:REF(O,15); JC15:REF(C,15); JH15:REF(H,15); JL15:REF(L,15); JO16:REF(O,16); JC16:REF(C,16); JH16:REF(H,16); JL16:REF(L,16); JO17:REF(O,17); JC17:REF(C,17); JH17:REF(H,17); JL17:REF(L,17); JO18:REF(O,18); JC18:REF(C,18); JH18:REF(H,18); JL18:REF(L,18); JO19:REF(O,19); JC19:REF(C,19); JH19:REF(H,19); JL19:REF(L,19); JO20:REF(O,20); JC20:REF(C,20); JH20:REF(H,20); JL20:REF(L,20); JO21:REF(O,21); JC21:REF(C,21); JH21:REF(H,21); JL21:REF(L,21); JO22:REF(O,22); JC22:REF(C,22); JH22:REF(H,22); JL22:REF(L,22); JO23:REF(O,23); JC23:REF(C,23); JH23:REF(H,23); JL23:REF(L,23); JO24:REF(O,24); JC24:REF(C,24); JH24:REF(H,24); JL24:REF(L,24); |
|
|
