<% Response.Redirect "/workshop/down.htm" %>

Workshop Screen Current Rankings

Last Updated: August 28, 1998

All stocks listed here are in order according to the screen's ranking system.

Changes to the Weekly Database 
  
 Delete: 
 Darden Restaurants <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: DRI)") else Response.Write("(NYSE: DRI)") end if %> 
 Papa John's Int'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: PZZA)") else Response.Write("(Nasdaq: PZZA)") end if %> 
 Philips Elec (NY Shs) <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: PHG)") else Response.Write("(NYSE: PHG)") end if %> 
 SunAmerica Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SAI)") else Response.Write("(NYSE: SAI)") end if %> 
  
 Add: 
 ADAC Labs <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: ADAC)") else Response.Write("(Nasdaq: ADAC)") end if %> 
 Eagle Hardware <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: EAGL)") else Response.Write("(Nasdaq: EAGL)") end if %> 
 Just For Feet <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: FEET)") else Response.Write("(Nasdaq: FEET)") end if %> 
 Sun Microsystems <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SUNW)") else Response.Write("(Nasdaq: SUNW)") end if %> 
  
  
 Unemotional Growth 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 Staples  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SPLS)") else Response.Write("(Nasdaq: SPLS)") end if %> 
 HBO & Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: HBOC)") else Response.Write("(Nasdaq: HBOC)") end if %> 
 PeopleSoft <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: PSFT)") else Response.Write("(Nasdaq: PSFT)") end if %> 
 Anchor Gaming <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SLOT)") else Response.Write("(Nasdaq: SLOT)") end if %> 
 Lexmark Int'l `A' <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LXK)") else Response.Write("(NYSE: LXK)") end if %> 
 Keane Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(AMEX: KEA)") else Response.Write("(AMEX: KEA)") end if %> 
 Robert Half Int'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: RHI)") else Response.Write("(NYSE: RHI)") end if %> 
 Dollar Tree Stores <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DLTR)") else Response.Write("(Nasdaq: DLTR)") end if %> 
 CKE Restaurants <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CKR)") else Response.Write("(NYSE: CKR)") end if %> 
  
 Relative Strength -- IBD Method 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 Capital One Fin'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: COF)") else Response.Write("(NYSE: COF)") end if %> 
 Vodafone Group ADR <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: VOD)") else Response.Write("(NYSE: VOD)") end if %> 
 America Online <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AOL)") else Response.Write("(NYSE: AOL)") end if %> 
 Best Buy Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BBY)") else Response.Write("(NYSE: BBY)") end if %> 
 Lexmark Int'l `A' <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LXK)") else Response.Write("(NYSE: LXK)") end if %> 
 Cisco Systems <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: CSCO)") else Response.Write("(Nasdaq: CSCO)") end if %> 
 EMC Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: EMC)") else Response.Write("(NYSE: EMC)") end if %> 
 Pulte Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: PHM)") else Response.Write("(NYSE: PHM)") end if %> 
 AEGON Ins. Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AEG)") else Response.Write("(NYSE: AEG)") end if %> 
  
 Relative Strength -- 26-Week Method 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 America Online <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AOL)") else Response.Write("(NYSE: AOL)") end if %> 
 Recoton Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: RCOT)") else Response.Write("(Nasdaq: RCOT)") end if %> 
 AnnTaylor Stores <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ANN)") else Response.Write("(NYSE: ANN)") end if %> 
 Best Buy Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BBY)") else Response.Write("(NYSE: BBY)") end if %> 
 Capital One Fin'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: COF)") else Response.Write("(NYSE: COF)") end if %> 
 Vodafone Group ADR <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: VOD)") else Response.Write("(NYSE: VOD)") end if %> 
 AEGON Ins. Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AEG)") else Response.Write("(NYSE: AEG)") end if %> 
 McKesson Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: MCK)") else Response.Write("(NYSE: MCK)") end if %> 
 Lexmark Int'l `A' <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LXK)") else Response.Write("(NYSE: LXK)") end if %> 
  
 Formula 90 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 Capital One Fin'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: COF)") else Response.Write("(NYSE: COF)") end if %> 
 Lexmark Int'l `A' <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LXK)") else Response.Write("(NYSE: LXK)") end if %> 
 Cisco Systems <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: CSCO)") else Response.Write("(Nasdaq: CSCO)") end if %> 
 EMC Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: EMC)") else Response.Write("(NYSE: EMC)") end if %> 
 Pulte Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: PHM)") else Response.Write("(NYSE: PHM)") end if %> 
 Staples  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SPLS)") else Response.Write("(Nasdaq: SPLS)") end if %> 
 Gap (The)  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: GPS)") else Response.Write("(NYSE: GPS)") end if %> 
 Safeskin Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SFSK)") else Response.Write("(Nasdaq: SFSK)") end if %> 
 Nokia Corp. ADR <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: NOK.A)") else Response.Write("(NYSE: NOK.A)") end if %> -- tie 
 Symbol Technologies <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SBL)") else Response.Write("(NYSE: SBL)") end if %> -- tie 
  
 Low Price/Sales 
 Recoton Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: RCOT)") else Response.Write("(Nasdaq: RCOT)") end if %> 
 McKesson Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: MCK)") else Response.Write("(NYSE: MCK)") end if %> 
 Pulte Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: PHM)") else Response.Write("(NYSE: PHM)") end if %> 
 Staples  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SPLS)") else Response.Write("(Nasdaq: SPLS)") end if %> 
 Wal-Mart Stores <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WMT)") else Response.Write("(NYSE: WMT)") end if %> 
 Lowe's Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LOW)") else Response.Write("(NYSE: LOW)") end if %> 
 TJX Companies <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: TJX)") else Response.Write("(NYSE: TJX)") end if %> 
 Eagle Hardware <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: EAGL)") else Response.Write("(Nasdaq: EAGL)") end if %> 
 Kmart Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: KM)") else Response.Write("(NYSE: KM)") end if %> 
 Westpoint Stevens <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: WPSN)") else Response.Write("(Nasdaq: WPSN)") end if %> 
  
 Investing for Growth -- Classic (all candidates) 
 HBO & Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: HBOC)") else Response.Write("(Nasdaq: HBOC)") end if %> 
 Keane Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(AMEX: KEA)") else Response.Write("(AMEX: KEA)") end if %> 
 Microsoft Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: MSFT)") else Response.Write("(Nasdaq: MSFT)") end if %> 
 Paychex, Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: PAYX)") else Response.Write("(Nasdaq: PAYX)") end if %> 
 Computer Sciences <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CSC)") else Response.Write("(NYSE: CSC)") end if %> 
 Dollar General Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: DG)") else Response.Write("(NYSE: DG)") end if %> 
 Wal-Mart Stores <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WMT)") else Response.Write("(NYSE: WMT)") end if %> 
 Home Depot <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: HD)") else Response.Write("(NYSE: HD)") end if %> 
 Lowe's Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LOW)") else Response.Write("(NYSE: LOW)") end if %> 
 Williams-Sonoma <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WSM)") else Response.Write("(NYSE: WSM)") end if %> 
 Gap (The), Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: GPS)") else Response.Write("(NYSE: GPS)") end if %> 
 Best Buy Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BBY)") else Response.Write("(NYSE: BBY)") end if %> 
 Nautica Enterprises <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: NAUT)") else Response.Write("(Nasdaq: NAUT)") end if %> 
 Jones Pharma <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: JMED)") else Response.Write("(Nasdaq: JMED)") end if %> 
 Schering-Plough <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SGP)") else Response.Write("(NYSE: SGP)") end if %> 
 Helen of Troy Ltd. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: HELE)") else Response.Write("(Nasdaq: HELE)") end if %> 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 Sun Microsystems <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SUNW)") else Response.Write("(Nasdaq: SUNW)") end if %> 
 Tellabs, Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: TLAB)") else Response.Write("(Nasdaq: TLAB)") end if %> 
 Electronic Arts <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: ERTS)") else Response.Write("(Nasdaq: ERTS)") end if %> 
 Century Tel. Enterprises <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CTL)") else Response.Write("(NYSE: CTL)") end if %> 
 Robert Half Int'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: RHI)") else Response.Write("(NYSE: RHI)") end if %> 
 Recoton Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: RCOT)") else Response.Write("(Nasdaq: RCOT)") end if %> 
 Symbol Technologies <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SBL)") else Response.Write("(NYSE: SBL)") end if %> 
  
 Investing for Growth -- Relative Strength 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 Recoton Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: RCOT)") else Response.Write("(Nasdaq: RCOT)") end if %> 
 Best Buy Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BBY)") else Response.Write("(NYSE: BBY)") end if %> 
 Wal-Mart Stores <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WMT)") else Response.Write("(NYSE: WMT)") end if %> 
 Helen of Troy Ltd. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: HELE)") else Response.Write("(Nasdaq: HELE)") end if %> 
 Symbol Technologies <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SBL)") else Response.Write("(NYSE: SBL)") end if %> 
 Lowe's Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LOW)") else Response.Write("(NYSE: LOW)") end if %> 
 Home Depot <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: HD)") else Response.Write("(NYSE: HD)") end if %> 
 Schering-Plough <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SGP)") else Response.Write("(NYSE: SGP)") end if %> 
 Microsoft Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: MSFT)") else Response.Write("(Nasdaq: MSFT)") end if %> 
  
 Keystone (all 30 candidates) 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 America Online <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AOL)") else Response.Write("(NYSE: AOL)") end if %> 
 Cisco Systems <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: CSCO)") else Response.Write("(Nasdaq: CSCO)") end if %> 
 EMC Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: EMC)") else Response.Write("(NYSE: EMC)") end if %> 
 Warner-Lambert <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WLA)") else Response.Write("(NYSE: WLA)") end if %> 
 Wal-Mart Stores <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WMT)") else Response.Write("(NYSE: WMT)") end if %> 
 AirTouch Communic. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ATI)") else Response.Write("(NYSE: ATI)") end if %> 
 Home Depot <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: HD)") else Response.Write("(NYSE: HD)") end if %> 
 Schering-Plough <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SGP)") else Response.Write("(NYSE: SGP)") end if %> 
 Time Warner <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: TWX)") else Response.Write("(NYSE: TWX)") end if %> 
 Walgreen Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WAG)") else Response.Write("(NYSE: WAG)") end if %> 
 Eastman Kodak <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: EK)") else Response.Write("(NYSE: EK)") end if %> 
 Microsoft Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: MSFT)") else Response.Write("(Nasdaq: MSFT)") end if %> 
 Gap (The)  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: GPS)") else Response.Write("(NYSE: GPS)") end if %> 
 Amgen <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: AMGN)") else Response.Write("(Nasdaq: AMGN)") end if %> 
 Waste Management <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WMI)") else Response.Write("(NYSE: WMI)") end if %> 
 Tyco Int'l Ltd. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: TYC)") else Response.Write("(NYSE: TYC)") end if %> 
 Safeway Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SWY)") else Response.Write("(NYSE: SWY)") end if %> 
 Pfizer  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: PFE)") else Response.Write("(NYSE: PFE)") end if %> 
 Dayton Hudson <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: DH)") else Response.Write("(NYSE: DH)") end if %> 
 Abbott Labs. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ABT)") else Response.Write("(NYSE: ABT)") end if %> 
 Xerox Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: XRX)") else Response.Write("(NYSE: XRX)") end if %> 
 Amer. Int'l Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AIG)") else Response.Write("(NYSE: AIG)") end if %> 
 Amer. Express <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AXP)") else Response.Write("(NYSE: AXP)") end if %> 
 BankAmerica Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BAC)") else Response.Write("(NYSE: BAC)") end if %> 
 Sun Microsystems <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SUNW)") else Response.Write("(Nasdaq: SUNW)") end if %> 
 Travelers Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: TRV)") else Response.Write("(NYSE: TRV)") end if %> 
 Freddie Mac <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: FRE)") else Response.Write("(NYSE: FRE)") end if %> 
 Fannie Mae <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: FNM)") else Response.Write("(NYSE: FNM)") end if %> 
 AlliedSignal Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ALD)") else Response.Write("(NYSE: ALD)") end if %>