Raccolta di T.S. per Visual Trader
Mps: aumento capitale s’ha da fare o no ora? Il nodo Axa-Anima. Titolo ancora sotto attacco
Si sta per chiudere una settimana a dir poco concitata per Mps, la banca senese guidata dal ceo Luigi Lovaglio, alle prese con una operazione di aumento di
Inflazione monstre al 10% in Eurozona accresce pressioni su Bce. In Italia carrello spesa al top dal 1983
Nuova fiammata dell’inflazione in Italia che arriva a segnare a settembre un aumento dello 0,3% su base mensile e dell’8,9% su base annua (da +
Gas: l’Italia supererŕ l’inverno anche senza le forniture russe, a patto che…
Il tema del gas naturale continua a tenere banco sui mercati finanziari. Ieri il future con scadenza ottobre del TTF olandese, il benchmark europeo del prezzo del gas, č arrivato a cedere oltre il 10% in area 185 euro al megawattora, ossia un terzo in meno rispetto ai livelli di 280 euro a cui si
Tutti gli articoli
Tutti gli articoli Tutte le notizie

  1. #1
    L'avatar di xavier sardá
    Data Registrazione
    Jun 2008
    Messaggi
    12,944
    Mentioned
    2 Post(s)
    Quoted
    1201 Post(s)
    Potenza rep
    42949687

    Raccolta di T.S. per Visual Trader

    metto qui una serie di trading system da applicare con Visual Trader che possono tornare utili
    sono un programmatore scarso perciň correggetemi tranquillamente senza problemi in caso di errore o di percorso troppo macchinoso
    un mio professore diceva " chi non ha testa ha gambe "...santa verita

    ts BPW e BP
    estrae il pivot settimanale e giornaliero

    //______________Pivot BPW-BP______________//
    Var: newday1(false), mioopen(0), miomin(0), miomax(0), mioclose(0),BP(0);
    Var: newday(false),giorno,azzera(0),sOpen ,sLow,sHigh,sClose,BPW(0);

    newday1=GetValues(days,1,mioopen,miomin, miomax,mioclose);
    if newday=true then
    BP=(miomax+miomin+mioclose)/3;endif;

    newday=GetValues(weeks,1,sOpen,sLow,sHig h,sClose);
    giorno=dayofweek;
    azzera=iif(giorno<giorno[1],1,0);

    if azzera=1 then BPW=(SHigh+SLow+SClose)/3;endif;


    plotchart(BPW,0,green,solid,2);
    PlotChart(BP, 0,red, solid, 3);
    Anteprime Allegate Anteprime Allegate Clicca l'immagine per ingrandirla. 

Nome: ScreenShot025.png‎ 
Visualizzazioni: 592 
Dimensione: 73.3 KB 
ID: 1661984  

  2. #2
    L'avatar di xavier sardá
    Data Registrazione
    Jun 2008
    Messaggi
    12,944
    Mentioned
    2 Post(s)
    Quoted
    1201 Post(s)
    Potenza rep
    42949687
    ts massimo e minimo W & D
    estrae massimo e minimo settimanale e giornaliero

    //________Massimo e minimo settimanale e giornaliero______________________//


    Var: newday(false),giorno,azzera(0),sOpen,sLo w,sHigh,sClose,BPW;
    Var: wmax,wmin;
    Var: newday1(false), mioopen(0),miomin(0),miomax(0),mioclose( 0),dmax,dmin;



    newday=GetValues(weeks,1,sOpen,sLow,sHig h,sClose);
    giorno=dayofweek;
    azzera=iif(giorno<giorno[1],1,0);

    if azzera=1 then BPW=(SHigh+SLow+SClose)/3;
    WMAX=H;WMIN=L;
    else
    WMAX=iif(H>=WMAX[1],H,WMAX[1]);WMIN=iif(L<=WMIN[1],L,WMIN[1]);
    endif;


    if isfirstbarday then
    DMAX=H;DMIN=L;
    else
    DMAX=iif(H>=DMAX[1],H,DMAX[1]);DMIN=iif(L<=DMIN[1],L,DMIN[1]);
    endif;



    PlotChart(wmax, 0, green, solid, 2);
    PlotChart(wmin, 0, red, solid, 2);
    PlotChart(dmax, 0, green, dot, 1);
    PlotChart(dmin, 0, red, dot, 1);
    Anteprime Allegate Anteprime Allegate Clicca l'immagine per ingrandirla. 

Nome: ScreenShot026.png‎ 
Visualizzazioni: 330 
Dimensione: 66.8 KB 
ID: 1661988  

  3. #3
    L'avatar di xavier sardá
    Data Registrazione
    Jun 2008
    Messaggi
    12,944
    Mentioned
    2 Post(s)
    Quoted
    1201 Post(s)
    Potenza rep
    42949687
    ts bipolare
    estrae ottimizzazione movimento direzionale

    //____________________________Bipolare____ __________________//

    Var: pdx14,ndx14,op1,op2,op3,op4,adx14,indzon a1,indzona2,colore;



    pdx14=DMPDX(C,14);
    ndx14=DMNDX(C,14);
    op1= op(pdx14,ndx14,add);
    op2=op(pdx14,ndx14,sub);
    op3=op(op2,op1,divis);
    op4=wilder(op3,14);//bipolare

    Indzona1=CreateViewport(200,0,true);
    PlotChart(pdx14,Indzona1,green,solid,2);
    PlotChart(ndx14,Indzona1,red,solid,2);
    Indzona2=CreateViewport(400,0,true);
    PlotChart(op4,Indzona2,colore,istogramma ,2);

    if op4 > 0 then
    colore= green;
    else
    colore= red;
    endif;
    Anteprime Allegate Anteprime Allegate Clicca l'immagine per ingrandirla. 

Nome: ScreenShot027.png‎ 
Visualizzazioni: 386 
Dimensione: 64.6 KB 
ID: 1661990  

  4. #4
    L'avatar di Zino77
    Data Registrazione
    Oct 2008
    Messaggi
    5,663
    Mentioned
    17 Post(s)
    Quoted
    963 Post(s)
    Potenza rep
    42949686
    Ciao
    ho provato a copiare il codice del "Massimo e minimo settimanale e giornaliero" ma mi da un errore di sintassi ..

    Verifica Formula ... Errore
    Linea 8: Errore di sintassi: Mi aspetto i seguenti token: ( , ;

  5. #5
    L'avatar di Duck Bi
    Data Registrazione
    Sep 2007
    Messaggi
    340
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)
    Potenza rep
    5119040
    Citazione Originariamente Scritto da Zino77 Visualizza Messaggio
    Ciao
    ho provato a copiare il codice del "Massimo e minimo settimanale e giornaliero" ma mi da un errore di sintassi ..

    Verifica Formula ... Errore
    Linea 8: Errore di sintassi: Mi aspetto i seguenti token: ( , ;

    Elimina gli spazi in "sLo w" e "sHig h", poi tutto fila liscio
    Credo sia un problema del copia e incolla, evitabile con l' incolla dopo aver cliccato su # (racchiudi tra i tag).
    Ultima modifica di Duck Bi; 21-10-12 alle 21:17

  6. #6
    L'avatar di Zino77
    Data Registrazione
    Oct 2008
    Messaggi
    5,663
    Mentioned
    17 Post(s)
    Quoted
    963 Post(s)
    Potenza rep
    42949686

    Corretto, grazie!

  7. #7

    Data Registrazione
    Jun 2012
    Messaggi
    96
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)
    Potenza rep
    954004
    Molto utili grazie ma ho dei problemi con il bipolare. Che cosa puň essere? :O
    Anteprime Allegate Anteprime Allegate Clicca l'immagine per ingrandirla. 

Nome: Immagine1212.png‎ 
Visualizzazioni: 327 
Dimensione: 52.9 KB 
ID: 1662370  

  8. #8
    L'avatar di xavier sardá
    Data Registrazione
    Jun 2008
    Messaggi
    12,944
    Mentioned
    2 Post(s)
    Quoted
    1201 Post(s)
    Potenza rep
    42949687
    TS Ravi_Fisher


    //___________________________________ RAVI__Fisher____________________________ __//


    Var: fast(40),slow(300);
    Var: ATRFast,ATRSlow,cv3,TP_a,TP_b,Typical_Pr ice,maslow,mafast,mavalue,ifisha,
    ifishb,Ravi_FX_Fisher,zona1;


    //////////////////////////////////////////////////////////////////////////////////////////
    cv3=constval(3);
    TP_a=op(h,l,add);
    TP_b=op(TP_a,c,add);
    Typical_Price=op(TP_b,cv3,divis);

    maslow=mov(Typical_price,slow,A);
    mafast=mov(Typical_Price,fast,A);
    ATRSlow=atr(maslow,slow);
    ATRFast=atr(mafast,fast);

    Mavalue=100*(mafast-maslow)*ATRFast/MASlow/ATRSlow;

    ifishA=(exp(2*mavalue)-1);
    iFishB=(exp(2*mavalue)+1);
    RAVI_FX_Fisher=ifishA/iFishB;
    zona1=CreateViewport(400,True,True);
    PlotChart(RAVI_FX_Fisher,zona1,red,solid ,2);
    PlotChart(0.000000000001,zona1,black,dot ,1);
    Anteprime Allegate Anteprime Allegate Clicca l'immagine per ingrandirla. 

Nome: ScreenShot029.png‎ 
Visualizzazioni: 408 
Dimensione: 78.4 KB 
ID: 1662379  

  9. #9

    Data Registrazione
    Jun 2012
    Messaggi
    96
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)
    Potenza rep
    954004
    Citazione Originariamente Scritto da xavier sardá Visualizza Messaggio
    lo spazio nella variabile indzon a1
    ah grazie, non l'avevo visto!

  10. #10
    L'avatar di xavier sardá
    Data Registrazione
    Jun 2008
    Messaggi
    12,944
    Mentioned
    2 Post(s)
    Quoted
    1201 Post(s)
    Potenza rep
    42949687
    TS sommavolumi intraday

    //________________TS Sommavolumi intraday__________________//
    Codice:
    Var: sommavol,indzona1;
    
    if IsFirstBarDay then
      SommaVol = 0;
    endif;
    
    SommaVol = SommaVol + V;
    
    indzona1 = Createviewport(300);
    PlotChart(sommavol,indzona1,red,solid,2);
    DrawText(NEWOGG,indzona1 , D,sommavol , "s.v.",sommavol, black, 25, 1+4,Alright);
    Anteprime Allegate Anteprime Allegate Clicca l'immagine per ingrandirla. 

Nome: ScreenShot031.png‎ 
Visualizzazioni: 408 
Dimensione: 52.1 KB 
ID: 1662710  
    Ultima modifica di xavier sardá; 22-10-12 alle 18:23

Accedi