커뮤니티
문의드립니다
안녕하세요?
아래수식에 에러가있습니다 그리고신호가발생했으면 합니다
감사합니다
Inputs:
TL11(0),
TL21(0),
CrossTolerance(10),
ContractCount(1);
Vars:
valTL1_now(0), valTL2_now(0),
valTL1_prev(0), valTL2_prev(0),
diff(0),
LastCrossBar(0),
CrossLine(0);
//---------------------------------------------
// 추세선 존재 시에만 작동
//---------------------------------------------
If (TL11 > 0) and (TL21 > 0) Then
Begin
// 현재 봉 값
valTL1_now = TL_GetValue(TL11, Date, Time);
valTL2_now = TL_GetValue(TL21, Date, Time);
// 이전 봉 값
valTL1_prev = TL_GetValue(TL11, Date[1], Time[1]);
valTL2_prev = TL_GetValue(TL21, Date[1], Time[1]);
diff = AbsValue(valTL1_now - valTL2_now);
// 교차 근접 표시
If diff <= (PriceScale * CrossTolerance) Then
Begin
If LastCrossBar <> CurrentBar Then
Begin
CrossLine = TL_New(Date[1], Time[1], Close[1], Date, Time, Close);
TL_SetColor(CrossLine, Yellow);
TL_SetSize(CrossLine, 1);
LastCrossBar = CurrentBar;
End;
End;
// 교차 감지 → 1봉 뒤 자동매매
If (valTL1_prev < valTL2_prev) and (valTL1_now > valTL2_now) Then
Buy ContractCount contracts next bar at market
Else If (valTL1_prev > valTL2_prev) and (valTL1_now < valTL2_now) Then
Sell ContractCount contracts next bar at market;
End;
답변 1
예스스탁 예스스탁 답변
2025-10-27 19:07:39