Path: news.uiowa.edu!chi-news.cic.net!newsxfer2.itd.umich.edu!gatech!usenet.eel.ufl.edu!agis!ns2.mainstreet.net!bug.rahul.net!a2i!rahul.net!a2i!news.clark.net!news-gateway!tcs.wap.org!g.wright
From: g.wright@tcs.wap.org (Geraldine Wright)
Newsgroups: comp.sys.apple2
Subject: Two-liners
Followup-To: comp.sys.apple2
Date: 5 Feb 1996 20:54:08 -0500
Organization: Washington Apple Pi, Ltd. user group in Washington, D.C.
Lines: 15
Sender: daemon@clark.net
Message-ID: <1996Feb5.205327.77@tcs.wap.org>
Reply-To: g.wright@tcs.wap.org
NNTP-Posting-Host: clarknet.clark.net
Mime-Version: 1.0
Content-Type: TEXT/PLAIN; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit

In a posting on Jan 6, nparker@cie-2.uoregon.edu (Neil Parker) suggested that
there be a "Great Comp.Sys.Apple2 Two-Liner Competition" and submitted a few
of his entries. I love two-liners, and I think this is a great idea! Here is
my submission. If enough other people submit two-liners, maybe there really
can be a competition.
 
 1  HGR2 :P = 1.57:A = 90:B = 27:H = A - B: HCOLOR= 3: FOR G = 1 TO .2 STEP
- .2:C = 140 + H *  COS ( - P) + B * G *  COS (A / B * P):D = 96 + H *  SIN (
- P) + B * G *  SIN (A / B * P): FOR I =  - 91 TO 990:J = I * P / 90:E = 140
+ H *  COS (J) + B * G *  COS ( - A / B * J):F = 96 + H *  SIN (J) + B * G *
SIN ( - A / B * J): HPLOT C,D TO E,F:C = E:D = F: NEXT I: NEXT G: END
 
 
Gerry (the Applesoft-aholic)
g.wright@tcs.wap.org