全套指南针源码(有的含有未来含数)

全套指南针源码(有的含有未来含数) È?Ì×Ö?ÄÏÕëÔ?Âë[?ɺü??Ê????ÖÎö?Ò??Ê?] Ô?×Ô?ºÖ??ê??Ê? ×?Õß?ºÐ??æ ????ÓÚ 2008-1-27 2:40:43 È?Ì×Ö?ÄÏÕëÔ?Âë[?ɺü??Ê????ÖÎö?Ò??Ê?] CBAND?ª?ªÖ?ÄÏÕë??ÁÖÏß?íÖ??ê Var1:=MA(CLOSE,N); Var2:=Var1+2*STD(CLOSE,N); ?äÅÌ: 5, POINTDOT; ??ÁÖ?í?È: (Var2-Var1)/Var1*100; ???ä: 30, POINTDOT; {N 30 5 100} CBW?ª?ªÖ?ÄÏÕë?É???ø?í CBW: 100*(COST(N1)-COST(N2))/COST(N1); {N1 97.5 0 100 N2 2.5 0 100} CBXQD?ª?ªÖ?ÄÏÕë?É???ùÏßÇ??È Var1:=AMOUNT/(100*VOL); Var2:=MA(Var1,N1); Var3:=MA(Var1,N2); Var4:=MA(Var1,N3); Var5:=DMA(CLOSE,VOL/CAPITAL); CYR5: 100*(Var2-REF(Var2,N))/REF(Var2,N); CYR13: 100*(Var3-REF(Var3,N))/REF(Var3,N); CYR34: 100*(Var4-REF(Var4,N))/REF(Var4,N); CYRÎÞÇî: 100*(Var5-REF(Var5,N))/REF(Var5,1); {N 4 N1 5 N2 13 N3 34} CKD?ª?ªÖ?ÄÏÕëÏà?Ô?ÛÎ? Var1:=AMOUNT/(100*VOL); Var2:=MA(Var1,13); Var3:=DMA(Var1,VOL/CAPITAL); CKDP: 100*(Var2-COST(0))/(COST(100)-COST(0)); CKDW: 100*(Var3-COST(0))/(COST(100)-COST(0)); CMACD?ª?ªÖ?ÄÏÕëCMACDÖ??ê Var1:=AMOUNT/(100*VOL); Var2:=MA(Var1,N1); Var3:=MA(Var1,N2); CMACD: 100*(Var2-Var3)/Var3, COLORSTICK; {N1 5 N2 13} CYB?ª?ªÖ?ÄÏÕëÓÅ????ÁÖÏß MB: MA(CLOSE,N); ÉÏ?ì: MB+STD(CLOSE,N); ÏÂ?ì: MB-STD(CLOSE,N); ÉÏ??ÏÞ: MB+2*STD(CLOSE,N); ÏÂ??ÏÞ: MB-2*STD(CLOSE,N); STICKLINE(open>=close ,close ,open,9,0 ),COLORaaaaaa; STICKLINE(open>=close ,close ,open,6,0 ),COLORbbbbbb; STICKLINE(open>=close ,close ,open,2.4,0 ),COLORcccccc; STICKLINE(open>=close ,close ,open,1.1,0 ),COLOR; STICKLINE(close>open,close,open,9,0 ),COLOr6666cc; STICKLINE(close>open,close,open,6 ,0 ),COLOR7777dd; STICKLINE(close>open,close,open,2.4 ,0 ),COLOR8888ee; STICKLINE(close>open,close,open,1.1 ,0 ),COLOR9999ff; STICKLINE(close>open,open,low,0.5,0 ),COLOR1199ff; STICKLINE(close>open,close,HIGH,0.5 ,0 ),COLOR1199ff; STICKLINE(open>=close,close,low,0.5 ,0 ),COLORcccccc; STICKLINE(open>=close,open,HIGH,0.5 ,0 ),COLORcccccc; CYC1?ª?ªÖ?ÄÏÕë?É???ùÏß Var1:=AMOUNT/(100*VOL); ?ÌÏß?É???ùÏß: MA(Var1,N1); ÖÐÏß?É???ùÏß: MA(Var1,N2); ??Ïß?É???ùÏß: MA(Var1,N3); ÎÞÇî?É???ùÏß: DMA(CLOSE,VOL/CAPITAL); STICKLINE(open>=close ,close ,open,9,0 ),COLORaaaaaa; STICKLINE(open>=close ,close ,open,6,0 ),COLORbbbbbb; STICKLINE(open>=close ,close ,open,2.4,0 ),COLORcccccc; STICKLINE(open>=close ,close ,open,1.1,0 ),COLOR; STICKLINE(close>open,close,open,9,0 ),COLOr6666cc; STICKLINE(close>open,close,open,6 ,0 ),COLOR7777dd; STICKLINE(close>open,close,open,2.4 ,0 ),COLOR8888ee; STICKLINE(close>open,close,open,1.1 ,0 ),COLOR9999ff; STICKLINE(close>open,open,low,0.5,0 ),COLOR1199ff; STICKLINE(close>open,close,HIGH,0.5 ,0 ),COLOR1199ff; STICKLINE(open>=close,close,low,0.5 ,0 ),COLORcccccc; STICKLINE(open>=close,open,HIGH,0.5 ,0 ),COLORcccccc; {N1 5 N2 13 N3 34} CYC2?ª?ªÖ?ÄÏÕë?É???ùÏß CYC1:0.01*EMA(AMOUNT,P1)/EMA(VOL,P1); CYC2:0.01*EMA(AMOUNT,P2)/EMA(VOL,P2); CYC3:0.01*EMA(AMOUNT,P3)/EMA(VOL,P3); CYC?ÞMA(AMOUNT/(100*VOL),VOL/(100*FINANCE(7))); {P1 5 P2 13 P3 34] CYD?ª?ªÖ?ÄÏÕë?Ð?ÓÒò×Ó CYDS:WINNER(CLOSE)/(VOL/CAPITAL); CYDN:WINNER(CLOSE)/MA(VOL/CAPITAL,N); {Äê 21} CYD2?ª?ªÖ?ÄÏÕë?Ð?ÓÒò×Ó A:=WINNER(CLOSE )*CAPITAL; ?Ð?ÓÒò×Ó:A/VOL; CYDD?ª?ªÖ?ÄÏÕë??Ì??Ð?ÓÒò×Ó Var1:=WINNER(CLOSE); Var2:=DMA(Var1,VOL/CAPITAL); Var3:=DMA(VOL,VOL/CAPITAL)/CAPITAL; CYDD: Var1/Var3; CYDD1: Var2/Var3; 1, POINTDOT; CYE?ª?ªÖ?ÄÏÕëÊÐ??Ç?ÊÆ MAL:=MA(CLOSE,5); MAS:=MA(MA(CLOSE,20),5); CYELMAL-REF(MAL,1))/REF(MAL,1)*100; CYESMAS-REF(MAS,1))/REF(MAS,1)*100; CYF?ª?ªÖ?ÄÏÕëÊÐ??ÄÜÁ? HSL:=VOL/CAPITAL*100; CYF:100-100/(1+EMA(HSL,N)*100); {N 21} CYOBV?ª?ªÖ?ÄÏÕëÓÅ??ÀÛ?ýÄÜÁ?Ïß NOBV1: SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE=0,VAR2,0); VAR4:=REF(CLOSE,1)-CLOSE; VAR5:=IF(CLOSE-REF(CLOSE,1)<=0,VAR4,0); VAR6:=SUM(VAR3,P1)/SUM(VAR5,P1); VAR7:=100-100/(1+VAR6); VAR8:=EMA(VAR7,P1); VAR9:=EMA(VAR8,P2); VARA:=EMA(VAR8,P3); M (VAR8-VARA)*VAR1; ML: (VAR9-VARA)*VAR1; MODE: MO*VAR1, COLORSTICK; {P1 16 P2 8 P3 45} CYW?ª?ªÖ?ÄÏÕëÖ?Á??ØÅÌ VAR1:=CLOSE-LOW; VAR2:=HIGH-LOW; VAR3:=CLOSE-HIGH; VAR4:=IF(CLOSE>=0,(VAR1/VAR2+VAR3/VAR2)*VOL,(VAR3/VAR2+VAR1/VAR2)*VOL); CYW: SUM(VAR4,10)/10000, COLORSTICK;