奇狐社區論壇 - [求救]請問!!角度問題

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- [求救]請問!!角度問題 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=1340)

由 m93017 在 2004-08-03 11:30 發表:

[求救]請問!!角度問題

請問V30為1時的HIGH到V1D為1時的LOW之間的角度應如何編寫?
N:10
M:10

V1:=iSLASTbAR;
V2:=REF(H,N)=HHV(H,2*N+1);
V3:=FILTER(V2,N);
V4:=BACKSET(V3,N+1);
V5:=FILTER(V4,N);
V6:=V5 OR V1;
V7:=REF(L,N)=LLV(L,2*N+1);
V8:=FILTER(V7,N);
V9:=BACKSET(V8,N+1);
VA:=FILTER(V9,N);
VB:=VA AND NOT(V5);
VC:=BACKSET(V6,REF(BARSLAST(VB),1)+1);
VD:=VC>REF(VC,1);
VE:=BACKSET(VD,2);
VF:=VE>REF(VE,1);
V10:=BACKSET(VF AND COUNT(V6,REF(BARSLAST(VB),1)+2)=0,REF(BARSLAST(VB),1)+2);
V11:=V10>REF(V10,1);
V12:=BACKSET(V11 AND COUNT(V6,REF(BARSLAST(VB),1)+2)=0,REF(BARSLAST(VB),1)+2);
V13:=V12>REF(V12,1);
V14:=IF(V6,COUNT(VB,REF(BARSLAST(V6),1)+1),0);
V15:=IF(V14=1 AND V6,BARSLAST(VF),0);
V16:=IF(V6 AND REF(L,BARSLAST(VF))>=REF(L,BARSLAST(V11)),BARSLAST(V11),BARSLAST(VF));
V17:=IF(V14=2 AND V6,V16,0);
V18:=IF(V14>=3 AND V6,IF(V6 AND REF(L,V16)>=REF(L,BARSLAST(V13)),BARSLAST(V13),V16),0);
V19:=V15+V17+V18;
V1A:=BACKSET(V6,V19);
V1B:=V1A>REF(V1A,1);
V1C:=BACKSET(V1B,2);
V1D:=V1C>REF(V1C,1);
V1E:=V1D OR V1;
V1F:=BACKSET(V1E,REF(BARSLAST(V6),1)+1);
V20:=V1F>REF(V1F,1);
V21:=BACKSET(V20,2);
V22:=V21>REF(V21,1);
V23:=BACKSET(V22 AND COUNT(V1E,REF(BARSLAST(V6),1)+2)=0,REF(BARSLAST(V6),1)+2);
V24:=V23>REF(V23,1);
V25:=BACKSET(V24 AND COUNT(V1E,REF(BARSLAST(V6),1)+2)=0,REF(BARSLAST(V6),1)+2);
V26:=V25>REF(V25,1);
V27:=IF(V1E,COUNT(V5,REF(BARSLAST(V1E),1)+1),0);
V28:=IF(V27=1 AND V1E,BARSLAST(V22),0);
V29:=IF(V1E AND REF(H,BARSLAST(V22))<=REF(H,BARSLAST(V24)),BARSLAST(V24),BARSLAST(V22));
V2A:=IF(V27=2 AND V1E,V29,0);
V2B:=IF(V27>=3 AND V1E,IF(V1E AND REF(H,V29)<=REF(H,BARSLAST(V26)),BARSLAST(V26),V29),0);
V2C:=V28+V2A+V2B;
V2D:=BACKSET(V1E,V2C);
V2E:=V2D>REF(V2D,1);
V2F:=BACKSET(V2E,2);
V30:=V2F>REF(V2F,1);
DRAWLINE(V1D,L,V30,H,0);
DRAWLINE(V30,H,V1D,L,0);

由 cgjj 在 2004-08-04 21:22 發表:

垂直為價格
水平為時間
兩個單位性質不同, 怎能用角度呈現於畫面呢? (K線放大縮小就變囉)
應該用比例來看吧(垂直差距與水平差距比例)

請於原公式加入下列的公式
即可得到線段的垂直差距(價格差UPrice)和水平差距(時間差UTime)
有了這兩數值怎麼利用, 就讓您去發揮囉!

原碼:


SS:=if(V30,H,if(V1D,L,0));

UPrice:C*0 LINETHICK0;

UTime:C*0 LINETHICK0;

<%

SS=FFL.VarData("SS")

UPrice=FFL.VarData("UPrice")

UTime=FFL.VarData("UTime")

OldNowPos=0

for i = FFL.VarStartIndex("SS") to ubound(SS)

  if SS(i)>0 then 

    NowPos=i

    if OldNowPos=0 then

      OldNowPos=NowPos

    else

       UsePrice=abs(SS(OldNowPos)-SS(i))

       UseTime=NowPos-OldNowPos

       for j=OldNowPos to NowPos

         UPrice(j)=UsePrice

         UTime(j)=UseTime

       next

       OldNowPos=NowPos

    end if

  end if

next

FFL.VarData("UPrice")=UPrice

FFL.VarData("UTime")=UTime

%>

由 m93017 在 2004-08-19 10:30 發表:

感謝cgjj大回覆

全部時間均為台灣時間, 現在時間為07:00

在這個頁面顯示本主題全部的 3 個文章