Entry

How can I create a vertical graphic representation using a loop?

May 17th, 2000 20:34
unknown unknown, Bruce Anwyl

Try the following

     For i = 1 To 15 Step 2
        logX = Abs(i)
        logX = CLng(Log(logX) / Log(15) * 100 / 5)
        T logX
    Next
    For i = 15 To 1 Step -2
        logX = Abs(i)
        logX = CLng(Log(logX) / Log(15) * 100 / 5)
        T logX
    Next
 
 0    .
 8    .........
 12   .............
 14   ...............
 16   .................
 18   ...................
 19   ....................
 20   .....................
 20   .....................
 19   ....................
 18   ...................
 16   .................
 14   ...............
 12   .............
 8    .........
 0    .