Study PtnBaseSA Unger

                                // Inizio Study di tutti i pattern base Unger Easylanguage //



var: PtnBaseSA1(false), PtnBaseSA2(false), PtnBaseSA3(false), PtnBaseSA4(false), PtnBaseSA5(false), PtnBaseSA6(false),
     PtnBaseSA7(false), PtnBaseSA8(false), PtnBaseSA9(false), PtnBaseSA10(false), PtnBaseSA11(false), PtnBaseSA12(false),
     PtnBaseSA13(false), PtnBaseSA14(false), PtnBaseSA15(false), PtnBaseSA16(false), PtnBaseSA17(false), PtnBaseSA18(false),
     PtnBaseSA19(false), PtnBaseSA20(false), PtnBaseSA21(false), PtnBaseSA22(false), PtnBaseSA23(false), PtnBaseSA24(false),
     PtnBaseSA25(false), PtnBaseSA26(false), PtnBaseSA27(false), PtnBaseSA28(false), PtnBaseSA29(false), PtnBaseSA30(false),
     PtnBaseSA31(false), PtnBaseSA32(false), PtnBaseSA33(false), PtnBaseSA34(false), PtnBaseSA35(false), PtnBaseSA36(false),
     PtnBaseSA37(false), PtnBaseSA38(false), PtnBaseSA39(false), PtnBaseSA40(false), PtnBaseSA41(false), PtnBaseSA42(false);




var:opend0(0),opend1(0),opend2(0),opend3(0),opend4(0),opend5(0);
var:highd0(0),highd1(0),highd2(0),highd3(0),highd4(0),highd5(0);
var:lowd0(0),lowd1(0),lowd2(0),lowd3(0),lowd4(0),lowd5(0);
var:closed0(0),closed1(0),closed2(0),closed3(0),closed4(0),closed5(0);


// Valori in parentesi Session: (1=regular session, 0=all sessions), (Number of session ago to reference price (0 = current session).
opend0 = OpenSession(0,0); // "opens forse opensession"
opend1 = OpenSession(0,1); // "opens forse opensession"
opend2 = OpenSession(0,2); // "opens forse opensession"
opend3 = OpenSession(0,3); // "opens forse opensession"
opend4 = OpenSession(0,4); // "opens forse opensession"
opend5 = OpenSession(0,5); // "opens forse opensession"

// "CONTINUA FINO A 5 "SETTIMANA BORSISTICA" 7 PER CRIPTOVALUTE"

highd0 = HighSession(0,0); // "highs forse highsession"
highd1 = HighSession(0,1); // "highs forse highsession"
highd2 = HighSession(0,2); // "highs forse highsession"
highd3 = HighSession(0,3); // "highs forse highsession"
highd4 = HighSession(0,4); // "highs forse highsession"
highd5 = HighSession(0,5); // "highs forse highsession"
// "CONTINUA FINO A 5 "SETTIMANA BORSISTICA" 7 PER CRIPTOVALUTE"

lowd0 = LowSession(0,0); // "lows forse lowsession"
lowd1 = LowSession(0,1); // "lows forse lowsession"
lowd2 = LowSession(0,2); // "lows forse lowsession"
lowd3 = LowSession(0,3); // "lows forse lowsession"
lowd4 = LowSession(0,4); // "lows forse lowsession"
lowd5 = LowSession(0,5); // "lows forse lowsession"
// "CONTINUA FINO A 5 "SETTIMANA BORSISTICA" 7 PER CRIPTOVALUTE"

closed0 = CloseSession(0,0); // "closes forse closesession"
closed1 = CloseSession(0,1); // "closes forse closesession"
closed2 = CloseSession(0,2); // "closes forse closesession"
closed3 = CloseSession(0,3); // "closes forse closesession"
closed4 = CloseSession(0,4); // "closes forse closesession"
closed5 = CloseSession(0,5); // "closes forse closesession"
// "CONTINUA FINO A 5 "SETTIMANA BORSISTICA" 7 PER CRIPTOVALUTE"


                                // Inizio Codifica di tutti i pattern base Unger Easylanguage //
                      // Per i range settimanali delle criptovalute alcuni pattern vanno estesi a 7 vedi video Unger //
                                      // Decommentare i plot che servono sul momento //

PtnBaseSA1  = absvalue(opend1-closed1)<0.5*(highd1-lowd1) ;
plot1(PtnBaseSA1, "PtnBaseSA1");

{PtnBaseSA2  = absvalue(opend1-closed5)<0.5*(highd5-closed1) ;
plot1(PtnBaseSA2, "PtnBaseSA2");

PtnBaseSA3  = absvalue(opend5-closed1)<0.5*(maxlist(highd1,highd2,highd3,highd4,highd5)-(minlist(lowd1,lowd2,lowd3,lowd4,lowd5))) ;
plot1(PtnBaseSA3, "PtnBaseSA3");

PtnBaseSA4  = ((highd0-opend0)> ((highd1-opend1)*1)) ;
plot1(PtnBaseSA4, "PtnBaseSA4");

PtnBaseSA5  = ((highd0-opend0)> ((highd1-opend1)*1.5)) ;
plot1(PtnBaseSA5, "PtnBaseSA5");

PtnBaseSA6  = ((opend0-lowd0)> ((opend1-lowd1)*1)) ;
plot1(PtnBaseSA6, "PtnBaseSA6");

PtnBaseSA7  = ((opend0-lowd0)> ((opend1-lowd1)*1.5)) ;
plot1(PtnBaseSA7, "PtnBaseSA7");

PtnBaseSA8  = closed1>closed2 and closed2>closed3 and closed3>closed4 ;
plot1(PtnBaseSA8, "PtnBaseSA8");

PtnBaseSA9  = closed1<closed2 and closed2<closed3 and closed3<closed4 ;
plot1(PtnBaseSA9, "PtnBaseSA9");

PtnBaseSA10  = highd1>highd2 and lowd1>lowd2 ;
plot1(PtnBaseSA10, "PtnBaseSA10");

PtnBaseSA11  = highd1<highd2 and lowd1<lowd2 ;
plot1(PtnBaseSA11, "PtnBaseSA11");

PtnBaseSA12  = ((highd0>(lowd0+lowd0*0.75/100))) ;
plot1(PtnBaseSA12, "PtnBaseSA12");

PtnBaseSA13  = ((highd0<(lowd0+lowd0*0.75/100))) ;
plot1(PtnBaseSA13, "PtnBaseSA13");

PtnBaseSA14  = (closed1>closed2) ;
plot1(PtnBaseSA14, "PtnBaseSA14");

PtnBaseSA15  = (closed1<closed2) ;
plot1(PtnBaseSA15, "PtnBaseSA15");

PtnBaseSA16  = (closed1<opend1) ;
plot1(PtnBaseSA16, "PtnBaseSA16");

PtnBaseSA17  = (closed1>opend1) ;
plot1(PtnBaseSA17, "PtnBaseSA17");

PtnBaseSA18  = ((closed1<(closed2-closed2*0.5/100))) ;
plot1(PtnBaseSA18, "PtnBaseSA18");

PtnBaseSA19  = ((closed1>(closed2+closed2*0.5/100))) ;
plot1(PtnBaseSA19, "PtnBaseSA19");

PtnBaseSA20  = (highd0>(highd1)) ;
plot1(PtnBaseSA20, "PtnBaseSA20");

PtnBaseSA21  = (highd1>highd5) ;
plot1(PtnBaseSA21, "PtnBaseSA21");

PtnBaseSA22  = (lowd0<lowd1) ;
plot1(PtnBaseSA22, "PtnBaseSA22");

PtnBaseSA23  = (lowd1<lowd5) ;
plot1(PtnBaseSA23, "PtnBaseSA23");

PtnBaseSA24  = (highd1>highd2) and (highd1>highd3) and (highd1>highd4) ;
plot1(PtnBaseSA24, "PtnBaseSA124");

PtnBaseSA25  = (highd1<highd2) and (highd1<highd3) and (highd1<highd4) ;
plot1(PtnBaseSA25, "PtnBaseSA25");

PtnBaseSA26  = ((lowd1<lowd2) and (lowd1<lowd3) and (lowd1<lowd4)) ;
plot1(PtnBaseSA26, "PtnBaseSA26");

PtnBaseSA27  = ((lowd1>lowd2) and (lowd1>lowd3) and (lowd1<lowd4)) ;
plot1(PtnBaseSA27, "PtnBaseSA27");

PtnBaseSA28  = (closed1>closed2 and closed2>closed3 and opend0>closed1) ;
plot1(PtnBaseSA28, "PtnBaseSA28");

PtnBaseSA29  = (closed1<closed2 and closed2<closed3 and opend0<closed1) ;
plot1(PtnBaseSA29, "PtnBaseSA29");

PtnBaseSA30  = ((highd1-closed1)<0.20*(highd1-lowd1)) ;
plot1(PtnBaseSA30, "PtnBaseSA30");

PtnBaseSA31  = ((closed1-lowd1)<0.20*(highd1-lowd1)) ;
plot1(PtnBaseSA31, "PtnBaseSA31");

PtnBaseSA32  = (opend0<lowd1 or opend0>highd1) ;
plot1(PtnBaseSA32, "PtnBaseSA32");

PtnBaseSA33  = ((opend0<(closed1-closed1*0.5/100))) ;
plot1(PtnBaseSA33, "PtnBaseSA33");

PtnBaseSA34  = ((opend0>(closed1+closed1*0.5/100))) ;
plot1(PtnBaseSA34, "PtnBaseSA34");

PtnBaseSA35  = (highd0<highd1 and lowd0>lowd1) ;
plot1(PtnBaseSA35, "PtnBaseSA35");

PtnBaseSA36  = (highd1-lowd1)<((highd2-lowd2)+(highd3-lowd3))/3 ;
plot1(PtnBaseSA36, "PtnBaseSA36");

PtnBaseSA37  = (highd1-lowd1)<(highd2-lowd2) and (highd2-lowd2)<(highd3-lowd3) ;
plot1(PtnBaseSA37, "PtnBaseSA37");

PtnBaseSA38  = (highd2>highd1 and lowd2<lowd1) ;
plot1(PtnBaseSA38, "PtnBaseSA38");

PtnBaseSA39  = (highd1<highd2 or lowd1>lowd2) ;
plot1(PtnBaseSA39, "PtnBaseSA39");

PtnBaseSA40  = (highd2<highd1 and lowd2>lowd1) ;
plot1(PtnBaseSA40, "PtnBaseSA40");

PtnBaseSA41  = true ;
plot1(PtnBaseSA41, "PtnBaseSA41");

PtnBaseSA42  = false ;
plot1(PtnBaseSA42, "PtnBaseSA42");}


                     //////////////////////////// Valori Dei Pattern Oroginali ///////////////////////////

{definizioneptn[1]  = absvalue(opend1-closed1)<0.5*(highd1-lowd1) ;
definizioneptn[2]  = absvalue(opend1-closed5)<0.5*(highd5-closed1) ;
definizioneptn[3]  = absvalue(opend5-closed1)<0.5*(maxlist(highd1,highd2,highd3,highd4,highd5)-(minlist(lowd1,lowd2,lowd3,lowd4,lowd5))) ;
definizioneptn[4]  = ((highd0-opend0)> ((highd1-opend1)*1)) ;
definizioneptn[5]  = ((highd0-opend0)> ((highd1-opend1)*1.5)) ;
definizioneptn[6]  =  ((opend0-lowd0)> ((opend1-lowd1)*1)) ;
definizioneptn[7]  =  ((opend0-lowd0)> ((opend1-lowd1)*1.5)) ;
definizioneptn[8]  =  closed1>closed2 and closed2>closed3 and closed3>closed4 ;
definizioneptn[9]  =  closed1<closed2 and closed2<closed3 and closed3<closed4 ;
definizioneptn[10]  = highd1>highd2 and lowd1>lowd2 ;
definizioneptn[11]  = highd1<highd2 and lowd1<lowd2 ;
definizioneptn[12]  = ((highd0>(lowd0+lowd0*0.75/100))) ;
definizioneptn[13]  = ((highd0<(lowd0+lowd0*0.75/100))) ;
definizioneptn[14]  = (closed1>closed2) ;
definizioneptn[15]  = (closed1<closed2) ;
definizioneptn[16]  = (closed1<opend1) ;
definizioneptn[17]  = (closed1>opend1) ;
definizioneptn[18]  = ((closed1<(closed2-closed2*0.5/100))) ;
definizioneptn[19]  = ((closed1>(closed2+closed2*0.5/100))) ;
definizioneptn[20]  = (highd0>(highd1)) ;
definizioneptn[21]  = (highd1>highd5) ;
definizioneptn[22]  = (lowd0<lowd1) ;
definizioneptn[23]  = (lowd1<lowd5) ;
definizioneptn[24]  = (highd1>highd2) and (highd1>highd3) and (highd1>highd4) ;
definizioneptn[25]  = (highd1<highd2) and (highd1<highd3) and (highd1<highd4) ;
definizioneptn[26]  = ((lowd1<lowd2) and (lowd1<lowd3) and (lowd1<lowd4)) ;
definizioneptn[27]  = ((lowd1>lowd2) and (lowd1>lowd3) and (lowd1<lowd4)) ;
definizioneptn[28]  = (closed1>closed2 and closed2>closed3 and opend0>closed1) ;
definizioneptn[29]  = (closed1<closed2 and closed2<closed3 and opend0<closed1) ;
definizioneptn[30]  = ((highd1-closed1)<0.20*(highd1-lowd1)) ;
definizioneptn[31]  = ((closed1-lowd1)<0.20*(highd1-lowd1)) ;
definizioneptn[32]  = (opend0<lowd1 or opend0>highd1) ;
definizioneptn[33]  = ((opend0<(closed1-closed1*0.5/100))) ;
definizioneptn[34]  = ((opend0>(closed1+closed1*0.5/100))) ;
definizioneptn[35]  = (highd0<highd1 and lowd0>lowd1) ;
definizioneptn[36]  = (highd1-lowd1)<((highd2-lowd2)+(highd3-lowd3))/3 ;
definizioneptn[37]  = (highd1-lowd1)<(highd2-lowd2) and (highd2-lowd2)<(highd3-lowd3) ;
definizioneptn[38]  = (highd2>highd1 and lowd2<lowd1) ;
definizioneptn[39]  = (highd1<highd2 or lowd1>lowd2) ;
definizioneptn[40]  = (highd2<highd1 and lowd2>lowd1) ;
definizioneptn[41]  = true ;
definizioneptn[42]  = false ;}


                                    // Fine Codifica di tutti i pattern base Unger Easylanguage //