Hi Mark,
Hardly great and noble, more grated and knoble after having a down computer since last Friday. Still it may have been a blessing as I happened to be looking at STEM this am and jumped on it in size. eSig went down as the fed announced it's decision, so I missed the top, but still a good day.
Anyway, I'll here's a shot - however I haven't worked with WOW for nearly a year and I've never used WOW's Internet trader program. Does the IT version use the same coding language of the old WOW Pro? If I left a copy of WOW on my old computer (that the kids inherited) and some data I'll be able test this scan; but probably not before this weekend. After digging in the back of my brain on how to construct an end of day version, I cobbled this simple version together for you to try - PM if doesn't run, as I can't check it [and remember to watch the ( )s and that cut and paste may not work from SI to WOW].
alertmarker(close>2 AND mov(c,20,e) > prev((mov(c,20,e)),2) AND pdi(14)-mdi(14) >= 3 AND ( close > .85*(mov(c,20,e)) OR close < 1.05*(mov(c,20,e)) ) OR stoch(5,1) < 50 )
I didn't realize that you were still using that WOW kludge dog, thought you had converted to eSig. 'Course, eSig alone won't allow you to set intraday alarms for this - you'd need Ravenquote, Ensign or something else.
But if it is a real end of day scan you'd be needing, then I'd recommend (again) Quotes Plus to ya, laddie. (Shameless, gratuitious plug <VBG>.) And for anyone else lookin' with QP try this:
// Rashid's DI Delta Scan (W/ Patrick's Mods)
// scanning for (+di)-(+di)>= 3 and increasing (over past // 3 days) with Close in 85% to 105% of rising (over 5 // days) 20 day EMA or 5 period daily stochastic under 50 // plus close and volume filters
Input="common.lst"; // specify your prescan list OUTPUT="Rashid's DI Delta.txt";
DaystoLoad = 250; DaysRequired=250;
Set MDM = 14; // Sets the +DI period to 14 Set PDM = 14; // Sets the -DI period to 14 Set Stochastic = 5,3,1; // Sets fast stoch to 5
Integer A, AV, Z, Bar; A:= 3; // set the delta value for +DI to be > -DI AV:= 150000; // set the average vol required Z:= 20; // set period for average volume check Bar:= 0; // set day to check
float MA, MA1,MA2,MA5, D,D1,D2, FS; MA := emovavg(bar,20,cl); MA1:=emovavg(bar-1,20,cl); MA2:=emovavg(bar-2,20,cl); MA5:=emovavg(bar-5,20,cl); D := PDM(bar)- MDM(bar); D1 := PDM(bar-1)- MDM(bar-1); D2 := PDM(bar-2)- MDM(bar-2); FS := StochasticPctK(bar);
If close(bar) >= 3 and close(bar) <= 25 then
if avgvol(bar,bar-Z) >= AV then
if MA >MA1 and MA1 >MA2 and MA2 >MA5 then
If D >= A //checks for specified delta AND D > D1 AND D1 > D2 then
if ( close(bar) > .85 *MA and close(bar) < 1.05*MA ) OR FS < 50 then
println symbol:-6," ",", ", close(bar):-8:3," ",", ", DESCRIPTION;
endif; endif; endif; endif; endif;
This scan (with my prescan) gives the following for tonite's data: BBC CHK CHR DRE GOU GT ICBC MLTX NFB PLD PMTC PXD RSFC SLE SUPG WR. See any you like Mark?
Peace and Justice --- Patrick |