奇狐社區論壇
在這個頁面顯示本主題全部的 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大熱心指導!!

__________________
尊重趨勢，見風轉舵
做對加碼，跌破加碼點則全數出清
全部時間均為台灣時間, 現在時間為00:52
在這個頁面顯示本主題全部的 13 個文章


Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved.