poca direzionalita su Fiat questo mese
ora dicono che sale da ieri per la presentazione della 500 elettrica
ciao ragazzi
facendo pulizia ho trovato un cd dove avevo salvato alcuni vecchi trading system
in particolare un ts..che non è stato modificato dal 2006 ha continuato ad avere risultati abbastanza positivi ( ha alcuni indicatori che non uso ma vedo che han dato risultati)
vedete se vi può servire
[code]
//______________________TS 850 gennaio 2006_______________________//
Var: MEDIAA,MEDIAB,MEDIAC,OP3B;
Var: MEDIAlong,MEDIAshort,MACDlong,MACDlongSIGNAL,MACDshort,MACDshortSIGNAL;
Var: DD0a,PVa,NVa,OP1a,EX0a,EX1a;
Var: STOCX,MSX;
Var: MYX,MYYX,OPYX,BBACX,HHX,MX,MMX,OAAX,M1X,MM1X,OAA1X;
Var: ATDXlong,ATDXshort;
Var: CONDIZIONIlong,CONDIZIONIshort,condizione1,condizione2;
var: media20,MioEXPSMOOTH11,pista,va3,ma;
Var: expo9, cumpos, cumneg,totpos,totneg,cbpos1,cbneg1;
Var: indzona1(0),indzona2(0),indzona3(0);
Var: ADXA,ADXB,H1,L1,adxb;
ma=hhv(h,8);
H1=HHV(c,1);
L1=LLV(c,2);
MEDIAlong =MOV(C,22,e);
MEDIAshort =MOV(C,21,e);
MEDIAA=MOV(C,74.7,S);
MEDIAB=MOV(C,25,S);
OP3B =OP(MEDIAB,MEDIAA,2);
MEDIAC=MOV(OP3B,2,e);
MACDlong =MACD(C,8,49);
MACDlongSIGNAL=EXPSMOOTH(MACDlong,55);
MACDshort =MACD(C,5,52);
MACDshortSIGNAL=EXPSMOOTH(MACDshort,75);
ATDXlong =ATR(C,5.6);
ATDXshort =ATR(C,5.5);
ADXA =DMADX(c,45.4);
adxb =DMADX(c,2);
PVa =PVI(C);
NVa =NVI(C);
OP1a =OP(PVa,NVa,mul);
EX0a =EXPSMOOTH(OP1a,5);
EX1a =EXPSMOOTH(EX0a,10);
media20 =mov(EX1a,12,e);
MioEXPSMOOTH11 =EXPSMOOTH(media20,18);
pista =pistaciclica(MioEXPSMOOTH11,46);
va3 =variaz(pista,v,prec);
expo9=ExpSmooth (EX0a, 7);
if expo9<expo9[1] then
cumneg=cumneg+V;
cumpos=0;
else
cumpos=cumpos+V;
cumneg=0;
endif;
if cumneg=0 and cumneg[1]>=8000000 then
totneg=1;
endif;
if totneg=1 then
cbneg1=cbneg1+1;
endif;
if cbneg1>=20 then
condizione1=1 ;
else
condizione1=0;
endif;
if cumpos=0 and cumpos[1]>=30007000 then
totpos=1;
endif;
if totpos=1 then
cbpos1=cbpos1+1;
endif;
if cbpos1>=24 then
condizione2=1 ;
else
condizione2=0;
endif;
CONDIZIONIlong=( OP3B>MEDIAC AND MACDlong>MACDlongSIGNAL and barsince(adxb>adxb[1])>=4 AND MEDIAlong<C and ADXA>ADXA[1] and EX1a>EX1a[1]);
CONDIZIONIshort=( OP3B<MEDIAC AND MACDshort<MACDshortSIGNAL and barsince(adxb<adxb[1])>=4 AND MEDIAshort>C);
installstoploss (inperc,3.00);//3.30
IF CONDIZIONIshort AND ATDXshort>0.0150 and barsince(va3<va3[1])>=3 and MACDshortSIGNAL >=-0.021 THEN
ENTERSHORT(nextBAR,ATopen); cbpos1=0;totpos=0;totneg=0; ENDIF;
//if totpos=0 then
IF CONDIZIONIshort AND ATDXshort>0.0150 and barsince(va3<va3[1])>=3 and MACDshortSIGNAL >=-0.021 THEN
ENTERSHORT(nextBAR,ATopen); cbpos1=0;totpos=0;totneg=0; ENDIF; // ENDIF;
IF CONDIZIONIlong and ATDXlong>0.0143 and MACDlongSIGNAL <= 0.021 THEN
ENTERLONG (nextBAR,ATopen);cbneg1=0;totpos=0;totneg=0; endif;
//if totneg=0 then
IF CONDIZIONIlong AND ATDXlong>0.0143 and MACDlongSIGNAL<= 0.021 THEN
ENTERLONG (nextBAR,ATopen);cbneg1=0;totpos=0;totneg=0; endif;// ENDIF;
if positiondir=-1 and barsince(c=ma)=2 then enterlong(nextbar,atopen);cbneg1=0;condizione1=0;totneg=0;endif;
IF POSITIONDIR = 1 THEN COLORBAR(GREEN); ENDIF;
IF POSITIONDIR = -1 THEN COLORBAR(SkyBlue);ENDIF;
[/code]
ok ragazzi...sembra che son tornato quello di prima perlomeno mentalmente
una delle medicine che il cardiologo mi aveva prescritto praticamente mi produceva una sorta di confusione mentale con una forte depressione..eliminata ora stò molto meglio
riprovo a scrivere qualcosa su Fiat..se notate che scrivo castronerie non esitate ad avvisarmi
ieri il titolo ha fatto un exploit di oltre il +10%..sembra che al mercato piaccia di più la distribuzione di azioni feurencia che il dividendo straordinario..ed è anche logico
comunque ora il titolo è arrivato in area 10.95€...livello importante...aveva fatto da supporto per quasi tutto il 2019
l'altro dato sul titolo è che sul mensile ha generato ad oggi un +24% e rotti..ben sopra la media del 20% e perciò in area eccesso
una nuova impulsiva su stellantis...sotto il 50% va negativa..sopra si sviluppa