Re: Increasing the MetaStock(R) Formula Language with MetaStock 7

["Walter Lake" <wlake@xxxxxxxxx>]

Well put Daniel.

Although the learning curve is steep, I've found VBA programming much easier
than expected.

There are lots of good books ... many sites are available for help ... and
there are a group of people in the "MVP Excel" program who are amazing
programmers that offer free advice. Hooking up with one of them is
invaluable.

As I get into the coding, variations in coding quickly come to the surface,
i.e.: ... it's amazing how two versions of chart creation code can run at
such
different speeds.

An edited version of Walkenbach's code in his programming book takes about
one second to create the following chart:

Sub CreateEntryExitPriceChart()

    Charts.Add
    ActiveChart.Location Where:=xlLocationAsNewSheet, Name:="EntryExitPrice"
    With ActiveChart
        .SetSourceData Source:=Sheets("Data").range("C1:C15,E1:E15"),
PlotBy:= _
        xlColumns
        .ChartType = xlLine
        .HasTitle = False
        .SeriesCollection(1).XValues = "=Data!C1"
        .SeriesCollection(1).Name = "=""EntryPrice"""
        .SeriesCollection(2).XValues = "=Data!C1"
        .SeriesCollection(2).Name = "=""ExitPrice"""
        .Legend.Position = xlTop
        .SizeWithWindow = True
    End With
End Sub

The same edited code from the WROX VBA coding book is suppose to be "more
elegant" but takes a "progress meter" to measure it's creation time <G>:

Sub EntryExitPriceChart()

Dim Cht As Chart

Set Cht = Charts.Add
With Cht
    .SetSourceData Source:=Sheets("Data").range("C:C,E:E"), PlotBy:= _
        xlColumns
    .ChartType = xlLine
    .HasTitle = False
    .SeriesCollection(1).XValues = "=Data!C1"
    .SeriesCollection(1).Name = "=""EntryPrice"""
    .SeriesCollection(2).XValues = "=Data!C1"
    .SeriesCollection(2).Name = "=""ExitPrice"""
    .Legend.Position = xlTop
    .SizeWithWindow = True
    End With
End Sub

Best regards

Walter

----- Original Message -----
From: Daniel Martinez
To: metastock@xxxxxxxxxxxxx
Sent: Thursday, November 04, 1999 10:08 PM
Subject: Re: Increasing the MetaStock(R) Formula Language with MetaStock 7


I concur.  Learning to program is a complicated process.  I don't want to
put a damper on the celebrations here, but becoming proficient at
programming could take up to a year.  That is, of course, if you were to
spend at least 2 hours a day on VB.  It's hard enough to learn how to
program in VBA, now we are expected to program in full VB?  I think not.
Maybe when I'm not full-time trading, not system testing, not learning new
TA methods, not learning Elliot Wave...
Fact is, the average full-time trader wants to make money, not learn how to
program VB.  I think a more efficient route would be for Equis to create a
program similar to RadarScreen to track large numbers of stocks in realtime.
I have been tracking a (much smaller) group of stocks delayed and this is
definitely a way to spot moving stocks during the day.
Just my 2¢,
Daniel.

Walter Lake wrote:
Don
What you say makes perfect sense ... the installed base of VB and Excel is
huge. What is this "Power Basic" nonsense to mainstream users ... just more
"not really being helpful stuff" to confuse and complicate the issue?
Let me know when your program is ready. I'd be glad to work with someone who
is trying not "trying".
Best regards
Walter