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

Code Snippets / [DBP] - Text Compass

Author

Message

Ace of Springs

Years of Service

User Offline

Joined: 10th Jan 2012

Location: Cambodia

Posted: 4th Jun 2012 01:15

Link

+ Code Snippet

Function showCompass()
 ink 0,0
 set text size 22
 set text to bold
 cang = camera angle y()
 if cang > 340 OR cang <= 20 then direc$ = "N"
 if cang > 290 AND cang <= 340 then direc$ = "NW"
 if cang > 200 AND cang <= 250 then direc$ = "SW"
 if cang > 20 AND cang <= 70 then direc$ = "NE"
 if cang > 160 AND cang <= 200 then direc$ = "S"
 if cang > 70 AND cang <= 110 then direc$ = "E"
 if cang > 250 AND cang <= 290 then direc$ = "W"
 if cang > 100 AND cang <= 160 then direc$ = "SE"

 text 100,735,direc$
 set text to normal
Endfunction

Profile PM Email Website

Server time is: 2026-06-05 14:05:43
Your offset time is: 2026-06-05 14:05:43