https://tr.tradingview.com/script/Di7RNTqg/ mtf trend takip otomatik
Printable View
https://tr.tradingview.com/script/Di7RNTqg/ mtf trend takip otomatik
yapay zeka sistem tasarlama....
başlayalım.... ilk önce 1dk grafik aç....grafik tipi çizgi olsun.....
şimdi.....
grafikte son 500 barın içinde görülen.....en yüksek ve en düşük değeri bul.... arasını 100 parçaya ayır.....
yükseğe t olsun, t den 0.15 lik düşüş stop anlamında s olsun.....
50 birim de orta medyan anlamında m olsun...
dip ve 0.85 lik reverse iptal et.....çizgileri iptal et.....sadece label etiket...sarı şekilde yazdır....
sonuç.....
https://i.hizliresim.com/swrst0r.jpg
////////////////////////
diğer bölüm....
bu defa 120 bar uzunluğunu al....200 atr ve 1 devinasyon kullanarak.....
200 bar geriye doğru pivot hesaplayarak....
bana 60-240-480 değerlerini hesapla....çizgi şeklinde göster....en solda olsun.....
önceki hesaplamadaki etiketlerin değerleri......pivot belirlensin.....destek direnç gibi.....
sonuç...
https://i.hizliresim.com/mvaeyvp.jpg
////////////////////////////
diğer bölüm....
her barın kendi iç varyansını hesaplayalım......
önce 50 uzunluk kullanıp.....1-50 arası hesapla ve v50 adıyla sarı çiz...
anlaşılsın diye şimdi de 200 uzunlık kullanıp.... 50-200 arası hesapla.....v200 adıyla mavi çiz....
sonuç....
https://i.hizliresim.com/827cgqw.jpg
böylece elde edilen....her barın kendi 50-200 varyans kesişimlerini görmüş olduk.....
//////////////////////////
şimdi bar kapanışına göre trend filtresi ekleyelim ve barı yeşil kırmızı renklendirelim.....
sonuç...
https://i.hizliresim.com/r23v8fj.jpg
buna önceki pivot hesaplamasındaki.... yükseleni ve düşeni kırma mantığı şeklinde.....
yine bar renklendirsin..... düşeni kırma sarı olsun...yükseleni kırma beyaz olsun.....
böylece renkler karışmadan 4 renk belli olsun.....
sonuç....
https://i.hizliresim.com/od8y1ay.jpg
/////////////////////////////
100 bar uzunluk için ayı-boğa etkisi hesaplayalım.....
beyaz -kırmızı çizelim......
sonuç....
https://i.hizliresim.com/sw3l3ji.jpg
///////
şimdilik 1dk grafik için scalping tarzı oldu.....
kullandığımız değerlerle yavaşlattık.....
sinyalleme yapılıp.....strateji yazılıraktest edilmesi gerekiyor......
devamını sonra yapmadan önce.....
görüntünün....
diğer periyotlarına bakalım.....
sonuçlar.....
https://i.hizliresim.com/6r47mma.jpg
https://i.hizliresim.com/kfxyhql.jpg
https://i.hizliresim.com/48iri47.jpg
https://i.hizliresim.com/ek5omrk.jpg
https://i.hizliresim.com/lvafpvz.jpg
https://i.hizliresim.com/qlqmflg.jpg
sade...rahat anlaşılır gibi.....
bakalım test sonuçları nasıl olacak.....
eskiler için...
drift mod 50-100 bar hesaplamalı....
https://i.hizliresim.com/687gobz.jpg
kodu....
stilden ayar yapılabilir... versiyon 2 dir....PHP Code:// This Pine Script® code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/
// © carefulCode53358
// ------------------------------------------------------------------
// RJT CRYSTALS v1.02
// [en]Version 1.1 (solved the new compilator detection errors)
// Use this graphic tracer based in crystals to help interpreting
// the evolution of the price under a new and different perspective.
// The form of the crystals and the overlap between them will show
// a new mode to predict the begin and the end of trends.
// A clue... find the triangles. ;)
// *Parameters: Coloured Crystals?
// ------------------------------------------------------------------
// [es]Version 1.1 (resuelta la nueva detección de errores del compilador)
// Utiliza este trazador gráfico a base de cristales para ayudarte
// a interpretar la evolución del precio bajo una nueva y diferente
// perspectiva. La forma de los cristales así como su superposición
// entre ellos mostrarán un modo diferente de predecir el comienzo y
// final de las tendencias. Una pista... encuentra los triángulos. ;)
// *Parámetros: Coloured Crystals? (¿cristales coloreados?)
// ------------------------------------------------------------------
// [ID. 0014-03-102-1300-00]
// ------------------------------------------------------------------
// Author: Rafael Jiménez Tocino
// Email: info@tradingrafa.com
// ------------------------------------------------------------------
// Source code protected by PineCrypt v.1.0 (www.pinescripts.com)
// (to renove expiry key contact the author of this script)
// ------------------------------------------------------------------
//@version=2
GcFuzSqity9GSymNUaJlKX6gThDdzlqJEpAjb9JXVgOGfE='V',Ln840RhQbZP83Vr3Z5w8_SB9E45dUSKTSh5LNDSe0J4eHH=sunday,
ZLlkue66ZsJ8LvP3RMiLSfYSDNVZzntMPpdCUiQH1q2s4Uc4xXvMv='l',
wNPRv_gQGgpa4ji1P7gKh8H6yBWHVcrXrCdNT99r2gg51XKh3Fg1lr='Y',KyUlqQomCm6fdYO668sUMQ62FVWvWkyCjKonMIppacBhHegWjcyl=areabr,f6mLmDZpdyyFj9YuPG8Q_lPZD9c9Upuz4jnQZlUwcgjGfG='R',rz_ZiJcnaPNYfmT4E6vp2mIiXI8OlFjXaqC3rJDjj0XwKshMCvJwcwKyt='H',Xpis3JXGi7odLm_avxWrj1lNOgZ59WwFdqH6WULXp_gXcF='p',nM85QXOIUQeZoD3fQiDxU1N1BGvLRRn8Hkt9suzZnlC='G',_gJtts06DICilbBtQ7_zLuhh5aa5EsX3HbhPDIvzECUkGvezC0vQxjSWy='7',li5_GWTSIArsvQ0GYJs5t0rcSsoAApOj2xv6DYQiT3='S',YIeUvifkIqmg1gh6Qqd1ZW04EW6bQtYYQJrK7SekCz4BQBa0uUbd8H=#dbdbea,gNkRgCig3sGuNVMgOzgIze8oRA95fgnAMuU9sgDv54mExSUzcC_VZD0='X',LeNKDF9MgTw1Y6wSeu38pN2iuyn91G7zhU_QU19icdfgeKc6km77m='o',iJa5Szyg84anB6j6RQGKwrhQOuHuK_NqSuAEqGBX0H='£',yYZJn5q8wJs7PAIsyLcWJtUKDk5G_cql1Wsq5ZTGtFcXk65JDNBB1m='1',uU5p2NYnpxt5_iRbHpGJtXsxD8wsGYtQ8PNG0APcOUaGRVV='5',mVN5E9MyiQoj63MgW6vRIp1SK23hfCe42LCHgnnJsTGLC5=true,R3wMZKF4Mbtop0JwTGzlmYIf5MRZbP36KxtqrkG74Xygr7_aoY1='%',cYcixbkUVPiafMBGmWkhsjTj8_aKjEikoIFL3TvnUWt='b',wqhqShbPxmtPMWpxK_z7FeL3EG4f2CIOD_arqs7o93CG5DzM=weekofyear(0)-43,WTpyn_G42b_JL6VWNoZUzUavyoMvTmBXan1kkuGEjX='\\',JTOwS6iJ8VlhhFDzEivttlBtQF7hU7YhCJNJjyQce_ly6MhR='v',Flaw6RSjtZojdz0ZYgyTsdwOTOj00nY3_twig1TDULi='#',dj9EvhtgHr6LgISsqTdCtfIEojlelK28Wvq6voG3XlrOaDVTPGNs='r',ucQW2BjC2isWOqcAVnfZVPWQNLmbGvmzIG3NwxLHXbiLjpcqQ9A43D7IDl='T',H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y=' ',AKgpuWGr_PAeEdy1jylLiFETqH7Txak7MhsACKmR6POC6=#ffff26,sPFbnRqiCkaFEVp95L_mycWr2OVA3rOvPiiYufJdpe_Ka2a='6',DmMuaSYttz_Ztw3QrNCOAfDBwrRWONpVMVXZf_r2aMo='P',xHloWCuSikqyZ3JwvofZ8rep3NRv1rNv8Ldphzt1DgwbFQyGEv='k',FAypCIlJYAR5ZNiWU4KYpyUHTkDdnz15iQ0EXquyPag5SL2k5Cmyta=cross,qKr1YAGXuJDcFEbWsDJISVzdLKL4I3vWBe1h6eau1D0phZBDIxNUsppTPm='W',HjqHLCwpIYJKBjlJzQc0byIRDDr0YBm_sbcPTTPIwblD9nqHLTy2y2='j',T7fsdM_HwpiFzbem8yn7mKqYiy6bNti_P6qgVoij5jIn2j9HEsHm442qnx8=#73fafb,waHH5rAjClM6qRGDfBR2DNXbOm2DyBsBzzYyS4P14eE7ri=#fdfdff,fhMV1JVPsp67Cpc9PBjo9H7fe8z4sSemWBTkV63ccS3gUlI0='4',py8MnLkFau195MRjwmIm4DUn96UPsAg6G0SMIqoNsg7pg2m='|',oLnLrIgytZ0dhKdlkIKpqo6natksUWqEK2lPCi_GLojNLS9Xs0ba5PWu0Kc='Z',szuqCKVI48Mc10TOQ9mOwopjTrDTvmXnApPYhXjd1lFNS='m',dzLLzMcAaPD2U_gBZZBt6VyHf8UIG4vJ06cwD5xZxflm_A_R='(',k0m6GT3P538HSlUq_uPPe_EUDDZFZWavGCvTL4QkfmxG81hBP='n',GD6XgdsUjST32t5FrMJJk1Af2kmzFovNY0AXdyYXUdMzrtxo0QnCB=#bf00ff,MNWxWO599A8oZP_sTMtJV3zmjVH_ZFb1F02a_rv_TkUqPQ2nNY='2',_qYHoJIiPkc84VAWuFw7TjnZXwZQfQlQrqy3H1MJglea_Kr1jUE='0',F0earkWF_97ICRSvo8FDv_96YRTVUbyxZ1RkHqzHOxZzygS7fg=')',IGznK6g3xPi2MiYPzYokQyiOR5o4F7CGbQ3N1qTKpzN9O=#d90201,x3JcXa_FBjFqicRJEz8FWOlcSd0R8YwNea5nIABCRDeUzjs7hE='K',Z8F46fvVOFyjMJMLkUI1hiFTMQgixLK7a6MlFIA1YU='L',wqZ4foykGfrzkwfRZX6bgaSdEfQHDLWWcBgewDhr2h='*',VBHfdDcmHXXF80KPtoAO5O9awj8WvQYURFnR_BGp='e',LCGm8V2sJrWaagLP64QOkOvYI1ORQkw3dvOjXD9xPhd=year(0)-1960,faf7ajrzk_i0UxzhJSkgAqRzZiGFObNaJC_vEHGEkIqv1='E',PTxKDVR4efifkfM4wccpREEsN2sSgCWv2GuyIlU06BHolVOnmo5BQ8Out=sunday,e6dEORZu_UKZfNVneAm92bxbNYx57GXT4MllsuxM='C',tm6D8VL5QS6u9QJrCsxpG4oxm0d9XGO4H_TX2573kAobb_YDYdX=#acac9d,PgY8gjTKdBQAbNYXzGQC_CJQeCoRwJheNBhK0va5YLGW3GcCC1fFl4_WKdAE=solid,gw__OiRjFE8rqMkfQMVQt0bIaRhnkvvNDXLJsXm7z5kj1ts='M',ECI7Z6jyOAPUv9oOLXn5mub1NoXWVsvPw2m5k5K94auPjmQW=friday,V3r75fwx1pisUACBYmy1LQyc7TlrW56uMvMHYi9aIOl='-',yhJsWH4kHzRV5Wf6NwctkCrVcrllLUbPssTlLT03=':',h9a8eZ2aifOLotRLOn7ze1hG5ZoZIwuDSEqEn127XUc3HHy=#ffbf00,CgItlfYuq6uW12wyRzBdQxbIU_UmiKtCrvnZmyzbmZAHU8e8rPSdnr='ñ',jYuW12d7kuJDGH1KQ2hfyRQFi1hYUzNw46cChWTGJOz='F',zQvjtMVRc3KPo2LYKlOyoG5tDeIVeW63bgoNkL8d='=',W24qDHFdLaW_or4WT3OXH_31oHgtFeagKq7cIea7e='f',UqLN8EKcwfxFUm_2_Ou6GEoc0ydc_udcGXx15wlYCTmHaYJiLurfMMMfv5V4='/',K_rZAL9JE7RyuaB9TDF2hTo3ofNwaY1vcN9H9W1mGMBjqQQx8mTvKhsgdsw='D',nLiu54cHtsK3pPdG9kRDkr9ItjDgbWbxLT2RykpzynP=',',M6YRrYCnneffiw3m51lNav_HSdnRB9K6YG73ioMdrzT2a5KTOq21='N',pFK8yGSTvVbJ3mS1Tyu5VfqwCI_tnLyFU3uDvFHXtBUbZyH=#b3b304,JdRC6Jsfo6QQqZboU_wX9l0qqQAIUqpb3Xu5qcwGKi6XdThzfz='_',pbVk1aquuVIVb_KBICIpaOL8T_MFXW8OaDnNZ5TIc1k1fUaoUug=#ff26c9,cSGX7mEUCzk0IBHs66BKJ1Ak0lr2KyOOX1SQSDjmUeyI6JgcNWeiF='Q',XDHUlls1Mdgyg_cChqhCCcc8s2nTmYJJqKKpWXH52kt6iJKDwGfplQ=';',v3Me7PLYYHfyR8Nc8FzuIJdP3e7BzWBLzFrYqPrYG=monday,BJWz42pe1_9l2NAvHlOwCVXLFJTw2ArckzWK3cfoKS5hmwT='g',uh6hPv_ZNRUxtF6hQ4gcVYAkaE2eIef2NB8qQ2dduL933no1I09='€',egqjPz92F8N5LVr2ZCTbw5QPnyPIyyNeq_o3IANUwWJlNcaD2pKZEXvdoVpO='q',F0_hc4C3ZCNA1Aa7QDWTwPkle_P5CzWRF5fGm0skplGz=#4cff4c,GbBuGtlaSs6CN4lgOWz2sMHReBf0dHXa5YHXhu4AMvASz8kkoGJ='U',VQrg641NIyUS_6Xoo_HxwH6mlKf6p9d5ztssspNnQ9Wf=wednesday,V8qAlVCh5ZOyW2hvAgRYgNzd8jvFXnBV1XZi5SxRu2rXG3eRIW3jIHvj6XZ='A',MaTuXlVZmiTfahHBa_X1B_KbA_2T3RKFGPjMyqzJm68m6='@',mUFBAomv0x_aY4yFfQjruIdYW8avjPu9RZDFQX9okpSDDh45y55F3cCjpY9q='a',yzXxVrYOfVM0iwGubttTGD_lde4WoH2GOrHwRJxlB8D4ZxSnQRbyeL=na,g8PKlCASBtbREeOJZVDqmdWC8Qn6F6kyBQTSGblMHj=#2626ff,zwQCFgZcxteVOyHDdwgIiEB_NMnk_LOiE4pub3WbqukwTtAFZnPAr_oxnhS='{',RRffTbmST0hOKtvqI1AdSQ2OW4IlUoMj9pq5X0yN_isShpZSimDuWn9E='J',bpVJWc8POWNLV14FAbUFtqQHzvcBobZPyZ_xHnQovhtW0CD='©',l99Ijwe20STJfNgKIy2Wv8S2dWDoXO3Jm1T3D020VThESWmLFKyK8AeFOAD_=#8c0208,CzbjfxLgjZ8mvZdpeok9FmzUv50GfvDAuXc4G1_e7dZuaXASul1Kmph1slo='\n',s3YbyuwMjY4ygMfwlxrcmPR2XgfhyocAaNmztN7tDC='B',p9AhwpPCgL9Nt8OTX3DtBHnyHkwO5vfahTxqKeStxuzV9OrK4FO=#018c23,D6p_V8DQu4CN6HL5myBKbtgI5gthZVt2Lm3Kscdn7BB0u9eozqJCgnTXuO=false,vQdTYziXRf3fbw1Vy3gkejjb3krDvurT7zhOdknzgZ=#05b3b2,e10qp9quHBlSR1e201f4wUeXPvHIK4SHxmUvgee8AeJR7XEFjiWl=tuesday,u7KlYrkFx6XAm6hkqRUnoTSD8YbZNHuhPEfxNbG0DqCaaDQN37_lm='w',P_TQqis5Hg9qid9DjXKRezoGgwtapabgjPKrtkG0HlPTA='u',mVocr6sPxs6FCS7oshNOupSb5W9d7vXZxBdAij5aTbBoFWXPTbUT8VDBha='¥',BXFKbybekaThYWmF24qHnsr8JKDuEprQPgjRZvACFmSi='$',MlkBRRlTdu57RNWlbSrZ0VZ8Q2iSsIDxqDzbqnhnW8Fx8J6XzZb='y',C1twuE4G32ZXqBJ0cva2qnsjsGnM9tWbiJSbV1Nvj9fpLXg_y90J='"',iJyUoSaJ5UCjymuNqoLNgH0Aj2j0YJA33r3SSYXwd_7PShqIo1RCVsts0='3',TUfBfYTgXyBd6M6pTEQz2e0rNvaUD2j1Bcp_iWx7=dashed,FOq2JFOiUHX1ni2mEI5jc3AizkajXCOyFlSUvtk4j7Z5FJXzJKH8rvHj5='c',kmvg004V8sK6L6YVg9raosCWrWU5CCtQVwCOH4z3I7gKAbZmGFHUX='Ñ',vo5ZgEUvVtOW64D0IhQzFGXquiCTiDE8PsLBjQCL9TYugGM5Q=thursday,s5zV2usKqVJA1nenV1tMi7L8OTG0gLYJQAF9hdHZuHdLwsCYhErjk=#23028c,IcWDHNz9WKi_L9dONtK67adD60U9JUBlMJB3ZhA_Gl9k='z',r7t9T6p3Ih3lmn7mT69pnALRDhg2RyudTkJ4kY9YUx='x',Kv_kcdnpq2hJLUeM5X4sgT9r9yfkD7X5yud7Y0kxGYnkQnHIHu0Hm8gyb='O',K1KDOEchpZawFOIzdvksoCfbE_e8mCWaAQZbERvGje8lkDBfsbGglD1DV2l=dayofweek(0),PsCbLNKkeEiTuNofCc7NV12xrwut5zdw9fOElMi7npxTaD8qi68cqx='d',JdDwmIUOxSrfg3e4iSY2fEqpB5eMQMUqSjNVfHBFnQxKZhG2uXUgsfHE5e3='I',jmQSISfemsz1iqV3eyYV0Vz01v4B4A01CZlyrfIbPuf='t',VSLP1_sp1W_XeCO1qXCm_9080MWuBq5eizKZb1b8_z3gyh_UHYJ1ybmu=saturday,CsDfgxebTvnUvH7lM7N3m2ysAUJoI_PkKJuvxQTnhxKdIiix='h',Wu0DFfeuJrYouyceqJm8ePFFMc0b2VEBioVTEeYQfAJgx='s',E0x3xktM8JRoEeWOCc7EFkepkPcqBLB_i40drC0toP2='.',RCB8KSDHlZOFiSrvAwSrS07xkEvmA9WJEtknUvpkgNP2rYwHGxIi=thursday,mJvbLQMDMiBkHQs4gsrQh6uGJpTzG3c5FalvOipV3Me9KLDvQFFoD='8',Iahx6DMy0_7avpT7wnrJ1y3nR1r4MOCEJ0uT9w7tp2UuBOsUeATP='&',E6d_T8VVvC_uNR47TvSuhwriVDpOvl234k_oYj_PAK8='!',o4VY1EYRGRPd7I3CP4gHh7uMoCuz5oIn1iG_9hMjZKsyTsXvq3N4ZAZu='i',JyHoxAPnERpUBiv8op35egvwin0g2qXTcKNDpCDJzk5nAVY6pEwK=#0f0f1e,WUJzzn1nTP2b_Y4KFc5dz1RbBdZnhJ7BPKcZi5a5mIY53hoABfJ=saturday,L6akNHIq4sayfVJGUf8CNs2BDD6OGAkyeYLaLemhUjtCtuLMItcwHv='9',NhBIa8RCqW4qwb6eoYKiZCKoRHn87wSonvPLhwqxhM=circles,z9BUoXbwS2Hz9QuguW8u1ajDsv8n2Wgw9cauN1HoZxWSATkRETYj='}',JUuRAwmLWEz1qGKe50Z3vFdBgj11EdmUwi4BkLzVc1NL4UUNbthuJ='+',TIatrXQo5X4CxZp5YFYxODLgsG_zoJGIhEj7jBst4y2=qKr1YAGXuJDcFEbWsDJISVzdLKL4I3vWBe1h6eau1D0phZBDIxNUsppTPm+qKr1YAGXuJDcFEbWsDJISVzdLKL4I3vWBe1h6eau1D0phZBDIxNUsppTPm+qKr1YAGXuJDcFEbWsDJISVzdLKL4I3vWBe1h6eau1D0phZBDIxNUsppTPm+E0x3xktM8JRoEeWOCc7EFkepkPcqBLB_i40drC0toP2+DmMuaSYttz_Ztw3QrNCOAfDBwrRWONpVMVXZf_r2aMo+JdDwmIUOxSrfg3e4iSY2fEqpB5eMQMUqSjNVfHBFnQxKZhG2uXUgsfHE5e3+M6YRrYCnneffiw3m51lNav_HSdnRB9K6YG73ioMdrzT2a5KTOq21+faf7ajrzk_i0UxzhJSkgAqRzZiGFObNaJC_vEHGEkIqv1+li5_GWTSIArsvQ0GYJs5t0rcSsoAApOj2xv6DYQiT3+e6dEORZu_UKZfNVneAm92bxbNYx57GXT4MllsuxM+f6mLmDZpdyyFj9YuPG8Q_lPZD9c9Upuz4jnQZlUwcgjGfG+JdDwmIUOxSrfg3e4iSY2fEqpB5eMQMUqSjNVfHBFnQxKZhG2uXUgsfHE5e3+DmMuaSYttz_Ztw3QrNCOAfDBwrRWONpVMVXZf_r2aMo+ucQW2BjC2isWOqcAVnfZVPWQNLmbGvmzIG3NwxLHXbiLjpcqQ9A43D7IDl+li5_GWTSIArsvQ0GYJs5t0rcSsoAApOj2xv6DYQiT3+E0x3xktM8JRoEeWOCc7EFkepkPcqBLB_i40drC0toP2+e6dEORZu_UKZfNVneAm92bxbNYx57GXT4MllsuxM+Kv_kcdnpq2hJLUeM5X4sgT9r9yfkD7X5yud7Y0kxGYnkQnHIHu0Hm8gyb+gw__OiRjFE8rqMkfQMVQt0bIaRhnkvvNDXLJsXm7z5kj1ts,XkRBbzWQv7g0z_qpPTNsAFuPMYL2u8pCVoP8ZYsi0K=u7KlYrkFx6XAm6hkqRUnoTSD8YbZNHuhPEfxNbG0DqCaaDQN37_lm+u7KlYrkFx6XAm6hkqRUnoTSD8YbZNHuhPEfxNbG0DqCaaDQN37_lm+u7KlYrkFx6XAm6hkqRUnoTSD8YbZNHuhPEfxNbG0DqCaaDQN37_lm+E0x3xktM8JRoEeWOCc7EFkepkPcqBLB_i40drC0toP2+DmMuaSYttz_Ztw3QrNCOAfDBwrRWONpVMVXZf_r2aMo+o4VY1EYRGRPd7I3CP4gHh7uMoCuz5oIn1iG_9hMjZKsyTsXvq3N4ZAZu+k0m6GT3P538HSlUq_uPPe_EUDDZFZWavGCvTL4QkfmxG81hBP+VBHfdDcmHXXF80KPtoAO5O9awj8WvQYURFnR_BGp+li5_GWTSIArsvQ0GYJs5t0rcSsoAApOj2xv6DYQiT3+FOq2JFOiUHX1ni2mEI5jc3AizkajXCOyFlSUvtk4j7Z5FJXzJKH8rvHj5+dj9EvhtgHr6LgISsqTdCtfIEojlelK28Wvq6voG3XlrOaDVTPGNs+o4VY1EYRGRPd7I3CP4gHh7uMoCuz5oIn1iG_9hMjZKsyTsXvq3N4ZAZu+Xpis3JXGi7odLm_avxWrj1lNOgZ59WwFdqH6WULXp_gXcF+jmQSISfemsz1iqV3eyYV0Vz01v4B4A01CZlyrfIbPuf+Wu0DFfeuJrYouyceqJm8ePFFMc0b2VEBioVTEeYQfAJgx+E0x3xktM8JRoEeWOCc7EFkepkPcqBLB_i40drC0toP2+FOq2JFOiUHX1ni2mEI5jc3AizkajXCOyFlSUvtk4j7Z5FJXzJKH8rvHj5+LeNKDF9MgTw1Y6wSeu38pN2iuyn91G7zhU_QU19icdfgeKc6km77m+szuqCKVI48Mc10TOQ9mOwopjTrDTvmXnApPYhXjd1lFNS,yIpcF3Y3UuIrTcUNZCVYXqsHB8cYw1h5MvTZ3fmUn8k=ucQW2BjC2isWOqcAVnfZVPWQNLmbGvmzIG3NwxLHXbiLjpcqQ9A43D7IDl+rz_ZiJcnaPNYfmT4E6vp2mIiXI8OlFjXaqC3rJDjj0XwKshMCvJwcwKyt+JdDwmIUOxSrfg3e4iSY2fEqpB5eMQMUqSjNVfHBFnQxKZhG2uXUgsfHE5e3+li5_GWTSIArsvQ0GYJs5t0rcSsoAApOj2xv6DYQiT3+H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y+li5_GWTSIArsvQ0GYJs5t0rcSsoAApOj2xv6DYQiT3+e6dEORZu_UKZfNVneAm92bxbNYx57GXT4MllsuxM+f6mLmDZpdyyFj9YuPG8Q_lPZD9c9Upuz4jnQZlUwcgjGfG+JdDwmIUOxSrfg3e4iSY2fEqpB5eMQMUqSjNVfHBFnQxKZhG2uXUgsfHE5e3+DmMuaSYttz_Ztw3QrNCOAfDBwrRWONpVMVXZf_r2aMo+ucQW2BjC2isWOqcAVnfZVPWQNLmbGvmzIG3NwxLHXbiLjpcqQ9A43D7IDl+H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y+rz_ZiJcnaPNYfmT4E6vp2mIiXI8OlFjXaqC3rJDjj0XwKshMCvJwcwKyt+V8qAlVCh5ZOyW2hvAgRYgNzd8jvFXnBV1XZi5SxRu2rXG3eRIW3jIHvj6XZ+li5_GWTSIArsvQ0GYJs5t0rcSsoAApOj2xv6DYQiT3+H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y+faf7ajrzk_i0UxzhJSkgAqRzZiGFObNaJC_vEHGEkIqv1+gNkRgCig3sGuNVMgOzgIze8oRA95fgnAMuU9sgDv54mExSUzcC_VZD0+DmMuaSYttz_Ztw3QrNCOAfDBwrRWONpVMVXZf_r2aMo+JdDwmIUOxSrfg3e4iSY2fEqpB5eMQMUqSjNVfHBFnQxKZhG2uXUgsfHE5e3+f6mLmDZpdyyFj9YuPG8Q_lPZD9c9Upuz4jnQZlUwcgjGfG+faf7ajrzk_i0UxzhJSkgAqRzZiGFObNaJC_vEHGEkIqv1+K_rZAL9JE7RyuaB9TDF2hTo3ofNwaY1vcN9H9W1mGMBjqQQx8mTvKhsgdsw+E0x3xktM8JRoEeWOCc7EFkepkPcqBLB_i40drC0toP2+CzbjfxLgjZ8mvZdpeok9FmzUv50GfvDAuXc4G1_e7dZuaXASul1Kmph1slo+e6dEORZu_UKZfNVneAm92bxbNYx57GXT4MllsuxM+LeNKDF9MgTw1Y6wSeu38pN2iuyn91G7zhU_QU19icdfgeKc6km77m+k0m6GT3P538HSlUq_uPPe_EUDDZFZWavGCvTL4QkfmxG81hBP+jmQSISfemsz1iqV3eyYV0Vz01v4B4A01CZlyrfIbPuf+mUFBAomv0x_aY4yFfQjruIdYW8avjPu9RZDFQX9okpSDDh45y55F3cCjpY9q+FOq2JFOiUHX1ni2mEI5jc3AizkajXCOyFlSUvtk4j7Z5FJXzJKH8rvHj5+jmQSISfemsz1iqV3eyYV0Vz01v4B4A01CZlyrfIbPuf+H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y+jmQSISfemsz1iqV3eyYV0Vz01v4B4A01CZlyrfIbPuf+CsDfgxebTvnUvH7lM7N3m2ysAUJoI_PkKJuvxQTnhxKdIiix+VBHfdDcmHXXF80KPtoAO5O9awj8WvQYURFnR_BGp+H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y+mUFBAomv0x_aY4yFfQjruIdYW8avjPu9RZDFQX9okpSDDh45y55F3cCjpY9q+P_TQqis5Hg9qid9DjXKRezoGgwtapabgjPKrtkG0HlPTA+jmQSISfemsz1iqV3eyYV0Vz01v4B4A01CZlyrfIbPuf+CsDfgxebTvnUvH7lM7N3m2ysAUJoI_PkKJuvxQTnhxKdIiix+LeNKDF9MgTw1Y6wSeu38pN2iuyn91G7zhU_QU19icdfgeKc6km77m+dj9EvhtgHr6LgISsqTdCtfIEojlelK28Wvq6voG3XlrOaDVTPGNs+H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y+jmQSISfemsz1iqV3eyYV0Vz01v4B4A01CZlyrfIbPuf+LeNKDF9MgTw1Y6wSeu38pN2iuyn91G7zhU_QU19icdfgeKc6km77m+H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y+BJWz42pe1_9l2NAvHlOwCVXLFJTw2ArckzWK3cfoKS5hmwT+VBHfdDcmHXXF80KPtoAO5O9awj8WvQYURFnR_BGp+jmQSISfemsz1iqV3eyYV0Vz01v4B4A01CZlyrfIbPuf+H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y+mUFBAomv0x_aY4yFfQjruIdYW8avjPu9RZDFQX9okpSDDh45y55F3cCjpY9q+H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y+k0m6GT3P538HSlUq_uPPe_EUDDZFZWavGCvTL4QkfmxG81hBP+VBHfdDcmHXXF80KPtoAO5O9awj8WvQYURFnR_BGp+u7KlYrkFx6XAm6hkqRUnoTSD8YbZNHuhPEfxNbG0DqCaaDQN37_lm+H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y+x3JcXa_FBjFqicRJEz8FWOlcSd0R8YwNea5nIABCRDeUzjs7hE+VBHfdDcmHXXF80KPtoAO5O9awj8WvQYURFnR_BGp+MlkBRRlTdu57RNWlbSrZ0VZ8Q2iSsIDxqDzbqnhnW8Fx8J6XzZb+CzbjfxLgjZ8mvZdpeok9FmzUv50GfvDAuXc4G1_e7dZuaXASul1Kmph1slo+dzLLzMcAaPD2U_gBZZBt6VyHf8UIG4vJ06cwD5xZxflm_A_R+Xpis3JXGi7odLm_avxWrj1lNOgZ59WwFdqH6WULXp_gXcF+dj9EvhtgHr6LgISsqTdCtfIEojlelK28Wvq6voG3XlrOaDVTPGNs+LeNKDF9MgTw1Y6wSeu38pN2iuyn91G7zhU_QU19icdfgeKc6km77m+jmQSISfemsz1iqV3eyYV0Vz01v4B4A01CZlyrfIbPuf+VBHfdDcmHXXF80KPtoAO5O9awj8WvQYURFnR_BGp+FOq2JFOiUHX1ni2mEI5jc3AizkajXCOyFlSUvtk4j7Z5FJXzJKH8rvHj5+jmQSISfemsz1iqV3eyYV0Vz01v4B4A01CZlyrfIbPuf+VBHfdDcmHXXF80KPtoAO5O9awj8WvQYURFnR_BGp+PsCbLNKkeEiTuNofCc7NV12xrwut5zdw9fOElMi7npxTaD8qi68cqx+H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y+cYcixbkUVPiafMBGmWkhsjTj8_aKjEikoIFL3TvnUWt+MlkBRRlTdu57RNWlbSrZ0VZ8Q2iSsIDxqDzbqnhnW8Fx8J6XzZb+H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y+TIatrXQo5X4CxZp5YFYxODLgsG_zoJGIhEj7jBst4y2+F0earkWF_97ICRSvo8FDv_96YRTVUbyxZ1RkHqzHOxZzygS7fg,_fAUQL6gyA8nyC6yFL6D4S4mzVWblHfV7ty3Rv_x_BmreRWe=DmMuaSYttz_Ztw3QrNCOAfDBwrRWONpVMVXZf_r2aMo+dj9EvhtgHr6LgISsqTdCtfIEojlelK28Wvq6voG3XlrOaDVTPGNs+LeNKDF9MgTw1Y6wSeu38pN2iuyn91G7zhU_QU19icdfgeKc6km77m+jmQSISfemsz1iqV3eyYV0Vz01v4B4A01CZlyrfIbPuf+VBHfdDcmHXXF80KPtoAO5O9awj8WvQYURFnR_BGp+FOq2JFOiUHX1ni2mEI5jc3AizkajXCOyFlSUvtk4j7Z5FJXzJKH8rvHj5+jmQSISfemsz1iqV3eyYV0Vz01v4B4A01CZlyrfIbPuf+VBHfdDcmHXXF80KPtoAO5O9awj8WvQYURFnR_BGp+PsCbLNKkeEiTuNofCc7NV12xrwut5zdw9fOElMi7npxTaD8qi68cqx+H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y+cYcixbkUVPiafMBGmWkhsjTj8_aKjEikoIFL3TvnUWt+MlkBRRlTdu57RNWlbSrZ0VZ8Q2iSsIDxqDzbqnhnW8Fx8J6XzZb+H_RQ8zLa89f2AZrlNbxiyBP6_hsaZ80VYEKXQknfBI54y+XkRBbzWQv7g0z_qpPTNsAFuPMYL2u8pCVoP8ZYsi0K,aaa7lCelvXyPIPy8t68AGttUSElxXoGP4BI4LJb443Vv8LDyD0bQoIeZhW0P=input(defval="Protected by www.PineScripts.com",title="Do not change this:",type=string),z9GzrEXmrop7fV4vW1VgUzzrwN4ar7SeTRvjsIEPeXTZmSO=aaa7lCelvXyPIPy8t68AGttUSElxXoGP4BI4LJb443Vv8LDyD0bQoIeZhW0P,study("Yörük",shorttitle=".",overlay=true),kitHrHSgbQzNXEP394ABUILQ3ae9h8hOXGv4mGQo=input(title="Coloured Crystals",defval=true,type=bool),Lnsar3bPNOUy4pvpKguwBJ185x8FY1gR9vZ_gxJMi7726svsIBzCo34dgu=50,size=1,JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom=nz(JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom[1],0)==2?0:nz(JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom[1],0)+1,pR2Xtf2Jr9FZnhyetDFEtpbgNWkv8CC3nKbMBJebNo4U2k4n2sxfj2TG=JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==0?high:JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==1?open:close,WMAouErwmjtwruTqtTFQkXBQdhl9LrkGFBixNAyEyrHv1NUOiEQQt=JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==0?low:JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==1?open:close,B6K6ycIZZ1a5O0PgwIHX6oOy62SPnmxfj_aUMiFj8lcKUD4XafSxs=JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==0?close:JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==1?high:open,H6vPa6kjBCiKRzS7oOS_3eDFI7QPkAa27nS9QQiHsurowZwcrvD=JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==0?close:JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==1?low:open,LaTE7Majfp26QTTzaydQ2gh7Dmn8CvX3vr2XiRyd=JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==0?open:JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==1?close:high,Yl5PT3ESlD1khHsMSRk27rEBkJyY9bCW95CCMJ8jV=JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==0?open:JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==1?close:low,p_7XreXNftmjq_No8R_tgdF1_q4b6NtBTeMEQuGo_byv=close>=close[1]?p9AhwpPCgL9Nt8OTX3DtBHnyHkwO5vfahTxqKeStxuzV9OrK4FO:IGznK6g3xPi2MiYPzYokQyiOR5o4F7CGbQ3N1qTKpzN9O,pwk7HlMTbZAnhXbZKJ2snM2LL3bwJLDuKfSd5wb_e7CZi_8VOWT8ezfv=kitHrHSgbQzNXEP394ABUILQ3ae9h8hOXGv4mGQo?p_7XreXNftmjq_No8R_tgdF1_q4b6NtBTeMEQuGo_byv:tm6D8VL5QS6u9QJrCsxpG4oxm0d9XGO4H_TX2573kAobb_YDYdX,s9XR4fGGXFXq9idsrWqHBjsMpXdPow20j_je_y_3jJ6EhIBjz=JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==0?na:p_7XreXNftmjq_No8R_tgdF1_q4b6NtBTeMEQuGo_byv,XW3B5YBJmnqTQIQKDeziOIpRhE22DU2Q5KpaFIFMsg=JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==1?na:p_7XreXNftmjq_No8R_tgdF1_q4b6NtBTeMEQuGo_byv,NotTJ5V776tSeBTYb6exI2ts71pdZ5GI8vPkzE7pATjRr=JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==2?na:p_7XreXNftmjq_No8R_tgdF1_q4b6NtBTeMEQuGo_byv,q5cQYFGSOWU_xoa0gyOW2ssxpDdRGhtHDckn82uUHEnIMQE2yEj4iZ=JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==0?waHH5rAjClM6qRGDfBR2DNXbOm2DyBsBzzYyS4P14eE7ri:pwk7HlMTbZAnhXbZKJ2snM2LL3bwJLDuKfSd5wb_e7CZi_8VOWT8ezfv,wGatSkza6xPH2cJyEtukU1TFXFRhUt8G_7R_No9oRzRybtud_s9jMyzQ=JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==1?waHH5rAjClM6qRGDfBR2DNXbOm2DyBsBzzYyS4P14eE7ri:pwk7HlMTbZAnhXbZKJ2snM2LL3bwJLDuKfSd5wb_e7CZi_8VOWT8ezfv,_3P6obn2T8WMKcq_1qWBfGE98m0HU3lScMoDcRHUdCF1aMmTQfwf6aEjaBu3=JGMjbBNRMP5bKh_fI2o1c7IZXnVgHGxOkukE1P462nfND6yGBVIUsitom==2?waHH5rAjClM6qRGDfBR2DNXbOm2DyBsBzzYyS4P14eE7ri:pwk7HlMTbZAnhXbZKJ2snM2LL3bwJLDuKfSd5wb_e7CZi_8VOWT8ezfv,BPZAANEc8fRcuL6dSmNnX1_CZo6nJK9DVTmVTMNjFTYsW4h=plot(pR2Xtf2Jr9FZnhyetDFEtpbgNWkv8CC3nKbMBJebNo4U2k4n2sxfj2TG,transp=0,linewidth=size,style=line,****=true,color=NotTJ5V776tSeBTYb6exI2ts71pdZ5GI8vPkzE7pATjRr),Zb1xkZK9Il89LpS1nqlKbXlCdJOcCZEfy20A4TndedtU5f=plot(WMAouErwmjtwruTqtTFQkXBQdhl9LrkGFBixNAyEyrHv1NUOiEQQt,transp=0,linewidth=size,style=line,****=true,color=NotTJ5V776tSeBTYb6exI2ts71pdZ5GI8vPkzE7pATjRr),fill(BPZAANEc8fRcuL6dSmNnX1_CZo6nJK9DVTmVTMNjFTYsW4h,Zb1xkZK9Il89LpS1nqlKbXlCdJOcCZEfy20A4TndedtU5f,transp=Lnsar3bPNOUy4pvpKguwBJ185x8FY1gR9vZ_gxJMi7726svsIBzCo34dgu,color=_3P6obn2T8WMKcq_1qWBfGE98m0HU3lScMoDcRHUdCF1aMmTQfwf6aEjaBu3),guU7LEPon1Y7ogNupxzv3ZVhqSJbw0if3AyhyTrXWjaEz7yYtLlR_09=plot(B6K6ycIZZ1a5O0PgwIHX6oOy62SPnmxfj_aUMiFj8lcKUD4XafSxs,transp=0,linewidth=size,style=circles,****=true,color=s9XR4fGGXFXq9idsrWqHBjsMpXdPow20j_je_y_3jJ6EhIBjz),uOKSBBL8yK5QVpfRHL9jV5FcO4sV5HjjPW2Nq6XQlVRX_er6VPAwmq=plot(H6vPa6kjBCiKRzS7oOS_3eDFI7QPkAa27nS9QQiHsurowZwcrvD,transp=0,linewidth=size,style=circles,****=true,color=s9XR4fGGXFXq9idsrWqHBjsMpXdPow20j_je_y_3jJ6EhIBjz),fill(guU7LEPon1Y7ogNupxzv3ZVhqSJbw0if3AyhyTrXWjaEz7yYtLlR_09,uOKSBBL8yK5QVpfRHL9jV5FcO4sV5HjjPW2Nq6XQlVRX_er6VPAwmq,transp=Lnsar3bPNOUy4pvpKguwBJ185x8FY1gR9vZ_gxJMi7726svsIBzCo34dgu,color=q5cQYFGSOWU_xoa0gyOW2ssxpDdRGhtHDckn82uUHEnIMQE2yEj4iZ),QSH9z2grqSGiyliKwiU_Z3F1tnXWTGJN6LEOnqfHlvdN0Tlx2lWPHlLRj=plot(LaTE7Majfp26QTTzaydQ2gh7Dmn8CvX3vr2XiRyd,transp=0,linewidth=size,style=circles,****=true,color=XW3B5YBJmnqTQIQKDeziOIpRhE22DU2Q5KpaFIFMsg),Ddfb4f29Jt4wxfaSSK3pcKRsZCXDKNFSBAVISJhfi0e7kCy=plot(Yl5PT3ESlD1khHsMSRk27rEBkJyY9bCW95CCMJ8jV,transp=0,linewidth=size,style=circles,****=true,color=XW3B5YBJmnqTQIQKDeziOIpRhE22DU2Q5KpaFIFMsg),fill(QSH9z2grqSGiyliKwiU_Z3F1tnXWTGJN6LEOnqfHlvdN0Tlx2lWPHlLRj,Ddfb4f29Jt4wxfaSSK3pcKRsZCXDKNFSBAVISJhfi0e7kCy,transp=Lnsar3bPNOUy4pvpKguwBJ185x8FY1gR9vZ_gxJMi7726svsIBzCo34dgu,color=wGatSkza6xPH2cJyEtukU1TFXFRhUt8G_7R_No9oRzRybtud_s9jMyzQ),nIygynyDXCdXGrOF8lInLfpjuFuW6WZkEmpYKxvmRwYy0yBqFRkF=z9GzrEXmrop7fV4vW1VgUzzrwN4ar7SeTRvjsIEPeXTZmSO,G3aJS_mfSiwGJrVGQuXbMBA3DUM_ozvIjBrrwEGxhXc9yt9Zf=nIygynyDXCdXGrOF8lInLfpjuFuW6WZkEmpYKxvmRwYy0yBqFRkF,iLDSiZ1nAUUfVfHImS1MqboJTVTZtxn0WUqjNDeSK5OI2=G3aJS_mfSiwGJrVGQuXbMBA3DUM_ozvIjBrrwEGxhXc9yt9Zf,mo7pp7lhzCTyu4mNeCr2h7UEiTr2gxY_KyxI958ZBM6ERHTI7oFzI0r=iLDSiZ1nAUUfVfHImS1MqboJTVTZtxn0WUqjNDeSK5OI2==_fAUQL6gyA8nyC6yFL6D4S4mzVWblHfV7ty3Rv_x_BmreRWe,_yn7ttTHoxR6KJngAyd2sWOOdwbBl0DIJDoPC4EMEC8wu=mo7pp7lhzCTyu4mNeCr2h7UEiTr2gxY_KyxI958ZBM6ERHTI7oFzI0r?0:-1,hrv2IIFtLx3JJhdtrlFmFBdFktZzHnXbFpAN9KShCuN=mo7pp7lhzCTyu4mNeCr2h7UEiTr2gxY_KyxI958ZBM6ERHTI7oFzI0r?na:close[_yn7ttTHoxR6KJngAyd2sWOOdwbBl0DIJDoPC4EMEC8wu],plot(hrv2IIFtLx3JJhdtrlFmFBdFktZzHnXbFpAN9KShCuN),zwKllUgrZrbxmM_U4S34k_jmlxiiNVqIeRk9Ra74HGXw_YMRV4RSOmi=close,VDhmznjndtMibnBeW02kdV3n8hZFk5WVxdziGRTUd0vWOV2qeXGfhUd4=high,K4J2jlKNcvtiS1r7W76KICidGq1X45AWL35kuBIiW7GlihW_w3PyesM=VDhmznjndtMibnBeW02kdV3n8hZFk5WVxdziGRTUd0vWOV2qeXGfhUd4+zwKllUgrZrbxmM_U4S34k_jmlxiiNVqIeRk9Ra74HGXw_YMRV4RSOmi,rX6cIln6LMSceWUyljMJJndYKR02K1Nton2nSIirk0uU7n1c=(VDhmznjndtMibnBeW02kdV3n8hZFk5WVxdziGRTUd0vWOV2qeXGfhUd4*open[15])+zwKllUgrZrbxmM_U4S34k_jmlxiiNVqIeRk9Ra74HGXw_YMRV4RSOmi,P8fadzT4TQ_9xeQE3fExvrS1WBtY_99hj0zyq3nLwpGLiqXqb4l7cIe=aaa7lCelvXyPIPy8t68AGttUSElxXoGP4BI4LJb443Vv8LDyD0bQoIeZhW0P=="Protected by www.PineScripts.com"?na:-10000,plot(P8fadzT4TQ_9xeQE3fExvrS1WBtY_99hj0zyq3nLwpGLiqXqb4l7cIe)
// Encrypt Compilation [1838] ---------------------------------------
////////////////////////////////////////////////////////////////////////////////
//@version=2
length = input(19),fast = input(1),slow = input(5)
//
src = close
er = abs(change(src,length))/sum(abs(change(src)),length)
dev = er*fast + (1-er)*slow
a = n < 9 ? src : src > a[1] + dev ? src : src < a[1] - dev ? src : a[1]
//
//css = fixnan(a > a[1] ? #2E9AFE : a < a[1] ? #FA5858 : na)
plot(a,color=#2E9AFE,transp=0,linewidth = 1)
///////////////////////
//@version=2
lengthw = input(50)
srcw = close
devw = stdev(srcw,lengthw)*2
aw = 0.
aw := n < lengthw ? srcw : srcw > nz(aw[1],srcw) + devw ? srcw : srcw < nz(aw[1],srcw) - devw ? srcw : aw[1]
//cssw = fixnan(aw > aw[1] ? #36f321 : aw < aw[1] ? #e65100 : na)
plot(aw,color=#fb0808,linewidth=1,transp=0)
//////////////////////
//@version=2
lengthq = input(50),roundq= input(1)
rq = round(close/roundq)*roundq
devq = stdev(close,lengthq)
erq = abs(change(close,lengthq))/sum(abs(change(close)),lengthq)
aq = close > nz(aq[1],rq) + devq ? close : close < nz(aq[1],rq) - devq ? close : aq[1] + 1/(lengthq*2)*change(nz(aq[1],rq),lengthq)
//cssq = fixnan(aq > aq[1] ? #eff1ee : aq < aq[1] ? #f80505 : na)
plot(aq,color=#eff1ee,transp=0,linewidth = 1)
///////////////////
//@version=2
lengthqx = input(100),roundx= input(1)
rx = round(close/roundx)*roundx
devqx = stdev(close,lengthqx)
erqx = abs(change(close,lengthqx))/sum(abs(change(close)),lengthqx)
aqx = close > nz(aqx[1],rx) + devqx ? close : close < nz(aqx[1],rx) - devqx ? close : aqx[1] + 1/(lengthqx*2)*change(nz(aqx[1],rx),lengthqx)
//cssq = fixnan(aq > aq[1] ? #eff1ee : aq < aq[1] ? #f80505 : na)
plot(aqx,color=#eff1ee,transp=0,linewidth = 1)
bu tasarımda bar içi varyans hesaplamasını iptal edip....sar hesaplaması eklemek daha güzel olacak gibiAlıntı:
Originally Posted by @yörük@
hem sadeleşecek
hem de stratejide yazılan....sinyal sayısı varyansdan gelen ortadan kalkmış olacak....
o şekilde teste devam....
1000-2000 bar drift...
yapay zekaya yazdırıldı...
PHP Code://@version=5
indicator("Auto-Line With Drift (v5 - robust)", overlay=true, max_bars_back=2000)
length = input.int(500, "Length", minval=1)
roundVal = input.float(1.0, "Round")
// İlk yuvarlama
r = math.round(close / roundVal) * roundVal
// Standart sapma
dev = ta.stdev(close, length)
// ER (sum()/change() kullanmadan)
// numerator = abs(close - close[length])
erNum = math.abs(close - nz(close[length], close))
// denominator = sum(abs(change(close)), length)
// yerine: SMA(diff,length) * length, erken barlarda ta.cum ile yedek
diff = math.abs(close - close[1])
smaDiff = ta.sma(diff, length)
changeSum = nz(smaDiff * length, ta.cum(diff))
er = erNum / math.max(changeSum, 1e-10)
// Ana çizgi 'a' (drift hesabi da ta.change kullanmiyor)
var float a = na
if na(a[1])
a := r
else if close > a[1] + dev
a := close
else if close < a[1] - dev
a := close
else
// drift = change(nz(a[1], r), length) yerine güvenli indeksleme
drift = bar_index >= length + 1 ? nz(nz(a[1], r) - nz(a[length + 1], r), 0) : 0.0
a := a[1] + (1.0 / (length * 2.0)) * drift
plot(a, color=color.orange, linewidth=1)
////////////////////////////
lengtht = input.int(1000, "Length", minval=1)
//roundVal = input.float(1.0, "Round")
// İlk yuvarlama
rt = math.round(close / roundVal) * roundVal
// Standart sapma
devt = ta.stdev(close, lengtht)
// ER (sum()/change() kullanmadan)
// numerator = abs(close - close[length])
erNumt = math.abs(close - nz(close[lengtht], close))
// denominator = sum(abs(change(close)), length)
// yerine: SMA(diff,length) * length, erken barlarda ta.cum ile yedek
difft = math.abs(close - close[1])
smaDifft = ta.sma(difft, lengtht)
changeSumt = nz(smaDifft * lengtht, ta.cum(difft))
ert = erNumt / math.max(changeSumt, 1e-10)
// Ana çizgi 'a' (drift hesabi da ta.change kullanmiyor)
var float at = na
if na(at[1])
at := rt
else if close > at[1] + devt
at := close
else if close < at[1] - devt
at := close
else
// drift = change(nz(a[1], r), length) yerine güvenli indeksleme
driftt = bar_index >= lengtht + 1 ? nz(nz(at[1], rt) - nz(at[lengtht + 1], rt), 0) : 0.0
at := at[1] + (1.0 / (lengtht * 2.0)) * driftt
plot(at, color=color.blue, linewidth=1)
kodda bar renlendrme için....Alıntı:
Originally Posted by @yörük@
trend filtresi ve pivot kullanmış...4lü renk elde etmiştik....yaklaşık 270 satır kodla.....
https://resmim.net/cdn/2025/08/17/XAdc17.jpg
oysa....
önceki çalışmalarımızdan biri olan sar ile bar renklendirme.....yaklaşık 50 satır....
https://resmim.net/cdn/2025/08/17/XAdzuj.jpg
sadeleşme adına.... sar renklendirmeye geçmek daha mantıklı gibi....
https://resmim.net/cdn/2025/08/17/XA3n7F.jpg
ekledik...
beyaz yükseliş....kırmızı düşüş....mavi flat....
şimdi...geliştirmeye devam....
paylaştığım sar kodlardan....işe yarayanları entegre edelim....
kanallar....v.b