CODE: Polygon Drawer 
Author Message
 CODE: Polygon Drawer

Just a little something, I doubt you'll find much use for it <grin>:

SCREEN 13
CLS
DO
INPUT "sides:", s%
LOOP UNTIL s% < 32000 AND s% > 0
st = 360 / s%
LINE (160 + (SIN(.0174) * 30), (COS(.0174) * 30) + 100)-(160 + (SIN(.0174) * 30), (COS(.0174) * 30) + 100)
FOR y = 0 TO 360 STEP st
x = y * .017453
LINE -(160 + (SIN(x) * 30), (COS(x) * 30) + 100)
NEXT y
LINE -(160 + (SIN(0) * 30), (COS(0) * 30) + 100)

Cheers,
--
Peter Cooper



Thu, 10 Jun 1999 03:00:00 GMT  
 CODE: Polygon Drawer

Quote:

>Just a little something, I doubt you'll find much use for it <grin>:

totally correct...it's neat, but worthless to most :) (unless you
wanted to create 2d polys)...:)


Sun, 13 Jun 1999 03:00:00 GMT  
 
 [ 2 post ] 

 Relevant Pages 

1. Newbie Question: Code to Open CD Drawer

2. polygon - polygon intersection

3. Looking for polygon manipulation code snippets

4. Linked Table And Default DB Drawer

5. Cash drawer,Price display

6. How to pop a cash drawer - sending to com1

7. cash drawer

8. VB4 to open cash drawer/printer

9. yet another VB Serial Cash Drawer question

10. Open serial cash drawer

11. How to Check if CD is in Drawer

12. VB and accessing/opening a cash drawer...

 

 
Powered by phpBB® Forum Software