Fetcher[
set{HL%, high above low}
add column HL%
]

Fetcher[add column gap]

Fetcher[
set{gap_percent, Close to open gap / 100}
set{gap_amount, gap_percent * close 1 day ago}
add column gap_amount
]

Fetcher[
set{tail, min(open, close) - low}
set{hammer, tail / day point range}
hammer above 0.66
]

Fetcher[
set{Shadow, day point range / aopcl}
Shadow above 3

set{Hi, high - max(open, close)}
set{Lo, min(open, close) - low}
set{Hiratio, Hi / aopcl}
set{Loratio, Lo / aopcl}
set{Upper, mod(Hiratio,10) * 100}
set{Lower, mod(Loratio,10) * 100}

add column Upper{Upper (%)}
add column Lower{Lower (%)}
]

Fetcher[
set{tail, min(open, close) - low}
set{hammer, tail / day point range}
set{both, count(hammer above 0.75,1) / count(volume more than 200% above average volume(30),1)}
set{dayz, days(both equals 1,5)}
dayz above 0
add column dayz
]

Fetcher[
/*Replace "My_Indicator" with other valid indicator (eg. RSI(2))*/
Set{MA20,CMA(My_Indicator,20)}
set{SD,cstddev(My_Indicator,20)}
set{SD20,2 * SD} /*2 standard deviation*/
set{BOLU,MA20 + SD20}
set{BOLD,MA20 - SD20}

add column BOLU{Upper BB}
add column MA20{Center BB}
add column BOLD{Lower BB}

draw MA20 on plot price
draw BOLU on plot price
draw BOLD on plot price
]

Fetcher[
draw Bollinger width(10,1)
draw standard deviation(10,1) on plot Bollinger width(10,1)
]

Fetcher[
/*Applying 1 Standard Deviation*/
set{SD, cstddev(My_Indicator,60)}
set{SDU, My_Indicator + SD}
set{SDD, My_Indicator - SD}

draw 60 day slope of My_Indicator
draw 60 day slope of SDU on plot My_Indicator
draw 60 day slope of SDD on plot My_Indicator

do not draw SDU
do not draw SDD
]

Fetcher[
/*1 Standard Deviation*/
set{SD,cstddev(OBV(1),60)}
set{SDU,OBV(1) + SD}
set{SDD,OBV(1) - SD}

/*Linear Regression: y = mx + b*/

/*Median Channel*/
set{mSD, 60 day slope of OBV(1)}
set{mx, 60 * mSD}
set{b2, sum(OBV(1),60)}
set{bx, mSD * 1830}
set{b1, b2 - bx}
set{b, b1 / 60}
set{y, mx + b}

/*Upper Channel*/
set{mSDU, 60 day slope of SDU}
set{my, 60 * mSDU}
set{b2a, sum(SDU,60)}
set{bx1, mSDU * 1830}
set{b1a, b2a - bx1}
set{ba, b1a / 60}
set{x, my + ba}

/*Lower Channel*/
set{mSDD, 60 day slope of SDD}
set{mz, 60 * mSDD}
set{b2b, sum(SDD,60)}
set{bx2, mSDD * 1830}
set{b1b, b2b - bx2}
set{bb, b1b / 60}
set{z, mz + bb}

/*Channels: x = Upper; y = Median; z = Lower*/
/*Use a filter phrase like "touching" or "approaching from above OR below"*/
OBV(1) touching z

add column separator
add column OBV(1)
add column separator
add column x{Upper Channel}
add column y{Median Channel}
add column z{Lower Channel}
add column separator

draw 60 day slope of OBV(1)
draw 60 day slope of SDU on plot OBV(1)
draw 60 day slope of SDD on plot OBV(1)

do not draw SDU
do not draw SDD
do not draw z
]

As you may know, the logical disjunction "OR" isn't natively supported in SF language. However, we're able to get by this limitation using the method TRO introduced. I, on the other hand, wish to push this one step further by using it in conjunction with the "If-Then" conditional.

I have noticed that many of you write two filters of the same condition. For example, one filter is written for stocks that crosses above its 20-day moving average and another filter is written for stocks that crosses below its 20-day moving average. Why not just write one filter that would allow both conditions to be met but also informs you which is which. Here's how you write it.

code

---

set{condition 1, count(indicator 1, indicator 2,1) * 1}
set{condition 2, count(indicator 1, indicator 2,1) * -1}
set{both, condition 1 + condition 2}
set{result, 1 - count(both equals 0,1)}
result above 0
add column both{result}

---

Fetcher[
set{up, count(price crossed above MA(20),1) * 1}
set{down, count(price crossed below MA(20),1) * -1}
set{both, up + down}
set{Xover, 1 - count(both equals 0,1)}
Xover above 0
add column both{Buy (1) / Sell (-1)}
]