BBS: Inland Empire Archive Date: 01-03-93 (01:03) Number: 261 From: DIK COATES Refer#: NONE To: JOHN GALLAS Recvd: NO Subj: Re: calculations.. Conf: (2) Quik_Bas

>>>> QUOTING John Gallas to All <<<< JG> I need some help with some calculations I have to do. Lets Consider the following code: - - - - - - - - - - - - Cut Along Dotted Line - - - - - - - - -DOCLSLOCATE25, 25LOCATE6, 40LOCATE4, 40INPUT; "Enter the Angle: ", angleLOCATE6, 40INPUT; "Enter the Distance: ", dist radian = angle * .0174533'convert angle to radiansxcoord = dist * SIN(radian) ycoord = dist * COS(radian)'assuming point for offset is x=1550 and y=1438offx = 1550 offy = 1438LOCATE13, 30LOCATE14, 30LOCATE15, 30LOCATE16, 30LOOPUNTILangle = 999CLSPOS|"LOCATE12, 30 x1 = 500 y1 = 500 x2 = 600 y2 = 650LOCATE13, 30LOCATE14, 30LOCATE15, 30LOCATE16, 30LOCATE18, 10END- - - - - - - - - - - - Cut Along Dotted Line - - - - - - - - - Trust this is the info required... Regards Dik, Oshawa, Canada ... And the Gynecologist said, "Great OS too!" -Dik ___ Blue Wave/QWK v2.10 --- Maximus 2.00 * Origin: Durham Systems (ONLINE!) (1:229/110)

Echo Basic Postings

**Books at Amazon:**

Back to BASIC: The History, Corruption, and Future of the Language

Hackers: Heroes of the Computer Revolution (including Tiny BASIC)

Go to: The Story of the Math Majors, Bridge Players, Engineers, Chess Wizards, Scientists and Iconoclasts who were the Hero Programmers of the Software Revolution

The Advent of the Algorithm: The Idea that Rules the World

Moths in the Machine: The Power and Perils of Programming

Mastering Visual Basic .NET