請給我xq全球贏家的程式碼 關於異常放量 至少是兩倍以上的股票 包含興櫃股

[Phoebe0602]

請給我xq全球贏家的程式碼 關於異常放量 至少是兩倍以上的股票 包含興櫃股

[Phoebe0602]

{ 異常放量（至少 2 倍）+ 當日上漲 }
input: Len(20, "均量天數"),
Multiple(2.0, "放量倍數"),
MinVol(100, "最低今日量(張)");

var: AvgVol(0), IsAbnormal(false);

AvgVol = Average(Volume, Len);

IsAbnormal = (Volume >= AvgVol * Multiple)
and (Volume >= MinVol)
and (Close > Close[1]) { 當日收漲 }
and (AvgVol > 0);

if IsAbnormal then
ret = 1
else
ret = 0;