Technische Analyse « Terug naar discussie overzicht

Snippets

112 Posts, Pagina: « 1 2 3 4 5 6 » | Laatste

Omlaag ↓

[verwijderd] 7 juni 2012 12:02

Plaatje: tiny.cc/131ifw
MetaStock Versie:

{ User inputs }
TZ:=Input("Market's local Time Zone? [-12hrs to +12hrs]",-12,12,-5);
shift:=Input("Advance signal by x calendar days",-30,30,0);
plot:=Input("Plot Q1 and Q3 (half) signals? [1]Yes, [0]No",0,1,0);

{ Peerke MaanKalender Geef op Volle Maan extra Vitamine }

{ Lunar cycle length in days (synodic month) }
LunarMonth:=29.53059;
offset:=4.86;

{ Calendar engine }
y:=Year()-(Month()<3);
leap:=Int(y/4)-Int(y/100)+Int(y/400);
mth:=Int((2+153*(Month()-3+12*(Month()<3)))/5);
dayNr:=DayOfMonth()+mth+y*365+leap-657382
-offset-TZ/24+shift;

{ New/Q1/Full/Q3 Moon cycles }
NM:=Frac((DayNr+LunarMonth/2)/LunarMonth);
Q1:=Frac((DayNr+LunarMonth/4)/LunarMonth);
FM:=Frac(DayNr/LunarMonth);
Q3:=Frac((DayNr-LunarMonth/4)/LunarMonth);

{ Opletten Peerke extra Oortjes geven }

{ Lunar cycle signals }
cycle:=FM-NM;
FM:=cycle<0 AND Alert(cycle>0,2);
NM:=-(cycle>0 AND Alert(cycle<0,2));
cycle:=Q1-Q3;
Q1:=(cycle<0 AND Alert(cycle>0,2))*.5;
Q3:=(cycle>0 AND Alert(cycle<0,2))*-.5;
signals:=If(plot=1,NM+Q1+FM+Q3,NM+FM);

{ Opletten Peerke extra BullePezen geven}
signals

[verwijderd] 7 juni 2012 12:16

Tom,

Ik wil je na 5 jaar als vrienden te zijn opgetrokken wat persoonlijks vragen,maar je email adres werkt niet meer?

Groet Willem

[verwijderd] 7 juni 2012 13:33

Naam: Elder's Impulse System

Probleem: tiny.cc/jb6ifw
Plaatje: www.uploadplaatjes.nl/img/n/593201/

Op Trade 2 Win wordt een vraag gesteld. Beetje dom om daar een vraag te stellen natuurlijk. Zijn nogal suf daar bij Trade 2 Win.

Plaatje Dag: www.uploadplaatjes.nl/img/n/593204/

<---------------------------------- Code begint na deze regel
Once False = 0
Once True = 1
Once Noft = -1
Once PI = 3.141592653

If False = True and Noft = False and Not True Then
Pi=Pi
endif

Pc=5
Pl=35
Ps= 5

If Year MOD 4 = False Then
P=13
else
P=11
endif

aa=Exponentialaverage[p](Close)

cc=MACD[pc,pl,ps](close)

if aa > aa[True] and cc>CC[True] Then
dd =True
else
dd=False
endif

if aa<aa[True] and cc < cc[True] then
ee=True
else
ee=False
endif

if ( aa <aa[True] and cc > cc[True]) or (aa>aa[True] and cc<cc[True]) Then
ff=True
else
ff=False
endif

SignTxt = Undefined

Return SignTxt Coloured(150,150,150) as "Elder Impulse System", dd Coloured(0,255,0) as "Red Bar",ee Coloured(255,0,0) as "Green Bar",ff coloured(0,0,255) as "Blue Bar "

[verwijderd] 7 juni 2012 16:33

Nou het boogje dan nog. Geen idee wat iemand met een boogje moet maar goed iedereen doet zijn dansje is niet anders.

www.uploadplaatjes.nl/img/n/593429/

En daarmee zijn alle vragen naar ik hoop beantwoord. Naar tevredenheid wellicht niet maar goed je moet altijd wat te wensen hebben natuurlijk anders wordt het leven saai.

Zou zelf de Saucer nemen overigens dat is toch ook een boog en zit standaard in PRT: www.uploadplaatjes.nl/img/n/593438/

-----------------------------> Code volgt na deze regel

//////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////
// Geschreven door Tom Noach
//////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////
// Once Null = 0
// Once Null = 0
// Once Null = 0
// Once Null = 0
// Begin Intial INIT Routine FILL Work Space
//////////////////////////////////////////////////////////

Once False = 0
Once True = 1
Once DoNoThing = False + DoNoThing
Once Null = 0

Once False = 0
Once True = 1
Once Noft = -1
Once PI = 3.141592653

If False = True and Noft = False and Not True or Null Then
Pi=Pi
endif
K = 20
AB=3

A=BarIndex

sig=sin(360*a/11)+2*sin(360*a/19+90)
b=SQRT(barindex*(b+1))
b=abs((b-ROUND(b))*4)
c=b-1
sig=sig+c
n=200
pr=sig
alpha=2*cos(360*1/k)
q1=0
q2=0

for i=n downto 0
q3=pr[i]+alpha*q1-q2
q2=q1
q1=q3
next

amp=sqrt(square(q1)+square(q2)-alpha*q1*q2)
real=q1-(alpha*q2)/2
imag=q2*sin(360*1/k)
phas=atan(imag/real)
if real<0 then
phas=phas+180
elsif real>=0 and imag<0 then
phas=phas+360
endif

If Sig = Sig Then
endif

ST= Supertrend[2,10]

If Close > ST Then
Col = 1
else
Col = -1
endif

SinusWave = (2*amp/n)*sin(360/k+phas[1]+90)

If BarIndex < 210 Then
// SinusWave=Undefined
endif

Return SinusWave[Ab] Coloured by Col as "Boogje"

[verwijderd] 7 juni 2012 17:18

Bedankt voor al je scripts Tom.Wellicht heb je mijn vraag,aan jou gericht over het hoofd gezien?

[verwijderd] 8 juni 2012 09:02

Naam Indicator: Engulfing

S&C April 2012: www.traders.com/documentation/feedbk_...
Plaatje: www.uploadplaatjes.nl/img/n/594243/

Origin of Species: www.candlestickforum.com/PPF/Paramete...

<--------------------------------Code begint na deze regel

Once False = 0
Once True = 1

Once False = 0
Once True = 1
Once Noft = -1
Once PI = 3.141592653

If False = True and Noft = False and Not True Then
Pi=Pi
endif

BodyWhite=High > High[1] and Low < Low[1] and Close > Open
BodyBlack=High > High[1] and Low < Low[1] and Close <= Open

Return BodyWhite Coloured(100,150,255) as "Bearish Engulfing", BodyBlack Coloured(80,60,100) as "Bullish Engulfing"

[verwijderd] 8 juni 2012 10:25

Naam Indicator: Kicker

S&C April 2012: www.traders.com/documentation/feedbk_...
Plaatje: www.uploadplaatjes.nl/img/n/594281/

Origin of Species: www.candlestickforum.com/PPF/Paramete...

<--------------------------------Code begint na deze regel

Once False = 0
Once True = 1

Once False = 0
Once True = 1
Once Noft = -1
Once PI = 3.141592653

If False = True and Noft = False and Not True Then
Pi=Pi
endif

DeltaOpen= ABS(Open -Open[1])
OTS=DeltaOpen < 0.50

BodyWhite=Close > Open
BodyBlack=Close <= Open

KickerBe = False
KickerBu=False

If BodyBlack[1] and BodyWhite[0] and OTS[1] Then
KickerBe=Noft
endif
If BodyWhite[1] and BodyBlack[0] and OTS[1] Then
KickerBu=True
endif

Return KickerBe Coloured(100,150,255) as "Kicker Bearish", KickerBu Coloured(80,60,100) as "Kicker Bullish"

[verwijderd] 8 juni 2012 13:36

Allereerst bedankt voor de Snippets mag ze graag verzamelen en uit proberen om zo tot iets te komen.

Tom, is het ook mogelijk dat de indicator engulfing tekst te laten plaatsen in de grafiek in plaats van blokjes onderin?
en heb je ook een idicator van de hamer of hanging man?

De boogjes.
Dit was niet echt wat ik bedoelde maar kom daar later nog op terug.

Tom ik sta open voor verbetering die door jou worden aangereikt en ik bedoel daar de indicatoren mee.

Bedankt!

[verwijderd] 8 juni 2012 13:48

Voor we nu te hard van stapel lopen even halt. De indicatoren zijn niet mijn indicatoren het zijn de indicatoren zoals S&C ze gebruikt. Lees het begin nog maar eens.
Het is extra wat ik erbij doe.

Tot 2 jaar geleden leverde PRT de service om de indicatoren te maken bij en voor het blad S&C. En daarom heb ik gesteld wil je een toelichting dan snel reageren omdat ik het verder niet bewaar. Is niet mijn zooi en het meeste gooi ik gelijk weg.

Kijk vind het best kritiek te krijgen maar lees dan de begin tekst.

En dan nog iets de titel is Snippest dan zou het handig zijn als mensen geen commentaar leveren om die manier blijft het overzichtelijk. Van mij branden die klotezooi gelijk af ik zal er niet mee zitten. Halverwege had ik al spijt van. Eigenlijk zou iedereen zijn eigen zooi moeten maken maar goed wil best een handje helpen maar ga echt geen dagwerk van maken. Dus neem het zoals het is en wil je het verbeteren ga je gang.

Zijn er andere verzoeken dan bekijk ik dat stuk voor stuk op sommige dingen zitten nu eenmaal rechten ik ga geen dingen van David van Sentient Trader publiceren. Wil met iedereen ruzie maken behalve met David die uitstekend Nederlands leest voor een Zuid-Afrikaan en met Chris Grafton wil ook geen ruzie voor de rest maakt het me niks uit.

[verwijderd] 8 juni 2012 13:54

@Daxknaller,kijk eens bij PRT Programming Guide, staat de hammer geloof ik al bij :-)

[verwijderd] 8 juni 2012 14:07

Fantastisch dit en duidelijk, hahaha.

Maar geef je toch alle eer Tom.

@123dummy bedankt ga het bekijken.

[verwijderd] 8 juni 2012 14:21

De meeste indicatoren waaronder kan je hier vinden: www.prorealtime.com/nl/library
Elk land heeft zijn eigen toko dus als je slim bent loop je als je tenminste zin hebt de verschillende landen af.

Italy: www.prorealtime.com/it/library

Spanje: www.prorealtime.com/es/library

Great Brit: www.prorealtime.com/en/library

Kraut: www.prorealtime.com/de/library

Het eerste wat ik dan doe als er iets is dan kijk ik op de verschillende landen of het al gemaakt is. Zo ja dan haal ik even door de schredder zoniet dan schrijf ik het. Soms zijn dingen niet mogelijk zoals de Swammi's en de boogjes dat is echt buiten het bereik van PRT. IBuilder is geen taal dus je loopt heel snel tegen beperkingen aan.

En dan heb je bepaalde sites die indicatoren maken of onderhouden: www.blai5.net/web/

Hele zooi van Rahul RMO staat er op maar dat ik dus nooit doen: www.blai5.net/web/index.php?option=co...

[verwijderd] 8 juni 2012 14:37

Bedankt Tom ga het bekijken.

[verwijderd] 8 juni 2012 14:41

En als laatste vind je een systeem wat werkt. Hou het voor je. Vertel het tegen niemand zelfs niet tegen je vrouw, man of kinderen. Vertel het tegen niemand. Je mag het tegen de hond vertellen maar dan wel daarna af laten maken.
Vind je een systeem wat werkt hou het voor je. Bedwing iedere neiging het te vertellen. De dag dat je het doorvertelt is de laatste dat het systeem werkt.
Vraag maar een Ta-Phoenix/Peerke je vertelt het niet door of je schrijft op. Doe je wel dan glipt het tussen je vingers door en nooit zal je meer winst maken. Dat is de Heilige Graal dat is de vloek zo zijn de wetten. Nooit maar dan ook nooit vertel je iets door. Herhaal dit 100 maal.

En dan zet ik Enveloppe op de Kk wee mij, wee mij, wee mij
binck1.it-finance.com/BinckV9/tmp/img...

www.youtube.com/watch?v=XwItzXGkawI

[verwijderd] 8 juni 2012 15:47

Dan nog.
De Heilige Graal vinden is één ding, hem dan ook nog goed leren gebruiken is nog veel lastiger.

[verwijderd] 8 juni 2012 15:55

[Modbreak IEX]: Gelieve op de inhoud van uw berichten te letten, bericht is bij dezen verwijderd.]

[verwijderd] 8 juni 2012 17:24

Naam Indicator: Hurst 5 Weeks Stop FLD

Plaatje: www.uploadplaatjes.nl/img/n/594812/

Origin of Species: www.tradersdaytrading.com/hurst_cycle...

<--------------------------------Code begint na deze regel

Once False = 0
Once True = 1
Once Noft = -1
Once FirstTime = 0

Disp = 5
///////////////////////////////////////////////////////////////////////
// Een ParaMeter
// Naam Disp
// Label Disp
// Geheel Getal
// Parameter restrictie => 0
// Default 5
///////////////////////////////////////////////////////////////////////

Noft = Noft and True and False = FirstTime

IF DayOfWeek < DayOfWeek[True] Then
L40W=lowest[200](Low)
L20W=lowest[100](Close)
L10W=lowest[50](Close)
L05W=lowest[25](Close)

D1=L10W-L05W
D2=L40W-L20W
D3=L40W-L10W

If D1 < 1 Then
L05W=L05W+ 1
endif

If D2 < 1 Then
L20W=L20W+ 1
endif

If D3 < 1 Then
L40W=L40W- 1
endif

endif

L01W= ExponentialAverage[3](lowest[05](Close))
H01W= ExponentialAverage[7](Lowest[05](Close))

If Disp = 0 Then
L01W=Undefined
H01W=Undefined
endif
If Disp = 1 Then
// L01W=Undefined
// H01W=Undefined
endif
If Disp = 2 Then
L01W=Undefined
H01W=Undefined
L40W=Undefined
L20W=Undefined
L10W=Undefined
L05W=Undefined
endif
If Disp = 5 Then
L01W=Undefined
H01W=Undefined
L40W=Undefined
L20W=Undefined
L10W=Undefined
// L05W=Undefined
endif

Return L40W Coloured(139,0,139) as "Low 40 Weken",L20W Coloured(50,205,50) as "Low 20 Weken", L10W coloured(220,20,60) as "Low 10 Weken",L05W coloured (101,150,250) as "Low 5 Weken",L01W coloured (176,255,47) as "Low 1 Week",H01W coloured (224,255,255) as "High 1 Week"

[verwijderd] 8 juni 2012 17:28

quote:
Hard Gekookte Kip schreef op 8 juni 2012 15:55:
likt Peerke de Beurshond zijn ballen.

Lenig hondje, lukt mij niet :-)

[verwijderd] 8 juni 2012 17:30

quote:
TA-Phoenix schreef op 8 juni 2012 17:28:
[...] Lenig hondje, lukt mijn niet :-)

Ach wat is lenig he

Het systeem Phoenix heeft gisteren na sluiting verkocht wat vorige week nabeurs was gekocht.

Lenig is een kwestie van opvatting en lenig ben je.

Heb er nog een voor je.

Redundantie:

Nu ga je op het internet zoeken wat dat betekent redundantie.

En moet je denken aan ik heb 30 databases die ik bij werk.

En dan weer redundantie

[verwijderd] 8 juni 2012 17:46

Zat inderdaad te zoeken naar redudatie, zie nu dat je dat al verbeterd hebt.

De term redundantie was me al bekend.
Mvg Peerke

112 Posts, Pagina: « 1 2 3 4 5 6 » | Laatste

Aantal posts per pagina: 20 50 100 | Omhoog ↑

Meedoen aan de discussie?

Word nu gratis lid of log in met uw e-mailadres en wachtwoord.

Direct naar Forum

Markt vandaag

AEX 937,58 -1,00 -0,11% 21 feb


Germany40^	22.179,70	-0,48%
BEL 20	4.405,39	+0,82%
Europe50^	5.441,66	-0,61%
US30^	43.424,20	0,00%
Nasd100^	21.616,30	0,00%
US500^	6.014,32	0,00%
Japan225^	38.152,90	0,00%
Gold spot	2.935,70	0,00%
EUR/USD	1,0460	-0,36%
WTI	70,19	-3,08%