chipeur , hello
t'ai envoyé le fichier par wetransfer , tu l'as bien reçu ?
t'ai envoyé le fichier par wetransfer , tu l'as bien reçu ?
//---------------------------------------------------------------------------------------------------- // STPMT //---------------------------------------------------------------------------------------------------- inputs: UpColor(rgb(1,49,180)), DwnColor (red) , UpColora(green), DwnColora (red) , Length(9); variables: STPMT(0), MM_STPMT(0),STOCH1(0),STOCH2(0),STOCH3(0),STOCH4(0 ),STOCH33(0),STOCH44(0 ); STPMT = (4.1*SlowKCustomOrig(H, L, C, 5, 3) + 2.5*SlowKCustomOrig(H, L, C, 14, 3) + SlowKCustomOrig(h, L,C, 45, 14) + 4*SlowKCustomOrig(H, L,C, 75, 20))/11.6; MM_STPMT = Average(STPMT, Length ); STOCH1=SlowKCustomOrig(H, L,C, 5, 3); STOCH2=SlowKCustomOrig(H, L, C, 14,3); STOCH3=SlowKCustomOrig(H, L,C,45, 14); STOCH4=SlowKCustomOrig(H, L, C, 75, 20); STOCH33=SlowKCustomOrig(H, L,C,45, 14); STOCH44=SlowKCustomOrig(H, L, C, 75, 20); Plot1( STPMT, "STPMT" ) ; Plot2( MM_STPMT, "MM_STPMT") ; Plot3( STOCH1, "STOCH1" ) ; Plot4( STOCH2, "STOCH2" ) ; Plot5( STOCH3, "STOCH3" ) ; Plot6( STOCH4, "STOCH4" ) ; plot7(20, "Ligne 20"); Plot8(50,"Ligne 50"); plot9(80, "ligne 80"); Plot10(5,"Ligne5"); Plot11(95,"ligne95"); Plot55(STOCH33, "bar high" ) ; Plot66(STOCH44, "bar low") ; /////////////////Alert { Alert criteria } if STOCH3 crosses over STOCH4 then Alert( "BUY" ) else if STOCH3 crosses under STOCH4 then Alert( "SELL" ) ; // ----- STOCH Colored----// If STOCH3>STOCH3[1] then begin plot5[1](STOCH3[1],"MM",upcolora); plot5(STOCH3,"MM",upcolora); end else begin plot5[1](STOCH3[1],"MM",dwncolora); plot5(STOCH3,"MM",dwncolora); End; If STOCH4>STOCH4[1] then begin plot6[1](STOCH4[1],"MM",upcolora); plot6(STOCH4,"MM",upcolora); end else begin plot6[1](STOCH4[1],"MM",dwncolora); plot6(STOCH4,"MM",dwncolora); End; //----BAR High ,Bar Low REMPLISSAGE Colored -----// If STOCH33>STOCH33[1] then begin plot55[1](STOCH33[1],"MM",upcolora); plot55(STOCH33,"MM",upcolora); end else begin plot55[1](STOCH33[1],"MM",dwncolora); plot55(STOCH33,"MM",dwncolora); End; If STOCH44>STOCH44[1] then begin plot66[1](STOCH44[1],"MM",upcolora); plot66(STOCH44,"MM",upcolora); end else begin plot66[1](STOCH44[1],"MM",dwncolora); plot66(STOCH44,"MM",dwncolora); End;
//---------------------------------------------------------------------------------------------------- // STPMT //---------------------------------------------------------------------------------------------------- inputs: UpColor(rgb(1,49,180)), DwnColor (red) , UpColora(green), DwnColora (red) , Length(9); variables: STPMT(0), MM_STPMT(0),STOCH1(0),STOCH2(0),STOCH3(0),STOCH4(0 ),STOCH33(0),STOCH44(0 ); STPMT = (4.1*SlowKCustomOrig(H, L, C, 5, 3) + 2.5*SlowKCustomOrig(H, L, C, 14, 3) + SlowKCustomOrig(h, L,C, 45, 14) + 4*SlowKCustomOrig(H, L,C, 75, 20))/11.6; MM_STPMT = Average(STPMT, Length ); STOCH1=SlowKCustomOrig(H, L,C, 5, 3); STOCH2=SlowKCustomOrig(H, L, C, 14,3); STOCH3=SlowKCustomOrig(H, L,C,45, 14); STOCH4=SlowKCustomOrig(H, L, C, 75, 20); STOCH33=SlowKCustomOrig(H, L,C,45, 14); STOCH44=SlowKCustomOrig(H, L, C, 75, 20); Plot1( STPMT, "STPMT" ) ; Plot2( MM_STPMT, "MM_STPMT") ; Plot3( STOCH1, "STOCH1" ) ; Plot4( STOCH2, "STOCH2" ) ; Plot5( STOCH3, "STOCH3" ) ; Plot6( STOCH4, "STOCH4" ) ; plot7(20, "Ligne 20"); Plot8(50,"Ligne 50"); plot9(80, "ligne 80"); Plot10(5,"Ligne5"); Plot11(95,"ligne95"); Plot55(STOCH33, "bar high" ) ; Plot66(STOCH44, "bar low") ; /////////////////Alert { Alert criteria } if STOCH3 crosses over STOCH4 then Alert( "BUY" ) else if STOCH3 crosses under STOCH4 then Alert( "SELL" ) ; // ----- STOCH Colored----// If STOCH3>STOCH3[1] then begin plot5[1](STOCH3[1],"MM",upcolora); plot5(STOCH3,"MM",upcolora); end else begin plot5[1](STOCH3[1],"MM",dwncolora); plot5(STOCH3,"MM",dwncolora); End; If STOCH4>STOCH4[1] then begin plot6[1](STOCH4[1],"MM",upcolora); plot6(STOCH4,"MM",upcolora); end else begin plot6[1](STOCH4[1],"MM",dwncolora); plot6(STOCH4,"MM",dwncolora); End; //----BAR High ,Bar Low REMPLISSAGE Colored -----// If STOCH33>STOCH33[1] then begin plot55[1](STOCH33[1],"MM",upcolora); plot55(STOCH33,"MM",upcolora); end else begin plot55[1](STOCH33[1],"MM",dwncolora); plot55(STOCH33,"MM",dwncolora); End; If STOCH44>STOCH44[1] then begin plot66[1](STOCH44[1],"MM",upcolora); plot66(STOCH44,"MM",upcolora); end else begin plot66[1](STOCH44[1],"MM",dwncolora); plot66(STOCH44,"MM",dwncolora); End;
Commentaire