Elephant Bar For ThinkOrSwim

Join useThinkScript to post your question to a community of 21,000+ developers and traders.

Hello,

I will really appreciate if someone can convert these scripts to thinkscript please. I am not a coder and am unable to convert.

https://www.tradingview.com/script/l1hLQxGY-Red-and-Green-Ignored-Bar-by-Oliver-Velez/

https://www.tradingview.com/script/yV11ifDS-Elephant-Bar-by-Oliver-Velez/

Thanks much 🙏

AJ
check the below. I don't know Spanish but the best I could do.

CSS:
#// Autor= Alejandro Iovane / Dreadblitz
#// Fecha= 07/12/2019
# study(shorttitle="VVI_VRI", title="VELAS ROJAS Y VERDES IGNORADAS DE OLIVER VELEZ", overlay=true)
# Converted by Sam4Cok@Samer800    - 11/2023 - Request from UseThinkScript.com memeber

input modo_tipo = {default "Complete Filter", "Trend Filter", "No Filter"};
input showIgnoredRedCandles = yes;#, "VER VELAS ROJAS IGNORADAS  - VRI")
input showIgnoredGreenCandles = yes;#, "VER VELAS VERDES IGNORADAS - VVI")
input showSlowMovAvg = yes;#, title="VER MEDIA LENTA 🐢")
input slowMovAvgType = {default "SMA", "EMA", "WMA", "VWMA", "SMMA", "DEMA", "TEMA", "Hull", "ZEMA", "TMA", "SSMA"};
input slowMovAvgLength = 20;#, title="🔹 Periodo = ", minval=1)
input slowMovAvgSource    = close;#, title="🔹 Fuente =")
input slowMovAvgTrendLookback = 1;#, title="🔹 Reaccion =", minval=1)
input showFastMovAvg = yes;#, title="VER MEDIA RAPIDA 🐇")
input fastMovAvgType = {default "SMA", "EMA", "WMA", "VWMA", "SMMA", "DEMA", "TEMA", "Hull", "ZEMA", "TMA", "SSMA"};
input fastMovAvgLength  = 8;#, title="🔹 Periodo =", minval=1)
input fastMovAvgSource  = close;#, title="🔹 Fuente =")
input fastMovAvgTrendLookback = 1;#, title="🔹 Reaccion =", minval=1)
input uptrendCond = {"NO CONDITION", "PRICE ABOVE FAST MA", "PRICE ABOVE SLOW MA", "PRICE ABOVE FAST/SLOW MA", "PRICE ABOVE SLOW MA AND BULLISH", "PRICE ABOVE FAST MA AND BULLISH", "PRICE ABOVE SLOW/FAST MA AND BULLISH", "SLOW MA BULLISH DIRECTION", "FAST MA BULLISH DIRECTION", default "AVG SLOW/FAST MA BULLISH DIRECTION"};
input downtrendCond = {"NO CONDITION", "PRICE BELOW FAST MA", "PRICE BELOW SLOW MA", "PRICE BELOW FAST/SLOW MA", "PRICE BELOW SLOW MA AND BEARISH", "PRICE BELOW FAST MA AND BEARISH", "PRICE BELOW SLOW/FAST MA AND BEARISH", "SLOW MA BEARISH DIRECTION", "FAST MA BEARISH DIRECTION", default "AVG SLOW/FAST MA BEARISH DIRECTION"};
input minBarBodyPer = 30;#, title="🔹 PORCENTAJE DE CUERPO MINIMO % =", minval=1, maxval=99)
#input colorBar  = no;#, title="PINTAR BARRA DE CONTROL")
#input VEBC      = no;#, title="VER ETIQUETA BARRA DE CONTROL")
input minIgnoredBarBodyPer = 30;#, title="🔹 ARRIBA DE X% DE LA BARRA DE CONTROL =", minval=0, maxval=99)
#input PBI       = no;#, title="PINTAR BARRA IGNORADA")
input overrideMinIgnoredBar = no;#, title="NO PUEDE ANULAR EL MINIMO DE LA BARRA IGNORADA")
input colorSignalBar = no;#, title="PINTAR BARRA DE SEÑAL")
#input VEBS      = yes;#, title="VER FLECHA")
#input VO        = yes;#, title="VER OSO  🐻  Y FLECHA")
#input VT        = yes;#, title="VER TORO 🐂  Y FLECHA")
input showTpSlLines = yes;#, title="VER STOP LOSS Y TAKE PROFIT RECOMENDADO ")
input trendDirection = {default "Bull", "Bear"}; #    input(defval="VRI", title="🔹 PARA =", options=)
input extendSlLineBy = 4;#, title="🔹 EXTENDER LINEA STOP LOSS X BARRAS =", minval=1, maxval=99)
input extendTpLineBy = 6;#, title="🔹 EXTENDER LINEA TAKE PROFIT X BARRAS =", minval=1, maxval=99)
input slMulti = 1;#, title="🔹 RATIO PARA MOVER A BREAK EVEN =", minval=1, maxval=10,step=0.1)
input TakeProfit1Multi = 2;#, title="🔹 RATIO TAKE PROFIT 1 =", minval=1, maxval=10,step=0.1)
input TakeProfit2Multi = 4;#, title="🔹 RATIO TAKE PROFIT 2 =", minval=2, maxval=10,step=0.1)

def na = Double.NaN;
def VRI_ON = showIgnoredRedCandles;
def VVI_ON = showIgnoredGreenCandles;

DefineGlobalColor("negro", Color.BLACK);#=#000000
DefineGlobalColor("blanco", CreateColor(253, 254, 254));#=#FDFEFE
DefineGlobalColor("rojo", Color.RED);#=#FF0000
DefineGlobalColor("verde", CreateColor(0, 255, 19));#=#00FF13
DefineGlobalColor("verde_fuerte", CreateColor(10, 172, 0));#=#0AAC00
DefineGlobalColor("azul", CreateColor(0, 0, 255));#=#0000ff
DefineGlobalColor("violeta", CreateColor(79, 5, 79));#=#4f054f

script rising{
    input src = close;
    input len = 3;
        def cnt = fold i = 0 to len with p=1 while p do
                   GetValue(src, i) > GetValue(src, i+1);
    plot rising = cnt;
}
script falling{
    input src = close;
    input len = 3;
        def cnt = fold i = 0 to len with p=1 while p do
                  GetValue(src, i) < GetValue(src, i+1);
    plot falling = cnt;
}
script VWMA {
    input src = close;
    input len = 14;
    input vol = volume;
    def nom = Average(src * vol, len);
    def den = Average(vol, len);
    def VWMA = nom / den;
    plot result = VWMA;
}
script supersmoother {
    input src = close;
    input len = 14;
    def pi = 1.414 * Double.Pi;
    def a1 = Exp(- pi / len);
    def b1 = 2 * a1 * Cos(pi / len);
    def c2 = b1;
    def c3 = (-a1) * a1;
    def c1 = 1 - c2 - c3;
    def v9 = if IsNaN(src + src[1]) then v9[1] else
             c1 * ( src + src[1]) / 2 + c2 * v9[1] + c3 * v9[2];
    plot out = if !IsNaN(src) then v9 else Double.NaN;
}
script smoothed {
    input src = close;
    input len = 14;
    def sma = Average(src, len);
    def v5 = if !v5[1] then sma else (v5[1] * (len - 1) + src) / len;
    plot out = v5;
}
script zerolagema {
    input src = close;
    input len = 14;
    def ema1 = ExpAverage(src, len);
    def ema2 = ExpAverage(ema1, len);
    def v10 = ema1 + (ema1 - ema2);
    plot out = v10;
}
script variant {
    input type = "SMA";
    input src = close;
    input len = 14;
    def variant =
        if type == "SMA"   then Average(src, len) else
        if type == "EMA"   then ExpAverage(src, len) else
        if type == "WMA"   then WMA(src, len) else
        if type == "VWMA"  then vwma(src, len) else
        if type == "SMMA"  then smoothed(src, len) else
        if type == "DEMA"  then DEMA(src, len) else
        if type == "TEMA"  then TEMA(src, len) else
        if type == "Hull" then HullMovingAvg(src, len) else
        if type == "SSMA"  then supersmoother(src, len) else
        if type == "ZEMA"  then zerolagema(src, len) else
        if type == "TMA"   then Average(Average(src, len), len) else Average(src, len);
    plot out = variant;
}
def VRI_0 = close[2] > open[2] and open[1] > close[1] and close[0] > open[0];
def VVI_0 = open[2] > close[2] and close[1] > open[1] and open[0] > close[0];
def VRI_1 = VRI_0 and high[0] >=  open[1];
def VVI_1 = VVI_0 and low[0] <= open[1];
def VRI_2 = VRI_1 and low[1] > low[2];
def VVI_2 = VVI_1 and high[1] < high[2];

def ma_series = variant(slowMovAvgType, slowMovAvgSource, slowMovAvgLength);# // media lenta
def ma_series_b = variant(fastMovAvgType, fastMovAvgSource, fastMovAvgLength);# // media rapida

def direction = if rising(ma_series,slowMovAvgTrendLookback) then   1 else
                if falling(ma_series,slowMovAvgTrendLookback) then -1 else direction[1];
def change_direction= direction - direction[1];

def direction_b = if rising(ma_series_b,fastMovAvgTrendLookback)  then  1 else
                  if falling(ma_series_b,fastMovAvgTrendLookback) then -1 else direction_b[1];
def change_direction_b = direction_b - direction_b[1];
def pcol = if direction>0 then 1 else
           if direction<0 then -1 else 0;
def pcol_b = if direction_b>0 then  1 else
             if direction_b<0 then -1 else 0;

def PMAMR = uptrendCond == uptrendCond."PRICE ABOVE FAST MA" and close > ma_series_b;
def PMAML = uptrendCond == uptrendCond."PRICE ABOVE SLOW MA" and close > ma_series;
def PMAMRYL = uptrendCond == uptrendCond."PRICE ABOVE FAST/SLOW MA" and close > ma_series and close > ma_series_b;
def PMAMLYDA = uptrendCond == uptrendCond."PRICE ABOVE SLOW MA AND BULLISH" and close > ma_series and direction > 0;
def PMAMRYDA = uptrendCond == uptrendCond."PRICE ABOVE FAST MA AND BULLISH" and close > ma_series_b and direction_b > 0;
def PMAMLRYDA = uptrendCond == uptrendCond."PRICE ABOVE SLOW/FAST MA AND BULLISH" and close > ma_series and close > ma_series_b and direction > 0 and direction_b > 0;
def DMLA = uptrendCond == uptrendCond."SLOW MA BULLISH DIRECTION" and direction > 0;
def DMRA = uptrendCond == uptrendCond."FAST MA BULLISH DIRECTION" and direction_b > 0;
def DMLRA = uptrendCond == uptrendCond."AVG SLOW/FAST MA BULLISH DIRECTION" and direction > 0 and direction_b > 0;
def NCA = uptrendCond == uptrendCond."NO CONDITION";
def PMEAMR = downtrendCond == downtrendCond."PRICE BELOW FAST MA" and close < ma_series_b;
def PMEAML = downtrendCond == downtrendCond."PRICE BELOW SLOW MA" and close < ma_series;
def PMEAMRYL = downtrendCond == downtrendCond."PRICE BELOW FAST/SLOW MA" and close < ma_series and close < ma_series_b;
def PMEAMLYDB = downtrendCond == downtrendCond."PRICE BELOW SLOW MA AND BEARISH" and close < ma_series and direction < 0;
def PMEAMRYDB = downtrendCond == downtrendCond."PRICE BELOW FAST MA AND BEARISH" and close < ma_series_b and direction_b < 0;
def PMEAMLRYDB = downtrendCond == downtrendCond."PRICE BELOW SLOW/FAST MA AND BEARISH" and close < ma_series and close < ma_series_b and direction < 0 and direction_b < 0;
def DMLB = downtrendCond == downtrendCond."SLOW MA BEARISH DIRECTION" and direction < 0;
def DMRB = downtrendCond == downtrendCond."FAST MA BEARISH DIRECTION" and direction_b < 0;
def DMLRB = downtrendCond == downtrendCond."AVG SLOW/FAST MA BEARISH DIRECTION" and direction < 0 and direction_b < 0;
def NCB = downtrendCond == downtrendCond."NO CONDITION";

def VRI_3 = if VRI_2 and PMAMR then yes else
            if VRI_2 and PMAML then yes else
            if VRI_2 and PMAMRYL then yes else
            if VRI_2 and PMAMLYDA then yes else
            if VRI_2 and PMAMRYDA then yes else
            if VRI_2 and PMAMLRYDA then yes else
            if VRI_2 and DMLA then yes else
            if VRI_2 and DMRA then yes else
            if VRI_2 and DMLRA then yes else
            if VRI_2 and NCA then yes else no;       
def VVI_3 = if VVI_2 and PMEAMR then yes else
            if VVI_2 and PMEAML then yes else
            if VVI_2 and PMEAMRYL then yes else
            if VVI_2 and PMEAMLYDB then yes else
            if VVI_2 and PMEAMRYDB then yes else
            if VVI_2 and PMEAMLRYDB then yes else
            if VVI_2 and DMLB then yes else
            if VVI_2 and DMRB then yes else
            if VVI_2 and DMLRB then yes else
            if VVI_2 and NCB then yes else no;
def VRI_3_A = if VRI_1 and PMAMR then yes else
              if VRI_1 and PMAML then yes else
              if VRI_1 and PMAMRYL then yes else
              if VRI_1 and PMAMLYDA then yes else
              if VRI_1 and PMAMRYDA then yes else
              if VRI_1 and PMAMLRYDA then yes else
              if VRI_1 and DMLA then yes else
              if VRI_1 and DMRA then yes else
              if VRI_1 and DMLRA then yes else
              if VRI_1 and NCA then yes else no;
def VVI_3_A = if VVI_1 and PMEAMR then yes else
              if VVI_1 and PMEAML then yes else
              if VVI_1 and PMEAMRYL then yes else
              if VVI_1 and PMEAMLYDB then yes else
              if VVI_1 and PMEAMRYDB then yes else
              if VVI_1 and PMEAMLRYDB then yes else
              if VVI_1 and DMLB then yes else
              if VVI_1 and DMRB then yes else
              if VVI_1 and DMLRB then yes else
              if VVI_1 and NCB then yes else no;

#// 3- BARRA DE CONTROL CON UN CUERPO DE AL MENOS UN 55% (o valor configurado)
def VRI_4 = VRI_3 and AbsValue(open[2]-close[2]) *100/ AbsValue(high[2]-low[2]) >= minBarBodyPer;
def VVI_4 = VVI_3 and AbsValue(open[2]-close[2]) *100/ AbsValue(high[2]-low[2]) >= minBarBodyPer;
#// 4- BARRA IGNORADA ESTRECHA ARRIBA DEL 70% SUPERIOR DE LA BARRA DE CONTROL (o valor configurado)
def VRI_5 = VRI_4 and AbsValue(low[1]-low[2])*100/AbsValue(high[2]-low[2]) >= minIgnoredBarBodyPer;
def VVI_5 = VVI_4 and AbsValue(high[1]-high[2])*100/AbsValue(high[2]-low[2]) >= minIgnoredBarBodyPer;
#// 5- BARRA DE SEÑAL NO PUEDE ANULAR EL MINIMO DE LA BARRA IGNORADA
def VRI_6 = if VRI_5 and overrideMinIgnoredBar and low[0] >= low[1] then yes else
            if VRI_5 and !overrideMinIgnoredBar then yes else no;
def VVI_6 = if VVI_5 and overrideMinIgnoredBar and high[0] <= high[1] then yes else
            if VVI_5 and !overrideMinIgnoredBar then yes else no;

#// RESULTADO
def RES_VRI = if VRI_6 and VRI_ON and modo_tipo == modo_tipo."Complete Filter"  then yes else
              if VRI_1 and VRI_ON and modo_tipo == modo_tipo."No Filter" then yes else
              if VRI_3_A and VRI_ON and modo_tipo == modo_tipo."Trend Filter" then yes else no;
def RES_VVI = if VVI_6 and VVI_ON and modo_tipo == modo_tipo."Complete Filter" then yes else
              if VVI_1 and VVI_ON and modo_tipo == modo_tipo."No Filter" then yes else
              if VVI_3_A and VVI_ON and modo_tipo == modo_tipo."Trend Filter" then yes else no;

AddChartBubble(RES_VRI, low, "️VRI", GlobalColor("verde_fuerte"), no);
AddChartBubble(RES_VVI, high, "️VVI", GlobalColor("rojo"));

plot ma1 = if showSlowMovAvg then ma_series else na;#, color=pcol
plot ma2 = if showFastMovAvg then ma_series_b else na;#, color=pcol_b

ma1.AssignValueColor(if pcol>0 then GlobalColor("verde") else
                     if pcol<0 then GlobalColor("rojo") else Color.GRAY);
ma2.AssignValueColor(if pcol_b>0 then GlobalColor("verde") else
                     if pcol_b<0 then GlobalColor("rojo") else Color.GRAY);


AssignPriceColor(if !colorSignalBar then Color.CURRENT else
                 if RES_VRI then Color.CYAN else
                 if RES_VVI then Color.MAGENTA else Color.CURRENT);

#/ TOMA DE GANANCIA / PERDIDA RECOMENDADAS

def atr = atr(Length = 50) * 0.5;
#dt = time - time[1]

def UR_VRI = AbsValue(open[1] - low[1]);
def BE_VRI = open[1] + UR_VRI * slMulti;
def TP1_VRI= open[1] + UR_VRI * TakeProfit1Multi;
def TP2_VRI= open[1] + UR_VRI * TakeProfit2Multi;

def UR_VVI = AbsValue(open[1] - high[1]);
def BE_VVI = open[1] - UR_VVI * slMulti;
def TP1_VVI= open[1] - UR_VVI * TakeProfit1Multi;
def TP2_VVI= open[1] - UR_VVI * TakeProfit2Multi;

def vriLine1; def vriLine2; def vriLine3; def vriLine4;def vriCnt;

if RES_VRI == 1 and showTpSlLines and trendDirection == trendDirection."Bull" {
    vriCnt   = 0;
    vriLine1 = low[1];
    vriLine2 = BE_VRI;
    vriLine3 = TP1_VRI;
    vriLine4 = TP2_VRI;
    } else {
    vriCnt   = vriCnt[1] + 1;
    vriLine1 = if vriCnt > extendSlLineBy + 1 then na else vriLine1[1];
    vriLine2 = if vriCnt > extendTpLineBy + 3 then na else vriLine2[1];
    vriLine3 = if vriCnt > extendTpLineBy + 3 then na else vriLine3[1];
    vriLine4 = if vriCnt > extendTpLineBy + 3 then na else vriLine4[1];
}
plot vriSL = vriLine1[-1];
plot vriEntry = vriLine2[-3];
plot vriTp1   = vriLine3[-3];
plot vriTp2   = vriLine4[-3];

vriSL.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
vriEntry.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
vriTp1.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
vriTp2.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
vriSL.SetDefaultColor(Color.MAGENTA);
vriEntry.SetDefaultColor(color.GRAY);
vriTp1.SetDefaultColor(Color.CYAN);
vriTp2.SetDefaultColor(Color.CYAN);

def vviLine1; def vviLine2; def vviLine3; def vviLine4;def vviCnt;

if RES_VVI == 1 and showTpSlLines and trendDirection == trendDirection."Bear" {
    vviCnt   = 0;
    vviLine1 = high[1];
    vviLine2 = BE_VVI;
    vviLine3 = TP1_VVI;
    vviLine4 = TP2_VVI;
    } else {
    vviCnt   = vviCnt[1] + 1;
    vviLine1 = if vviCnt > extendSlLineBy + 1 then na else vviLine1[1];
    vviLine2 = if vviCnt > extendTpLineBy + 3 then na else vviLine2[1];
    vviLine3 = if vviCnt > extendTpLineBy + 3 then na else vviLine3[1];
    vviLine4 = if vviCnt > extendTpLineBy + 3 then na else vviLine4[1];
}
plot vviSL = vviLine1[-1];
plot vviEntry = vviLine2[-3];
plot vviTp1   = vviLine3[-3];
plot vviTp2   = vviLine4[-3];

vviSL.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
vviEntry.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
vviTp1.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
vviTp2.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
vviSL.SetDefaultColor(Color.MAGENTA);
vviEntry.SetDefaultColor(color.GRAY);
vviTp1.SetDefaultColor(Color.CYAN);
vviTp2.SetDefaultColor(Color.CYAN);


#-- END of CODE
 
Elephant bar strategy 80% WIN RATE - ANY CODERS ON THINK OR SWIM Please consider coding this and automating buys and sells when the bar is located crossing the 20x200 SMA'S long or short. I want to automatically set buys and sells when this event happens. CONVERT TO TOS - Please check to make sure it works. THANKS. You are pretty amazing. Wish I had found you sooner! CONVERT TO TOS - https://www.tradingview.com/script/yV11ifDS-Elephant-Bar-by-Oliver-Velez/ Also need dynamic watch list.

The original code is very weak and contains many false signals. Red and green bars ignored must be separated from elephant bars at or crossing the 20x200. Thank you. I'm using a 1-minute, 2-minute, or 5-minute chart for day trading.

Could I not set up a wait till 20x200 and either buy or sell. buy when above sell below and have it automated to bu and sell using the order screen.

Creating an Automated Trading Strategy in ThinkorSwim​

Thanks for your help!
 
Last edited by a moderator:
I want to automatically set buys and sells when this event happens.

The video that you referenced is creating a backtested strategy. It shows what orders would have triggered in the history of the chart. This is not REAL orders.
Yes, overfitted backtested strategies do tend to look amazing. Read more:
https://usethinkscript.com/threads/vip-questions.3790/page-26#post-141289
These strategies are not promoted on this forum.

No, the ToS platform does not support real automatic buy or sells
Yes, you can set up a conditional order, but it is manual, and it only executes once.
read more: https://usethinkscript.com/threads/...rders-in-thinkorswim.15540/page-3#post-126271
 
Last edited by a moderator:

Similar threads

Not the exact question you're looking for?

Start a new thread and receive assistance from our community.

87k+ Posts
325 Online
Create Post

Similar threads

Similar threads

The Market Trading Game Changer

Join 2,500+ subscribers inside the useThinkScript VIP Membership Club
  • Exclusive indicators
  • Proven strategies & setups
  • Private Discord community
  • ‘Buy The Dip’ signal alerts
  • Exclusive members-only content
  • Add-ons and resources
  • 1 full year of unlimited support

Frequently Asked Questions

What is useThinkScript?

useThinkScript is the #1 community of stock market investors using indicators and other tools to power their trading strategies. Traders of all skill levels use our forums to learn about scripting and indicators, help each other, and discover new ways to gain an edge in the markets.

How do I get started?

We get it. Our forum can be intimidating, if not overwhelming. With thousands of topics, tens of thousands of posts, our community has created an incredibly deep knowledge base for stock traders. No one can ever exhaust every resource provided on our site.

If you are new, or just looking for guidance, here are some helpful links to get you started.

What are the benefits of VIP Membership?
VIP members get exclusive access to these proven and tested premium indicators: Buy the Dip, Advanced Market Moves 2.0, Take Profit, and Volatility Trading Range. In addition, VIP members get access to over 50 VIP-only custom indicators, add-ons, and strategies, private VIP-only forums, private Discord channel to discuss trades and strategies in real-time, customer support, trade alerts, and much more. Learn all about VIP membership here.
How can I access the premium indicators?
To access the premium indicators, which are plug and play ready, sign up for VIP membership here.
Back
Top