超级解盘

防伪:=DATE<200901024;
EXPLAIN(防伪=0,'对不起，您无权使用'),colorFF0000;
EXPLAIN(防伪=1,'       '+STKNAME+'     '+STKLABEL),LINETHICK8,colorFFFF;
EXPLAIN(防伪=1,'\n所属块:'+BLKNAME),ALIGN0,colorFFFF;
VARIABLE:WDAY[7]='星期六';
WDAY[1]:='星期日';
WDAY[2]:='星期一';
WDAY[3]:='星期二';
WDAY[4]:='星期三';
WDAY[5]:='星期四';
WDAY[6]:='星期五';
P:=SYSPARAM(1);
FY:=YEAR;
FM:=MONTH;
FD:=DAY;
WD:=WEEKDAY;
STR1:='   '+NUMTOSTR(FY[P],0)+'年'+NUMTOSTR(FM[P],0)+'月'+NUMTOSTR(FD[P],0)+'日  '+WDAY[WD[P]+1];
EXPLAIN(防伪=1 AND BARPOS=P,STR1),colorFFFF;
EXPLAINEX(防伪=1,' 换手率=',VOL/CAPITAL*100,2,0),colorA4FF98;
EXPLAINEX(防伪=1,' 20日乖离率=',(CLOSE-MA(CLOSE,20))/MA(CLOSE,20)*100,2,0),colorA4FF98;
EXPLAINEX(防伪=1,' 获利盘比例=',WINNER(CLOSE)*100,2,0),colorA4FF98;
EXPLAINEX(防伪=1,' 套牢盘比例=',100-WINNER(CLOSE)*100,2,0),colorA4FF98;
EXPLAINEX(防伪=1,'平均成本',ROUND(COST(50)*100)/100,2,0),colorA4FF98;
EXPLAINEX(防伪=1,'穿透力',(WINNER(CLOSE)-WINNER(REF(CLOSE,1)))/VOL*CAPITAL,2,0),colorA4FF98;
EXPLAINEX(防伪=1,'９０％成本',FLOOR((COST(50-90/2))*100)/100,2,0),colorA4FF98;
EXPLAINEX(防伪=1,'集中度',INTPART((CEILING((COST(50+90/2))*100)/100-FLOOR((COST(50-90/2))*100)/100)/(CEILING((COST(50+90/2))*100)/100+FLOOR((COST(50-90/2))*100)/100)*1000)/10,2,0),colorA4FF98;
EXPLAINEX(防伪=1,'７０％成本',FLOOR((COST(50-70/2))*100)/100,2,0),colorA4FF98;
EXPLAINEX(防伪=1,'集中度',INTPART((CEILING((COST(50+70/2))*100)/100-FLOOR((COST(50-70/2))*100)/100)/(CEILING((COST(50+70/2))*100)/100+FLOOR((COST(50-70/2))*100)/100)*1000)/10,2,0),colorA4FF98;
涨幅比:=100*(CLOSE/REF(CLOSE,1)-1);
跌幅比:=100*(1-CLOSE/REF(CLOSE,1));
EXPLAIN(1,'       '+'图形分析'),colorFFFF;
早晨之星的中部:=(ABS(REF(OPEN,1)-REF(CLOSE,1)))/REF(CLOSE,1);
早晨两日前倍比:=(REF(OPEN-CLOSE,2))/REF(OPEN,2)/早晨之星的中部;
早晨今日倍比:=(CLOSE-OPEN)/OPEN/早晨之星的中部;
早晨:=REF(ISDOWN,2) AND 早晨两日前倍比>3 AND 早晨之星的中部<0.03 AND REF(OPEN,1)<REF(CLOSE,2) AND ISUP AND 早晨今日倍比>3 AND CLOSE>REF(CLOSE,2);
EXPLAIN(防伪=1 AND 早晨,'       '+'早晨之星'),color3300FF;
EXPLAIN(防伪=1 AND 早晨,'若低位上涨即将启动，若在高位请小心冲高出货'),color6633CC;
EXPLAIN(防伪=1 AND 早晨,'可靠性排序一');
黄昏之星的中部:=(ABS(REF(OPEN,1)-REF(CLOSE,1)))/REF(CLOSE,1);
黄昏两日前倍比:=(ABS(REF(OPEN-CLOSE,2)))/REF(OPEN,2)/黄昏之星的中部;
黄昏今日倍比:=(ABS(CLOSE-OPEN))/OPEN/黄昏之星的中部;
黄昏:=REF(ISUP,2) AND 黄昏两日前倍比>3 AND 黄昏之星的中部<0.03 AND REF(OPEN,1)>REF(CLOSE,2) AND ISDOWN AND 黄昏今日倍比>3 AND CLOSE<REF(CLOSE,2);
EXPLAIN(防伪=1 AND 黄昏,'       '+'黄昏之星'),colorFF00;
EXPLAIN(防伪=1 AND 黄昏,'进入盘整期或者下跌期，具体视行情而定'),colorCCFF33;
EXPLAIN(防伪=1 AND 黄昏,'可靠性排序一');
十字星:=(ABS(CLOSE-OPEN))/CLOSE<0.004 AND (ABS(LOW-IF(ISUP,OPEN,CLOSE)))/CLOSE>0.004 AND HIGH>IF(ISUP,CLOSE,OPEN);
EXPLAIN(防伪=1 AND 十字星,'       '+'十字星'),colorFF6600;
EXPLAIN(防伪=1 AND 十字星,'转折信号,升势末期效果显著'),colorCCFF33;
EXPLAIN(防伪=1 AND 十字星,'其它位置需要配合第二日确认'),colorFFCC33;
EXPLAIN(防伪=1 AND REF(十字星,1) AND ISDOWN,'       '+'黄昏十字星'),colorFF00;
EXPLAIN(防伪=1 AND REF(十字星,1) AND ISDOWN,'在上升势头中出现，后市走跌'),colorCCFF33;
EXPLAIN(防伪=1 AND REF(十字星,1) AND ISDOWN,'在下跌势头中出现，跌势趋缓'),colorCCFF99;
EXPLAIN(防伪=1 AND REF(十字星,1) AND ISDOWN,'在盘整中出现，需要配合周边态势'),colorCCFF99;
EXPLAIN(防伪=1 AND REF(十字星,1) AND ISUP,'       '+'早晨十字星'),color3300FF;
EXPLAIN(防伪=1 AND REF(十字星,1) AND ISUP,'在下跌势头中出现早晨十字星，后市走高'),color6633CC;
EXPLAIN(防伪=1 AND REF(十字星,1) AND ISUP,'在上升势头中出现早晨十字星，涨势趋缓'),colorCCCCCC;
EXPLAIN(防伪=1 AND 十字星,'可靠性排序三');
垂死十字:=IF(CLOSE>20,(ABS(CLOSE-OPEN))/CLOSE<=0.004 AND (ABS(IF(ISUP,OPEN,CLOSE)-LOW))/CLOSE<=0.002 AND (HIGH-IF(ISUP,CLOSE,OPEN))/CLOSE>0.004,CLOSE=OPEN AND HIGH>OPEN AND LOW=CLOSE);
EXPLAIN(垂死十字,'       '+'垂死十字'),colorFF00;
EXPLAIN(垂死十字,'顶部看空，淡气逼人'),colorCCFF33;
射击之星:=ABS(CLOSE-OPEN)<ABS(HIGH-IF(ISUP,CLOSE,OPEN)) AND (ABS(CLOSE-OPEN))/CLOSE>0.004 AND (ABS(IF(ISUP,OPEN,CLOSE)-LOW))/CLOSE<=0.004;
非标准射击之星:=(ABS(CLOSE-OPEN))/CLOSE>0.004 AND (ABS(IF(ISUP,OPEN,CLOSE)-LOW))/CLOSE<=0.004 AND (ABS(HIGH-IF(ISUP,CLOSE,OPEN)))/CLOSE>0.004;
EXPLAIN(防伪=1 AND 射击之星,'       '+'射击之星'),colorFF6600;
EXPLAIN(防伪=1 AND 射击之星,'升、跌、盘，转折预警'),colorFFCC33;
EXPLAIN(防伪=1 AND 非标准射击之星 AND NOT(射击之星),'       '+'非标准射击之星'),colorFF6600;
EXPLAIN(防伪=1 AND 非标准射击之星 AND NOT(射击之星),'非标准的射击之星，但具有参考意义'),colorFFCC33;
EXPLAIN(防伪=1 AND 射击之星,'可靠性排序四');
锤头:=(ABS(IF(ISUP,CLOSE,OPEN)-HIGH))/CLOSE<0.004 AND LOW<IF(ISUP,OPEN,CLOSE) AND (IF(ISUP,OPEN,CLOSE)-LOW)/(IF(ISUP,CLOSE,OPEN)-IF(ISUP,OPEN,CLOSE))>=2;
非标准锤头:=(ABS(IF(ISUP,CLOSE,OPEN)-HIGH))/CLOSE>0.004 AND (ABS(IF(ISUP,CLOSE,OPEN)-HIGH))/CLOSE<0.001 AND LOW<IF(ISUP,OPEN,CLOSE);
EXPLAIN(防伪=1 AND 锤头,'       '+'锤头'),colorFF6600;
EXPLAIN(防伪=1 AND 锤头,'转折信号，上影越短下影越长可靠度越高'),colorFFCC33;
EXPLAIN(防伪=1 AND 锤头,'低谷初阳或者高位初阴可靠度更高'),colorFFCC33;
EXPLAIN(防伪=1 AND 非标准锤头 AND NOT(锤头),'       '+'非标准锤头'),colorFF6600;
EXPLAIN(防伪=1 AND 非标准锤头 AND NOT(锤头),'严格地说这不是一个锤头，但具有转折参考意义'),colorFFCC33;
EXPLAIN(防伪=1 AND 锤头,'可靠性排序四');
穿头破脚:=ISDOWN AND REF(ISUP,1) AND OPEN>REF(CLOSE,1) AND CLOSE<REF(OPEN,1) OR ISUP AND REF(ISDOWN,1) AND OPEN<REF(CLOSE,1) AND CLOSE>REF(OPEN,1);
穿两日:=REF(ISUP,2) AND OPEN>REF(CLOSE,2) AND CLOSE<REF(OPEN,2) OR REF(ISDOWN,2) AND OPEN<REF(CLOSE,2) AND CLOSE>REF(OPEN,2);
EXPLAIN(防伪=1 AND 穿头破脚,'       '+'穿头破脚'),colorFF6600;
EXPLAIN(防伪=1 AND 穿头破脚 AND ISUP,'若低位,收阳,则反转上升'),color6633CC;
EXPLAIN(防伪=1 AND 穿头破脚 AND ISUP,'若高位,收阳,盘整向下'),color6633CC;
EXPLAIN(防伪=1 AND 穿头破脚 AND ISDOWN,'若高位,收阴,则反转下降'),colorCCFF33;
EXPLAIN(防伪=1 AND 穿头破脚,'翌日确认的信号更加可靠'),colorFFCC33;
EXPLAIN(防伪=1 AND 穿头破脚 AND VOL>REF(VOL,1),'配合交易量放大，可靠度较高'),colorFFCC33;
EXPLAIN(防伪=1 AND 穿头破脚 AND 穿两日,'今日K线覆盖前两日，反转明显'),colorFF6600;
EXPLAIN(防伪=1 AND 穿头破脚,'可靠性排序二');
乌云盖顶:=REF(ISUP,1) AND ISDOWN AND REF(CLOSE/OPEN>1.03,1) AND CLOSE>REF(OPEN,1) AND CLOSE<REF(CLOSE,1) AND OPEN>REF(CLOSE,1) AND OPEN>REF(HIGH,1) AND (CLOSE-REF(OPEN,1))/(REF(CLOSE,1)-CLOSE)<1.22;
非标准乌云盖顶:=REF(ISUP,1) AND ISDOWN AND REF(CLOSE/OPEN>1.03,1) AND CLOSE>REF(OPEN,1) AND OPEN>REF(CLOSE,1) AND CLOSE-REF(OPEN,1)<REF(CLOSE,1)-CLOSE;
EXPLAIN(防伪=1 AND 乌云盖顶,'       '+'乌云盖顶'),colorFF00;
EXPLAIN(防伪=1 AND 乌云盖顶,'行情见顶回落信号'),colorCCFF33;
EXPLAIN(防伪=1 AND 乌云盖顶,'影线越短越好并观察交易量是否存在夺路而逃的放大'),colorCCFF33;
EXPLAIN(防伪=1 AND 非标准乌云盖顶 AND NOT(乌云盖顶),'       '+'非标准乌云盖顶'),colorFF00;
EXPLAIN(防伪=1