10 CLS
20 SCREEN 1
30 WINDOW (-5, 2)-(1, -2)
31 CLS
35 PRINT "lOOK FOR 113355 AT END OF TELESCOPE 355/113 IS APPROX. PI!"
40 A = -1.1
50 B = -2.03
60 K = .0101
70 X = 0
80 Y = 0
90 IF B < 2 THEN GOTO 130
100 A = A + .0251
110 B = -2
120 K = 0
130 B = B + .0251
140 K = 0
150 IF A > 2 THEN GOTO 200
160 HL = LOG(((A ^ 2) + (B ^ 2)))
170 HY = ATN(B / A)
180 PRESET (HL, HY), 15
190 GOTO 90
200 FOR Z = 1 TO 100000
210 NEXT Z
220 SYSTEM