Prorealtime: My Screeners
Tal como em tudo na vida é necessário inspiração para a coisa sair. Aqui vai uma nova versão agora a funcionar (tens é de testar):
REM ************************
REM
REM Autor: redhot, 16-Out-2008
REM
REM Objectivo:
REM Obtêm os títulos cujo RSI de á N dias atrás é inferior ao actual
REM V1.1
REM
REM ************************
REM Inputs:
REM Número de dias (desde a data corrente):
inN = 15
REM Período do RSI:
inRSIPeriod = 14
REM ************************
REM Programa:
c1 = RSI[inRSIPeriod][inN] < RSI[inRSIPeriod]
c2 = volume>1000000
c3 = (close >= 5.0)
criteria = Volume
SCREENER[c1 AND c2 AND c3] (criteria AS "Volume")
Monkey Trader
"Mais vale estar mais ou menos certo do que exactamente errado." [Warren Buffett]
"Mais vale estar mais ou menos certo do que exactamente errado." [Warren Buffett]
Deveria ser isto mas não está a funcionar não sei porquê. Tenho de ver se descubro:
REM ************************
REM
REM Autor: redhot, 15-Out-2008
REM
REM Objectivo:
REM Obtêm os títulos cujo RSI de à n dias atrás é inferior ao actual
REM
REM ************************
REM Inputs:
REM Número de dias (desde a data corrente):
inN = 15
REM Período do RSI:
inRSIPeriod = 14
REM ************************
REM Programa:
c1 = RSI(inN)[inRSIPeriod] < RSI(0)[inRSIPeriod]
c2 = volume>1000000
c3 = (close >= 5.0)
criteria = Volume
SCREENER[c1 AND c2 AND c3] (criteria AS "Volume")
Monkey Trader
"Mais vale estar mais ou menos certo do que exactamente errado." [Warren Buffett]
"Mais vale estar mais ou menos certo do que exactamente errado." [Warren Buffett]
Paionense Escreveu: Olá, LTCM
Pelo que li no passado, são sistemas de entrada e saída baseados unica e exclusivamente no cruzamente de indicadores como o Stochastic, RSI, OBV, MACD, etc sem estar considerar a analise mais clássica dos suportes resistencias, LT´s, padrões evidenciados no gráfico do preço
Não sei se é bem isto que outros entendem por análise técnica avançada mas foi com esta ideia com que fiquei quando andei a ler sobre isso
Abraço
JP
EDIT: Só agora notei que és meu conterrâneo![]()
Ok Paionense, estávas a falar de indicadores (grosso modo), é que quando vi a palavra "avançada", pensei em alguma coisa ligada ao Laurence A. Connors ou ao Tom DeMark e, esses 2, são um bocado complicados.
Abraço e BN.
P.S. Da F.Foz existem por aqui mais alguns, mas não se manifestam.

Remember the Golden Rule: Those who have the gold make the rules.
***
"A soberania e o respeito de Portugal impõem que neste lugar se erga um Forte, e isso é obra e serviço dos homens de El-Rei nosso senhor e, como tal, por mais duro, por mais difícil e por mais trabalhoso que isso dê, (...) é serviço de Portugal. E tem que se cumprir."
***
"A soberania e o respeito de Portugal impõem que neste lugar se erga um Forte, e isso é obra e serviço dos homens de El-Rei nosso senhor e, como tal, por mais duro, por mais difícil e por mais trabalhoso que isso dê, (...) é serviço de Portugal. E tem que se cumprir."
LTCM Escreveu:Paionense Escreveu:... sobre aquilo que hoje em dia se chama a AT avançada...
O que a AT avançada
Olá, LTCM
Pelo que li no passado, são sistemas de entrada e saída baseados unica e exclusivamente no cruzamente de indicadores como o Stochastic, RSI, OBV, MACD, etc sem estar considerar a analise mais clássica dos suportes resistencias, LT´s, padrões evidenciados no gráfico do preço
Não sei se é bem isto que outros entendem por análise técnica avançada mas foi com esta ideia com que fiquei quando andei a ler sobre isso
Abraço
JP
EDIT: Só agora notei que és meu conterrâneo


Paionense Escreveu:... sobre aquilo que hoje em dia se chama a AT avançada...
O que é a AT avançada

Editado pela última vez por LTCM em 15/10/2008 16:15, num total de 1 vez.
Remember the Golden Rule: Those who have the gold make the rules.
***
"A soberania e o respeito de Portugal impõem que neste lugar se erga um Forte, e isso é obra e serviço dos homens de El-Rei nosso senhor e, como tal, por mais duro, por mais difícil e por mais trabalhoso que isso dê, (...) é serviço de Portugal. E tem que se cumprir."
***
"A soberania e o respeito de Portugal impõem que neste lugar se erga um Forte, e isso é obra e serviço dos homens de El-Rei nosso senhor e, como tal, por mais duro, por mais difícil e por mais trabalhoso que isso dê, (...) é serviço de Portugal. E tem que se cumprir."
Paionense Escreveu:Redhot, podes ajudar-me num screener do PRT?
Precisava de saber como construir um screener em determinada empresa esteja um minimos de há x meses
O que devo colocar?
Abraço
JP
Cria um screener com este código:
NOTA: Se alguém conseguir mais optimizado coloque nova versão para substituir.
REM ************************
REM
REM Autor: redhot, 28-Ago-2008
REM
REM Objectivo:
REM Obtêm os títulos que estão em mínimos de X meses
REM
REM ************************
REM Inputs:
REM Período em meses (desde a data corrente):
inPeriodoMeses = 6
REM ************************
REM Programa:
vPeriodoDias = inPeriodoMeses * 30
c1 = 1 > 0
FOR i = 0 TO vPeriodoDias-1
if dclose(0) > dclose(i) then
c1 = 1 < 0
break
endif
next
c2 = volume>1000000
c3 = (close >= 5.0)
criteria = Volume
SCREENER[c1 AND c2 AND c3] (criteria AS "Volume")
Monkey Trader
"Mais vale estar mais ou menos certo do que exactamente errado." [Warren Buffett]
"Mais vale estar mais ou menos certo do que exactamente errado." [Warren Buffett]
REM ************************
REM Objectivo:
REM - Obter os títulos com volume da última vela acima de K vezes a média do volume em determinado período.
REM
REM Autor: redhot, 30-Jul-2008
REM
REM ************************
REM Inputs:
REM K de volume a considerar:
inK = 2
REM Período em dias a considerar (desde a data corrente):
inPeriodo = 90
REM ************************
REM Programa:
volumeTotal = 0
REM deve haver uma função que calcule logo isto.
FOR i = 1 TO inPeriodo
volumeTotal = volumeTotal + volume[i]
next
volumeMedio = volumeTotal / inPeriodo
c1 = volume > inK * volumeMedio
c2 = volume>1000000
c3 = (close >= 5.0)
criteria = Volume
SCREENER[c1 AND c2 AND c3] (criteria AS "Volume")
Monkey Trader
"Mais vale estar mais ou menos certo do que exactamente errado." [Warren Buffett]
"Mais vale estar mais ou menos certo do que exactamente errado." [Warren Buffett]
Boas,
Pessoal, neste site: http://www.mrswing.com/SL/basics.html
adaptando a linguagem de programação para ProRealTime, dá boas ideias para ProScreener's para Swing Trading.
Pessoal, neste site: http://www.mrswing.com/SL/basics.html
adaptando a linguagem de programação para ProRealTime, dá boas ideias para ProScreener's para Swing Trading.
- Mensagens: 407
- Registado: 4/12/2007 16:30
- Localização: 14
Esse é simples aqui vai:
Resultado:
REM Objectivo:
REM Indicador que devolve a diferença entre o máximo e o mínimo diário de uma vela.
return DHigh(0)-DLow(0)
Resultado:
- Anexos
-
- DifMaxMin.PNG (44.01 KiB) Visualizado 1856 vezes
Monkey Trader
"Mais vale estar mais ou menos certo do que exactamente errado." [Warren Buffett]
"Mais vale estar mais ou menos certo do que exactamente errado." [Warren Buffett]
ola, redhot
Excelente iniciativa.
Eu tenho outros screeners, assim que possa vou tentar fazer uns videos deles, embora sejam mais sobre aquilo que hoje em dia se chama a AT avançada, e é ainda um assunto que me deixa de pé atrás.
Já agora aproveito o tópico para solicitar uma coisa um indicador se for possível. Será possível criar um indicador que mostre a amplitude das velas? Ou sejá, apenas a diferença entre máximo e minimo?
Outra coisa, tira lá a homenagem ao Paionense por duas razões:
1 - Aprendi isso com o Ulisses que não negoceia acções com fraco volume e acima dos 5 euros
2 - Isso da Homenagem. até parece que já morri!! Sacode!!
Abraço
JP
Excelente iniciativa.
Eu tenho outros screeners, assim que possa vou tentar fazer uns videos deles, embora sejam mais sobre aquilo que hoje em dia se chama a AT avançada, e é ainda um assunto que me deixa de pé atrás.
Já agora aproveito o tópico para solicitar uma coisa um indicador se for possível. Será possível criar um indicador que mostre a amplitude das velas? Ou sejá, apenas a diferença entre máximo e minimo?
Outra coisa, tira lá a homenagem ao Paionense por duas razões:
1 - Aprendi isso com o Ulisses que não negoceia acções com fraco volume e acima dos 5 euros
2 - Isso da Homenagem. até parece que já morri!! Sacode!!

Abraço
JP
Outro:
REM ************************
REM Objectivo:
REM - Obter os títulos que num determinado período em dias tiveram uma percentagem
REM de fechos positivos (em relação ao dia anterior) superior a um dado valor.
REM - Que tenham uma valorização superior a um determinado valor.
REM
REM Autor: redhot, 28-Jul-2008
REM
REM ************************
REM Inputs:
REM Percentagem de barras positivas em relação ao dia anterior:
inPerPos = 60
REM Percentagem de valorização no período:
inPerValor = 15
REM Período em dias a considerar (desde a data corrente):
inPeriodo = 90
REM ************************
REM Programa:
countPos = 0
FOR i = 0 TO inPeriodo-1
if dclose(i) > dclose(i+1) then
countPos = countPos + 1
endif
next
c1 = (100*countPos/inPeriodo) > inPerPos
valorPer = 100*((dclose(0) - dclose(inPeriodo))/dclose(inPeriodo))
c4 = valorPer > inPerValor
REM Homenagem ao paionense:
c2 = volume>1000000
c3 = (close >= 5.0)
criteria = Volume
SCREENER[c1 AND c2 AND c3 AND c4] (criteria AS "Volume")
Editado pela última vez por redhot em 29/7/2008 20:01, num total de 2 vezes.
Monkey Trader
"Mais vale estar mais ou menos certo do que exactamente errado." [Warren Buffett]
"Mais vale estar mais ou menos certo do que exactamente errado." [Warren Buffett]
Quem está ligado:
Utilizadores a ver este Fórum: Google [Bot], niceboy, PAULOJOAO, rg7803, Shimazaki_2 e 124 visitantes