(警示)關於開盤第一筆交易量的寫法?

  •   1K 
  • 最後發表   股票阿修  2020 十一月 23
股票阿修 發文於   2020/11/22

我想要寫出一個開盤第一筆交易量的程式寫法,

但怎麼寫好像都是變成一分鐘總和的交易量,

請問這裡哪裡可以改進改成只要開盤第一筆的量

if volume>volume[1]*0.08

and volume[1]>1000

and date=20201123

and time>090000

and close[1]>10

then ret=1;

 

排序方式: 標準 | 最新
蕎伊斯 發文於   2020/11/23

//雷達專用紀錄~現貨第一盤的量

//1分K，設 逐筆洗價，排程時間:8:55先打開預備

 

if getinfo("IsRealTime")=0 then return; //系統時間安控

if date <>date[1] then begin //換日清零

   value1=0;

   end;

 

if time = 090000 then begin

value1 = v; //紀錄第一盤的量

end;

 

//判斷式

 if value1>volume[1]*0.08 //第一盤大於昨天尾盤量的8%

and volume[1]>1000

{and date=20201123

and time>090000}

and close[1]>10

then ret=1;

試試看~

  • 按讚來自於
  • b24524658
GammaCEO 發文於   2020/11/23

單純只是要抓第一筆成交量大於昨量某值

用日K加個開關做警示就行了

variable: intrabarpersist tg(0);//觸發開關
variable: intrabarpersist MSG("");//訊息

tg = GetQuote("CulMatchTicks");

if CurrentTime = 085955 then tg=0 ;

condition1=volume>volume[1]*0.08 and close[1]>10;

once(tg<=1 and CurrentTime>=090000 and condition1)
begin
ret=1;
value1=volume;
value2=round(value1/(volume[1]*0.08),2);
RetMsg =text("量增",NumToStr(value2,2),"倍");
end;

 

 

  • 按讚來自於
  • b24524658
發表回覆
發表新主題
我的發文
我的收藏
分類
Close