Sreener per indicatore Cbl

• 03/24/2020 at 7:47 PM #123195
  3001max

  Ciao a tutti, avrei bisogno di aiuto per la creazione di uno screener basato sull’indicatore Cbl che molto gentilmente Nicolas ha convertito da Metastock.

  L’intenzione è provarlo su alcuni indici su time frame daily.

  Le regole operative sarebbero:

  • Long in apertura se CBL (-1) > TL (-1) e se CBL (-2) < CBL (-1)
  • Short in apertura se CBL (-1) < TL (-1) e se CBL (-2) > CBL (-1)

   

  CBL (-1) sta per valore CBL di ieri

  CBL (-2) sta per valore CBL dell’altro ieri

  TL (-1) come sopra

  Grazie a chi mi potrà aiutare.

  

  3001max

  Participant

  Topics: 3

  Replies: 7

  Been thanked: 0 times
  03/25/2020 at 2:09 AM #123211
  robertogozzi

  Eccolo, restituisce 1 per Long e 2 per Short (non l’ho provato):

  TIMEFRAME(Daily) GG = 20 //Enter periods MP = medianprice M1 = MP-Wilderaverage[5](mp)[3] M2 = MP-Wilderaverage[8](mp)[5] M3 = MP-Wilderaverage[13](mp)[8] CBL = average[2](average[2](average[2](M1+M2+M3))) TL = TimeSeriesAverage[GG](CBL) cL = CBL[1] > TL[1] AND CBL[2] < CBL[1] cS = CBL[1] < TL[1] AND CBL[2] > CBL[1] TIMEFRAME(default) Risultato = 0 IF cL THEN Risultato = 1 ELSIF cS THEN Risultato = 2 ENDIF SCREENER[Risultato](Risultato as "1=↑,2=↓")

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

  TIMEFRAME(Daily) GG  = 20   //Enter periods MP  = medianprice M1  = MP-Wilderaverage[5](mp)[3] M2  = MP-Wilderaverage[8](mp)[5] M3  = MP-Wilderaverage[13](mp)[8] CBL = average[2](average[2](average[2](M1+M2+M3))) TL  = TimeSeriesAverage[GG](CBL) cL  = CBL[1] > TL[1] AND CBL[2] < CBL[1] cS  = CBL[1] < TL[1] AND CBL[2] > CBL[1] TIMEFRAME(default) Risultato = 0 IF cL THEN    Risultato = 1 ELSIF cS THEN    Risultato = 2 ENDIF SCREENER[Risultato](Risultato as "1=↑,2=↓")

   

  1 user thanked author for this post.

  Nicolas

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17130

  Been thanked: 4026 times
  03/25/2020 at 11:44 AM #123263
  3001max

  Grazie mille Roberto, lo provo subito

  E’ possibile far sì che prorealtime evidenzi le entrate long e quelle short? Qualcosa come una freccia verde e una freccia rossa , in modo da poter valutare anche visivamente le varie operazioni.

  Grazie

  

  3001max

  Participant

  Topics: 3

  Replies: 7

  Been thanked: 0 times
  03/25/2020 at 12:21 PM #123269
  robertogozzi

  Gli screener no, non hanno questo scopo.

  Ti serve un indicatore, eccolo (mettilo sul grafico, non sotto, cliccando sulla chiave inglese che si trova sull’etichetta PREZZO in alto a sinistra del grafico, poi aggiungi l’indicatore tra quelli esistenti in ProBuilder):

  x = 20 * pipsize GG = 20 //Enter periods MP = medianprice M1 = MP-Wilderaverage[5](mp)[3] M2 = MP-Wilderaverage[8](mp)[5] M3 = MP-Wilderaverage[13](mp)[8] CBL = average[2](average[2](average[2](M1+M2+M3))) TL = TimeSeriesAverage[GG](CBL) cL = CBL[1] > TL[1] AND CBL[2] < CBL[1] cS = CBL[1] < TL[1] AND CBL[2] > CBL[1] IF cL THEN DRAWARROWUP(BarIndex,low - x) coloured(0,128,0,255) ELSIF cS THEN DRAWARROWDOWN(BarIndex,high + x)coloured(255,0,0,255) ENDIF RETURN

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

  x   = 20 * pipsize GG  = 20   //Enter periods MP  = medianprice M1  = MP-Wilderaverage[5](mp)[3] M2  = MP-Wilderaverage[8](mp)[5] M3  = MP-Wilderaverage[13](mp)[8] CBL = average[2](average[2](average[2](M1+M2+M3))) TL  = TimeSeriesAverage[GG](CBL) cL  = CBL[1] > TL[1] AND CBL[2] < CBL[1] cS  = CBL[1] < TL[1] AND CBL[2] > CBL[1] IF cL THEN    DRAWARROWUP(BarIndex,low - x) coloured(0,128,0,255) ELSIF cS THEN    DRAWARROWDOWN(BarIndex,high + x)coloured(255,0,0,255) ENDIF RETURN

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17130

  Been thanked: 4026 times
  09/01/2020 at 6:34 PM #143148
  3001max

  Ciao Roberto, è possibile far sì che nel grafico compaiano solo le frecce che indicano l’operazione? Altrimenti qualora fossero presenti altri indicatori nel grafico si renderebbe di difficile lettura.

  Ti allego un grafico per spiegarmi meglio.

  Ho proseguito qui la discussione anche se forse era Probuilder la sezione corretta.

  Grazie

   

  Massimiliano

  

  3001max

  Participant

  Topics: 3

  Replies: 7

  Been thanked: 0 times
  09/01/2020 at 10:33 PM #143159
  robertogozzi

  Già lo sta facendo, stampa solo frecce!

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17130

  Been thanked: 4026 times
  09/02/2020 at 8:41 AM #143174
  3001max

  Appunto , troppe frecce.. :))

  Non è possibile far comparire solo la freccia del cambio operazione?

  

  3001max

  Participant

  Topics: 3

  Replies: 7

  Been thanked: 0 times
  09/02/2020 at 9:54 AM #143189
  robertogozzi

  Eccolo:

  x = 30 * pipsize GG = 20 //Enter periods MP = medianprice M1 = MP-Wilderaverage[5](mp)[3] M2 = MP-Wilderaverage[8](mp)[5] M3 = MP-Wilderaverage[13](mp)[8] CBL = average[2](average[2](average[2](M1+M2+M3))) TL = TimeSeriesAverage[GG](CBL) cL = CBL[1] > TL[1] AND CBL[2] < CBL[1] cS = CBL[1] < TL[1] AND CBL[2] > CBL[1] IF cL = 0 AND cS = 0 THEN cL = cL[1] cS = cS[1] ENDIF IF cL AND cS[1] THEN DRAWARROWUP(BarIndex,low - x) coloured(0,128,0,255) cS = 0 ELSIF cS AND cL[1] THEN DRAWARROWDOWN(BarIndex,high + x)coloured(255,0,0,255) cL = 0 ENDIF RETURN

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22

  x   = 30 * pipsize GG  = 20   //Enter periods MP  = medianprice M1  = MP-Wilderaverage[5](mp)[3] M2  = MP-Wilderaverage[8](mp)[5] M3  = MP-Wilderaverage[13](mp)[8] CBL = average[2](average[2](average[2](M1+M2+M3))) TL  = TimeSeriesAverage[GG](CBL) cL  = CBL[1] > TL[1] AND CBL[2] < CBL[1] cS  = CBL[1] < TL[1] AND CBL[2] > CBL[1] IF cL = 0 AND cS = 0 THEN    cL = cL[1]    cS = cS[1] ENDIF IF cL AND cS[1] THEN    DRAWARROWUP(BarIndex,low - x) coloured(0,128,0,255)    cS = 0 ELSIF cS AND cL[1] THEN    DRAWARROWDOWN(BarIndex,high + x)coloured(255,0,0,255)    cL = 0 ENDIF RETURN

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17130

  Been thanked: 4026 times
  09/02/2020 at 10:55 AM #143198
  3001max

  Grazie mille!

   

  Massimiliano

  

  3001max

  Participant

  Topics: 3

  Replies: 7

  Been thanked: 0 times
  09/09/2020 at 5:43 PM #143781
  3001max

  Ciao a tutti, l’indicatore funziona bene ma con alcuni titoli si presenta un problema strano. Le frecce restano lontane dal prezzo come si vede nel grafico. Uso prorealtime eod , in una lista di poco più di 30 titoli , succede con una decina.

  A cosa può essere dovuto? Riuscite a darmi una mano o conviene scrivere all’help del sito Prorealtime?

  Grazie

  

  3001max

  Participant

  Topics: 3

  Replies: 7

  Been thanked: 0 times
  09/09/2020 at 8:04 PM #143791
  robertogozzi

  Il problema è la riga 1, che ha in valore fisso di 30, sostituiscila con questa:

  x = Average[20,0](range) * 2

  1	x   = Average[20,0](range) * 2

  puoi sostituire sia 20 che 2 con i valori che preferisci.

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17130

  Been thanked: 4026 times
• Author
  Posts