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

如何套入?

強出:=ACK0 or barpos=0;
多進:=AB01 or barpos=0;
多出1:=ABZ1 or barpos=0;
多出2:=ABZ2 or barpos=0;
空進:=AS01 or barpos=0;
空出1:=ASZ1 or barpos=0;
空出2:=ASZ1 or barpos=0;

進出:C*0;
多空:=0; //1.多 -1.空 0.無
for i = 1 to datacount do begin
if 多空=0 and 強出[i]=0 then begin
多空:=多進[i]-空進[i]; 進出[i]:=多空;
end else if 多空<>0 then begin
if 強出[i] then begin
進出[i]:=多空*4; 多空:=0;
end else begin
if 多空=多出1[i] or 多空=-空出1[i] then begin
進出[i]:=多空*2; 多空:=0;
end else if 多空=多出2[i] or 多空=-空出2[i] then begin
進出[i]:=多空*3; 多空:=0;
end else if 多空=空進[i] or 多空=-多進[i] then begin
進出[i]:=多空*5; 多空:=-多空;
end;
end;
end;
end;
上面源碼是總版主曾在論壇上指導過的!請問現在我的條件是
強出:=台指結算日 or barpos=0;
多進:=BINX or barpos=0;
多出:=BOUTX or barpos=0;
空進:=SINX or barpos=0;
空出:=SOUTX or barpos=0;
請問要如何套入上述之迴圈?謝謝!

回覆: 如何套入?

引用:

---

最初由 Markchu7 發表
強出:=ACK0 or barpos=0;
多進:=AB01 or barpos=0;
多出1:=ABZ1 or barpos=0;
多出2:=ABZ2 or barpos=0;
空進:=AS01 or barpos=0;
空出1:=ASZ1 or barpos=0;
空出2:=ASZ1 or barpos=0;

進出:C*0;
多空:=0; //1.多 -1.空 0.無
for i = 1 to datacount do begin
if 多空=0 and 強出[i]=0 then begin
多空:=多進[i]-空進[i]; 進出[i]:=多空;
end else if 多空<>0 then begin
if 強出[i] then begin
進出[i]:=多空*4; 多空:=0;
end else begin
if 多空=多出1[i] or 多空=-空出1[i] then begin
進出[i]:=多空*2; 多空:=0;
end else if 多空=多出2[i] or 多空=-空出2[i] then begin
進出[i]:=多空*3; 多空:=0;
end else if 多空=空進[i] or 多空=-多進[i] then begin
進出[i]:=多空*5; 多空:=-多空;
end;
end;
end;
end;
上面源碼是總版主曾在論壇上指導過的!請問現在我的條件是
強出:=台指結算日 or barpos=0;
多進:=BINX or barpos=0;
多出:=BOUTX or barpos=0;
空進:=SINX or barpos=0;
空出:=SOUTX or barpos=0;
請問要如何套入上述之迴圈?謝謝!

---

如果條件是這樣:
多進:=AB01 or barpos=0;
多出1:=ABZ1 or barpos=0;
多出2:=ABZ2 or barpos=0;
空進:=AS01 or barpos=0;
空出1:=ASZ1 or barpos=0;
空出2:=ASZ1 or barpos=0;//沒有強出

那是依樣畫葫蘆改為如下嗎?

強出:=C*0;
多進:=BINX or barpos=0;
多出1:=BOUTX or barpos=0;
多出2:=BOUTX2 or barpos=0 ;
空進:=SINX or barpos=0;
空出1:=SOUTX or barpos=0;
空出2:=SOUTX2 or barpos=0 ;

引用:

---

最初由 Markchu7 發表
如果條件是這樣:
多進:=AB01 or barpos=0;
多出1:=ABZ1 or barpos=0;
多出2:=ABZ2 or barpos=0;
空進:=AS01 or barpos=0;
空出1:=ASZ1 or barpos=0;
空出2:=ASZ1 or barpos=0;//沒有強出

那是依樣畫葫蘆改為如下嗎?

強出:=C*0;
多進:=BINX or barpos=0;
多出1:=BOUTX or barpos=0;
多出2:=BOUTX2 or barpos=0 ;
空進:=SINX or barpos=0;
空出1:=SOUTX or barpos=0;
空出2:=SOUTX2 or barpos=0 ;

---