胜者为王 发表于 2024-1-16 09:01:22

通达信主图神采飞扬

<p data-first-child >引文:不看均线成交量,</p><p >不听消息跟题材。</p><p >大众都会谁不会,</p><p >潜龙九式出新奇。</p><p >语意浅显,希望会有一些帮助,目前我们"潜龙九式“全章节思路配比全盘面例图,以完成全部更新。</p><p >试着问自己一个小的问题,如果让盘面简单一些的同时,要能好看实用,是不是会更好一些呢?</p><p >今日分享:通通达信主图神采飞扬(附源码)</p><p >{古道西风主图K=12 P=4 K2=0(0-2) K3=8}</p><p >{卖出------------------------}</p><p >VAR55:=EMA(EMA(EMA(CLOSE,8),3),62);</p><p >VAR56:=((REF(HIGH,1) + REF(LOW,1)) / 2);</p><p >VAR57:=(MA(CLOSE,20) + (2 * STD(CLOSE,20)));</p><p >VAR58:=((SMA(MAX((CLOSE - REF(CLOSE,1)),0),7,1) / SMA(ABS((CLOSE - REF(CLOSE,1))),7,1)) * 100);</p><p >卖出1:=FILTER(CROSS(79,VAR58),4);</p><p >MA21:=REF(CLOSE,1);</p><p >ZX:=((SMA(MAX((CLOSE - MA21),0),6,1) / SMA(ABS((CLOSE - MA21)),6,1)) * 100);</p><p >卖出2:=CROSS(84,ZX),COLORFF00FF;</p><p >卖出3:=CROSS(90,RSI);</p><p >卖出:=卖出1 OR 卖出2 OR 卖出3;</p><p >DRAWICON(卖出,(HIGH * 1.002),15);</p><p >{买入------------------------}</p><p >MA3:=MA(CLOSE,3);</p><p >ZVAR4:=(((HIGH + LOW) + CLOSE) / 3);</p><p >QQ2:=(CLOSE-LLV(LOW, 18))/(HHV(HIGH, 18)-LLV(LOW, 18))*100; </p><p >QQ3:=SMA(QQ2, 9, 1); </p><p >QQ4:=SMA(QQ3, 3, 1); </p><p >长趋势:=3*QQ3-2*QQ4,COLORWHITE,LINETHICK3; </p><p >趋势线:=EMA(QQ3, 3),COLORRED,LINETHICK3; </p><p >金叉:= CROSS(长趋势,趋势线);</p><p >AAAA1:=AMOUNT/V;</p><p >BBB1:=L<AAAA1*0.9;</p><p >CCC1:=(C-REF(C,1))/REF(C,1)*100>1.2;</p><p >DDD1:=L<MA(C,5)*0.921;</p><p >EEE1:=V<MA(V,5)*1.5;</p><p >老鼠仓:=BBB1 AND CCC1 AND DDD1 AND EEE1,,NODRAW;</p><p >X1:=(C+L+H)/3;</p><p >BB5:=ATAN(EMA(X1,7)-REF(EMA(X1,7),1))*3.1416*10;</p><p >VAR1:=(MA(CLOSE,80)-MA(CLOSE,13)/3);</p><p >VAR2:=( MA((CLOSE-VAR1)/VAR1,1));</p><p >VVAR3:=(CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100;</p><p >VVAR4:=SMA(VVAR3,4,1);</p><p >MMA:=EMA(VAR2,12)*0.7;</p><p >MMB:=EMA(VAR2,3);</p><p >快到底:=IF(LLV(MMB-MMA,12)>0,0,-20),LINETHICK2,COLORGREEN;</p><p >DIFF:=( EMA(CLOSE,12) - EMA(CLOSE,26))*100;</p><p >DEA:=EMA(DIFF,9);</p><p >MACD:= 2*(DIFF-DEA);</p><p >抄底:=IF(快到底<0 AND CROSS(MACD,0) AND ZVAR4<18,1,0);</p><p >AVAR2:=(2*CLOSE+HIGH+LOW)/4;</p><p >AVAR3:=IF(YEAR>=2099 AND MONTH>2,0,1);</p><p >AVAR4:=LLV(LOW,5);</p><p >AVAR5:=HHV(HIGH,4);</p><p >散户:= EMA((AVAR2-AVAR4)/(AVAR5-AVAR4)*100,4)*AVAR3;</p><p >庄家:= EMA(0.667*REF(散户,1)+0.333*散户,2)*AVAR3;</p><p >试买:=(((CROSS(散户,庄家) AND 散户<50 AND 29<散户)) NOT 大雪)</p><p >OR (CROSS(散户,庄家) AND 散户<30 { AND 角1>0}) OR 抄底; </p><p >AA05:=MA(C,5),COLOR0099CC;</p><p >五日乖离率:=(C-AA05)/AA05*100;</p><p >BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;</p><p >速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);</p><p >加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;</p><p >AA10:=MA(C,10);</p><p >AA20:=MA(C,20);BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;</p><p >AA30:=MA(C,30);</p><p >三拾日乖离率:=(C-AA30)/AA30*100;</p><p >加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND </p><p >AA05>REF(AA05,1)AND 三拾日乖离率>REF(三拾日乖离率,1) AND </p><p >AA10>REF(AA10,1)</p><p >AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1),10) ;</p><p >MV3:=EMA(V,3);</p><p >MV3角度:=ATAN((MV3/REF(MV3,1)-1)*100)*180/3.1416;</p><p >MA3角度:=ATAN((MA3/REF(MA3,1)-1)*100)*180/3.1416;</p><p >MV5:=EMA(V,5);</p><p >MA5:=EMA(C,5);</p><p >MV5角度:=ATAN((MV5/REF(MV5,1)-1)*100)*180/3.1416;</p><p >MA5角度:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416;</p><p >MV10:=EMA(V,10);</p><p >MA10:=EMA(C,10);</p><p >MV10角度:=ATAN((MV10/REF(MV10,1)-1)*100)*180/3.1416;</p><p >MA10角度:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416;</p><p >强弱度:=(MV3角度+MA3角度+MV5角度+MA5角度+MV10角度+MA10角度)/6,COLORFFFFFF;</p><p >QBD:=CROSS(强弱度,50) AND COUNT(强弱度>50,7)<=3;</p><p >启爆点:=IF(K=0 AND QBD AND COUNT(QBD,4)=1,50,0),COLOR00FFFF;</p><p >半月相对价位:=(C-LLV(L,13))/(HHV(H,13)-LLV(L,13))*10;</p><p >半月相对价位M:=SMA(半月相对价位,3,2);</p><p >半月相对价位MM:=SMA(半月相对价位M,10,6);</p><p >K13:=MA(半月相对价位MM,3);</p><p >福缘:=半月相对价位MM>=K13,COLORRED;</p><p >启爆福缘:=K=0 AND 启爆点 AND 福缘;</p><p >HD :=HIGH-REF(HIGH,1);</p><p >LLD :=REF(LOW,1)-LOW;</p><p >DMP:=EXPMEMA(IF(HD>0&&HD>LLD,HD,0),14);</p><p >DMM:=EXPMEMA(IF(LLD>0&&LLD>HD,LLD,0),14);</p><p >AK:=EMA((DMP-DMM)*1,3)*100+50,COLORFFFFFF;</p><p >AD:=EMA((MA(DMP,3)-MA(DMM,3))*1,3)*100+50,COLORFFFFFF;</p><p >DRAWICON(CROSS(AK,AD) AND 启爆点 AND 福缘,L*0.99 ,9);</p><p >DRAWICON(老鼠仓 OR 金叉,(LOW - (LOW * 0.01)),1);</p><p >MH:=K*10;</p><p >MK:=K3*10;</p><p >HH:=CONST(HHV(H,MH));</p><p >LH:=CONST(LLV(H,MH));</p><p >LC:=CONST(LLV(L,MK));</p><p >HC:=CONST(HHV(H,MK));</p><p >幅1:=(L-LC)/LC*100;</p><p >AAA:=IF(L=LC,1,0);</p><p >AAB:=BARSLAST(AAA),NODRAW;</p><p >幅2:=(H-HC)/HC*100;</p><p >BBA:=IF(H=HC,1,0);</p><p >BBB:=BARSLAST(BBA),NODRAW;</p><p >R1:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2));</p><p >R2:=(REF(R1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));</p><p >R3:=(REF(R2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));</p><p >R4:=(REF(R3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));</p><p >R5:=(REF(R4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));</p><p >R6:=(REF(R5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));</p><p >R7:=(REF(R6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));</p><p >R8:=(REF(R7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));</p><p >R9:=(REF(R8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));</p><p >RA:=(REF(R9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));</p><p >RB:=(REF(RA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));</p><p >RC:=(REF(RB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));</p><p >RD:=(CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2));</p><p >RE:=(REF(RD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));</p><p >RF:=(REF(RE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));</p><p >R10:=(REF(RF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));</p><p >R11:=(REF(R10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));</p><p >R12:=(REF(R11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));</p><p >R13:=(REF(R12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));</p><p >R14:=(REF(R13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));</p><p >R15:=(REF(R14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));</p><p >R16:=(REF(R15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));</p><p >R17:=(REF(R16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));</p><p >R18:=(REF(R17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));</p><p >R19:=REF(RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,1) AND R1;</p><p >R1A:=((REF(R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,1)) AND RD);</p><p >VAR3:=IF(C<200 ,MA(COST(80),3),2500),NODRAW;</p><p >VAR4:=(((HIGH + LOW) + CLOSE) / 3);</p><p >VAR5:=EMA(((((OPEN + HIGH) + LOW) + CLOSE) / 4),2330);</p><p >VAR6:=(VAR5 + ((VAR5 * 6) / 100));</p><p >短买春:=R19,NODRAW,COLOR00DD00;</p><p >秋离场:=R1A,NODRAW,COLOR2288DD;</p><p >红持股:=R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,NODRAW,COLOR0000FF;</p><p >阴观望:=RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,NODRAW,COLOR999999;</p><p >急速超跌关注:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100<-14,COLORBBBBBB,NODRAW;</p><p >Q1:=CONST(IF(短买春,0,IF(秋离场,100,IF(红持股,100,IF(急速超跌关注,50,50))))),NODRAW;</p><p >Q2:=CONST(IF(短买春,80,IF(秋离场,100,IF(红持股,0,IF(急速超跌关注,50,50))))),NODRAW;</p><p >Q3:=CONST(IF(短买春,0,IF(秋离场,20,IF(红持股,50,IF(急速超跌关注,50,50))))),NODRAW;</p><p >DRAWRECTREL(970,0,1000,990,RGB(Q1,Q2,Q3));</p><p >DRAWRECTREL(970,189,1000,807,RGB(0,55,5));</p><p >DRAWRECTREL(970,374,1000,610,RGB(0,5,55));</p><p >DRAWRECTREL(970,495,1000,495,RGB(255,00,00));</p><p >A:=EMA((EMA(C,29)+EMA(C,31)+EMA(C,33))/3,3);</p><p >A1:=EMA((EMA(C,1)+EMA(C,3)+EMA(C,5))/3,3),COLOR1010FF;</p><p >A2:=EMA((EMA(C,3)+EMA(C,5)+EMA( C,7))/3,3),COLOR1020FF;</p><p >MT1:=IF(ISLASTBAR,REF((C*2-REF(C,3)),1),DRAWNULL); </p><p >MT2:=IF(ISLASTBAR,REF((C*2-REF(C,3)),2),DRAWNULL);</p><p >MT3:=IF(ISLASTBAR,C*2-REF(C,3),DRAWNULL);</p><p >JRH:=HHV(C,2);</p><p >JRL:=LLV(C,2);</p><p >离场:=IF(红持股,JRL,DRAWNULL);</p><p >今离场价:=REF(离场,1)COLOR0000FF,NODRAW;</p><p >进:=IF(阴观望,JRH,DRAWNULL);</p><p >今进场价:=REF(进,1),COLOR00FF00,NODRAW;</p><p >下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);</p><p >RRRSV:=SMA(下档线,3,1);</p><p >KKK:=SMA(RRRSV,3,1);</p><p >DDDDD:=((3 * RRRSV) - (2 * KKK));</p><p >JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);</p><p >RSV24:=SMA(JJ12,3,1);</p><p >K24:=SMA(RSV24,3,1);</p><p >D24:=((3 * RSV24) - (2 * K24));</p><p >压力2:=IF(CROSS(D24,DDDDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDDDD)))),COLORFFFFFF;</p><p >底部:=LLV(HIGH,30),COLOR00FF00;</p><p >压力位:=IF(ISLASTBAR,压力2,DRAWNULL),NODRAW;</p><p >底部位:=IF(ISLASTBAR,底部,DRAWNULL),NODRAW;</p><p >AA1:=IF(ISLASTBAR AND (红持股 OR REF(红持股,1)=1),1,0),NODRAW;</p><p >AA2:=IF(ISLASTBAR AND (阴观望 OR REF(阴观望,1)=1),1,0),NODRAW;</p><p >A99:=EMA((EMA(C,17)+EMA(C,19)+EMA( C,21))/3,3),COLOR1090FF;</p><p >A233:=A-(A99-A),COLORFF9010;</p><p >中轴:=MA(C,21),COLORFFCC33;</p><p >压力1:=IF(K2=1 AND (中轴 + 2*STD(C,21))<=HH,中轴 + 2*STD(C,21),DRAWNULL);</p><p >支撑1:=IF(K2=1 AND (中轴 - 2*STD(C,21))>=LH,中轴 - 2*STD(C,21),DRAWNULL);</p><p >压力3:=中轴 + 2*STD(C,21);</p><p >支撑3:=中轴 - 2*STD(C,21);</p><p >压力:IF(K2=1,压力1,压力3),COLOR005555,LINETHICK3; </p><p >支撑:IF(K2=1,支撑1,支撑3),COLOR005555,LINETHICK3;</p><p >A3:IF(K2!=2, EMA((EMA(C,5)+EMA(C,7)+EMA( C,9))/3,3),DRAWNULL)COLOR1030FF;</p><p >A4:IF(K2!=2, EMA((EMA(C,7)+EMA(C,9)+EMA( C,11))/3,3),DRAWNULL),COLOR1040FF;</p><p >A5:IF(K2!=2, EMA((EMA(C,9)+EMA(C,11)+EMA( C,13))/3,3),DRAWNULL)COLOR1050FF;</p><p >A6:IF(K2!=2, EMA((EMA(C,11)+EMA(C,13)+EMA( C,15))/3,3),DRAWNULL)COLOR1060FF;</p><p >A7:IF(K2!=2, EMA((EMA(C,13)+EMA(C,15)+EMA( C,17))/3,3),DRAWNULL)COLOR1070FF;</p><p >A8:IF(K2!=2, EMA((EMA(C,15)+EMA(C,17)+EMA( C,19))/3,3),DRAWNULL)COLOR1080FF;</p><p >A9:IF(K2!=2, EMA((EMA(C,17)+EMA(C,19)+EMA( C,21))/3,3),DRAWNULL)COLOR1080EF;</p><p >A10:IF(K2!=2, EMA((EMA(C,19)+EMA(C,21)+EMA( C,23))/3,3),DRAWNULL)COLOR10C0FF;</p><p >A11:IF(K2!=2, EMA((EMA(C,21)+EMA(C,23)+EMA( C,25))/3,3),DRAWNULL)COLOR10E0FF;</p><p >A15:IF(K2!=2, A-(A1-A*0.997),DRAWNULL)COLORFF1010;</p><p >A16:IF(K2!=2, A-(A2-A),DRAWNULL)COLORFF2010;</p><p >A17:IF(K2!=2, A-(A3-A),DRAWNULL)COLORFF3010;</p><p >A18:IF(K2!=2, A-(A4-A),DRAWNULL)COLORFF4010;</p><p >A19:IF(K2!=2, A-(A5-A),DRAWNULL)COLORFF5010;</p><p >A20:IF(K2!=2, A-(A6-A),DRAWNULL)COLORFF6010;</p><p >A21:IF(K2!=2, A-(A7-A),DRAWNULL)COLORFF7010;</p><p >A22:IF(K2!=2, A-(A8-A),DRAWNULL)COLORFF8010;</p><p >A23:IF(K2!=2, A-(A9-A),DRAWNULL)COLORFF9010;</p><p >A24:IF(K2!=2, A-(A10-A),DRAWNULL)COLORFFC010;</p><p >A25:=IF(K2!=2, A-(A11-A*0.997),DRAWNULL)COLORFFE010;</p><p >AK2:=IF(K2=2,EMA((EMA(C,5)+EMA(C,7)+EMA( C,9))/3,3),DRAWNULL);</p><p >AK1:=IF(K2=2,A-(A1-A*0.997),DRAWNULL);</p><p >DRAWBAND(AK2,RGB(250,250,250),EMA((EMA(C,1)+EMA(C,3)+EMA(C,5))/3,3),RGB(250,00,00));</p><p >DRAWBAND(AK1,RGB(250,250,0),A-(A2-A),RGB(00,00,250));</p><p >DRAWNUMBER(ISLASTBAR AND BBB>3,HC,幅2);</p><p >DRAWNUMBER(ISLASTBAR AND AAB>3,LC+(HC-LC)*0.05,幅1);</p><p >FD:=(H-L)/3;</p><p >OPEN1:=O>FD*2+L;</p><p >OPEN3:=O<FD+L;</p><p >OPEN2:=NOT(OPEN1 OR OPEN3);</p><p >CLOSE1:=C>FD*2+L;</p><p >CLOSE3:=C<FD+L;</p><p >CLOSE2:=NOT(CLOSE1 OR CLOSE3);</p><p >DFZD:=CLOSE1 OR (OPEN3 AND CLOSE2);</p><p >WQS1:=OPEN2 AND CLOSE2;</p><p >KFZD:=NOT(DFZD OR WQS1);</p><p >ZD:=(H+L)/2;</p><p >QSXS:=ZD>REF(H,1);</p><p >QSXX:=ZD<REF(L,1);</p><p >WQS2:=NOT(QSXS OR QSXX);</p><p >ZTDL:=V>REF(V,1)*1.1;</p><p >FTDL:=V<REF(V,1)*0.7;</p><p >ZTDL2:=ZTDL AND FTDL<1;</p><p >FTDL2:=FTDL AND ZTDL<1;</p><p >MFI1:=(H-L)/(V/10000);</p><p >MFI2:=(H-L)/(V/1000000);</p><p >ZMFI1:=MFI1>REF(MFI1,1);</p><p >ZMFI2:=MFI2>REF(MFI2,1);</p><p >ZMFI:=ZMFI1 OR ZMFI2;</p><p >FMFI:=NOT(ZMFI);</p><p >LD:=ZTDL2 AND ZMFI;</p><p >ST:=FTDL2 AND FMFI;</p><p >WZ:=FTDL2 AND ZMFI;</p><p >QF:=ZTDL2 AND FMFI;</p><p >S11:=DFZD AND QSXS ;</p><p >S22:=KFZD AND QSXX ;</p><p >S33:=DFZD AND QSXX;</p><p >S44:=KFZD AND QSXS;</p><p >S55:=DFZD AND WQS2;</p><p >S66:=KFZD AND WQS2;</p><p >S77:=WQS1 AND (QSXS OR QSXX OR WQS2);</p><p >DRAWKLINE(H,O,L,C);</p><p >STICKLINE(S22 ,C ,O,3,0 ),COLORFF2020;</p><p >STICKLINE(S11,C,O,3 ,0 ),COLOR2020FF;</p><p >STICKLINE(S33,C,O,3,0),COLORYELLOW;</p><p >STICKLINE(S44,C,O,3,0),COLORFFCC66;</p><p >STICKLINE(S55,C,O,3,0),COLORFF00FF;</p><p >STICKLINE(S66,C,O,3,0),COLOR00FF00;</p><p >STICKLINE(S77,C,O,3,0),COLORGRAY;</p><p >STICKLINE(1,C,O,0,0),COLOREEEEEE;</p><p >STICKLINE(ISLASTBAR ,压力位,压力位,70,0),COLORFFFFFF;</p><p >STICKLINE(ISLASTBAR ,底部位,底部位,60,0),COLOR00FF00;</p><p >N:=IF(TOTALBARSCOUNT>=120,120,TOTALBARSCOUNT);</p><p >HH0:=HHV(H,N);</p><p >LL0:=LLV(L,N);</p><p >MM0:=CONST((HH0+LL0)*0.5);</p><p >T1:=IF(FINDSTR(EXTERNSTR(0,13),'万元'),STRCAT('敢死队席位:',EXTERNSTR(0,13)),'');</p><p >T2:=IF(FINDSTR(EXTERNSTR(0,12),'。'),STRCAT('智能诊断:',EXTERNSTR(0,12)),'');</p><p >T3:=IF(FINDSTR(EXTERNSTR(0,8),'公告'),STRCAT('年报业绩:',EXTERNSTR(0,8)),'');</p><p >T4:=IF(FINDSTR(EXTERNSTR(0,10),','),STRCAT('主题投资:',EXTERNSTR(0,10)),'');</p><p >T5:=IF(FINDSTR(EXTERNSTR(0,15),'-'),STRCAT('解禁日期:',EXTERNSTR(0,15)),'');</p><p >T6:=IF(FINDSTR(EXTERNSTR(0,1),','),STRCAT('千股千评:',EXTERNSTR(0,1)),'');</p><p >T7:=IF(FINDSTR(EXTERNSTR(0,14),'-'),STRCAT('业绩预报:',EXTERNSTR(0,14)),'');</p><p >T8:=IF(FINDSTR(EXTERNSTR(0,11),'-'),STRCAT('机构评级:',EXTERNSTR(0,11)),'');</p><p >T9:=IF(FINDSTR(EXTERNSTR(0,9),'-'),STRCAT('中报业绩:',EXTERNSTR(0,9)),'');</p><p >S01:=CONST(IF(REF(C,N-15)>MM0,1.00,-0.08));</p><p >S02:=CONST(IF(REF(C,N-15)>MM0,-1,1));</p><p >S1:=IF(FINDSTR(EXTERNSTR(0,13),'万元'),S01+(0.08*S02),S01);</p><p >S2:=IF(FINDSTR(EXTERNSTR(0,12),'。'),S1+(0.08*S02),S1);</p><p >S3:=IF(FINDSTR(EXTERNSTR(0,8),'公告'),S2+(0.08*S02),S2);</p><p >S4:=IF(FINDSTR(EXTERNSTR(0,10),','),S3+(0.08*S02),S3);</p><p >S5:=IF(FINDSTR(EXTERNSTR(0,15),'-'),S4+(0.08*S02),S4);</p><p >S6:=IF(FINDSTR(EXTERNSTR(0,1),','),S5+(0.08*S02),S5);</p><p >S7:=IF(FINDSTR(EXTERNSTR(0,14),'-'),S6+(0.08*S02),S6);</p><p >S8:=IF(FINDSTR(EXTERNSTR(0,11),'-'),S7+(0.08*S02),S7);</p><p >S9:=IF(FINDSTR(EXTERNSTR(0,9),'-'),S8+(0.08*S02),S8);</p><p >K:=IF(S1<=0,0.06,IF(S1>=0,-0.05,0));</p><p >{DRAWTEXT_FIX(K2!=1,0,S1+K,0,T1)COLOR00FFFF;</p><p >DRAWTEXT_FIX(K2!=1,0,S2+K,0,T2)COLORFFFFFF;</p><p >DRAWTEXT_FIX(K2!=1,0,S3+K,0,T3)COLORFF00FF;</p><p >DRAWTEXT_FIX(K2!=1,0,S4+K,0,T4)COLOR0088FF;</p><p >DRAWTEXT_FIX(K2!=1,0,S5+K,0,T5)COLOR00FF00;</p><p >DRAWTEXT_FIX(K2!=1,0,S6+K,0,T6)COLOR0000FF;</p><p >DRAWTEXT_FIX(K2!=1,0,S7+K,0,T7)COLOR00CCFF;</p><p >DRAWTEXT_FIX(K2!=1,0,S8+K,0,T8)COLORFF88FF;</p><p >DRAWTEXT_FIX(K2!=1,0,S9+K,0,T9)COLORBBFFFF;}</p><p >WN:=P;{原码 N:=3;}</p><p >WA1:=REF(H,WN)=HHV(H,2*WN+1); WB1:=FILTER(WA1,WN); </p><p >WC1:=BACKSET(WB1,WN+1); </p><p >WD1:=FILTER(WC1,WN);{高点}</p><p >WA2:=REF(L,WN)=LLV(L,2*WN+1); WB2:=FILTER(WA2,WN); </p><p >WC2:=BACKSET(WB2,WN+1); </p><p >WD2:=FILTER(WC2,WN);{低点}</p><p >WR1:=BACKSET(ISLASTBAR,BARSLAST(WD1)+1); WS1:=WR1>REF(WR1,1); {前一高}</p><p >WT1:=BACKSET(ISLASTBAR,BARSLAST(WD2)+1); WU1:=WT1>REF(WT1,1); {前一低}</p><p >WR2:=BACKSET(WS1,REF(BARSLAST(WD1),1)+2); WS2:=WR2>REF(WR2,1); {前二高}</p><p >WT2:=BACKSET(WU1,REF(BARSLAST(WD2),1)+2); WU2:=WT2>REF(WT2,1); {前二低}</p><p >WR3:=BACKSET(WS2,REF(BARSLAST(WD1),1)+2); WS3:=WR3>REF(WR3,1); {前三高}</p><p >WT3:=BACKSET(WU2,REF(BARSLAST(WD2),1)+2); WU3:=WT3>REF(WT3,1); {前三低}</p><p >WR4:=BACKSET(WS3,REF(BARSLAST(WD1),1)+2); WS4:=WR4>REF(WR4,1); {前四高}</p><p >WT4:=BACKSET(WU3,REF(BARSLAST(WD2),1)+2); WU4:=WT4>REF(WT4,1); {前四高}</p><p >压力A:=DRAWLINE(WS2,H,WS1,H,1),COLOR0000FF; {★压力1:}         </p><p >支撑A:=DRAWLINE(WU2,L,WU1,L,1),COLOR0000FF;{★支撑1:}</p><p >压力B:=DRAWLINE(WS3,H,WS2,H,1),COLOR999999; {★压力2:}</p><p >支撑B:=DRAWLINE(WU3,L, WU2,L,1),COLOR999999;{★支撑2:}         </p><p >IF(BETWEEN(压力A,HH,LH),压力A,DRAWNULL),COLOR999900;</p><p >IF(BETWEEN(支撑A,HH,LH),支撑A,DRAWNULL),COLOR999900;</p><p >IF(BETWEEN(压力B,HH,LH),压力B,DRAWNULL),COLOR999999;</p><p >IF(BETWEEN(支撑B,HH,LH),支撑B,DRAWNULL),COLOR999999;</p><p >{DRAWLINE(WS4,H,WS3,H,1),COLOR00CCCC;{★压力3:}</p><p >{DRAWLINE(WU4,L, WU3,L,1),POINTDOT,COLOR00CCCC;{★支撑3;};</p><p >注:平台目前更新的有关公式源码(会有收费,主99副1),有意可联系V,喜欢加关注,感谢点赞支持,后市若有可期,希望越来越好!</p>

秋天的小熊诒 发表于 2024-1-20 18:44:48

谢谢了呀,辛苦了呀,支持呀!

123458592 发表于 2024-1-26 19:31:14

我是来挣鲜花的,嘿嘿
页: [1]
查看完整版本: 通达信主图神采飞扬