Koersbar up inwendig kleuren

Stel hier uw vragen over TA-script, of help anderen met het oplossen van hun probleem
Theo316
Berichten: 141
Lid geworden op: di dec 04, 2007 2:39 pm

Koersbar up inwendig kleuren

Bericht door Theo316 » do nov 26, 2015 8:19 pm

Hallo
Ik zou graag de opwaartse koersbar inwendig (lichaam opvullen met een kleur (bijv groen lichaam )
Neerwaarts is dat al opgevuld
Als het kan graag uitwendige lijn zwart
Iemand een idee of dit in ws pro mogelijk is
Bij voorbaat dank

Theo316
Berichten: 141
Lid geworden op: di dec 04, 2007 2:39 pm

Re: Koersbar up inwendig kleuren

Bericht door Theo316 » wo feb 24, 2016 3:08 pm

Ik begrijp dat dit niet in W.S mogelijk is

Janus
Berichten: 1322
Lid geworden op: wo jan 30, 2008 2:07 am
Contacteer:

Re: Koersbar up inwendig kleuren

Bericht door Janus » wo feb 24, 2016 11:56 pm

Klopt, je kan wel de koersbar in zijn geheel een kleur geven maar niet een gedeelte van de koersbar.
.
Vriendelijke groet,
JanS ;)

Theo316
Berichten: 141
Lid geworden op: di dec 04, 2007 2:39 pm

Re: Koersbar up inwendig kleuren

Bericht door Theo316 » do feb 25, 2016 1:48 am

Nog even een vraag
Kan je de koers bar up wel inwendig groen kleuren of is dit ook niet mogelijk (dus de hele candle de zelfde kleur)
bvd Theo316

Janus
Berichten: 1322
Lid geworden op: wo jan 30, 2008 2:07 am
Contacteer:

Re: Koersbar up inwendig kleuren

Bericht door Janus » do feb 25, 2016 9:02 am

Je kan een koers bar een kleur geven met de functies SetBarColor() en SetParentBarColor()
De rest van de ta-script code eromheen bepaalt dan welke bar(s) wat voor kleur krijgen in een bepaalde situatie.
.
Vriendelijke groet,
JanS ;)

Eric
Berichten: 3127
Lid geworden op: za sep 10, 2005 2:41 am
Locatie: Den Haag

Re: Koersbar up inwendig kleuren

Bericht door Eric » vr feb 26, 2016 12:34 am

Theo316 schreef:Nog even een vraag
Kan je de koers bar up wel inwendig groen kleuren of is dit ook niet mogelijk (dus de hele candle de zelfde kleur)
bvd Theo316
Nee, een stijgende candle is altijd "hol".

---
Eric

Circum
Berichten: 277
Lid geworden op: do aug 20, 2009 3:35 pm
Contacteer:

Re: Koersbar up inwendig kleuren

Bericht door Circum » di mar 01, 2016 9:59 pm

Theo en anderen

Sjoemelsoftware is in 2015 verkozen tot woord van het jaar. Van mij mag deze titel dit jaar geprolongeerd worden. Dit type software heeft namelijk ongekende mogelijkheden.

In het script hieronder wordt driftig gemanipuleerd met de Open en Close. Hierdoor wordt letterlijk elke candle wijs gemaakt dat hij (m/v) zowel stijgt als daalt. Dat geeft de gebruiker vervolgens de mogelijkheid om alle CandleBody's te vullen en om – indien gewenst - het Frame en de Wick een afwijkend kleurtje te geven.

Plaatje ter illustratie
Afbeelding

Wanneer je het script uitprobeert wijst het zich denk ik vanzelf. Onder het menu parameters zijn de nodige user-choises opgenomen.
Om de Filled Candles zo goed mogelijk in beeld te hebben voeg ik dit script meestal als laatste toe aan de koersgrafiek. De candles worden dan bovenop eventuele andere overlay indicators geplot.

In het script wordt dus flink gesjoemeld met de Open en de Close. Je moet er om die reden wel voor oppassen dat je geen andere indicatoren laat rekenen met dit script.

Plezier ermee en ik hoor wel of dit de bedoeling is
Circum

Code: Selecteer alles

{- Filename: CandleFill -}
                                          // *** version 02.04. - 2015-12-05 ***
// === Variables ===============================================================

var 
  i                        : integer; 
  bFill,bWick,bClOp        : boolean;
  sOp1,sCl1,sOp2,sCl2,sMCl : TSeries;
  cUp,cDw,cEq,cWi          : TColor;

// === BEGIN ===================================================================

BEGIN 

  // --- Indicator Properties -------------------------------------------------- 

  with Indicator do 
  begin
    ShortName       := 'CF';
    RequiredBars    := 100; 
    NewBand         := false;
    ScaleRange      := srCommon; 
    HiddenParams    := true; 
  end;
 
  // --- Indicator Parameters --------------------------------------------------
  
  bFill := CreateParameterBoolean('  == Fill Candles  ================',
                                                                    true,false);
  bClOp := CreateParameterBoolean('  == Color Based On Previous Close  ===',
                                                                    true,false);
  cUp   := CreateParameterColor('              UpColor', RGB(0,185,0));
  cDw   := CreateParameterColor('              DownColor', clRed);
  cEq   := CreateParameterColor('              EqualColor',RGB(255,128,0));
  bWick := CreateParameterBoolean('  == Frame + Wick Color  ===========',
                                                                    true,false);
  cWi   := CreateParameterColor('              Frame/Wick Color',
                                                              RGB(190,190,190));

  // --- Indicator Calculations & Set Filled Candles Colors --------------------

  // -------------------------------------------

  if bFill then
  begin
   // ------------------------------
    sOp1  := CreateSeries(BarCount); 
    sCl1  := CreateSeries(BarCount);
    sOp2  := CreateSeries(BarCount); 
    sCl2  := CreateSeries(BarCount);
    sMCl  := Momentum(Close,1);
    // -----------------------------
    for i := 0 to BarCount-1 do 
    if IsValid(sMCl[i]) then
    begin 
      // ----------
      if Close[i] < Open[i] then sOp1[i] := Close[i] else sOp1[i] := Open[i]; 
      if Close[i] < Open[i] then sCl1[i] := Open[i]  else sCl1[i] := Close[i];
      // ----------
      if Close[i] > Open[i] then sOp2[i] := Close[i] else sOp2[i] := Open[i]; 
      if Close[i] > Open[i] then sCl2[i] := Open[i]  else sCl2[i] := Close[i];
     // ----------
     if not bClOp then
     begin
        if Open[i] > Close[i] then SetBarColor(0,i,cDw);
        if Open[i] < Close[i] then SetBarColor(0,i,cUp);
        if Open[i] = Close[i] then SetBarColor(0,i,cEq);
     end;
     // ----------
     if bClOp then
     begin
        if sMCl[i] < 0 then SetBarColor(0,i,cDw);
        if sMCl[i] > 0 then SetBarColor(0,i,cUp);
        if sMCl[i] = 0 then SetBarColor(0,i,cEq);
      end;
      // ----------
      if bWick then
      begin      
        if sMCl[i] < 0 then SetBarColor(1,i,cWi);
        if sMCl[i] > 0 then SetBarColor(1,i,cWi);
        if sMCl[i] = 0 then SetBarColor(1,i,cWi);
      end;
      // ----------
      if not bWick then
      begin
        if sMCl[i] < 0 then SetBarColor(1,i,cDw);
        if sMCl[i] > 0 then SetBarColor(1,i,cUp);
        if sMCl[i] = 0 then SetBarColor(1,i,cEq);
      end;
      // ----------
    end;
   // ------------------------------
  end; 

  // -------------------------------------------
   
  if not bFill then
  begin
    sOp1  := CreateSeries(BarCount); 
    sCl1  := CreateSeries(BarCount);
    sOp2  := CreateSeries(BarCount); 
    sCl2  := CreateSeries(BarCount);
  end;  

  // -------------------------------------------

  // --- Plot Filled Candles ---------------------------------------------------

  // -------------------------------------------

  with CreateLineOHLC(sOp2, High, Low, sCl2) do 
  begin 
    Name   := 'BodyFill'; 
    Color  := clGray;
  end; 

  // -------------------------------------------

  with CreateLineOHLC(sOp1, High, Low, sCl1) do 
  begin 
    Name   := 'Frame/Wick'; 
    Color  := clGray;
  end; 

  // -------------------------------------------

  // ---------------------------------------------------------------------------

END.

//=== END ======================================================================
`

Janus
Berichten: 1322
Lid geworden op: wo jan 30, 2008 2:07 am
Contacteer:

Re: Koersbar up inwendig kleuren

Bericht door Janus » di mar 01, 2016 11:58 pm

Sjoemelsoftware ...die Circum .. VW-medewerker? :)
Vriendelijke groet,
JanS ;)

Eric
Berichten: 3127
Lid geworden op: za sep 10, 2005 2:41 am
Locatie: Den Haag

Re: Koersbar up inwendig kleuren

Bericht door Eric » wo mar 02, 2016 12:09 am

Heel creatief!

Goed bedacht en uitgevoerd Circum!

---
Eric

Theo316
Berichten: 141
Lid geworden op: di dec 04, 2007 2:39 pm

Re: Koersbar up inwendig kleuren

Bericht door Theo316 » wo mar 02, 2016 12:36 am

Bedankt voor je mooie oplossing
Ben er erg blij mee

Circum
Berichten: 277
Lid geworden op: do aug 20, 2009 3:35 pm
Contacteer:

Re: Koersbar up inwendig kleuren

Bericht door Circum » wo mar 02, 2016 7:58 pm

Dank voor de reacties
En Janus .... wordt voor mij dus de DE-verfilming van 'The Big Short' .... 'Die Große Kurz' dus. :wink:
`

Cash
Berichten: 93
Lid geworden op: za okt 16, 2010 12:08 pm

Re: Koersbar up inwendig kleuren

Bericht door Cash » zo mar 06, 2016 3:33 pm

Mooi bedankt.
Kijk ook heel regelmatig op je Blog, heel inspirerend!
Groet,
Cash
Groet Cash

Theo316
Berichten: 141
Lid geworden op: di dec 04, 2007 2:39 pm

Re: Koersbar up inwendig kleuren

Bericht door Theo316 » do feb 13, 2020 6:49 pm

Goedenavond
Koersbar inwendig kleuren (zou dit ook kunnen met heikin ashi candels ? )
Of is dit niet mogelijk
Bvd Theo316

Eric
Berichten: 3127
Lid geworden op: za sep 10, 2005 2:41 am
Locatie: Den Haag

Re: Koersbar up inwendig kleuren

Bericht door Eric » vr feb 14, 2020 11:46 am

Dat zou best mogelijk zijn, maar omdat het een "sjoemeloplossing" is heeft het niet mijn voorkeur om die in andere indicatoren over te nemen.

Ik heb in plaats daarvan een nieuw lijntype geïntroduceerd in de komende versie van Wall Street. Deze versie is nog in ontwikkeling, maar als je wilt kun je deze al installeren (hij staat op de downloadpagina helemaal onderaan). Het nieuwe lijntype (gevulde candlestick) is daarin opgenomen, en je kunt dat dan voor alle indicatoren gebruiken die een candle kunnen weergeven.

---
Eric
Bijlagen
aex.GIF

Theo316
Berichten: 141
Lid geworden op: di dec 04, 2007 2:39 pm

Re: Koersbar up inwendig kleuren

Bericht door Theo316 » za feb 15, 2020 12:51 am

Bedankt maar weer
Het nieuwe lijntype is een mooie oplossing
Mocht het in de toekomst mogelijk zijn om de Frame/Wick zwart te kleuren zou helemaal geweldig zijn
Met vriendelijke groet Theo316

Plaats reactie