Sharp PC-1403 Operation Manual page 243

237
RETURN
w--w
Lme240
Subrouline 1
Lines 17010 200
center cccrdlnates of circle
osulatit1gC1 &C2and
poln1solcootectP1 &P2
are celculeted.
NO
W=W-t 190
YES
W•W+180
YES
M=M<-S*COSW
l = N+S>i<SINW
X.A*ID-M)
Y~R*IE-N)
Una150
N--K+G*L
M=A+C*COSN
N=B+C*SINN
X=O*(A-M)
Y=O*(B-·N)
llne130
L=ACS(IC*C oJ*J F*F)
121C1J)
F~P+R*S
C=O+O*S:H=D-A
l=E-B
J~
SOR(H*I<
>
1*11
K=ACS(H!J)
Line 110
•FLOWCHART