Sorry your browser is not supported!

You are using an outdated browser that does not support modern web technologies, in order to use this site please update to a new browser.

Browsers supported include Chrome, FireFox, Safari, Opera, Internet Explorer 10+ or Microsoft Edge.

developer forums

2D All the way! / Simple Angle creator

Author

Message

Mr Dynamite

Years of Service

User Offline

Joined: 7th Feb 2008

Location: A good question

Posted: 13th Feb 2008 00:45

Link

This is a simple angle creator program for DB

+ Code Snippet

 
sync on
input "Input degree value",degree
for x = 1 to 100
ox = cos(size) * x
oy = sin(size) * x
dot screen width()/2 + ox, screen height()/2 + oy
next x
size = degree
for x = 1 to 100
ox = cos(size) * x
oy = sin(size) * x
dot screen width()/2 + ox, screen height()/2 + oy
next x
size = 20
for x = 0 to degree
if x = degree / 2
ox = cos(x) * size + 10
oy = sin(x)*size+10
text screen width()/2+ox,screen height()/2+oy,STR$(WRAPVALUE(degree))+" degrees"
endif
ox = cos(x) * size
oy = sin(x) * size
dot screen width()/2 + ox, screen height()/2 + oy
next x

Profile PM

Server time is: 2024-05-06 20:57:32
Your offset time is: 2024-05-06 20:57:32