Box the compass: Difference between revisions

Content added Content deleted
(Box the compass in BASIC256)
Line 1,113: Line 1,113:
j = int((grados[i] + 5.625) / 11.25)
j = int((grados[i] + 5.625) / 11.25)
if j > 31 then j -= 32
if j > 31 then j -= 32
print rjust(string(grados[i]),6); " "; rjust(string(j),2); " "; names$[j]
print rjust(string(j),2); " "; ljust(string(names$[j+1]),20); grados[i]
next i</lang>
next i</lang>