Silicon Investor (SI) -- The First Internet Community

STOCKTALK

We've detected that you're using an ad content blocking browser plug-in or feature. Ads provide a critical source of revenue to the continued operation of Silicon Investor. We ask that you disable ad blocking while on Silicon Investor in the best interests of our community. If you are not using an ad blocker but are still receiving this message, make sure your browser's tracking protection is set to the 'standard' level.

Strategies & Market Trends : TA-Quotes Plus -- Ignore unavailable to you. Want to Upgrade?

To: Craig DeHaan who wrote (6565)	9/17/1998 12:41:00 AM
From: Nazbuster	Respond to of 11149

I've been having problems getting my internet downloader to run since Saturday. I finally figured out what was required: I am running the beta version of the program and apparently it requires the server address be set to qp2b.com Once I did this, the download worked. Unfortunately, my scans also hang at Benihana. We'll have to wait for corrected data, I guess.

To: Craig DeHaan who wrote (6565)	9/17/1998 12:42:00 AM
From: gonzongo	Respond to of 11149

It happened earlier- much earlier but I didn't read the thread till later..... as far as my fine tuned scans....... a good scan doth not a good trader make... yet a good trader doth make a bad scan quite good. g

To: Craig DeHaan who wrote (6565)	9/17/1998 12:47:00 AM
From: gonzongo	Read Replies (2) \| Respond to of 11149

my latest objet d'art- in honor of your long route to nowhere tonight Craig: output = "srsi21up.lst"; input="250vol.lst"; ProcessMS = "c:\meta\srsi21up\",VMS; Daystoload = 400; daysrequired=399; integer p,i,j; float weight, maperiod1, maperiod2, total, totaldays, StochRSI,pctgain, PrvStRSI, PrvPrvSRSI,bb; set rsi=21; for p = 0 to 0 step 1 do if close(p) > close(p-1) then if (vol(p) > avgvol(p-1,p-34))or vol(p) < .35avgvol(p-1,p-34) then if qrs(p) > 87 or (qrs (p) < 30 and qrs(p)>0) then if movavg(p,89,hi)/movavg(p,89,lo) > 1.039 then bb :=(stdev(p,p-7)/(.000001+max(p-1,p-144,hi)-min(p-1,p-144,lo)))100; if bb<9 then maperiod1:=21; maperiod2:=21; set rsi = maperiod1; weight:=0; total:=0; for i = maperiod2 to 1 step -1 do total:= total + i; next i; totaldays:=total; StochRSI:=0; PrvStRSI:=0; PrvPrvSRSI:=0; for j = maperiod2 to 1 step -1 do weight:=((j/totaldays)100); StochRSI:=StochRSI+((rsi(j-(maperiod2-p))-min(j-(maperiod2-p),(j-maperiod2)-(maperiod1-1-p),rsi))/(.000001+max(j-(maperiod2-p),(j-maperiod2)-(maperiod1-1-p),rsi)-min(j-(maperiod2-p),(j-maperiod2)-(maperiod1-1-p),rsi))(weight)); PrvStRSI:=PrvStRSI+((rsi(j-(maperiod2+1-p))-min(j-(maperiod2+1-p),(j-maperiod2)-(maperiod1-p),rsi))/(.000001+max(j-(maperiod2+1-p),(j-maperiod2)-(maperiod1-p),rsi)-min(j-(maperiod2+1-p),(j-maperiod2)-(maperiod1-p),rsi))(weight)); PrvPrvSRSI:=PrvPrvSRSI+((rsi(j-(maperiod2+2))-min(j-(maperiod2+2),(j-maperiod2)-(maperiod1+1),rsi))/(.000001+max(j-(maperiod2+2),(j-maperiod2)-(maperiod1+1),rsi)-min(j-(maperiod2+2),(j-maperiod2)-(maperiod1+1),rsi))(weight)); next j; if StochRSI>29.99 then if StochRSI>PrvStRSI then if PrvStRSI<30 then if p<-29 then pctgain := ((Max(p+30,p+1,hi))/close(p))-1; Println Symbol:-6,",",max(p+30,p+1,hi):6:3,",",close(p):6:3,",",pctgain:6:3,",",StochRSI:5:1,",",PrvStRSI:5:1,",",vol(p)/(avgvol(p-1,p-34)):6:3,",",qrs(p):4:0,",",date(p),",","SR2121UP"; else Println Symbol:-6,",",close(0):6:3,",",close(-1):6:3,",",close(p):6:3,",",StochRSI:5:1,",",PrvStRSI:5:1,",",vol(p):8:0,",",avgvol(p,p-33):8:0,",",qrs(p):4:0,",",date(p),",","srsi21up",",",min(p,p-1,lo):6:3; endif; endif; endif; endif;endif;endif;endif;endif;endif; next p;