Date : Tue, 07 Jul 1998 20:43:48 +0100
From : Richard Harker <rich@...>
Subject: Re: Circle routines in Basic
In message <158B22932A7BD111925B00805F8552E53A29FE@...>
HANSELL Mike <hanselm@...> wrote:
> Hi,
>
> As a Beeb years years ago I recall that BBC Basic doesn't have a circle
> function. I also recall that there were several techniques developed to
> produce them. I'd be very appreciative if anybody could supply the basic
> source code to any of them?
>
> Best regards,
>
> Mike Hansell
>
> hanselm@...
Hi,
Here's a routine to draw a few circles that I copied from one of my programs.
Hope it helps.
10 a=1
20 Y=1000
30 MODE2
40 Z=820
50 REPEAT
60 GCOL0,a
70 MOVE 640,512
80 FOR I=0 TO 2.1*PI STEP .1
90 MOVE 640,512
100 X=640+Z*SIN(I)
110 Y=512+Z*COS(I)
120 PLOT 85,X,Y
130 NEXT
140 a=a MOD7+1
150 Z=Z-10
160 UNTILZ=0
Cheers, Rich
--
=== British Acorn Risc PC - 200mhz StrongARM Inside - Intel Outside ==
====== http://www.cybersheep.force9.co.uk === Fidonet: 2:254/86.3 =====
======== Carter The Unstoppable Sex Machine - The best band ever! ========