30 lines
1.2 KiB
Plaintext
30 lines
1.2 KiB
Plaintext
# Project : Box the compass
|
|
|
|
names = ["North", "North by east", "North-northeast",
|
|
"Northeast by north", "Northeast", "Northeast by east", "East-northeast",
|
|
"East by north", "East", "East by south", "East-southeast",
|
|
"Southeast by east", "Southeast", "Southeast by south", "South-southeast",
|
|
"South by east", "South", "South by west", "South-southwest",
|
|
"Southwest by south", "Southwest", "Southwest by west", "West-southwest",
|
|
"West by south", "West", "West by north", "West-northwest",
|
|
"Northwest by west", "Northwest", "Northwest by north", "North-northwest",
|
|
"North by west", "North"]
|
|
|
|
degrees = [0, 16.87, 16.88, 33.75, 50.62, 50.63,
|
|
67.5, 84.37, 84.38, 101.25, 118.12, 118.13, 135, 151.87, 151.88, 168.75,
|
|
185.62, 185.63, 202.5, 219.37, 219.38, 236.25, 253.12, 253.13, 270,
|
|
286.87, 286.88, 303.75, 320.62, 320.63, 337.5, 354.37, 354.38]
|
|
|
|
for i = 1 to len(degrees)
|
|
j = floor((degrees[i] + 5.625) / 11.25)
|
|
if j > 31
|
|
j = j - 32
|
|
ok
|
|
see "" + degrees[i] + " " + j + " "
|
|
if j != 0
|
|
see "" + names[j+1] + nl
|
|
else
|
|
see "" + names[len(names)] + nl
|
|
ok
|
|
next
|