Registered User
Joined: 3/2/2005
Posts: 2
|
The true strength index in metastock format is:100*(mov(mov(roc(c,1,$),40,E,20,E)/mov(mov(abs(roc(c,1,$)),40,E),20,E)).
Can someone please convert this to telechart personal criteria format?
Ty,
Corine Benbassa
|
|
Worden Trainer
Joined: 10/1/2004
Posts: 4,308
|
We'll take a look at this, and someone will post back to you. I can't interpret the Metastock language, but there is some information out on the web about this indicator.
- Doug
Teaching Online!
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
I originally thought the MetaStock formula represented 100 times a 20-Period EMA of a 40-Period EMA of the ratio of Price Rate of Change and its Absolute Value, but bustermu pointed out TSI is actually a ratio of averages, not an average of a ratio. The numerator is fairly straightforward, but the ABS function means the denominator needs to be expanded out. It is somewhat arbitrary, but the sum of the coefficients of the terms of a 40-Period Exponential Moving Average first exceeds 0.999 at 139 terms, so that is where I stopped. The formula is fairly long and using it as a Custom Indicator adds almost two seconds to the time it takes to switch symbols on my system at Zoom 1++. Try this:
100*(XAVG(XAVGC40,20)-XAVG(XAVGC40.1,20))/(0.00473682*ABS(C-C1) +0.00870907*ABS(C1-C2) +0.01208723*ABS(C2-C3) +0.01493842*ABS(C3-C4) +0.01732282*ABS(C4-C5) +0.01929443*ABS(C5-C6) +0.02090161*ABS(C6-C7) +0.02218769*ABS(C7-C8) +0.02319145*ABS(C8-C9) +0.02394757*ABS(C9-C10) +0.02448705*ABS(C10-C11) +0.02483758*ABS(C11-C12) +0.02502387*ABS(C12-C13) +0.02506794*ABS(C13-C14) +0.02498941*ABS(C14-C15) +0.02480572*ABS(C15-C16) +0.0245324*ABS(C16-C17) +0.0241832*ABS(C17-C18) +0.02377032*ABS(C18-C19) +0.02330455*ABS(C19-C20) +0.02279543*ABS(C20-C21) +0.02225137*ABS(C21-C22) +0.02167975*ABS(C22-C23) +0.02108709*ABS(C23-C24) +0.02047906*ABS(C24-C25) +0.01986064*ABS(C25-C26) +0.01923614*ABS(C26-C27) +0.01860931*ABS(C27-C28) +0.01798338*ABS(C28-C29) +0.01736115*ABS(C29-C30) +0.01674499*ABS(C30-C31) +0.01613691*ABS(C31-C32) +0.01553861*ABS(C32-C33) +0.01495151*ABS(C33-C34) +0.01437677*ABS(C34-C35) +0.01381534*ABS(C35-C36) +0.01326798*ABS(C36-C37) +0.01273527*ABS(C37-C38) +0.01221764*ABS(C38-C39) +0.01171539*ABS(C39-C40) +0.01122871*ABS(C40-C41) +0.0107577*ABS(C41-C42) +0.01030236*ABS(C42-C43) +0.00986261*ABS(C43-C44) +0.00943834*ABS(C44-C45) +0.00902935*ABS(C45-C46) +0.00863541*ABS(C46-C47) +0.00825626*ABS(C47-C48) +0.0078916*ABS(C48-C49) +0.0075411*ABS(C49-C50) +0.00720441*ABS(C50-C51) +0.00688118*ABS(C51-C52) +0.00657103*ABS(C52-C53) +0.00627358*ABS(C53-C54) +0.00598844*ABS(C54-C55) +0.00571522*ABS(C55-C56) +0.00545353*ABS(C56-C57) +0.00520297*ABS(C57-C58) +0.00496317*ABS(C58-C59) +0.00473373*ABS(C59-C60) +0.00451427*ABS(C60-C61) +0.00430443*ABS(C61-C62) +0.00410384*ABS(C62-C63) +0.00391214*ABS(C63-C64) +0.00372898*ABS(C64-C65) +0.00355402*ABS(C65-C66) +0.00338694*ABS(C66-C67) +0.00322741*ABS(C67-C68) +0.00307512*ABS(C68-C69) +0.00292977*ABS(C69-C70) +0.00279107*ABS(C70-C71) +0.00265873*ABS(C71-C72) +0.00253248*ABS(C72-C73) +0.00241207*ABS(C73-C74) +0.00229723*ABS(C74-C75) +0.00218772*ABS(C75-C76) +0.00208331*ABS(C76-C77) +0.00198378*ABS(C77-C78) +0.0018889*ABS(C78-C79) +0.00179847*ABS(C79-C80) +0.00171229*ABS(C80-C81) +0.00163016*ABS(C81-C82) +0.00155191*ABS(C82-C83) +0.00147735*ABS(C83-C84) +0.00140632*ABS(C84-C85) +0.00133866*ABS(C85-C86) +0.00127421*ABS(C86-C87) +0.00121282*ABS(C87-C88) +0.00115435*ABS(C88-C89) +0.00109867*ABS(C89-C90) +0.00104565*ABS(C90-C91) +0.00099516*ABS(C91-C92) +0.00094708*ABS(C92-C93) +0.0009013*ABS(C93-C94) +0.00085772*ABS(C94-C95) +0.00081622*ABS(C95-C96) +0.00077672*ABS(C96-C97) +0.00073911*ABS(C97-C98) +0.00070331*ABS(C98-C99) +0.00066924*ABS(C99-C100) +0.0006368*ABS(C100-C101) +0.00060592*ABS(C101-C102) +0.00057654*ABS(C102-C103) +0.00054857*ABS(C103-C104) +0.00052195*ABS(C104-C105) +0.00049662*ABS(C105-C106) +0.00047251*ABS(C106-C107) +0.00044956*ABS(C107-C108) +0.00042772*ABS(C108-C109) +0.00040695*ABS(C109-C110) +0.00038717*ABS(C110-C111) +0.00036835*ABS(C111-C112) +0.00035045*ABS(C112-C113) +0.00033341*ABS(C113-C114) +0.0003172*ABS(C114-C115) +0.00030177*ABS(C115-C116) +0.00028709*ABS(C116-C117) +0.00027313*ABS(C117-C118) +0.00025984*ABS(C118-C119) +0.00024719*ABS(C119-C120) +0.00023516*ABS(C120-C121) +0.00022372*ABS(C121-C122) +0.00021283*ABS(C122-C123) +0.00020247*ABS(C123-C124) +0.00019261*ABS(C124-C125) +0.00018323*ABS(C125-C126) +0.00017431*ABS(C126-C127) +0.00016582*ABS(C127-C128) +0.00015774*ABS(C128-C129) +0.00015006*ABS(C129-C130) +0.00014275*ABS(C130-C131) +0.0001358*ABS(C131-C132) +0.00012918*ABS(C132-C133) +0.00012289*ABS(C133-C134) +0.0001169*ABS(C134-C135) +0.0001112*ABS(C135-C136) +0.00010578*ABS(C136-C137) +0.00010063*ABS(C137-C138) +0.00009573*ABS(C138-C139))
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
Registered User
Joined: 1/2/2005
Posts: 132
|
Thanks for the TSI help Bruce!
I want to do some testing and create a %true indicator to show me when the TSI crosses it's own 6-day simple MA. Is there a way I can create a PCF to do that?? I recognize it will probably be a slow, but it's my favorite way to visually backtest some of these new tools and ideas. I have tried:
TSI > AVG(TSI,6)
assuming "TSI" equals your equation above, and I have gotten really screwy results. What am I missing? Can I AVG this way? Something tells me I can't, but I can't figure out what to try next.
Thanks a lot!
dhoward
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
The screwy results are probably because you cannot group operators within the parenthesis. For example, AVG(AVGC10 – AVGC200,30) would NOT be a valid argument, but AVG(AVGC10,30) – AVG(AVGC200,30) is valid.
Doing a Custom Percent True on the crossover of TSI and its 6-Period Simple Moving Average is really, really long and really, really slow. You are much better off using the original formula as a Custom Indicator, adding a 6-Period Simple Moving Average as a Child Indicator and visually inspecting the chart for crossovers. If you want to search for symbols with crossovers, use an Indicator Sort with TSI compared to its Moving Average and look for values close to zero.
The following videos should help with this:
Adding, removing and saving indicators to a chart template
Comparing indicators using Visual Difference sorts
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
Registered User
Joined: 10/7/2004
Posts: 799
Location: Duluth, GA
|
As an additional suggestion to Bruce's comments:
1) plot the TSI as a CustIndic and add a SimpleMA child to it
2) unflag all in system and pick your watchlist
3) SortBy Actual Value of the TSI COMPARED to its SMA child
4) for bullish crossovers, flag all symbols with positive sort values
5) plot the TSI *shifted back to yesterday* as a CustIndic with a SimpleMA child
6) SortBy Actual Value of yesterday's TSI COMPARED to its SMA child
7) now UNflag all symbols with non-negative sort values
... the remaining flagged symbols have just seen a crossover today.
Jim Dean
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
barn70,
Here is a TSI(64,5) taken out to where the sum of the coefficients of the terms of a 64-Period Exponential Moving Average first exceeds 0.999 at 222 terms:
Select Chart Template | Add Indicator | Indicator
-Visible: Checked
-Center Zero Line: Checked
-Plot Using Price Scale: Unchecked
-Smoothing Average: 1
-Indicator Formula:
100*(XAVG(XAVGC64,5)-XAVG(XAVGC64.1,5))/(0.01028832*ABS(C-C1) +0.01680936*ABS(C1-C2) +0.02085055*ABS(C2-C3) +0.02324793*ABS(C3-C4) +0.02455857*ABS(C4-C5) +0.02515356*ABS(C5-C6) +0.02528003*ABS(C6-C7) +0.02510247*ABS(C7-C8) +0.02473027*ABS(C8-C9) +0.02423613*ABS(C9-C10) +0.02366827*ABS(C10-C11) +0.02305859*ABS(C11-C12) +0.02242814*ABS(C12-C13) +0.02179075*ABS(C13-C14) +0.02115539*ABS(C14-C15) +0.02052788*ABS(C15-C16) +0.01991187*ABS(C16-C17) +0.01930961*ABS(C17-C18) +0.0187224*ABS(C18-C19) +0.01815096*ABS(C19-C20) +0.01759555*ABS(C20-C21) +0.01705621*ABS(C21-C22) +0.01653277*ABS(C22-C23) +0.01602498*ABS(C23-C24) +0.01553252*ABS(C24-C25) +0.015055*ABS(C25-C26) +0.01459204*ABS(C26-C27) +0.01414323*ABS(C27-C28) +0.01370818*ABS(C28-C29) +0.01328647*ABS(C29-C30) +0.01287771*ABS(C30-C31) +0.0124815*ABS(C31-C32) +0.01209748*ABS(C32-C33) +0.01172527*ABS(C33-C34) +0.0113645*ABS(C34-C35) +0.01101483*ABS(C35-C36) +0.01067592*ABS(C36-C37) +0.01034743*ABS(C37-C38) +0.01002905*ABS(C38-C39) +0.00972047*ABS(C39-C40) +0.00942138*ABS(C40-C41) +0.00913149*ABS(C41-C42) +0.00885052*ABS(C42-C43) +0.0085782*ABS(C43-C44) +0.00831425*ABS(C44-C45) +0.00805843*ABS(C45-C46) +0.00781048*ABS(C46-C47) +0.00757015*ABS(C47-C48) +0.00733723*ABS(C48-C49) +0.00711147*ABS(C49-C50) +0.00689265*ABS(C50-C51) +0.00668057*ABS(C51-C52) +0.00647501*ABS(C52-C53) +0.00627578*ABS(C53-C54) +0.00608268*ABS(C54-C55) +0.00589552*ABS(C55-C56) +0.00571412*ABS(C56-C57) +0.0055383*ABS(C57-C58) +0.00536789*ABS(C58-C59) +0.00520273*ABS(C59-C60) +0.00504264*ABS(C60-C61) +0.00488749*ABS(C61-C62) +0.0047371*ABS(C62-C63) +0.00459134*ABS(C63-C64) +0.00445007*ABS(C64-C65) +0.00431315*ABS(C65-C66) +0.00418043*ABS(C66-C67) +0.00405181*ABS(C67-C68) +0.00392713*ABS(C68-C69) +0.0038063*ABS(C69-C70) +0.00368918*ABS(C70-C71) +0.00357567*ABS(C71-C72) +0.00346565*ABS(C72-C73) +0.00335901*ABS(C73-C74) +0.00325566*ABS(C74-C75) +0.00315549*ABS(C75-C76) +0.00305839*ABS(C76-C77) +0.00296429*ABS(C77-C78) +0.00287308*ABS(C78-C79) +0.00278468*ABS(C79-C80) +0.002699*ABS(C80-C81) +0.00261595*ABS(C81-C82) +0.00253546*ABS(C82-C83) +0.00245744*ABS(C83-C84) +0.00238183*ABS(C84-C85) +0.00230854*ABS(C85-C86) +0.00223751*ABS(C86-C87) +0.00216867*ABS(C87-C88) +0.00210194*ABS(C88-C89) +0.00203726*ABS(C89-C90) +0.00197458*ABS(C90-C91) +0.00191382*ABS(C91-C92) +0.00185493*ABS(C92-C93) +0.00179786*ABS(C93-C94) +0.00174254*ABS(C94-C95) +0.00168892*ABS(C95-C96) +0.00163696*ABS(C96-C97) +0.00158659*ABS(C97-C98) +0.00153777*ABS(C98-C99) +0.00149045*ABS(C99-C100) +0.00144459*ABS(C100-C101) +0.00140015*ABS(C101-C102) +0.00135706*ABS(C102-C103) +0.00131531*ABS(C103-C104) +0.00127484*ABS(C104-C105) +0.00123561*ABS(C105-C106) +0.00119759*ABS(C106-C107) +0.00116074*ABS(C107-C108) +0.00112503*ABS(C108-C109) +0.00109041*ABS(C109-C110) +0.00105686*ABS(C110-C111) +0.00102434*ABS(C111-C112) +0.00099282*ABS(C112-C113) +0.00096228*ABS(C113-C114) +0.00093267*ABS(C114-C115) +0.00090397*ABS(C115-C116) +0.00087616*ABS(C116-C117) +0.0008492*ABS(C117-C118) +0.00082307*ABS(C118-C119) +0.00079774*ABS(C119-C120) +0.0007732*ABS(C120-C121) +0.00074941*ABS(C121-C122) +0.00072635*ABS(C122-C123) +0.000704*ABS(C123-C124) +0.00068234*ABS(C124-C125) +0.00066134*ABS(C125-C126) +0.00064099*ABS(C126-C127) +0.00062127*ABS(C127-C128) +0.00060215*ABS(C128-C129) +0.00058363*ABS(C129-C130) +0.00056567*ABS(C130-C131) +0.00054826*ABS(C131-C132) +0.00053139*ABS(C132-C133) +0.00051504*ABS(C133-C134) +0.0004992*ABS(C134-C135) +0.00048384*ABS(C135-C136) +0.00046895*ABS(C136-C137) +0.00045452*ABS(C137-C138) +0.00044053*ABS(C138-C139) +0.00042698*ABS(C139-C140) +0.00041384*ABS(C140-C141) +0.00040111*ABS(C141-C142) +0.00038877*ABS(C142-C143) +0.0003768*ABS(C143-C144) +0.00036521*ABS(C144-C145) +0.00035397*ABS(C145-C146) +0.00034308*ABS(C146-C147) +0.00033252*ABS(C147-C148) +0.00032229*ABS(C148-C149) +0.00031238*ABS(C149-C150) +0.00030276*ABS(C150-C151) +0.00029345*ABS(C151-C152) +0.00028442*ABS(C152-C153) +0.00027567*ABS(C153-C154) +0.00026719*ABS(C154-C155) +0.00025897*ABS(C155-C156) +0.000251*ABS(C156-C157) +0.00024327*ABS(C157-C158) +0.00023579*ABS(C158-C159) +0.00022853*ABS(C159-C160) +0.0002215*ABS(C160-C161) +0.00021469*ABS(C161-C162) +0.00020808*ABS(C162-C163) +0.00020168*ABS(C163-C164) +0.00019547*ABS(C164-C165) +0.00018946*ABS(C165-C166) +0.00018363*ABS(C166-C167) +0.00017798*ABS(C167-C168) +0.0001725*ABS(C168-C169) +0.00016719*ABS(C169-C170) +0.00016205*ABS(C170-C171) +0.00015706*ABS(C171-C172) +0.00015223*ABS(C172-C173) +0.00014755*ABS(C173-C174) +0.00014301*ABS(C174-C175) +0.00013861*ABS(C175-C176) +0.00013434*ABS(C176-C177) +0.00013021*ABS(C177-C178) +0.0001262*ABS(C178-C179) +0.00012232*ABS(C179-C180) +0.00011856*ABS(C180-C181) +0.00011491*ABS(C181-C182) +0.00011137*ABS(C182-C183) +0.00010795*ABS(C183-C184) +0.00010462*ABS(C184-C185) +0.0001014*ABS(C185-C186) +0.00009828*ABS(C186-C187) +0.00009526*ABS(C187-C188) +0.00009233*ABS(C188-C189) +0.00008949*ABS(C189-C190) +0.00008673*ABS(C190-C191) +0.00008407*ABS(C191-C192) +0.00008148*ABS(C192-C193) +0.00007897*ABS(C193-C194) +0.00007654*ABS(C194-C195) +0.00007419*ABS(C195-C196) +0.0000719*ABS(C196-C197) +0.00006969*ABS(C197-C198) +0.00006755*ABS(C198-C199) +0.00006547*ABS(C199-C200) +0.00006345*ABS(C200-C201) +0.0000615*ABS(C201-C202) +0.00005961*ABS(C202-C203) +0.00005778*ABS(C203-C204) +0.000056*ABS(C204-C205) +0.00005428*ABS(C205-C206) +0.00005261*ABS(C206-C207) +0.00005099*ABS(C207-C208) +0.00004942*ABS(C208-C209) +0.0000479*ABS(C209-C210) +0.00004642*ABS(C210-C211) +0.000045*ABS(C211-C212) +0.00004361*ABS(C212-C213) +0.00004227*ABS(C213-C214) +0.00004097*ABS(C214-C215) +0.00003971*ABS(C215-C216) +0.00003849*ABS(C216-C217) +0.0000373*ABS(C217-C218) +0.00003615*ABS(C218-C219) +0.00003504*ABS(C219-C220) +0.00003396*ABS(C220-C221) +0.00003292*ABS(C221-C222))
If you wish to add a 5-Period EMA child:
Select Chart Template | Add Indicator | Moving Average | Formula100*(XAVG(XAVG64,5)... 1 Period
-Period: 5
-Average Type: Exponential
-Shift Left: Unchecked
-Visible: Checked
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
Registered User
Joined: 11/29/2004
Posts: 36
|
Bruce
thanks, barn 70
|
|
Registered User
Joined: 11/29/2004
Posts: 36
|
Bruce:
having trouble with the 5 period child. don't understand
the 1 period, period 5 and the shift left, unchecked.
please help; or may i call you? if so, what is number?
barn70
|
|
Worden Trainer
Joined: 10/1/2004
Posts: 18,819
|
Hit the PLUS next to the custom indicator he gave you. Add a moving average with these settings:
-Period: 5
-Average Type: Exponential
-Shift Left: Unchecked
-Visible: Checked
- Craig
Here to Help!
|
|
Registered User
Joined: 11/29/2004
Posts: 36
|
Craig:
thanks, barn 70
|
|
Registered User
Joined: 1/2/2005
Posts: 132
|
QUOTE (Tanstaafl) As an additional suggestion to Bruce's comments:
1) plot the TSI as a CustIndic and add a SimpleMA child to it
2) unflag all in system and pick your watchlist
3) SortBy Actual Value of the TSI COMPARED to its SMA child
4) for bullish crossovers, flag all symbols with positive sort values
5) plot the TSI *shifted back to yesterday* as a CustIndic with a SimpleMA child
6) SortBy Actual Value of yesterday's TSI COMPARED to its SMA child
7) now UNflag all symbols with non-negative sort values
... the remaining flagged symbols have just seen a crossover today.
Jim Dean
I don't understand how to use Jim Dean's Step 5) "shifted back to yesterday" process. I expected to see a shift back option on the Custom Indicator dialog box, but I don't see one. Do I need a "Yesterday" PCF for TSI? Any help is appreciated.
Dhoward
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
Custom Indicators don't have a built in "shift" option and there isn't a way to do Indicator sorts based on previous days, so here's a formula for yesterday's TSI(40,20):
100*(XAVG(XAVGC40.1,20)-XAVG(XAVGC40.2,20))/(0.00473682*ABS(C1-C2) +0.00870907*ABS(C2-C3) +0.01208723*ABS(C3-C4) +0.01493842*ABS(C4-C5) +0.01732282*ABS(C5-C6) +0.01929443*ABS(C6-C7) +0.02090161*ABS(C7-C8) +0.02218769*ABS(C8-C9) +0.02319145*ABS(C9-C10) +0.02394757*ABS(C10-C11) +0.02448705*ABS(C11-C12) +0.02483758*ABS(C12-C13) +0.02502387*ABS(C13-C14) +0.02506794*ABS(C14-C15) +0.02498941*ABS(C15-C16) +0.02480572*ABS(C16-C17) +0.0245324*ABS(C17-C18) +0.0241832*ABS(C18-C19) +0.02377032*ABS(C19-C20) +0.02330455*ABS(C20-C21) +0.02279543*ABS(C21-C22) +0.02225137*ABS(C22-C23) +0.02167975*ABS(C23-C24) +0.02108709*ABS(C24-C25) +0.02047906*ABS(C25-C26) +0.01986064*ABS(C26-C27) +0.01923614*ABS(C27-C28) +0.01860931*ABS(C28-C29) +0.01798338*ABS(C29-C30) +0.01736115*ABS(C30-C31) +0.01674499*ABS(C31-C32) +0.01613691*ABS(C32-C33) +0.01553861*ABS(C33-C34) +0.01495151*ABS(C34-C35) +0.01437677*ABS(C35-C36) +0.01381534*ABS(C36-C37) +0.01326798*ABS(C37-C38) +0.01273527*ABS(C38-C39) +0.01221764*ABS(C39-C40) +0.01171539*ABS(C40-C41) +0.01122871*ABS(C41-C42) +0.0107577*ABS(C42-C43) +0.01030236*ABS(C43-C44) +0.00986261*ABS(C44-C45) +0.00943834*ABS(C45-C46) +0.00902935*ABS(C46-C47) +0.00863541*ABS(C47-C48) +0.00825626*ABS(C48-C49) +0.0078916*ABS(C49-C50) +0.0075411*ABS(C50-C51) +0.00720441*ABS(C51-C52) +0.00688118*ABS(C52-C53) +0.00657103*ABS(C53-C54) +0.00627358*ABS(C54-C55) +0.00598844*ABS(C55-C56) +0.00571522*ABS(C56-C57) +0.00545353*ABS(C57-C58) +0.00520297*ABS(C58-C59) +0.00496317*ABS(C59-C60) +0.00473373*ABS(C60-C61) +0.00451427*ABS(C61-C62) +0.00430443*ABS(C62-C63) +0.00410384*ABS(C63-C64) +0.00391214*ABS(C64-C65) +0.00372898*ABS(C65-C66) +0.00355402*ABS(C66-C67) +0.00338694*ABS(C67-C68) +0.00322741*ABS(C68-C69) +0.00307512*ABS(C69-C70) +0.00292977*ABS(C70-C71) +0.00279107*ABS(C71-C72) +0.00265873*ABS(C72-C73) +0.00253248*ABS(C73-C74) +0.00241207*ABS(C74-C75) +0.00229723*ABS(C75-C76) +0.00218772*ABS(C76-C77) +0.00208331*ABS(C77-C78) +0.00198378*ABS(C78-C79) +0.0018889*ABS(C79-C80) +0.00179847*ABS(C80-C81) +0.00171229*ABS(C81-C82) +0.00163016*ABS(C82-C83) +0.00155191*ABS(C83-C84) +0.00147735*ABS(C84-C85) +0.00140632*ABS(C85-C86) +0.00133866*ABS(C86-C87) +0.00127421*ABS(C87-C88) +0.00121282*ABS(C88-C89) +0.00115435*ABS(C89-C90) +0.00109867*ABS(C90-C91) +0.00104565*ABS(C91-C92) +0.00099516*ABS(C92-C93) +0.00094708*ABS(C93-C94) +0.0009013*ABS(C94-C95) +0.00085772*ABS(C95-C96) +0.00081622*ABS(C96-C97) +0.00077672*ABS(C97-C98) +0.00073911*ABS(C98-C99) +0.00070331*ABS(C99-C100) +0.00066924*ABS(C100-C101) +0.0006368*ABS(C101-C102) +0.00060592*ABS(C102-C103) +0.00057654*ABS(C103-C104) +0.00054857*ABS(C104-C105) +0.00052195*ABS(C105-C106) +0.00049662*ABS(C106-C107) +0.00047251*ABS(C107-C108) +0.00044956*ABS(C108-C109) +0.00042772*ABS(C109-C110) +0.00040695*ABS(C110-C111) +0.00038717*ABS(C111-C112) +0.00036835*ABS(C112-C113) +0.00035045*ABS(C113-C114) +0.00033341*ABS(C114-C115) +0.0003172*ABS(C115-C116) +0.00030177*ABS(C116-C117) +0.00028709*ABS(C117-C118) +0.00027313*ABS(C118-C119) +0.00025984*ABS(C119-C120) +0.00024719*ABS(C120-C121) +0.00023516*ABS(C121-C122) +0.00022372*ABS(C122-C123) +0.00021283*ABS(C123-C124) +0.00020247*ABS(C124-C125) +0.00019261*ABS(C125-C126) +0.00018323*ABS(C126-C127) +0.00017431*ABS(C127-C128) +0.00016582*ABS(C128-C129) +0.00015774*ABS(C129-C130) +0.00015006*ABS(C130-C131) +0.00014275*ABS(C131-C132) +0.0001358*ABS(C132-C133) +0.00012918*ABS(C133-C134) +0.00012289*ABS(C134-C135) +0.0001169*ABS(C135-C136) +0.0001112*ABS(C136-C137) +0.00010578*ABS(C137-C138) +0.00010063*ABS(C138-C139) +0.00009573*ABS(C139-C140))
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
 Gold Customer
Joined: 5/4/2005
Posts: 74
|
Bruce:
-Excellent ... copied your formula into a PCF and it worked as expected ... no hitches.
-Also, I applaud your patience to plow through a quagmire of algebra to produce this result.
-Now I ask a favor of you ... the Blau formulation uses different EMA periods which has been claimed by several authors to have been "optimized" for broad application.
Specifically, EMA(EMA(C-C1)25,13)/EMA(EMA(ABS(C-C1))25,13) is the recommended formulation. This is the formula you derived, however, with different averaging periods. Please-please-please revise your formula to incorporate the 25,13 periods.
Regards,
markacz
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
markacz,
Here is a TSI(25,13) taken out to where the sum of the coefficients of the terms of a 25-Period Exponential Moving Average first exceeds 0.999 at 87 terms:
100*(XAVG(XAVGC25,13)-XAVG(XAVGC25.1,13))/(0.01113441*ABS(C-C1) +0.01969708*ABS(C1-C2) +0.02625549*ABS(C2-C3) +0.03115604*ABS(C3-C4) +0.03469103*ABS(C4-C5) +0.03710672*ABS(C5-C6) +0.03861027*ABS(C6-C7) +0.0393756*ABS(C7-C8) +0.03954844*ABS(C8-C9) +0.03925059*ABS(C9-C10) +0.03858361*ABS(C10-C11) +0.03763189*ABS(C11-C12) +0.03646535*ABS(C12-C13) +0.03514165*ABS(C13-C14) +0.03370815*ABS(C14-C15) +0.03220354*ABS(C15-C16) +0.03065919*ABS(C16-C17) +0.02910038*ABS(C17-C18) +0.02754724*ABS(C18-C19) +0.02601567*ABS(C19-C20) +0.02451799*ABS(C20-C21) +0.02306359*ABS(C21-C22) +0.02165941*ABS(C22-C23) +0.02031039*ABS(C23-C24) +0.01901984*ABS(C24-C25) +0.01778974*ABS(C25-C26) +0.01662098*ABS(C26-C27) +0.01551361*ABS(C27-C28) +0.01446696*ABS(C28-C29) +0.01347986*ABS(C29-C30) +0.01255073*ABS(C30-C31) +0.01167768*ABS(C31-C32) +0.01085859*ABS(C32-C33) +0.01009119*ABS(C33-C34) +0.00937312*ABS(C34-C35) +0.00870198*ABS(C35-C36) +0.00807534*ABS(C36-C37) +0.0074908*ABS(C37-C38) +0.00694599*ABS(C38-C39) +0.0064386*ABS(C39-C40) +0.00596639*ABS(C40-C41) +0.00552721*ABS(C41-C42) +0.005119*ABS(C42-C43) +0.00473976*ABS(C43-C44) +0.00438761*ABS(C44-C45) +0.00406078*ABS(C45-C46) +0.00375756*ABS(C46-C47) +0.00347636*ABS(C47-C48) +0.00321567*ABS(C48-C49) +0.00297407*ABS(C49-C50) +0.00275024*ABS(C50-C51) +0.00254291*ABS(C51-C52) +0.00235093*ABS(C52-C53) +0.0021732*ABS(C53-C54) +0.0020087*ABS(C54-C55) +0.00185647*ABS(C55-C56) +0.00171562*ABS(C56-C57) +0.00158533*ABS(C57-C58) +0.00146482*ABS(C58-C59) +0.00135338*ABS(C59-C60) +0.00125033*ABS(C60-C61) +0.00115505*ABS(C61-C62) +0.00106698*ABS(C62-C63) +0.00098557*ABS(C63-C64) +0.00091033*ABS(C64-C65) +0.00084079*ABS(C65-C66) +0.00077653*ABS(C66-C67) +0.00071716*ABS(C67-C68) +0.0006623*ABS(C68-C69) +0.00061162*ABS(C69-C70) +0.0005648*ABS(C70-C71) +0.00052155*ABS(C71-C72) +0.00048159*ABS(C72-C73) +0.00044469*ABS(C73-C74) +0.00041061*ABS(C74-C75) +0.00037913*ABS(C75-C76) +0.00035005*ABS(C76-C77) +0.0003232*ABS(C77-C78) +0.00029841*ABS(C78-C79) +0.00027551*ABS(C79-C80) +0.00025436*ABS(C80-C81) +0.00023484*ABS(C81-C82) +0.00021681*ABS(C82-C83) +0.00020016*ABS(C83-C84) +0.00018479*ABS(C84-C85) +0.0001706*ABS(C85-C86) +0.0001575*ABS(C86-C87))
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
Gold Customer
Joined: 5/4/2005
Posts: 74
|
Bruce:
Thank you for TSI(25,13). Much appreciated ... hope others will enjoy it as well.
markacz
|
|
Registered User
Joined: 12/25/2004
Posts: 51
|
Put price chart in top window, TSI (25,13) in middle window, and Moneystream in lower. Am I alone in seeing predictive divergences between TSI and MS?
|
|
Registered User
Joined: 1/1/2005
Posts: 2,645
|
rwstic,
Please do the following modification of your setup:
Bottom Window
Money Stream
,,Moving Average - 25 bars - Exponential (Invisible)
,,,,Moving Average - 13 bars - Exponential (Invisible)
,,,,,,Rate of Change - 1 bar period
Where you see the predictive divergence between MoneyStream and TSI(25.13), do you see essentially the same divergence between MoneyStream and the Rate of Change above? Please give us some Symbols and intervals over which you observe the MoneyStream TSI(13,25) divergences.
For example, please see the divergence over the November-December '04 period in SP-500.
Thanks,
Jim Murphy
|
|
Worden Trainer
Joined: 10/1/2004
Posts: 18,819
|
rwstic,
I am not sure what you are asking (some tickers would help).
Do you mean that the two indicators are contradicting each other? If so, this is not that uncommon. Any two indicators can offer different reads on a stock. OR do you mean they are both diverging from price?
- Craig
Here to Help!
|
|
Registered User
Joined: 1/2/2005
Posts: 132
|
Thanks for the TSI(25,13) PCF. Appreciate it.
I need a "yesterday's" version of TSI(25,13). Can that be created by Bruce and Co. there?
Thanks for your help,
dhoward
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
Here is yesterday's TSI(25,13) taken out to where the sum of the coefficients of the terms of a 25-Period Exponential Moving Average first exceeds 0.999 at 87 terms:
100*(XAVG(XAVGC25.1,13)-XAVG(XAVGC25.2,13))/(0.01113441*ABS(C1-C2) +0.01969708*ABS(C2-C3) +0.02625549*ABS(C3-C4) +0.03115604*ABS(C4-C5) +0.03469103*ABS(C5-C6) +0.03710672*ABS(C6-C7) +0.03861027*ABS(C7-C8) +0.0393756*ABS(C8-C9) +0.03954844*ABS(C9-C10) +0.03925059*ABS(C10-C11) +0.03858361*ABS(C11-C12) +0.03763189*ABS(C12-C13) +0.03646535*ABS(C13-C14) +0.03514165*ABS(C14-C15) +0.03370815*ABS(C15-C16) +0.03220354*ABS(C16-C17) +0.03065919*ABS(C17-C18) +0.02910038*ABS(C18-C19) +0.02754724*ABS(C19-C20) +0.02601567*ABS(C20-C21) +0.02451799*ABS(C21-C22) +0.02306359*ABS(C22-C23) +0.02165941*ABS(C23-C24) +0.02031039*ABS(C24-C25) +0.01901984*ABS(C25-C26) +0.01778974*ABS(C26-C27) +0.01662098*ABS(C27-C28) +0.01551361*ABS(C28-C29) +0.01446696*ABS(C29-C30) +0.01347986*ABS(C30-C31) +0.01255073*ABS(C31-C32) +0.01167768*ABS(C32-C33) +0.01085859*ABS(C33-C34) +0.01009119*ABS(C34-C35) +0.00937312*ABS(C35-C36) +0.00870198*ABS(C36-C37) +0.00807534*ABS(C37-C38) +0.0074908*ABS(C38-C39) +0.00694599*ABS(C39-C40) +0.0064386*ABS(C40-C41) +0.00596639*ABS(C41-C42) +0.00552721*ABS(C42-C43) +0.005119*ABS(C43-C44) +0.00473976*ABS(C44-C45) +0.00438761*ABS(C45-C46) +0.00406078*ABS(C46-C47) +0.00375756*ABS(C47-C48) +0.00347636*ABS(C48-C49) +0.00321567*ABS(C49-C50) +0.00297407*ABS(C50-C51) +0.00275024*ABS(C51-C52) +0.00254291*ABS(C52-C53) +0.00235093*ABS(C53-C54) +0.0021732*ABS(C54-C55) +0.0020087*ABS(C55-C56) +0.00185647*ABS(C56-C57) +0.00171562*ABS(C57-C58) +0.00158533*ABS(C58-C59) +0.00146482*ABS(C59-C60) +0.00135338*ABS(C60-C61) +0.00125033*ABS(C61-C62) +0.00115505*ABS(C62-C63) +0.00106698*ABS(C63-C64) +0.00098557*ABS(C64-C65) +0.00091033*ABS(C65-C66) +0.00084079*ABS(C66-C67) +0.00077653*ABS(C67-C68) +0.00071716*ABS(C68-C69) +0.0006623*ABS(C69-C70) +0.00061162*ABS(C70-C71) +0.0005648*ABS(C71-C72) +0.00052155*ABS(C72-C73) +0.00048159*ABS(C73-C74) +0.00044469*ABS(C74-C75) +0.00041061*ABS(C75-C76) +0.00037913*ABS(C76-C77) +0.00035005*ABS(C77-C78) +0.0003232*ABS(C78-C79) +0.00029841*ABS(C79-C80) +0.00027551*ABS(C80-C81) +0.00025436*ABS(C81-C82) +0.00023484*ABS(C82-C83) +0.00021681*ABS(C83-C84) +0.00020016*ABS(C84-C85) +0.00018479*ABS(C85-C86) +0.0001706*ABS(C86-C87) +0.0001575*ABS(C87-C88))
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
Registered User
Joined: 1/2/2005
Posts: 132
|
Thanks Bruce!! That was quick. :)
|
|
Gold Customer
Joined: 5/4/2005
Posts: 74
|
Bruce:
Is your 8.11 post for TSI(25,13) equivalent to that you posted on 7.07? Just glancing at the last term, they appear to be different?
markacz
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
The Thursday, July 07, 2005 1:46:36 PM post is the current TSI(25,13).
The Thursday, August 11, 2005 8:16:04 PM post is yesterday's TSI(25,13).
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
Gold Customer
Joined: 5/4/2005
Posts: 74
|
Thanks Bruce
markacz
|
|
Registered User
Joined: 1/5/2007
Posts: 21
|
Setting any of th TSI algorithms above to test for '> 0' works fine in a custom %true indicator, but if I test them saying TSI > -20 the %true indicator error says it must return a boolean value for the %true indicator. But the test seems to be a boolean test. Testing it against > 0 should work the same as testing it against > -10. What am I missing???
Many thanks,
dhoward
|
|
Registered User
Joined: 1/28/2005
Posts: 6,049
|
I believe you have to put the minus
10 inside of it own parentheses.
Otherwise it is viewed as a math operation.
Try:
>(-10)
Thanks
diceman
|
|
Registered User
Joined: 1/5/2007
Posts: 21
|
Thanks, but nope, > (-10) does work either... Darn. Mind you > 0, > 10, > 100 all work fine, but > -10 and > (-10) fails.
Thanks,
dhoward
|
|
Registered User
Joined: 1/28/2005
Posts: 6,049
|
Maybe you should try putting the whole TSI
formula in parenthesis. Then the minus 10.
So you have this:
(TSI Formula)>(-10)
Thanks
diceman
|
|
Registered User
Joined: 1/28/2005
Posts: 6,049
|
This worked in my system:
100*(XAVG(XAVGC25,13)-XAVG(XAVGC25.1,13))/(0.01113441*ABS(C-C1) +0.01969708*ABS(C1-C2) +0.02625549*ABS(C2-C3) +0.03115604*ABS(C3-C4) +0.03469103*ABS(C4-C5) +0.03710672*ABS(C5-C6) +0.03861027*ABS(C6-C7) +0.0393756*ABS(C7-C8) +0.03954844*ABS(C8-C9) +0.03925059*ABS(C9-C10) +0.03858361*ABS(C10-C11) +0.03763189*ABS(C11-C12) +0.03646535*ABS(C12-C13) +0.03514165*ABS(C13-C14) +0.03370815*ABS(C14-C15) +0.03220354*ABS(C15-C16) +0.03065919*ABS(C16-C17) +0.02910038*ABS(C17-C18) +0.02754724*ABS(C18-C19) +0.02601567*ABS(C19-C20) +0.02451799*ABS(C20-C21) +0.02306359*ABS(C21-C22) +0.02165941*ABS(C22-C23) +0.02031039*ABS(C23-C24) +0.01901984*ABS(C24-C25) +0.01778974*ABS(C25-C26) +0.01662098*ABS(C26-C27) +0.01551361*ABS(C27-C28) +0.01446696*ABS(C28-C29) +0.01347986*ABS(C29-C30) +0.01255073*ABS(C30-C31) +0.01167768*ABS(C31-C32) +0.01085859*ABS(C32-C33) +0.01009119*ABS(C33-C34) +0.00937312*ABS(C34-C35) +0.00870198*ABS(C35-C36) +0.00807534*ABS(C36-C37) +0.0074908*ABS(C37-C38) +0.00694599*ABS(C38-C39) +0.0064386*ABS(C39-C40) +0.00596639*ABS(C40-C41) +0.00552721*ABS(C41-C42) +0.005119*ABS(C42-C43) +0.00473976*ABS(C43-C44) +0.00438761*ABS(C44-C45) +0.00406078*ABS(C45-C46) +0.00375756*ABS(C46-C47) +0.00347636*ABS(C47-C48) +0.00321567*ABS(C48-C49) +0.00297407*ABS(C49-C50) +0.00275024*ABS(C50-C51) +0.00254291*ABS(C51-C52) +0.00235093*ABS(C52-C53) +0.0021732*ABS(C53-C54) +0.0020087*ABS(C54-C55) +0.00185647*ABS(C55-C56) +0.00171562*ABS(C56-C57) +0.00158533*ABS(C57-C58) +0.00146482*ABS(C58-C59) +0.00135338*ABS(C59-C60) +0.00125033*ABS(C60-C61) +0.00115505*ABS(C61-C62) +0.00106698*ABS(C62-C63) +0.00098557*ABS(C63-C64) +0.00091033*ABS(C64-C65) +0.00084079*ABS(C65-C66) +0.00077653*ABS(C66-C67) +0.00071716*ABS(C67-C68) +0.0006623*ABS(C68-C69) +0.00061162*ABS(C69-C70) +0.0005648*ABS(C70-C71) +0.00052155*ABS(C71-C72) +0.00048159*ABS(C72-C73) +0.00044469*ABS(C73-C74) +0.00041061*ABS(C74-C75) +0.00037913*ABS(C75-C76) +0.00035005*ABS(C76-C77) +0.0003232*ABS(C77-C78) +0.00029841*ABS(C78-C79) +0.00027551*ABS(C79-C80) +0.00025436*ABS(C80-C81) +0.00023484*ABS(C81-C82) +0.00021681*ABS(C82-C83) +0.00020016*ABS(C83-C84) +0.00018479*ABS(C84-C85) +0.0001706*ABS(C85-C86) +0.0001575*ABS(C86-C87))>(-10)
Thanks
diceman
|
|
Registered User
Joined: 1/5/2007
Posts: 21
|
Diceman you did it. I copied and pasted yours and it works. Not sure what weird bit I had in the equation but it works now! Many thanks for sticking it out with me tonight.
dhoward
|
|
Registered User
Joined: 10/7/2004
Posts: 794
|
I was reading a a submission by "Sir Connie Mack" and he referred to a TSI(True Strength Index) 7/7/7 and a weighted TSI 3/3/3
How might one code this?
Thank you in advance!
|
|
Worden Trainer
Joined: 10/7/2004
Posts: 65,138
|
Quiktdr,
I think the TSI 7,7 can be written as:
100 * (XAVG(XAVGC7,7) - XAVG(XAVGC7.1,7)) / (.0625565556198106 * (ABS(C - C1) + .75 * (2 * ABS(C1 - C2) + .75 * (3 * ABS(C2 - C3) + .75 * (4 * ABS(C3 - C4) + .75 * (5 * ABS(C4 - C5) + .75 * (6 * ABS(C5 - C6) + .75 * (7 * ABS(C6 - C7) + .75 * (8 * ABS(C7 - C8) + .75 * (9 * ABS(C8 - C9) + .75 * (10 * ABS(C9 - C10) + .75 * (11 * ABS(C10 - C11) + .75 * (12 * ABS(C11 - C12) + .75 * (13 * ABS(C12 - C13) + .75 * (14 * ABS(C13 - C14) + .75 * (15 * ABS(C14 - C15) + .75 * (16 * ABS(C15 - C16) + .75 * (17 * ABS(C16 - C17) + .75 * (18 * ABS(C17 - C18) + .75 * (19 * ABS(C18 - C19) + .75 * (20 * ABS(C19 - C20) + .75 * (21 * ABS(C20 - C21) + .75 * (22 * ABS(C21 - C22) + .75 * (23 * ABS(C22 - C23) + .75 * (24 * ABS(C23 - C24) + .75 * (25 * ABS(C24 - C25) + .75 * (26 * ABS(C25 - C26) + .75 * (27 * ABS(C26 - C27) + .75 * (28 * ABS(C27 - C28) + .75 * (29 * ABS(C28 - C29) + .75 * (30 * ABS(C29 - C30) + .75 * (31 * ABS(C30 - C31) + .75 * (32 * ABS(C31 - C32))))))))))))))))))))))))))))))))))
While I think the Weighted TSI 3,3 can be written as:
100 * (V * (C - C1) + .5 * (2 * V1 * (C1 - C2) + .5 * (3 * V2 * (C2 - C3) + .5 * (4 * V3 * (C3 - C4) + .5 * (5 * V4 * (C4 - C5) + .5 * (6 * V5 * (C5 - C6) + .5 * (7 * V6 * (C6 - C7) + .5 * (8 * V7 * (C7 - C8) + .5 * (9 * V8 * (C8 - C9) + .5 * (10 * V9 * (C9 - C10) + .5 * (11 * V10 * (C10 - C11) + .5 * (12 * V11 * (C11 - C12) + .5 * (13 * V12 * (C12 - C13)))))))))))))) / (V * ABS(C - C1) + .5 * (2 * V1 * ABS(C1 - C2) + .5 * (3 * V2 * ABS(C2 - C3) + .5 * (4 * V3 * ABS(C3 - C4) + .5 * (5 * V4 * ABS(C4 - C5) + .5 * (6 * V5 * ABS(C5 - C6) + .5 * (7 * V6 * ABS(C6 - C7) + .5 * (8 * V7 * ABS(C7 - C8) + .5 * (9 * V8 * ABS(C8 - C9) + .5 * (10 * V9 * ABS(C9 - C10) + .5 * (11 * V10 * ABS(C10 - C11) + .5 * (12 * V11 * ABS(C11 - C12) + .5 * (13 * V12 * ABS(C12 - C13))))))))))))))
Adding the third Moving Average as part of a Personal Criteria Formula seems to be impractical for either formula. If you are Plotting the first formula as a Custom Indicator, you could add a 7-Period Exponential Moving Average to this to get the TSI 7,7,7. I cannot think of a practical way to add the 3-Period Volume Weighted Moving Average to the TSI 3,3 however.
You may wish to review the following:
How to create a Personal Criteria Forumula (PCF)
Plotting Custom Indicators with Examples
PCF Formula Descriptions
Cascades of Moving Averages
-Bruce
Personal Criteria Formulas
TC2000 Support Articles
|
|
|
Guest-1 |