矩陣測試版...-晉承│愛情公寓交友網站與聊天室

還沒登入愛情公寓嗎？還沒加入愛情公寓嗎？馬上進入公寓和 10,525,654 個住戶交朋友～

紅包抽抽樂！小資變土豪！

素人也能成為明日之星！

移除此區廣告請加入VIP

檔案狀態:

住戶編號:2510978

晉承的日記本

快速選單

清醒關鍵《前一篇

後一篇》一卦斷兩籤

回應

給他日記貼紙

給他愛的鼓勵

檢舉

篇名: 矩陣測試版...
作者: 晉承	日期: 2011.09.14　　天氣: 　心情:

HTS矩陣指標.....
測試江恩理論實用性!!.
6919角線對角線會有吸引力..

Parameter:顯示偏移(30),矩陣起點(0),間距高(8000),間距低(7000),劃線長度(100)
Variables:起點(0),間距(0),計數(0),分割率(0)
Array: OoD[84](-3), HoD[84](-3), LoD[84](-3), CoD[84](-3)
//最小間距即8點/8=1
Value91 = OpenOfD (2, OoD)
Value92 = HighOfD (2, HoD)
Value93 = LowOfD (2, LoD)
Value94 = CloseOfD(2, CoD)
if 矩陣起點=0 then
//若高OR低值,輸入0,自動取樣前一日震幅
if CoD[2] >LoD[1] then
value1=HoD[1]
value2=LoD[1]
else
//當日幅度精測,向上跳空缺口
value1=HoD[1]
value2=CoD[2]
end if
if CoD[2]<HoD[1] then
value1=HoD[1]
value2=LoD[1]
else
//當日幅度精測,向下跳空缺口
value1=CoD[2]
value2=LoD[1]
end if
end if
value3=value1-value2
//*******************
if 矩陣起點=0 then
起點=CoD[1]
間距=value3/8
else
起點=矩陣起點
間距=(間距高-間距低)/8
end if
//最小間距即8點/8=1
//*************************
IF LastBarOnChart THEN
TXT_SetColor(TXT_New(Date,Time,起點,space(顯示偏移)+NumToStr(起點,1)+"**中**"),black)
end if
//------------------------
IF LastBarOnChart THEN
for VALUE999=0 to 1
VALUE99=TXT_New( Date,Time,起點+1*間距,space(顯示偏移)+NumToStr(起點+1*間距,1)+"十字0度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+3*間距,space(顯示偏移)+NumToStr(起點+3*間距,1)+"十字90度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+5*間距,space(顯示偏移)+NumToStr(起點+5*間距,1)+"十字180度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+7*間距,space(顯示偏移)+NumToStr(起點+7*間距,1)+"十字270度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+10*間距,space(顯示偏移)+NumToStr(起點+10*間距,1)+"十字0度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+14*間距,space(顯示偏移)+NumToStr(起點+14*間距,1)+"十字90度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+18*間距,space(顯示偏移)+NumToStr(起點+18*間距,1)+"十字180度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+22*間距,space(顯示偏移)+NumToStr(起點+22*間距,1)+"十字270度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+27*間距,space(顯示偏移)+NumToStr(起點+27*間距,1)+"十字0度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+33*間距,space(顯示偏移)+NumToStr(起點+33*間距,1)+"十字90度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+39*間距,space(顯示偏移)+NumToStr(起點+39*間距,1)+"十字180度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+45*間距,space(顯示偏移)+NumToStr(起點+45*間距,1)+"十字270度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+52*間距,space(顯示偏移)+NumToStr(起點+52*間距,1)+"十字0度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+60*間距,space(顯示偏移)+NumToStr(起點+60*間距,1)+"十字90度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+68*間距,space(顯示偏移)+NumToStr(起點+68*間距,1)+"十字180度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+76*間距,space(顯示偏移)+NumToStr(起點+76*間距,1)+"十字270度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+85*間距,space(顯示偏移)+NumToStr(起點+85*間距,1)+"十字0度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+95*間距,space(顯示偏移)+NumToStr(起點+95*間距,1)+"十字90度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+105*間距,space(顯示偏移)+NumToStr(起點+105*間距,1)+"十字180度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+115*間距,space(顯示偏移)+NumToStr(起點+115*間距,1)+"十字270度")
TXT_SetColor( Value99,MAGENTA)
VALUE99=TXT_New( Date,Time,起點+126*間距,space(顯示偏移)+NumToStr(起點+126*間距,1)+"十字0度")
TXT_SetColor( Value99,MAGENTA)
//*******************************
//****************************
VALUE99=TXT_New( Date,Time,起點+2*間距,space(顯示偏移)+NumToStr(起點+2*間距,1)+"角45度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+4*間距,space(顯示偏移)+NumToStr(起點+4*間距,1)+"角135度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+6*間距,space(顯示偏移)+NumToStr(起點+6*間距,1)+"角225度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+8*間距,space(顯示偏移)+NumToStr(起點+8*間距,1)+"角315度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+12*間距,space(顯示偏移)+NumToStr(起點+12*間距,1)+"角45度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+16*間距,space(顯示偏移)+NumToStr(起點+16*間距,1)+"角135度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+20*間距,space(顯示偏移)+NumToStr(起點+20*間距,1)+"角225度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+24*間距,space(顯示偏移)+NumToStr(起點+24*間距,1)+"角315度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+30*間距,space(顯示偏移)+NumToStr( 起點+30*間距,1)+"角45度")
TXT_SetColor( Value99,blue)

VALUE99=TXT_New( Date,Time,起點+36*間距,space(顯示偏移)+NumToStr(起點+36*間距,1)+"角135度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+42*間距,space(顯示偏移)+NumToStr(起點+42*間距,1)+"角225度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+48*間距,space(顯示偏移)+NumToStr(起點+48*間距,1)+"角315度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+56*間距,space(顯示偏移)+NumToStr(起點+56*間距,1)+"角45度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+64*間距,space(顯示偏移)+NumToStr(起點+64*間距,1)+"角135度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+72*間距,space(顯示偏移)+NumToStr(起點+72*間距,1)+"角225度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+80*間距,space(顯示偏移)+NumToStr(起點+80*間距,1)+"角315度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+90*間距,space(顯示偏移)+NumToStr(起點+90*間距,1)+"角45度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+100*間距,space(顯示偏移)+NumToStr(起點+100*間距,1)+"角135度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+110*間距,space(顯示偏移)+NumToStr(起點+110*間距,1)+"角225度")
TXT_SetColor( Value99,blue)
VALUE99=TXT_New( Date,Time,起點+120*間距,space(顯示偏移)+NumToStr(起點+120*間距,1)+"角315度")
TXT_SetColor( Value99,blue)
//反向矩陣
間距=0-間距
end for
end if

標籤:

瀏覽次數:175 人氣指數:175 累積鼓勵:0

切換閱讀模式

回應

給他日記貼紙

給他愛的鼓勵

檢舉

給本文愛的鼓勵：