���̺ϼ�
IF NN=2 THEN BEGIN
A11:="1A0001$CLOSE";
A21:="399001$CLOSE";
A1:=IF(CLOSE=A11,A21,A11);
A2:=REF(A1,1);
A3:=(A1-A2)/MIN(A1,A2)*100;
�����Ƿ�:=SUM(A3,10);
B2:=REF(CLOSE,1);
B3:=(CLOSE-B2)/MIN(CLOSE,B2)*100;
�����Ƿ�:=SUM(B3,10);
XD:=�����Ƿ�-�����Ƿ�;
����:EMA(XD,10),LINETHICK1;
����:EMA(����,5),LINETHICK1;
��ֵ:(����-����)*2,COLORSTICK;
PARTLINE(����>REF(����,1),����),LINETHICK1,colorFF00FF;
��������:=DATATYPE;
EXPLAIN(��������=6,'����ǿ������'),colorFF00;
EXPLAIN(��������=7,'����ǿ������'),colorFF00;
EXPLAIN(��������=8,'����ǿ������'),colorFF00;
EXPLAIN(��������<6,'�����߽���'),colorFF00;
EXPLAIN(REF(����,1)>���� AND ��ֵ>0,'��ע����ת��'),colorFFFF;
EXPLAIN(REF(����,1)<���� AND ����<0,'��ע����תǿ'),colorF0E1FF;
EXPLAIN(CROSS(����,����) AND ����<0,'����������룬�������ڴ���'),colorF0E1FF;
EXPLAIN(����>���� AND ����<0,'�ѿ�ʼתǿ���ֹɣ��������ڴ���'),colorF0E1FF;
EXPLAIN(CROSS(����,����) AND ����>0,'�������룬����ǿ�ڴ���'),colorF0E1FF;
EXPLAIN(����>���� AND ����>0,'ǿ�ƣ��ֹɣ�����ǿ�ڴ���'),colorF0E1FF;
EXPLAIN(CROSS(����,����) AND ����>0,'������������������ǿ�ڴ���'),colorFFFF;
EXPLAIN(����<���� AND ����>0,'�ѿ�ʼת�����ղ֣�����ǿ�ڴ���'),colorFFFF;
EXPLAIN(CROSS(����,����) AND ����<0,'�����������������ڴ���'),colorFFFF;
EXPLAIN(����<���� AND ����<0,'���ƣ��ղ֣��������ڴ���'),colorFFFF;
�糿֮��:=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 CLOSE>=OPEN AND (CLOSE-OPEN)/OPEN>=2/100 AND CLOSE>=REF(OPEN,1) AND OPEN<=REF(CLOSE,1) AND (MAX(CLOSE,REF(CLOSE,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(CLOSE,20) OR OPEN<EMA(CLOSE,40) OR OPEN<EMA(CLOSE,60)) AND CLOSE>MAX(EMA(CLOSE,20),MAX(EMA(CLOSE,40),EMA(CLOSE,60))) AND VOL/MA(VOL,30)>1.2 AND CLOSE/REF(CLOSE,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(CLOSE,1)/REF(OPEN,1)>=1.03 AND OPEN<REF(CLOSE,1) AND OPEN>REF(OPEN,1) AND CLOSE<REF(OPEN,1);
EXPLAIN(�������,'K����̬�������������,�����źţ�'),colorFFFF00;
EXPLAIN(������,'K����̬������������,������,������ת��'),colorFFFF00;
EXPLAIN(���ѷ���,'K����̬���������ѷ���,�ײ���ת��'),colorFF;
EXPLAIN(����ȱ��,'K����̬����������ȱ��,ע�����ϻ����������գ�'),colorFFFFFF;
EXPLAIN(�������,'K����̬�������������,�µ��źţ�'),colorFFFF00;
EXPLAIN(��ͷ����,'K����̬��������ͷ����,���п��ǣ�'),colorFF;
EXPLAIN(��ֻ��ѻ,'K����̬��������ֻ��ѻ,���ܼ������䣻'),colorFFFF00;
EXPLAIN(����,'K����̬����������,ע�⿴�Ƿ���Ϳ������룻'),colorFFFFFF;
EXPLAIN(����Ӱ,'K����̬����������Ӱ,�����µ������,�п���ֹ��������������ĩ�ڳ���,�������⣻'),colorFF;
EXPLAIN(����Ӱ,'K����̬����������Ӱ,���������ϵ�ѹ������,�������裻'),colorFFFF00;
EXPLAIN(�µ�������,'K����̬�������µ�������,�µ��źţ�'),colorFF;
EXPLAIN(����������,'K����̬����������������,�����źţ�'),colorFFFF00;
EXPLAIN(�糿֮��,'K����̬�������糿֮��,��������'),colorFF;
EXPLAIN(�ƻ�֮��,'K����̬�������ƻ�֮��,�������䣻'),colorFFFF00;
EXPLAIN(ʮ����,'K����̬������ʮ����,��ת����ζ,ע��ɼ�λ���ڶ������ǵײ���'),colorFFFFFF;
EXPLAIN(��ʮ��,'K����̬��������ʮ�֣�ע���ڶ������ǵײ���'),colorFFFFFF;
EXPLAIN(����ʮ��,'K����̬����������ʮ��,�µ��źţ�'),colorFFFF00;
EXPLAIN(�糿ʮ����,'K����̬�������糿ʮ���ǣ������źţ���������'),colorFF;
EXPLAIN(�ƻ�ʮ����,'K����̬�������ƻ�ʮ���ǣ��µ��źţ��������䣻'),colorFFFF00;
EXPLAIN(���֮��,'K����̬���������֮��,���ܼ�������,�ɿ��Եͣ�'),colorFFFF00;
EXPLAIN(��ת��ͷ,'K����̬��������ת��ͷ,���ܼ�������'),colorFF;
EXPLAIN(��ͷ,'K����̬��������ͷ,���ܼ�����,���������,�ź�ǿ�ң�'),colorFF;
EXPLAIN(����,'K����̬����������,���������м�������,��������,�����źţ�'),colorFFFF00;
EXPLAIN(ƽ��,'K����̬������ƽ��,�º͵ķ�ת��'),colorFFFF00;
EXPLAIN(��ͷ�ƽ�,'K����̬��������ͷ�ƽ�,��������,���������źţ�'),colorFFFF00;
EXPLAIN(���ƸǶ�,'K����̬���������ƸǶ�,���������źţ�'),colorFFFF00;
EXPLAIN(������,'K����̬������������,���м�������'),colorFF;
EXPLAIN(��������,'K����̬��������������,�����ڵײ�,�Ǽ������źţ������ڶ���,�Ǽ��������źţ�'),colorFF;
EXPLAIN(ʮ��̥,'K����̬������ʮ��̥��'),colorFF;
EXPLAIN(ƽ��,'K����̬������ƽ��,�º͵ķ�ת��'),colorFF;
EXPLAIN(������,'K����̬������������,,���ǣ�'),colorFF;
EXPLAIN(��������ʿ,'K����̬��������������ʿ,ÿ�����̼�����,��ʾ���ܼ�������'),colorFF;
EXPLAIN(˫����ѻ,'K����̬������˫����ѻ,���齫�������䣻'),colorFFFF00;
EXPLAIN(������,'K����̬������������,ע��ɼ�λ�ã�'),colorFFFFFF;
EXPLAIN(���,'K����̬��������ڣ��ڵײ�������������Ϊ�����м�����п����������м̣����������Ǹ��ϼ����źţ�'),colorFF;
EXPLAIN(��ˮܽ��,'K����̬��������ˮܽ�أ���������'),colorFF;
���֣�:=VOL/CAPITAL*100;
EXPLAIN(���֣�<=1,'����'),colorBBBBBB;
EXPLAIN(���֣�<=2 AND ���֣�>1,'����'),colorBBBBBB;
EXPLAIN(���֣�<=3 AND ���֣�>2,'�º�'),colorBBBBBB;
EXPLAIN(���֣�<=5 AND ���֣�>3,'��Ծ'),colorBBBBBB;
EXPLAIN(���֣�<=8 AND ���֣�>5,'����'),colorBBBBBB;
EXPLAIN(���֣�<=15 AND ���֣�>8,'����'),colorBBBBBB;
EXPLAIN(���֣�<=25 AND ���֣�>15,'����'),colorBBBBBB;
END;
IF NN=1 THEN BEGIN
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA30:=MA(CLOSE,30);
MA60:=MA(CLOSE,60);
MA120:=MA(CLOSE,120);
MA250:=MA(CLOSE,250);
VK:=SQRT(VOL/CAPITAL*100*5);
EXPLAIN(MA5>MA10 AND MA10>MA30 AND MA5>MA30,'�⣺���ھ������У���ͷ'),colorFFFF;
EXPLAIN(MA5<MA10 AND MA10<MA30 AND MA5<MA30,'�⣺���ھ������У���ͷ'),colorFFFF;
EXPLAIN(MA30>MA60 AND MA30>MA120 AND MA60>MA120,'�⣺���ھ������У���ͷ'),colorFFFF;
EXPLAIN(MA30<MA60 AND MA30<MA120 AND MA60<MA120,'�⣺���ھ������У���ͷ'),colorFFFF;
EXPLAIN(MA60>MA120 AND MA120>MA250 AND MA60>MA250,'�⣺���ھ�����