把买、卖、全盘穿越做成选股公式
把买、卖、全盘穿越做成选股公式
编写条件:
编写方法:
网友求助:
一公式源码
AG:=STKCOUNT('A股板块');
流通:IF(CAPITAL<1,ESTDATA(12)/10000,FINANCE(7)/10000),LINETHICK0,PRECISION2,Color00BFFF;
DT:=CURRENTDATE;
AA:=REF(DATE,BARSLAST(SYSPARAM(1)=BARPOS));
BB:=IF(AA=DT,1,0);
CC:=BB[SYSPARAM(3)];
if CC=1 then
DD:=ISLASTBAR;
else
DD:=BARPOS=ISLASTBAR;
qj:=DD;
qj1:=IF(qj,STKINDI('','机构.机构',0,0),EXTDATA(9));
qj2:=IF(qj,STKINDI('','券商.券商',0,0),EXTDATA(10));
qj3:=IF(qj,STKINDI('','大户.大户',0,0),EXTDATA(11));
qj4:=IF(qj,STKINDI('','中户.中户',0,0),EXTDATA(12));
qj5:=IF(qj,STKINDI('','散户.散户',0,0),EXTDATA(13));
qj6:=IF(qj,STKINDI('','沪机构.机构',0,0),EXTDATA(6));
qj7:=IF(qj,STKINDI('','沪大户.大户',0,0),EXTDATA(7));
qj8:=IF(qj,STKINDI('','沪中户.中户',0,0),EXTDATA(5));
qj9:=IF(qj,STKINDI('','沪散户.散户',0,0),EXTDATA(8));
GGZL:=qj1+qj2+qj3;
ZSZL:=qj6+qj7;
GGSH:=qj4+qj5;
ZSSH:=qj8+qj9;
昨日:=IF(CAPITAL<1,(EXTDATA(6)+EXTDATA(7)),(EXTDATA(9)+EXTDATA(10)+EXTDATA(11)));
ZL:=IF(CAPITAL<1,ZSZL,GGZL);
SH:=IF(CAPITAL<1,ZSSH,GGSH);
主力买:STICKLINE(ZL>=0,0,ZL/IF(CAPITAL<1,(AG*300),10000),8,0),Color0000FF;
主力卖:STICKLINE(ZL<0,0,-1*ZL/IF(CAPITAL<1,(AG*300),10000),8,0),ColorFFFF00;
散户买:STICKLINE(SH>=0,0,SH/IF(CAPITAL<1,(AG*300),10000),5,0),Color00BBFF;
散户卖:STICKLINE(SH<0,0,-1*SH/IF(CAPITAL<1,(AG*300),10000),5,0),ColorFF0000;
机构线:DMA((REF(SUM(ZL,44),0)+ZL)/IF(CAPITAL<1,ESTDATA(12)/10,CAPITAL/10),IF(CAPITAL<1,ESTDATA(12),CAPITAL)),ColorFFFFFF,LINETHICK2;
散户线:DMA((REF(SUM(SH,44),0)+SH)/IF(CAPITAL<1,ESTDATA(12)/10,CAPITAL/10),IF(CAPITAL<1,ESTDATA(12),CAPITAL)),Color00EE00,LINETHICK2;
ZSA:=IF(CAPITAL<1,SUM(ZL,22)/(AG*10000),SUM(ZL,22)/FINANCE(7));
ZSB:=(REF(SUM(ZL,22),1)+ZL)/IF(CAPITAL<1,(AG*10000),FINANCE(7));
EE0:=SUM(IF(INDEXA>REF(INDEXA,1) and INDEXC>MA(INDEXC,5) and INDEXC>INDEXO,INDEXV,0),10);
EE1:=SUM(IF(INDEXA<REF(INDEXA,1) and INDEXC>MA(INDEXC,5) and INDEXC<REF(INDEXC,1),INDEXV,0),10);
EP:=SUM(IF(INDEXC<MA(INDEXC,5),INDEXV,0),10);
EEA:=SUM(IF(AMOUNT>REF(AMOUNT,1) and CLOSE>MA(CLOSE,5),VOL,0),10);
EE2:=SUM(IF(AMOUNT<REF(AMOUNT,1) and CLOSE<MA(CLOSE,5),VOL,0),10);
EG:=SUM(IF(CLOSE<MA(CLOSE,5),VOL,0),10);
EE:=EE0-(EE1+EP);
EEE:=EEA-(EE2+EG);
大盘:=(EE/(AG*30000)),ColorFF00FF,LINETHICK2;
个股:=(EEE/FINANCE(7)),Color00EE00;
强弱线:=(大盘+个股)/2;
{取点}
LC:=REF(C,1);
JH:=SMA(MAX(C-LC,0),6,1)/SMA(ABS(C-LC),6,1)*100;
SZ:=FILTER(CROSS(JH,40),9);
SQ:=FILTER(CROSS(70,JH),74);
SX:=FILTER(CROSS(JH,30),9);
SD:=FILTER(CROSS(60,JH),22);
CC:=IF(CAPITAL<1,CROSS(大盘,强弱线),CROSS(个股,大盘) and CROSS(个股,强弱线) and 强弱线>REF(强弱线,3));
AA:=IF(CAPITAL<1,SZ,SX);
BB:=IF(CAPITAL<1,SQ,SD);
A:=barslast(AA);
B:=barslast(BB);
D:=barslast(CC);
起点:=if(A>0 and A<=B,A,0);
终点:=if(B>0 and B<=A,B,0);
QJW:=if(D>0 and D<=B,D,0);
QJZ:=if(B>0 and B<=D,B,0);
VERTLINE(AA),LINEDOT,Color0000FF;
VERTLINE(BB),LINEDOT,Color00FB00;
阶段总额【万元】:=SUM(AMOUNT/10000,22)*100,LINETHICK0,PRECISION;//换手100%成交额
阶段总量【手】:=SUM(V,22)*100;//换手100%成交量
市场成本【元】:=(阶段总额【万元】/(阶段总量【手】/100));
DRAWTEXTEX(c,1,10,200,'主力平均成本:'+NUMTOSTR(市场成本【元】[SYSPARAM(1)],2)+'(元)'),COLOR00FF00;
换手率:IF(CAPITAL<1,vol/(AG*10000),v/FINANCE(7)),PRECISION2,LINETHICK0;
{显示时间}
variable:wday[7]='星期六';
wday[1]:='星期日';
wday[2]:='星期一';
wday[3]:='星期二';
wday[4]:='星期三';
wday[5]:='星期四';
wday[6]:='星期五';
fy:=年份;
fm:=月份;
fd:=日期;
wd:=星期;
p:=系统参数(1);
str1:=''+numtostr(fy[p],0)+'年'+numtostr(fm[p],0)+'月'+数字转化为字符串(fd[p],0)+'日 '+wday[wd[p]+1];
DRAWTEXTEX(c,1,230,0,str1),ColorffFF00;
CLN3:='机构净买='+NUMTOSTR(IF(CAPITAL<1,qj6,qj1),0)+ ' 手\n券商净买='+NUMTOSTR(IF(CAPITAL<1,0,qj2),0)+' 手\n大户净买='+NUMTOSTR(IF(CAPITAL<1,qj7,qj3),0)+' 手\n中户净买='+NUMTOSTR(IF(CAPITAL<1,qj8,qj4),0)+' 手\n散户净买='+NUMTOSTR(IF(CAPITAL<1,qj9,qj5),0)+' 手';
DRAWTEXTEX(c,1,10,0,STKLABEL+' '+STKNAME+''),ColorffFF00;
DRAWTEXTEX(c,1,10,400,'估算主力筹码:'+NUMTOSTR(ZSA[P],2)+' %'),COLOR00FF00;
DRAWTEXTEX(c,1,10,600,'主力筹码增减:'+NUMTOSTR(ZSB[P],2)+' %'),COLOR00FF00;
DRAWTEXTEX(c,1,500,0,'主力开始进入:'+NUMTOSTR(起点[P],0)+'(天) '),COLORFFFF00;
DRAWTEXTEX(c,1,10,800,'已进入拉升区:'+NUMTOSTR(QJW[P],0)+'(天) '),COLOR00FF00;
DRAWTEXTEX(c,1,760,0,'已进入回吐区:'+NUMTOSTR(终点[P],0)+'(天) '),COLORFFFF00;
DRAWTEXT(AA,AA,'小\n子\n哪\n跑'),Color00FFFF,PXUP85,ALIGN5;
DRAWTEXT(BB,BB,'不\n玩\n了'),Color00FF00,PXUP120,ALIGN5;
DRAWTEXT(FILTER(CC,22),CC,'拉\n升'),ColorFFFFFF,PXUP35,ALIGN5;
{增减仓}
日增:=昨日;
周仓:=SUM(日增,5);
月仓:=SUM(日增,22);
季仓:=SUM(日增,66);
半年:=SUM(日增,130);
年仓:=SUM(日增,250);
上周:=REF(周仓,1);
上月:=REF(月仓,1);
上季:=REF(季仓,1);
上半年:=REF(半年,1);
上年:=REF(年仓,1);
周增:=(上周+周仓);
月增:=(上月+月仓);
季增:=(上季+季仓);
半年增:=(半年+上半年);
年增:=(上年+年仓);
{解盘}
EXPLAIN(1,'==================================='),colorwhite;
EXPLAIN(1,'******千**钧**赢**富******'),color00EEFF;
EXPLAIN(C>0,'本日交易信息:\n'+CLN3),Color00FFaF;
EXPLAIN(C>0,'本日主力净买:'+NUMTOSTR((ZL*100)/10000,2)+' 万股'),COLOrffff00;
EXPLAINEX(1,'昨日增减【万元】: ',昨日*100*c/10000,2,0),ColorFF8B00;
EXPLAIN(1,'==================================='),colorwhite;
EXPLAINEX(1,'周仓【万元】:',周仓*100*c/10000,2,0),COLORred;
EXPLAINEX(1,'上周【万元】:'+NUMTOSTR(上周[P]*100*c/10000,2)+'
增减【万元】:',周增*100*c/10000,2,0),COLORred;//环比增量
EXPLAIN(1,'==================================='),colorwhite;
EXPLAINEX(1,'月仓【万元】:',月仓*100*c/10000,2,0),COLORyellow;//green;
EXPLAINEX(1,'上月【万元】:'+NUMTOSTR(上月[P]*100*c/10000,2)+'
增减【万元】:',月增*100*c/10000,2,0),COLORyellow;
EXPLAIN(1,'==================================='),colorwhite;
EXPLAINEX(1,'季仓【万元】:',季仓*100*c/10000,2,0),COLORgreen;
EXPLAINEX(1,'上季【万元】:'+NUMTOSTR(上季[P]*100*c/10000,2)+'
增减【万元】:',季增*100*c/10000,2,0),COLORgreen;
EXPLAIN(1,'==================================='),colorwhite;
EXPLAINEX(1,'半年【万元】:',半年*100*c/10000,2,0),COLORcyan;
EXPLAINEX(1,'上半【万元】:'+NUMTOSTR(上半年[P]*100*C/10000,2)+'
增减【万元】:',半年增*100*c/10000,2,1),COLORcyan;
EXPLAIN(1,'==================================='),colorwhite;
EXPLAINEX(1,'年仓【万元】:',年仓*100*c/10000,2,0),COLORyellow;
EXPLAINEX(1,'上年【万元】:'+NUMTOSTR(上年[P]*100*c/10000,2)+'
增减【万元】:',(年增*100*c)/10000,2,1),COLORyellow;
EXPLAIN(1,'==================================='),colorwhite;
早晨之星:=REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1) < REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND
CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2);
黄昏之星:=REF(CLOSE,2)/REF(OPEN,2) > 1.03 AND REF(OPEN,1) > REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.02 AND
CLOSE/OPEN<0.97 AND CLOSE<REF(CLOSE,2);
长十字:=CLOSE=OPEN AND HIGH/LOW >1.03;
垂死十字:=CLOSE=OPEN AND CLOSE=LOW AND CLOSE<>HIGH;
早晨十字星:=REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1) < REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND
CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2);
黄昏十字星:=REF(CLOSE,2)/REF(OPEN,2) > 1.05 AND REF(OPEN,1) > REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND
CLOSE/OPEN<0.95 AND CLOSE<REF(CLOSE,2);
射击之星:=MIN(OPEN,CLOSE)=LOW AND HIGH-LOW > 3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE > MA(CLOSE,5);
倒转锤头:=MIN(OPEN,CLOSE)=LOW AND HIGH-LOW > 3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE < MA(CLOSE,5);
锤头:=HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW > 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE < MA(CLOSE,5);
吊颈:=HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW > 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE>MA(CLOSE,5);
穿头破脚:=(REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96 AND CLOSE<REF(OPEN,1) AND OPEN>REF(CLOSE,1))
OR (REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04 AND CLOSE>REF(OPEN,1) AND OPEN<REF(CLOSE,1));
乌云盖顶:=REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.97 AND OPEN>REF(CLOSE,1) AND CLOSE<REF(CLOSE,1);
曙光初现:=REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03 AND OPEN<REF(CLOSE,1) AND CLOSE>REF(CLOSE,1);
身怀六甲:=ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04 AND ABS(CLOSE-OPEN)/CLOSE<0.005 AND
MAX(CLOSE,OPEN) < MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN) > MIN(REF(CLOSE,1),REF(OPEN,1));
十字胎:=ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04 AND CLOSE=OPEN AND
CLOSE < MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE > MIN(REF(CLOSE,1),REF(OPEN,1));
平顶:=ABS(HIGH-REF(HIGH,1))/HIGH<0.001;
平底:=(ABS(LOW-REF(LOW,1))/LOW<0.001 and abs(ref(low,1)-ref(low,2))/ref(low,1)<=0.001);
大阳烛:=CLOSE/OPEN>1.05 AND HIGH/LOW < CLOSE/OPEN+0.018;
三个白武士:=REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) AND CLOSE>OPEN
AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1);
双飞乌鸦:=REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN AND CLOSE/OPEN<0.98;
孕育线:=REF(CLOSE,2)>REF(OPEN,2) AND (REF(CLOSE,2)-REF(OPEN,2))/REF(OPEN,2)>=2/100 AND REF(OPEN,1)>=REF(CLOSE,1) AND
(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<=2/100 AND REF(OPEN,1)<=REF(CLOSE,2) AND REF(CLOSE,1)>=REF(OPEN,2) AND C>=OPEN AND
(CLOSE-OPEN)/OPEN>=2/100 AND CLOSE>=REF(OPEN,1) AND OPEN<=REF(CLOSE,1) AND (MAX(CLOSE,REF(C,2))-MIN(CLOSE,REF(CLOSE,2)))/MIN(CLOSE,REF(CLOSE,2))<=1/100;
多方炮:=REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN;
出水芙蓉:=(OPEN<EMA(C,20) OR OPEN<EMA(C,40) OR OPEN<EMA(C,60)) AND (C>MAX(EMA(C,20),MAX(EMA(C,40),EMA(C,60))))
AND (V/MA(V,30)>1.2 AND C/REF(C,1)>1.049);
上升三部曲:=REF(CLOSE,4)/REF(OPEN,4)>1.03 AND REF(CLOSE,3)<REF(OPEN,3) AND REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND
REF(LOW,4)<REF(LOW,3) AND REF(LOW,4)<REF(LOW,2) AND REF(LOW,4)<REF(LOW,1) AND REF(HIGH,4)>REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2) AND
REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN>1.03 AND CLOSE>REF(CLOSE,4);
下跌三部曲:= REF(CLOSE,4)/REF(OPEN,4)<0.97 AND REF(CLOSE,3)>REF(OPEN,3) AND REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) AND REF(LOW,4)<REF(LOW,3) AND
REF(LOW,4)<REF(LOW,2) AND REF(LOW,4)<REF(LOW,1) AND REF(HIGH,4)>REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2) AND REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN<0.97 AND
CLOSE<REF(CLOSE,4);
跳空缺口:=HIGH<REF(LOW,1) OR LOW>REF(HIGH,1);
三只乌鸦:=REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN AND REF(CLOSE,1)<REF(CLOSE,2) AND CLOSE<REF(CLOSE,1);
光脚阴线:=LOW=CLOSE AND HIGH<>LOW;
光头阳线:=HIGH=CLOSE AND HIGH<>LOW;
分离:=OPEN=REF(OPEN,1) AND (CLOSE-OPEN)*(REF(CLOSE,1)-REF(OPEN,1))<0;
长下影:=(MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW)>0.667;
长上影:=(HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)>0.667;
十字星:=CLOSE=OPEN AND HIGH<>LOW;
大阴烛:=OPEN/CLOSE > 1.05 AND HIGH/LOW < OPEN/CLOSE+0.018;
好友反攻:=(REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN AND ABS(CLOSE-REF(CLOSE,1))/CLOSE<0.002)
OR (REF(CLOSE,1)>REF(OPEN,1) AND CLOSE<OPEN AND ABS(CLOSE-REF(CLOSE,1))/CLOSE<0.002);
倾盆大雨:=REF(C,1)/REF(O,1)>=1.03 AND O<REF(C,1) AND O>REF(O,1) AND C<REF(O,1);
IF STRCMP(MARKETLABEL,'SH')<0 OR NOT(STKTYPE=1) THEN BEGIN
DRAWTEXTEX(C,1,640,900,'该指标只适合上海市场\n \n请切换到上证 A 股 !!');
EXIT;
END;
HS:=100*vol/CAPITAL;
STICKLINE(C>=O,C,O,6,0),COLOR0033FF;
STICKLINE(C>=O,H,L,1,0),COLOR0033FF;
STICKLINE(C<O,C,O,6,0),COLORFFDD00;
STICKLINE(C<=O,H,L,1,0),COLORFFDD00;
趋势线:=EMA(C,26);
PARTLINE(C>趋势线,趋势线),COLOR0000FF,LINETHICK2;
PARTLINE(C<趋势线,趋势线),COLOR00FF00,LINETHICK2;
P:=SYSPARAM(1);
H0:=HHVBARS(H,120);
L0:=LLVBARS(L,120);
tj0:=datacount-h0[datacount]=barpos;
tl0:=datacount-l0[datacount]=barpos;
VERTLINE(tj0),LINEDOT,COLOR00FF00;
VERTLINE(tl0),LINEDOT,COLOR0000FF;
XS:=NUMTOSTR(DYNAINFO(25)+SUM(DYNAINFO(27),60),0)+' 股';
XM:=NUMTOSTR(DYNAINFO(31)+SUM(DYNAINFO(33),60),0)+' 股';
SS:=NUMTOSTR(SUM(DYNAINFO(27),60),0)+' 股';
SM:=NUMTOSTR(SUM(DYNAINFO(33),60),0)+' 股';
var100:='所属板块:';
if inblock('电力')=1 then var100:=var100+' 电力';
if inblock('电脑')=1 then var100:=var100+' 电脑';
if inblock('电器')=1 then var100:=var100+' 电器';
if inblock('电子信息')=1 then var100:=var100+' 电子信息';
if inblock('房地产')=1 then var100:=var100+' 房地产';
if inblock('纺织服装')=1 then var100:=var100+' 纺织服装';
if inblock('钢铁')=1 then var100:=var100+' 钢铁';
if inblock('工程建筑')=1 then var100:=var100+' 工程建筑';
if inblock('供水供气')=1 then var100:=var100+' 供水供气';
if inblock('化工')=1 then var100:=var100+' 化工';
if inblock('化纤')=1 then var100:=var100+' 化纤';
if inblock('机械')=1 then var100:=var100+' 机械';
if inblock('建材')=1 then var100:=var100+' 建材';
if inblock('交通工具')=1 then var100:=var100+' 交通工具';
if inblock('交通设施')=1 then var100:=var100+' 交通设施';
if inblock('教育传媒')=1 then var100:=var100+' 教育传媒';
if inblock('金融')=1 then var100:=var100+' 金融';
if inblock('旅游酒店')=1 then var100:=var100+' 旅游酒店';
if inblock('煤炭石油')=1 then var100:=var100+' 煤炭石油';
if inblock('酿酒食品')=1 then var100:=var100+' 酿酒食品';
if inblock('农林牧渔')=1 then var100:=var100+' 农林牧渔';
if inblock('其他行业')=1 then var100:=var100+' 其他行业';
if inblock('汽车')=1 then var100:=var100+' 汽车';
if inblock('汽配')=1 then var100:=var100+' 汽配';
if inblock('商业连锁')=1 then var100:=var100+' 商业连锁';
if inblock('石化')=1 then var100:=var100+' 石化';
if inblock('通信')=1 then var100:=var100+' 通信';
if inblock('外贸')=1 then var100:=var100+' 外贸';
if inblock('医药')=1 then var100:=var100+' 医药';
if inblock('仪电仪表')=1 then var100:=var100+' 仪电仪表';
if inblock('有色金属')=1 then var100:=var100+' 有色金属';
if inblock('运输物流')=1 then var100:=var100+' 运输物流';
if inblock('造纸印刷')=1 then var100:=var100+' 造纸印刷';
if inblock('安徽')=1 then var100:=var100+' 安徽';
if inblock('北京')=1 then var100:=var100+' 北京';
if inblock('福建')=1 then var100:=var100+' 福建';
if inblock('甘肃')=1 then var100:=var100+' 甘肃';
if inblock('广东')=1 then var100:=var100+' 广东';
if inblock('广西')=1 then var100:=var100+' 广西';
if inblock('贵州')=1 then var100:=var100+' 贵州';
if inblock('海南')=1 then var100:=var100+' 海南';
if inblock('河北')=1 then var100:=var100+' 河北';
if inblock('河南')=1 then var100:=var100+' 河南';
if inblock('黑龙江')=1 then var100:=var100+' 黑龙江';
if inblock('湖北')=1 then var100:=var100+' 湖北';
if inblock('湖南')=1 then var100:=var100+' 湖南';
if inblock('吉林')=1 then var100:=var100+' 吉林';
if inblock('江苏')=1 then var100:=var100+' 江苏';
if inblock('江西')=1 then var100:=var100+' 江西';
if inblock('辽宁')=1 then var100:=var100+' 辽宁';
if inblock('内蒙古')=1 then var100:=var100+' 内蒙古';
if inblock('宁夏')=1 then var100:=var100+' 宁夏';
if inblock('青海')=1 then var100:=var100+' 青海';
if inblock('山东')=1 then var100:=var100+' 山东';
if inblock('山西')=1 then var100:=var100+' 山西';
if inblock('陕西')=1 then var100:=var100+' 陕西';
if inblock('上海')=1 then var100:=var100+' 上海';
if inblock('深圳')=1 then var100:=var100+' 深圳';
if inblock('四川')=1 then var100:=var100+' 四川';
if inblock('天津')=1 then var100:=var100+' 天津';
if inblock('***')=1 then var100:=var100+' ***';
if inblock('新疆')=1 then var100:=var100+' 新疆';
if inblock('云南')=1 then var100:=var100+' 云南';
if inblock('浙江')=1 then var100:=var100+' 浙江';
if inblock('重庆')=1 then var100:=var100+' 重庆';
if inblock('3G')=1 then var100:=var100+' 3G';
if inblock('H股')=1 then var100:=var100+' H股';
if inblock('QFII持股')=1 then var100:=var100+' QFII持股';
if inblock('ST')=1 then var100:=var100+' ST';
if inblock('奥运')=1 then var100:=var100+' 奥运';
if inblock('创投')=1 then var100:=var100+' 创投';
if inblock('次新股')=1 then var100:=var100+' 次新股';
if inblock('大盘')=1 then var100:=var100+' 大盘';
上市天数:=BARSLAST(barscount(c)=1)+1,LINETHICK0;
发行价:=FINANCE(51),LINETHICK;
DRAWTEXTEX(C,1,10,0,'股票代码 '+STKLABEL+' 发行价:'+NUMTOSTR(发行价,2)+'元'
+' 上市距今:'+NUMTOSTR(上市天数[SYSPARAM(1)],0)+'天'),COLORbbffff;
DRAWTEXTEX(C,1,600,0,var100+' '),COLORbbffff;
DRAWTEXTEX(C,1,10,50,'开盘:'+NUMTOSTR(DYNAINFO(4),2)),COLORbbffff;
DRAWTEXTEX(C,1,160,50,'最高:'+NUMTOSTR(DYNAINFO(5),2)),COLORbbffff;
DRAWTEXTEX(C,1,300,50,'最低:'+NUMTOSTR(DYNAINFO(6),2)),COLORbbffff;
DRAWTEXTEX(C,1,450,50,'涨跌幅:'+NUMTOSTR(DYNAINFO(14)*100,2)),COLORbbffff;
DRAWTEXTEX(C,1,600,50,'换手率:'+NUMTOSTR(DYNAINFO(37)*100,2)),COLORbbffff;
DRAWTEXTEX(C,1,750,50,'现手:'+NUMTOSTR(DYNAINFO(9),0)),COLORbbffff;
AA:=REF(DATE,BARSLAST(SYSPARAM(1)=BARPOS));
JH:=SMA(MAX(C-LC,0),6,1)/SMA(ABS(C-LC),6,1)*100;
SZ:=FILTER(CROSS(JH,40),9);
SX:=FILTER(CROSS(JH,30),9);
XG:IF(CAPITAL<1,SZ,SX);
{股票资源馆:www.lixiangluntan.com专业和谐高端炒股软件--公式编写交流--加QQ751161480--}黑马股票
cyc公式
cyc公式