奇狐社區論壇
在這個頁面顯示本主題全部的 13 個文章

奇狐社區論壇 (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=9300)


由 bp252039 在 2008-03-05 15:43 發表:

[求救]式子修正-Ⅱ,有請指正

下列式子中,「最近大量紅K低點」及「最近大量紅K高點」數字顯示不對,那錯了,有請指正,感謝!!

For Q := DataCount downto 1 do begin
cQ:=v>2000 and C>O,LINETHICK0;
IF cQ[Q]=1 Then BREAK;
End;
DRAWSL(BARPOS=Q,l,0,20,3),Colorff00ff linedot
DRAWTEXT((BARPOS=Q),L,'最近大量紅K高點:'+numtostr(H,0)),pxdn88,ColorFFFFFF,ALIGN0;
DRAWTEXT((BARPOS=Q),L,'最近大量紅K低點:'+numtostr(L,0)),pxdn127,ColorFFFFFF,ALIGN0;

__________________
尊重趨勢,見風轉舵
做對加碼,跌破加碼點則全數出清


由 alpha 在 2008-03-05 17:54 發表:

.....

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了


由 bp252039 在 2008-03-05 18:05 發表:

引用:
最初由 alpha 發表
For Q = DataCount downto 1 do begin
cQ:=v[Q]>2000 and C[Q]>O[Q];
IF cQ[Q] Then BREAK;
End;

DRAWSL(BARPOS=Q,l,0,20,3),Colorff00ff linedot
DRAWTEXT((BARPOS=Q),L,'最近大量紅K高點:'+numtostr(H,0)),pxdn88,ColorFFFFFF,ALIGN0;
DRAWTEXT((BARPOS=Q),L,'最近大量紅K低點:'+numtostr(L,0)),pxdn127,ColorFFFFFF,ALIGN0;



alpha大,提供的式子,不能用吔,奇狐顯示"行2:語法錯誤",可以重新提供嗎!!謝謝

__________________
尊重趨勢,見風轉舵
做對加碼,跌破加碼點則全數出清


由 alpha 在 2008-03-05 18:09 發表:

引用:
最初由 bp252039 發表
alpha大,提供的式子,不能用吔,奇狐顯示"行2:語法錯誤",可以重新提供嗎!!謝謝


拍謝
沒注意看 ^^


C1 := C;
O1 := O;
V1 := V;


For Q = DataCount downto 1 do begin
cQ := v1[Q]>2000 and C1[Q]>O1[Q];
IF cQ Then BREAK;
End;


DRAWSL(BARPOS=Q,l,0,20,3),Colorff00ff linedot
DRAWTEXT((BARPOS=Q),L,'最近大量紅K高點:'+numtostr(H,0)),pxdn88,ColorFFFFFF,ALIGN0;
DRAWTEXT((BARPOS=Q),L,'最近大量紅K低點:'+numtostr(L,0)),pxdn127,ColorFFFFFF,ALIGN0;

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了


由 alpha 在 2008-03-05 18:17 發表:

可以不要用回圈啦 ~
用 barslast() 即可

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了


由 bp252039 在 2008-03-05 18:35 發表:

引用:
最初由 alpha 發表
可以不要用回圈啦 ~
用 barslast() 即可



承蒙指導,非常感謝!!由於才剛起步學習程式, barslast() 的運用還不熟練,可否再請大大賜教!!3Q!!

__________________
尊重趨勢,見風轉舵
做對加碼,跌破加碼點則全數出清


由 alpha 在 2008-03-05 20:51 發表:

Q:= v > 2000 and C > O;
Q:= ref(Q*barpos, barslast(Q));
Q:= Q[datacount];

DRAWSL(BARPOS=Q,l,0,20,3),Colorff00ff linedot;
DRAWTEXT((BARPOS=Q),L,'最近大量紅K高點:'+numtostr(H,0)),pxdn88,ColorFFFFFF,ALIGN0;
DRAWTEXT((BARPOS=Q),L,'最近大量紅K低點:'+numtostr(L,0)),pxdn127,ColorFFFFFF,ALIGN0;

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了


由 bp252039 在 2008-03-05 21:06 發表:

引用:
最初由 alpha 發表
Q:= v > 2000 and C > O;
Q:= ref(Q*barpos, barslast(Q));
Q:= Q[datacount];

DRAWSL(BARPOS=Q,l,0,20,3),Colorff00ff linedot;
DRAWTEXT((BARPOS=Q),L,'最近大量紅K高點:'+numtostr(H,0)),pxdn88,ColorFFFFFF,ALIGN0;
DRAWTEXT((BARPOS=Q),L,'最近大量紅K低點:'+numtostr(L,0)),pxdn127,ColorFFFFFF,ALIGN0;



真是受用!!非常感謝 alpha大大的熱心指導!!

__________________
尊重趨勢,見風轉舵
做對加碼,跌破加碼點則全數出清


由 bp252039 在 2008-03-05 21:30 發表:

引用:
最初由 bp252039 發表
真是受用!!非常感謝 alpha大大的熱心指導!!


alpha大大,程式顯示點位好像不對吔,今日5分台指,最近大量紅K是在11:50分,K棒高低分別為8440及8425,而程式顯示的高低點是8519與8492,可否查驗一下?3Q!!

__________________
尊重趨勢,見風轉舵
做對加碼,跌破加碼點則全數出清


由 alpha 在 2008-03-05 22:17 發表:

那是因為你的原始程式邏輯本來就有錯誤

我並沒有修改你的邏輯喲

只是修正你程式寫法錯誤的地方

依然還是你原始自己定義大量的邏輯

(1) 你已經把所謂大量定義為所謂 V>2000

(2) 何謂最大量 ??? 1日 , 5 日 還是 10日 ???
並未提及

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了


由 bp252039 在 2008-03-05 22:44 發表:

引用:
最初由 alpha 發表
那是因為你的原始程式邏輯本來就有錯誤

我並沒有修改你的邏輯喲

只是修正你程式寫法錯誤的地方

依然還是你原始自己定義大量的邏輯

(1) 你已經把所謂大量定義為所謂 V>2000

(2) 何謂最大量 ??? 1日 , 5 日 還是 10日 ???
並未提及



不好意思,初學者功力太差,讓alpha大費心,請見諒!!我的需求定義是以當沖來看,只要盤中5分週期成交量大於2000且是紅k,那麼就把這根k棒的高低點顯示出來,並且畫面始終保持最近一根符合條件的高低點,以避免畫面過於花亂

__________________
尊重趨勢,見風轉舵
做對加碼,跌破加碼點則全數出清


由 alpha 在 2008-03-06 01:12 發表:

那這樣你定義大量的邏輯沒有錯 ^^
問題是出在 numtostr()

Q:= v > 2000 and C > O;
Q:= ref(Q*barpos, barslast(Q));
Q:= Q[datacount];

TRUE:= BARPOS=Q;
DRAWSL(TRUE,l,0,20,3),Colorff00ff linedot;
DRAWTEXT(TRUE,L,'最近大量紅K高點:'+ numtostr(ref(H,barslast(TRUE)),0)),pxdn88,ColorFFFFFF,ALIGN0;
DRAWTEXT(TRUE,L,'最近大量紅K低點:'+ numtostr(ref(L,barslast(TRUE)),0)),pxdn127,ColorFFFFFF,ALIGN0;

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了


由 bp252039 在 2008-03-06 09:14 發表:

引用:
最初由 alpha 發表
那這樣你定義大量的邏輯沒有錯 ^^
問題是出在 numtostr()

Q:= v > 2000 and C > O;
Q:= ref(Q*barpos, barslast(Q));
Q:= Q[datacount];

TRUE:= BARPOS=Q;
DRAWSL(TRUE,l,0,20,3),Colorff00ff linedot;
DRAWTEXT(TRUE,L,'最近大量紅K高點:'+ numtostr(ref(H,barslast(TRUE)),0)),pxdn88,ColorFFFFFF,ALIGN0;
DRAWTEXT(TRUE,L,'最近大量紅K低點:'+ numtostr(ref(L,barslast(TRUE)),0)),pxdn127,ColorFFFFFF,ALIGN0;



讚!!就是它了!!真的是非常謝謝alpha大熱心指導!!

__________________
尊重趨勢,見風轉舵
做對加碼,跌破加碼點則全數出清


全部時間均為台灣時間, 現在時間為22:50
在這個頁面顯示本主題全部的 13 個文章


Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.

簡愛洋行 製作 Copyright 2003-. All Rights Reserved.