������������ ��ѧָ��
K:=SYSPARAM(1)=BARPOS;
AA:=AMOUNT/VOL/100;
AI:=IF(CLOSE=OPEN,AA-REF(AA,1),CLOSE-OPEN);
AJ:=IF(CLOSE=REF(CLOSE,1),AA-REF(AA,1),CLOSE-REF(CLOSE,1));
A1:=IF(P1=0,AI,AJ);
A2:=IF(P2=0,REF(A1,5),A1);
A3:=IF(P2=0,REF(A1,4),REF(A1,1));
A4:=IF(P2=0,REF(A1,3),REF(A1,2));
A5:=IF(P2=0,REF(A1,2),REF(A1,3));
A6:=IF(P2=0,REF(A1,1),REF(A1,4));
X1:=IF(P2=0,A1,REF(A1,5));
X2:=A2>0 AND A3>0 AND A4>0;
X3:=A2>0 AND A3>0 AND A4<0;
X4:=A2>0 AND A3<0 AND A4>0;
X5:=A2>0 AND A3<0 AND A4<0;
X6:=A2<0 AND A3>0 AND A4>0;
X7:=A2<0 AND A3>0 AND A4<0;
X8:=A2<0 AND A3<0 AND A4>0;
S1:=A2<0 AND A3<0 AND A4<0;
S2:=A5>0 AND A6>0 AND X1>0;
S3:=A5>0 AND A6>0 AND X1<0;
S4:=A5>0 AND A6<0 AND X1>0;
S5:=A5>0 AND A6<0 AND X1<0;
S6:=A5<0 AND A6>0 AND X1>0;
S7:=A5<0 AND A6>0 AND X1<0;
S8:=A5<0 AND A6<0 AND X1>0;
M6:=A5<0 AND A6<0 AND X1<0;
EXPLAIN(CLOSE>0,'�����������'),ALIGN4,colorFF00;
EXPLAIN(CLOSE>0,STKLABEL+' '+STKNAME),ALIGN0,color4441FF;
EXPLAIN(CLOSE>0,'�����������'),ALIGN4,colorFF00;
EXPLAIN(CLOSE>0,'�˹���ע�⣺'),ALIGN4,colorFF00;
EXPLAIN(CLOSE>0,'Ǭ����������������'),ALIGN0,colorFF00FF;
EXPLAIN(CLOSE>0,'�ҹ�����λת������'),ALIGN0,color4441FF;
EXPLAIN(CLOSE>0,'�빬��������������'),ALIGN0,colorFFFF;
EXPLAIN(CLOSE>0,'���ײ���λ����'),ALIGN0,colorFFFF00;
EXPLAIN(CLOSE>0,'�㹬��������λ����'),ALIGN0,colorFFFF00;
EXPLAIN(CLOSE>0,'������������������'),ALIGN0,colorFFFF;
EXPLAIN(CLOSE>0,'������λת������'),ALIGN0,color4441FF;
EXPLAIN(CLOSE>0,'�����������µ�����'),ALIGN0,colorFF00FF;
EXPLAIN(CLOSE>0,'�����������'),ALIGN4,colorFF00;
XX:=MA(CLOSE,6);
EXPLAIN(X2 AND S2,'ǬΪ��--Ǭ�ԣ�Ǭ�����ԡ��Դʣ�Ǭ��Ԫ���࣬�����ꡣ���ԣ����ǣ������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����㹬��λ���룩��'),ALIGN0,colorBE;
EXPLAIN(X2 AND S3,'�����--���ԣ�Ǭ�����ԡ��Դʣ�����������ͥ���ںš����������أ��������֣��������������ԣ����ǣ������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����㹬��λ���룩��'),ALIGN0,colorE4;
EXPLAIN(X2 AND S4,'�������--�����ԣ�Ǭ�����ԡ��Դʣ����У�Ԫ�ࡣ���ԣ����ǣ������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����㹬��λ���룩��'),ALIGN0,colorEA;
EXPLAIN(X2 AND S5,'�����׳--��׳�ԣ�Ǭ�����ԡ��Դʣ���׳�����ꡣ���ԣ����ǣ������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����㹬��λ���룩��'),ALIGN0,colorFF;
EXPLAIN(X2 AND S6,'����С��--С���ԣ�Ǭ�����ԡ��Դʣ�С�ࡣ���Ʋ���������������ԣ����ǣ������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����㹬��λ���룩��'),ALIGN0,color4441FF;
EXPLAIN(X2 AND S7,'ˮ����--���ԣ�Ǭ�����ԡ��Դʣ��裬���ڣ���࣬�꼪����������ԣ����ǣ������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����㹬��λ���룩��'),ALIGN0,color436FFF;
EXPLAIN(X2 AND S8,'ɽ�����--�����ԣ�Ǭ�����ԡ��Դʣ��������꣬����ʳ��������������ԣ����ǣ������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����㹬��λ���룩��'),ALIGN0,color7A7DFF;
EXPLAIN(X2 AND M6,'����̩--̩�ԣ�Ǭ�����ԡ��Դʣ�̩��С�������������ࡣ���ԣ����ǣ������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����㹬��λ���룩��'),ALIGN0,color7A91FF;
EXPLAIN(X3 AND S2,'������--���ԣ��ҹ����ԡ��Դʣ��Ļ�β�������ˡ��ࡣ���ԣ���ת�ۣ���λת�����룩�����ڷ�չ�Ŀ��ܷ���Ϊ����Ǭ�������������룩�����㹬��λ���룩��'),ALIGN0,colorA300;
EXPLAIN(X3 AND S3,'��Ϊ��--���ԣ��ҹ����ԡ��Դʣ��ң��࣬���ꡣ���ԣ���ת�ۣ���λת�����룩�����ڷ�չ�Ŀ��ܷ���Ϊ����Ǭ�������������룩�����㹬��λ���룩��'),ALIGN0,colorFF00;
EXPLAIN(X3 AND S4,'�����--��ԣ��ҹ����ԡ��Դʣ��С�¼������ԣ���ת�ۣ���λת�����룩�����ڷ�չ�Ŀ��ܷ���Ϊ����Ǭ�������������룩�����㹬��λ���룩��'),ALIGN0,colorFF00;
EXPLAIN(X3 AND S5,'�������--�����ԣ��ҹ����ԡ��Դʣ����ã����ף������������ԣ���ת�ۣ���λת�����룩�����ڷ�չ�Ŀ��ܷ���Ϊ����Ǭ�������������룩�����㹬��λ���룩��'),ALIGN0,colorFF00;
EXPLAIN(X3 AND S6,'��������--�����ԣ��ҹ����ԡ��Դʣ����ڣ����㼪����������ꡣ���ԣ���ת�ۣ���λת�����룩�����ڷ�չ�Ŀ��ܷ���Ϊ����Ǭ�������������룩�����㹬��λ���룩��'),ALIGN0,colorFF00;
EXPLAIN(X3 AND S7,'ˮ���--���ԣ��ҹ����ԡ��Դʣ��ڣ��ࡣ��ڣ������ꡣ���ԣ���ת�ۣ���λת�����룩�����ڷ�չ�Ŀ��ܷ���Ϊ����Ǭ�������������룩�����㹬��λ���룩��'),ALIGN0,colorFF00;
EXPLAIN(X3 AND S8,'ɽ����--���ԣ��ҹ����ԡ��Դʣ������ڣ�Ԫ�����̣����꣬������������֮�ã��������úࡣ���ԣ���ת�ۣ���λת�����룩�����ڷ�չ�Ŀ��ܷ���Ϊ����Ǭ�������������룩�����㹬��λ���룩��'),ALIGN0,colorFF00;
EXPLAIN(X3 AND M6,'������--���ԣ��ҹ����ԡ��Դʣ��٣�Ԫ�����ꡣ���ڰ������ס����ԣ���ת�ۣ���λת�����룩�����ڷ�չ�Ŀ��ܷ���Ϊ����Ǭ�������������룩�����㹬��λ���룩��'),ALIGN0,colorFF00;
EXPLAIN(X4 AND S2,'���ͬ��--ͬ���ԣ��빬���ԡ��Դʣ�ͬ����Ұ���࣬������������ꡣ���ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorFFFF;
EXPLAIN(X4 AND S3,'����--���ԣ��빬���ԡ��Դʣ���������ڣ�Ԫ�����꣬���������ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorFFFF;
EXPLAIN(X4 AND S4,'��Ϊ��--���ԣ��빬���ԡ��Դʣ��룬���꣬�࣬����ţ�������ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorFFFF;
EXPLAIN(X4 AND S5,'���--���ԣ��빬���Ժࡣ�Դʣ��ᣬ����֮�����ǣ������С����ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorFFFF;
EXPLAIN(X4 AND S6,'������--�����ԣ��빬���ԡ��Դʣ����ˣ���Ů�ꡣ���ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorFFFF;
EXPLAIN(X4 AND S7,'ˮ��ȼ�--�ȼ��ԣ��빬���ԡ��Դʣ��ȼã��ࡣС���꣬�������ҡ����ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorFFFF;
EXPLAIN(X4 AND S8,'ɽ����--���ԣ��빬���ԣ��ࡣ�Դʣ��ڣ�С�������������ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorFFFF;
EXPLAIN(X4 AND M6,'�ػ�����--�����ԣ��빬���ԡ��Դʣ����ģ������ꡣ���ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorFFFF;
EXPLAIN(X5 AND S2,'��������--�����ԣ����ԡ��Դʣ�Ԫ�����ꡣ����������������������ԣ��ײ�����λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorCCCCFF;
EXPLAIN(X5 AND S3,'������--���ԣ����ԡ��Դʣ�Ԫ�����꣬�̡����ԣ��ײ�����λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorCCCCFF;
EXPLAIN(X5 AND S4,'�������--����ԣ����ԡ��Դʣ��࣬�����������ԣ��ײ�����λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorCCCCFF;
EXPLAIN(X5 AND S5,'��Ϊ��--���ԣ����ԡ��ࡣ�Դʣ�����������Ц�����ƣ������ɥذ�������ԣ��ײ�����λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorCCCCFF;
EXPLAIN(X5 AND S6,'������--���ԣ����ԡ��Դʣ�������������������ԣ��ײ�����λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorCCCCFF;
EXPLAIN(X5 AND S7,'ˮ����--���ԣ����ԡ��Դʣ�Ԫ�����꣬���ã�����������������ԣ��ײ�����λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorCCCCFF;
EXPLAIN(X5 AND S8,'ɽ����--���ԣ����ԡ��Դʣ��꼪�����ã������ʵ�����ԣ��ײ�����λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorCCCCFF;
EXPLAIN(X5 AND M6,'����--���ԣ����ԡ��Դʣ��࣬���������������̡���������������������������������ԣ��ײ�����λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ�����ҹ���λת�����룩�����������룩��'),ALIGN0,colorCCCCFF;
EXPLAIN(X6 AND S2,'��犥--���ԣ��㹬���ԡ��Դʣ�����Ů׳������ȡŮ�����ԣ���������λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFF00FF;
EXPLAIN(X6 AND S3,'�����--����ԣ��㹬���ԡ��Դʣ���������㣬�����������ࡣ���ԣ���������λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����루���빬�������룩��'),ALIGN0,colorFF00FF;
EXPLAIN(X6 AND S4,'��綦--���ԣ��㹬���ԡ��Դʣ�����Ԫ�����ࡣ���ԣ���������λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFF00FF;
EXPLAIN(X6 AND S5,'���--���ԣ��㹬���ԡ��Դʣ��㣬�࣬�̣����꣬�������������ԣ���������λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFF00FF;
EXPLAIN(X6 AND S6,'��Ϊ��--���ԣ��㹬���ԡ��Դʣ��㣬С�ࡣ�����������������ˡ����ԣ���������λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFF00FF;
EXPLAIN(X6 AND S7,'ˮ�羮--���ԣ��㹬���ԡ��Դʣ��������ز��ľ�����ɥ�ã�������������������δ������Ӯ��ƿ���ס����ԣ���������λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFF00FF;
EXPLAIN(X6 AND S8,'ɽ���--���ԣ��㹬���ԡ��Դʣ��ƣ�Ԫ�࣬������ȼ����գ�������ա����ԣ���������λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFF00FF;
EXPLAIN(X6 AND M6,'�ط���--���ԣ��㹬���ԡ��Դʣ�����Ԫ�࣬�ü����ˣ������������������ԣ���������λ���룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFF00FF;
EXPLAIN(X7 AND S2,'��ˮ��--���ԣ��������ԡ��Դʣ��ϣ����ڣ��ϡ����м������ס��������ˣ�����������ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFFEADD;
EXPLAIN(X7 AND S3,'��ˮ��--���ԣ��������ԡ��Դʣ������࣬�꣬���˼����̣����Բ��š����ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFFEADD;
EXPLAIN(X7 AND S4,'��ˮδ��--δ���ԣ��������ԡ��Դʣ�δ�ã��࣬С�����ã����β�������������ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFFEADD;
EXPLAIN(X7 AND S5,'��ˮ��--���ԣ��������ԡ��Դʣ��⣬�����ϣ������������������������������������ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFFEADD;
EXPLAIN(X7 AND S6,'��ˮ��--���ԣ��������ԡ��Դʣ������࣬������������������ꡣ���ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFFEADD;
EXPLAIN(X7 AND S7,'��Ϊˮ--���ԣ��������ԡ��Դʣ�ϰ�����ڣ�ά�ĺ࣬�����С����ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFFEADD;
EXPLAIN(X7 AND S8,'ɽˮ��--���ԣ��������ԡ��Դʣ��ɣ��ࡣ������ͯ�ɣ�ͯ�����ҡ����߸棬�����£����档���ꡣ���ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFFEADD;
EXPLAIN(X7 AND M6,'��ˮʦ--ʦ�ԣ��������ԡ��Դʣ�ʦ���꣬���˼����̡����ԣ��������������룩�����ڷ�չ�Ŀ��ܷ���Ϊ��������λת�����룩���빬�������룩��'),ALIGN0,colorFFEADD;
EXPLAIN(X8 A