Programmazione Visual Trader Raccolta indicatori e TS per Visualtrader

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:
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);
 
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);
 
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;
 
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;
 
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
 
bomberone1 ha scritto:
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
Clicca per allargare...

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.
 
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.
 
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:
You must log in or register to reply here.

Similar threads

Elico64
Trading_Systems: le basi Che trade fa: trasformiamo il metodo ciclico 2.0 in un Trading System
2 3 4 5 6
Risposte
51
Visite
15.647
Elico64
Elico64
Ignatius
Ho pubblicato la mia App per Android sul PlayStore! (il ritorno)
2
Risposte
16
Visite
260
Ignatius
Ignatius
franky1
Trump
7 8 9 10 11
Risposte
101
Visite
3.850
buy on rumorse
buy on rumorse
tontolina
Guerra infinita tra gli Anglo e la Russia
Risposte
3
Visite
541
tontolina
tontolina
tontolina
HUAWEI adesso fa anche auto elettriche
2
Risposte
10
Visite
1.497
tontolina
tontolina

Users who are viewing this thread

Total: 1 (members: 0, guests: 1)
Back
Alto