標簽: 雜談 |
N:=250;
最高:=COUNT(HHV(H,N),N);
最低:=COUNT(LLV(L,N),N);
HLMAX:=最高;
HLMIN:=最低;
HLMN1:=(HLMAX+HLMIN)/2;
HLMN2:=HLMAX-HLMIN;
HLMN3:=(100-0)/2*1.3;
HLMN4:=(100-0)/1*1.3;
色彩:=(C>0)*120;
FILLRGN(((色彩-HLMN3)*HLMN2/HLMN4+HLMN1)>((0-HLMN3)*HLMN2/HLMN4+HLMN1), ((色彩-HLMN3)*HLMN2/HLMN4+HLMN1),((0-HLMN3)*HLMN2/HLMN4+HLMN1),RGB(179,250,120));
FILLRGN(((色彩-HLMN3)*HLMN2/HLMN4+HLMN1)<((0-HLMN3)*HLMN2/HLMN4+HLMN1), ((色彩-HLMN3)*HLMN2/HLMN4+HLMN1),((0-HLMN3)*HLMN2/HLMN4+HLMN1),RGB(140,200,240));
MA5:MA(C,5),COLOR00DDDD;
MA24:MA(C,24),COLORRED;
MA72:MA(C,72),COLORBLUE;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,9,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR00AA00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00CC00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00EE00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1.5,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE,OPEN,LOW,0.95,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE,CLOSE,HIGH,0.95,0),COLOR00FF00;
{紅柱}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLORFFBBFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,9,0) ,COLORFF00FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLORFF22FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLORFF44FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLORFF66FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLORFF88FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLORFF99FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLORFFAAFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0) ,COLORFFBBFF;
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.95,0),COLORFFBBFF;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.95,0),COLORFFBBFF;
FROMOPEN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);
TT:=240/FROMOPEN;
比:=TT;
促進指數MFL:(HIGH-LOW)*1000000/(VOL*比),COLORRED;
YYA4:=MA(CLOSE,20);
YYA5:=(CLOSE > MA(CLOSE,5));
YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
YYA7:=(CLOSE > MA(CLOSE,10));
YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
YYA9:=(CLOSE > MA(CLOSE,20));
YYA10:=REF(YYA4,1);
YYA11:=(YYA4 > YYA10);
YYAVX:=(((((IF(YYA5,10,(0 - 10)) + IF(YYA6,10,(0 - 10))) + IF(YYA7,10,(0 - 10))) + IF(YYA8,10,(0 - 10))) + IF(YYA9,10,(0 - 10))) + IF(YYA11,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
YYV1:=MA(VOL,5);
YYV2:=MA(VOL,10);
情況1:=ABS(IF(((CROSS(YYAVX,1) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
情況2:=ABS(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
情況3:=ABS(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0));
情況4:=ABS(IF(((CROSS(YYAVX,1) AND (YYV1 <= YYV2)) AND (DSLX < DSLX1)),1,0));
情況5:=ABS(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
情況6:=ABS(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
情況7:=ABS(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
情況8:=ABS(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
情況9:=ABS(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
情況10:=ABS(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
情況11:=ABS(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
情況12:=ABS(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
情況13:=ABS(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
情況14:=ABS(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
情況15:=ABS(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));
情況16:=ABS(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0));
大盤1:=ABS(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0));
大盤2:=ABS(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0));
大盤3:=ABS(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
大盤4:=ABS(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0));
大盤5:=ABS(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0));
大盤6:=ABS(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0));
大盤7:=ABS(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0));
大盤8:=ABS(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0));
MFI:=(HIGH-LOW)*1000000/(VOL*比);
綠燈:=MFI>=REF(MFI,1)AND VOL*比>=REF(VOL,1);
MMM1:=ABS(綠燈);
衰退:=MFI
MMM2:=ABS(衰退);
偽裝:=MFI>=REF(MFI,1)AND VOL*比
MMM3:=ABS(偽裝);
蟄伏:=MFI=REF(VOL,1);
MMM4:=ABS(蟄伏);
DRAWTEXT(情況1=1 and ISLASTBAR,HHV(HIGH,30),'量能理想,明顯走強,中線參與,倉位在2/3左右
DRAWTEXT(情況2=1 and ISLASTBAR,HHV(HIGH,30),'走勢趨強量能不足,短線進場,倉位在1/2左右