Programmazione Visual Trader Raccolta indicatori e TS per Visualtrader (2 lettori)

borg72

Nuovo forumer
Inverse Fisher Transformas RSI

Inverse Fisher Transformas RSI

Codice:
{ ***  Inverse Fisher Transformas RSI ***
 *** Interpretazione dei segnali ***
Segnale d'acquisto : quando l'indicatore incrocia a rialzo la soglia di 50.
Segnale di vendita: quando l'indicatore si trova sopra il livello di 80 e incrocia a ribasso questa stessa soglia.
Vendita allo scoperto: quando l'indicatore incrocia a ribasso la soglia di 50.
Acquisto allo scoperto: quando l'indicatore si trova sotto la soglia di 20 e incrocia a rialzo questo stesso livello.
}
//var X Stocastico
Var: miostochD (0), miostochK (0),  par1(14), par2(3), pardl(14);
//var per Inverse Fisher Transformas RSI
Var: IFTR;
//var per ts
Var: x(0), y(0);
//var per Plotting
Var: IFTR_View;

// valorizzo Stocastico
miostochK = STOCHK (C, par1, par2);
//calcolo ts
x=0.1*(miostochK-50);
y=(EXP(2*x)-1)/(EXP(2*x)+1);
IFTR=50*(y+1);

//Plotto l'indicatore
IFTR_View=CreateViewport(200,0,true);
plotchart(IFTR,IFTR_View,blue, solid, 2);
plotchart(20,IFTR_View,red, solid, 2);
plotchart(50,IFTR_View,black, solid, 2);
plotchart(80,IFTR_View,green, solid, 2);
 
Ultima modifica:

borg72

Nuovo forumer
Canale di Donchian

Canale di Donchian

Codice:
{ *** Canale di Donchian ***

Definizione:
   - Questo indicatore, creato da Richard Donchian, permette di visualizzare il
   massimo dei massimi e il minimo dei minini sugli ultimi N periodi.
}

//Var per canale di Donchian
Var: mioMassimo, mioMinimo, UpperChannelLine, LowerChannelLine, MidChannelLine, p(14);
//var per Plotting
Var: DC_View;

mioMassimo = HHV(H, p);
mioMinimo = LLV(L, p);

UpperChannelLine = mioMassimo[1];
LowerChannelLine = mioMinimo[1];
MidChannelLine = (UpperChannelLine + LowerChannelLine)/2;

plotchart(UpperChannelLine,0,blue, solid, 2);
plotchart(MidChannelLine,0,black, solid, 2);
plotchart(LowerChannelLine,0,blue, solid, 2);
 

100pezzi

Nuovo forumer
CHANDE KROLL STOP

Codice:
Var: PrelimStop1, ActualStop1, PrelimStop2, ActualStop2;
Input: Pds1(10), Mult(3), Pds2(20);

SETCALCOSCARRAY(true);

PrelimStop1= HHV(H,Pds1) - ATR(c,Pds1)*Mult;
ActualStop1= HHV(PrelimStop1,Pds2);

PrelimStop2= LLV(L,Pds1) + ATR(c,Pds1)*Mult;
ActualStop2= LLV(PrelimStop2,Pds2);

plotchart(ActualStop1,0,black,solid,2);
PlotChart(ActualStop2, 0,red, solid, 2);
 

ivan8

Nuovo forumer
C'e' qualcuno che puo trasformare questo codice del CVD in linguaggio del VT
Plots Cumulative Delta
//
// Start at the begining of day and plot as a 'bar'
//
inputs:
UpColor(darkgreen),
DownColor(red),
MaxBlock(9999),
MinBlock(0),
ResetDeltaEachBar(0);

variables:
MyVol(0),
Block(0),
color(yellow),
firstrunthrough(true),
intrabarpersist MyCurrentBar(0),
intrabarpersist VolTmp(0),
intrabarpersist Deltac (0),
intrabarpersist DeltaH (0),
intrabarpersist DeltaL (0),
intrabarpersist DeltaO (0);

if firstrunthrough then begin // We need to do this in case indicator starts mid bar
Voltmp = Iff(BarType < 2, Ticks, Volume);
firstrunthrough = False;
end;

if LastBarOnChart then begin
if CurrentBar > MyCurrentBar then begin
VolTmp = 0;
MyCurrentBar = CurrentBar;
if ResetDeltaEachbar = 1 then Deltac =0;
DeltaO = Deltac;
DeltaH = Deltac;
DeltaL = Deltac;
end;
MyVol = Iff(BarType < 2, Ticks, Volume);
Block = Myvol - VolTmp;
if (Block >= MinBlock) and (Block <= MaxBlock) then
if Close <= InsideBid then
Deltac = Deltac - MyVol + VolTmp
else if Close >= InsideAsk then
Deltac = Deltac + MyVol - VolTmp ;
VolTmp = MyVol ;


DeltaH = maxlist(DeltaH, Deltac);
DeltaL = minlist(DeltaL, Deltac);


if Deltac <= Deltal[1] then
color = DownColor
else
if Deltac >= Deltah[1] then
color = UpColor
else
color = color[1];

plot1(DeltaO, "DO",color);
Plot2(DeltaH, "DH",color);
Plot3(DeltaL, "DL",color);
plot4(Deltac, "DC",color);
end;
 

ivan8

Nuovo forumer
Plots Cumulative Delta
//
// Start at the begining of day and plot as a 'bar'
//
inputs:
UpColor(darkgreen),
DownColor(red),
MaxBlock(9999),
MinBlock(0),
ResetDeltaEachBar(0);

variables:
MyVol(0),
Block(0),
color(yellow),
firstrunthrough(true),
intrabarpersist MyCurrentBar(0),
intrabarpersist VolTmp(0),
intrabarpersist Deltac (0),
intrabarpersist DeltaH (0),
intrabarpersist DeltaL (0),
intrabarpersist DeltaO (0);

if firstrunthrough then begin // We need to do this in case indicator starts mid bar
Voltmp = Iff(BarType < 2, Ticks, Volume);
firstrunthrough = False;
end;

if LastBarOnChart then begin
if CurrentBar > MyCurrentBar then begin
VolTmp = 0;
MyCurrentBar = CurrentBar;
if ResetDeltaEachbar = 1 then Deltac =0;
DeltaO = Deltac;
DeltaH = Deltac;
DeltaL = Deltac;
end;
MyVol = Iff(BarType < 2, Ticks, Volume);
Block = Myvol - VolTmp;
if (Block >= MinBlock) and (Block <= MaxBlock) then
if Close <= InsideBid then
Deltac = Deltac - MyVol + VolTmp
else if Close >= InsideAsk then
Deltac = Deltac + MyVol - VolTmp ;
VolTmp = MyVol ;


DeltaH = maxlist(DeltaH, Deltac);
DeltaL = minlist(DeltaL, Deltac);


if Deltac <= Deltal[1] then
color = DownColor
else
if Deltac >= Deltah[1] then
color = UpColor
else
color = color[1];

plot1(DeltaO, "DO",color);
Plot2(DeltaH, "DH",color);
Plot3(DeltaL, "DL",color);
plot4(Deltac, "DC",color);
end;
 

bomberone1

Nuovo forumer
ALtri indicatori che sono rischiesti, qualcuno li ha?


  • Supertrend
  • Wvap
  • SuperVolume
  • Breakout della prima ora/mezzíora
  • Tick Distribution
  • Ematrend
  • Choppykiller
  • POC
  • PVP
  • Canale di Keltner
Il Supertrend e SuperVolume ne parlano spesso Malverti e Aldrovandi.
CIao
 

100pezzi

Nuovo forumer
ALtri indicatori che sono rischiesti, qualcuno li ha?


  • Supertrend
  • Wvap
  • SuperVolume
  • Breakout della prima ora/mezzíora
  • Tick Distribution
  • Ematrend
  • Choppykiller
  • POC
  • PVP
  • Canale di Keltner
Il Supertrend e SuperVolume ne parlano spesso Malverti e Aldrovandi.
CIao

Supertrend e wvap sono già inseriti nel thared - ematrend è un indicatore propietario di Malverti quindi in codice non è free, ma puoi trovare @ndytrend (sempre qui) che è molto simile.
Colgo l'occasione per ringraziarVi della collaborazione, confidando nella bravura e volontà di tutti quanti vogliano inserire altri indicatori.
 

bomberone1

Nuovo forumer
Volevo segnalare che da qualche post c'era un ragazzo che ha postato un sacco di pattern per visualtrader, tipo l'uncino di ross e altro, non riesco a trovarlo.
 

100pezzi

Nuovo forumer
DPO

Codice:
{******************************************************************************
DPO
******************************************************************************}
Var:  cycle(14),DPO(0),SMA(0),SMA2(0),SMAcycle(0),Perccycle(0),DPOHH(0),DPOLL(0),MMDPO(0),DPOPerc(0),zoneDPO;
Var:  MM35;
MM35  = MOV(C, 35,2);
SMACycle = (cycle/2+1);
PercCycle =(cycle/2-1);
SMA = MOV (C,SMAcycle,3);
SMA2= MOV (C,cycle,1);
DPO = OP(C,SMA,sub);
DPOHH = HHV (DPO,(cycle/2)+2);
DPOLL = LLV (DPO,(cycle/2)+2);
MMDPO = MOV(DPO,5,2);
DPOPerc = OP(OP(constval(100),OP(HHV(DPO,cycle),LLV(DPO,cycle),sub),divis),DPO,mul);
Plotchart(MM35,0, blue, solid,1);
zoneDPO=CreateViewport(200,true,true);
Plotchart(DPOPerc,zoneDPO, red, solid,1);
 
Ultima modifica:

Users who are viewing this thread

Alto