股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[通达信] 通达信筹码异动抄底选股指标公式源码副图


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2023-12-18 16:53:42

M50:=MA(C,50); CC11:=REF(C,1); CC22:=REF(C,2); {97-425} VAR1:=(C-M50)/M50*100<-23; VAR2:=SMA(MAX(C-CC11,0),3,1)/SMA(Abs(C-CC11),3,1)*100>16; VAR3:=100*(HHV(H,27)-C)/(HHV(H,27)-LLV(L,27)); A97:=VAR1 AND VAR2 ANDcrOSS(VAR3,79) AND (O>C OR O<C) AND (O-CC11)/CC11<0.05 AND V>MA(V,23) AND DATE>940630,COLORWHITE ; {97-520} MA3:=MA(C,3); C0:=CC22*0.865; C1:=REF(C,13)*0.772; BOT:=MIN(C0,C1); HSL:=100*V/CAPITAL; MA13:=MA(C,13); B97:=IF((C-BOT)/C<6/100 AND SUM(HSL,5)/5<1.8 AND WINNER(C)*100<0.1,1,0) AND (C-MA(C,20))/MA(C,20)*100<-23,COLORYELLOW; {98-2348} VAR9:=INDEXC; VARA:=MA(VAR9,6); VARB:=MA(VAR9,24); VARC:=MA(VAR9,32); VARD:=MA(VAR9,62); VARE:=MA(VAR9,105); VARF:=VARD<REF(VARD,1) AND VARE<REF(VARE,1) AND VARD<VARE*0.98; VAR10:=VARC>VARA*1.11 AND VARB>VARA*1.095; VAR11:=VARA>VAR9*0.95; DARA:=(C-MA(C,28))/MA(C,28)*100<-23; A98:=(DARA AND VAR2 AND CROSS(VAR3,79) AND (O>C OR O<C) AND (O-CC11)/CC11<0.05 AND V>MA(V,23) OR VARF AND VAR10 AND VAR11 AND C/COST(8)<=0.8 AND COUNT(C>O OR C<O,2)=2) ,COLORRED; {B97-3074} VARA1:=C/MA(C,48)*100<67; VARA2:=C/M50*100<69; VARA3:=H>L*1.078; VARA4:=VARA3 AND COUNT(VARA3,4)>2; C97:=VARA4 AND (VARA1 OR VARA2) OR VARF AND VAR10 AND VAR11 AND C/COST(8)<=0.8 AND COUNT(C>O OR C<O,2)=2,COLORGREEN; {98-2436} YAR1:=PWINNER(1,C); YAR2:=FORCAST(YAR1,10); YAR3:=MA(YAR2,3); YAR4:=MA(YAR3,12); YAR5:=MA(YAR4,16); YAR6:=MA(YAR5,31); YAR7:=MA(YAR6,55); YAR8:=YAR6<REF(YAR6,1) AND YAR7<REF(YAR7,1) AND YAR6<YAR7*0.98; YAR9:=YAR5>YAR3*1.11 AND YAR4>YAR3*1.095; YARA:=YAR3>YAR2*0.95; YAR11:=VARD<VARE*0.97; YAR14:=IF(H=L AND C=O AND L=C AND C>0 AND REF(H,1)=REF(L,1) AND CC11=REF(O,1) AND REF(H,1)=CC11 AND CC11>0,0,1)>0; B98:=(YAR11 AND VAR10 AND VAR11 AND C/COST(8)<=0.799 AND (COUNT(C=L,4)<3 OR C>CC11) AND YAR14 OR YAR8 AND YAR9 AND YARA AND C/COST(5)<=0.8 AND YAR2<>O AND REF(YAR2,1)<>REF(O,1) AND YAR14),COLOR6699FF; {96} AA:=("1A0001$CLOSE"/REF("1A0001$CLOSE",20)-1)*100<-16 AND (C/REF(C,27)-1)*100<-35 ; A96:=FILTER(AA ,3 ); {98} VBR1:=(CC22-CC11)/CC22>0.05; VBR2:=(REF(C,3)-CC22)/REF(C,3)>0.05; VBR3:=REF(H,2)-REF(H,1); VBR4:=REF(H,1)-VBR3; VBR5:=V/CAPITAL*100; VBR6:=1-(VBR5<15 AND (H-L)/C>0.045 AND C>VBR4 AND VBR1 AND VBR2 AND C>O AND MA(C,60)-MA(C,9)/2.68>C); VBR7:=VBR6; C98:=CROSS(0.5,VBR7),COLOR99CCFF; {98} VBR11:=REF(O,1)<REF(O,2); VBR12:=CC11<CC22; VBR13:=REF(L,1)<REF(L,2); VBR14:=O>CC11 AND O/CC11>=1.1; VBR15:=C>O AND C/O>1.03; D98:= VBR11 AND VBR12 AND VBR13 AND VBR14 AND VBR15,COLORFFFF33; {96-150} VBR16:=AMOUNT; VBR17:=IF(H*V<=VBR16,(L+H)/2*V*100,VBR16); VBR18:=IF(C<200,VBR17/V/100,(H+L)/2); VBR19:=MA(C,70)-MA(C,10)/2.5; VBR20:=MA(C,60)-MA(C,10)/2.5; VBR21:=M50-MA(C,10)/2.36; VBR22:=MA(VBR17,12)/1.39; VBR23:=MA(VBR17,12)/1.09; VBR24:=MA(VBR17,5); VBRA:=MA(VBR22,360)/5.2; VBRB:=MA(VBR17,150)/2; VBRC:=MA(VBR22,360)/3.8; E96:=(CROSS(VBR22,VBRA) AND C<VBR19 OR CROSS(VBR23,VBRB) AND C<VBR20 OR CROSS(VBR24,VBRC) AND C<VBR21) ,COLOR009933; {98} VBR41:=1; VAR13:=V/CAPITAL; REC1:=CC11; VBR42:=IF(EMA(C,5)/EMA(EMA(C,9),16)<=0.85 AND C/REC1>0.905 AND C/REC1<1.05 AND VAR13*100<5,50,0); VBR43:=(-100)*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34))+100; VBR44:=(-100)*(HHV(H,50)-C)/(HHV(H,50)-LLV(L,50))+100; VBR45:=(-100)*(HHV(H,70)-C)/(HHV(H,70)-LLV(L,70))+100; VBR46:=((C-MA(C,34))/MA(C,34)*100+10)*5; VBR47:=((C-M50)/M50*100+10)*5; VBR48:=((C-MA(C,70))/MA(C,70)*100+10)*5; VBR49:=(VBR43+VBR44+VBR45+VBR46+VBR47+VBR48)/6; VBR60:=EMA(VBR49,3); VBR61:=ABS(VBR46-VBR48); VBR62:=(VBR49+VBR61)/2; VBR63:=(-1)*(EMA(100*(1-WINNER(C)),1)-50)+50; VBR64:=VBR63+VBR62; VBR65:=IF(VBR42>0 AND VBR64<0,200,0); VBR50:=IF(VBR62<0 AND C=LLV(C,5) AND C/REC1>0.905 AND C/REC1<1.05 AND VAR13*100<5,-50,0); VBR51:=IF(VBR64<0 AND VBR50=-50,100,0); VBR52:=MA(C,3); VBR53:=CC22*0.865; VBR54:=REF(C,13)*0.772; VBR55:=MIN(VBR53,VBR54); VBR56:=100*VAR13; VBR57:=MA(C,13); VBR58:=IF((C-VBR55)/C<0.03 AND SUM(VBR56,5)/5<1.8,1,0); VBR59:=IF(VBR58>0 AND (VBR50<0 OR VBR42>0),100,0); VBR1A:=VBR59; VBR1B:=IF(VBR65>0 AND VBR51>0 AND SUM(VAR13*100,5)/5<1 OR VBR58>0 AND REC1/CC22>0.902 OR (VBR65>0 AND VBR51>0 AND SUM(VAR13*100,5)/5<1 OR VBR58>0) AND (VBR50<0 OR VBR42>0) AND VBR59<10,50,0); VBR1C:=(VBR65>0 AND VBR51>0 AND SUM(VAR13*100,5)/5<1 OR VBR58>0) AND (VBR50<0 OR VBR42>0); VBR1D:=VBR65>0 AND VBR51>0 AND SUM(VAR13*100,5)/5<1 OR VBR58>0 AND REC1/CC22>0.902; VBR1E:=VBR1C OR VBR1D; VBR1F:=MA(C,80)-MA(C,10)/2.5; F98:=VBR1A AND C<VBR1F*VBR41,COLORMAGENTA; {AA--99-594 } VR3:=INDEXC; vr4:=MA(VR3,8); VR5:=MA(VR3,22); VR6:=MA(VR3,28); VR7:=MA(VR3,73); VR8:=MA(VR3,106);

源码未复制完整....

下载附件中的源码








回复

举报

QQ|

GMT+8, 2024-6-3 00:26

快速回复 返回顶部 返回列表