奇狐社區論壇 - 多、空訊有轉換後、才出新訊

總頁數 (2): « 1 [2]
在這個頁面顯示本主題全部的 22 個文章

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

由 cgjj 在 2012-12-10 11:05 發表:

回覆: 畫柱線

引用:
最初由 N122562663 發表
總版主您好：請費心再增加支援一組多、空訊成立後、但尚未停利出一半、之k棒公式、感恩有您。

畫柱線(持有<0,開盤價,收盤價,6.6,0),;
畫柱線(持有<0,最高價,最低價,1.1,0),;
畫柱線(持有>0,開盤價,收盤價,6.6,0);
畫柱線(持有>0,最高價,最低價,1.1,0),;

尚未停利出一半, 之持有值為 +2 或 -2
若已停利出一半, 之持有值為 +1 或 -1
您運用它去判斷畫柱線就可

由 N122562663 在 2012-12-17 09:28 發表:

5次停利

總版主您好：因每次進場操作都是5口單、再請費心、將再增加停利次數為、控利A:=30; 控利B:=60;控利C:=90;控利D:=120;控利全:=150、共5次。如可以最好是改為多單、控利A:*1.005; 控利B:=*1.01;、空單、控利A:*0.095; 控利B:=*0.09;用％數、而非點數來控制停利、請再公式支援、感恩有您。

由 cgjj 在 2012-12-18 18:01 發表:

回覆: 5次停利

引用:
最初由 N122562663 發表
總版主您好：因每次進場操作都是5口單、再請費心、將再增加停利次數為、控利A:=30; 控利B:=60;控利C:=90;控利D:=120;控利全:=150、共5次。如可以最好是改為多單、控利A:*1.005; 控利B:=*1.01;、空單、控利A:*0.095; 控利B:=*0.09;用％數、而非點數來控制停利、請再公式支援、感恩有您。

控利A, 控利B, 控利C, 控利D
這四個分別都只出場1口嗎?

由 N122562663 在 2012-12-19 18:14 發表:

各出場1口

總版主您好：是、控利A, 控利B, 控利C, 控利D 、各出場1口、感恩有您。

由 cgjj 在 2012-12-20 16:51 發表:

回覆: 各出場1口

引用:
最初由 N122562663 發表
總版主您好：是、控利A, 控利B, 控利C, 控利D 、各出場1口、感恩有您。

原碼:多訊:AA>1000;
空訊:AA<-1000;
強出:=TIME>=134500; //K棒週期時間為 13:45:00 時做強制出場(請自行決定更改)
多進:=多訊 and 強出=0 or barpos=0;
空進:=空訊 and 強出=0 or barpos=0;
進場:=多進-空進;
控損:=25; WrkNum:=5;
VARIABLE:控利[WrkNum]=0;
控利[1]:=30; 控利[2]:=60; 控利[3]:=90; 控利[4]:=120; 控利[5]:=150;
進價:=0; CC:=C; RecOutM:='';
多空:=0; //1.多 -1.空 0.無
進出:C*0 NOAXIS;
持有:進出 linethick0;
for i = 1 to datacount do begin
  if 多空=0 then begin
    多空:=進場[i]*WrkNum; 進出[i]:=SGN(多空);
    if 多空<>0 then 進價:=CC[i]; RecOutM:='';
  end else if 多空<>0 then begin
    NowDir:=SGN(多空);
    if NowDir=-進場[i] or NowDir=-進場[i] then begin
      進出[i]:=-NowDir*2; 多空:=-NowDir*WrkNum; 進價:=CC[i]; RecOutM:='';
    end else begin
      盈虧[i]:=(CC[i]-進價)*NowDir;
      if 強出[i] then begin
        進出[i]:=NowDir*4; 多空:=0;
      end else if 盈虧[i]<=-控損 then begin
        進出[i]:=NowDir*3; 多空:=0;
      end else begin
        for j=WrkNum downto 1 do begin
          jstr:=numtostr(j,0);
          if 盈虧[i]>=控利[j] and STRFIND(RecOutM, jstr, 1)=0 then begin
            進出[i]:=NowDir*10+NowDir*j; RecOutM:=RecOutM+jstr; 
            多空:=多空-NowDir; if j=WrkNum then 多空:=0;
            break;
          end;
        end;
      end;
    end;
  end;
  持有[i]:=多空; //為該根動作完成後所持有的值
end;
//[進出] 這變數值代表意義如下:
// 1.多單進場, 2.空轉多,  3.多控損出, 4.強制出場, 10到15.多控利出
//-1.空單進場, -2.多轉空,-3.空控損出,-4.強制出場,-10到-15.空控利出

畫柱線(持有<0,開盤價,收盤價,6.6,0),COLORGREEN;
畫柱線(持有<0,最高價,最低價,1.1,0),COLORGREEN;
畫柱線(持有>0,開盤價,收盤價,6.6,0),COLORRED;
畫柱線(持有>0,最高價,最低價,1.1,0),COLORRED;

僅提供程式架構處理範例, 做為參考
判斷次序會影響特性, 請自行依需求修改為您要的

由 N122562663 在 2015-12-29 12:23 發表:

TIME>=134300放入參數表

總版主您好：可否把、下列調整時間、放入參數表中、方便調整時間、若可以、請公式支援、謝謝您。

強出:=TIME>=134300;

由 cgjj 在 2015-12-29 13:21 發表:

回覆: TIME>=134300放入參數表

引用:
最初由 N122562663 發表
總版主您好：可否把、下列調整時間、放入參數表中、方便調整時間、若可以、請公式支援、謝謝您。

強出:=TIME>=134300;

您把 134300
改用參數取代即可(輸入格式:hhmmss)

全部時間均為台灣時間, 現在時間為03:20

總頁數 (2): « 1 [2]
在這個頁面顯示本主題全部的 22 個文章