_J?_!6X'D:\0\612345@W P-]-M{3=~6e333 3-<~7~_}x  >7椤2"6LDl  <~zZ^~p $$f0@  @@  *HP`x @@ x`PH]>7?]>/?]G{=2\i]!\\#~V]i]E] 2\ 2\,B PA,PV :BC=1:CO=6:23764\,CO:1:0  BC:BC: Z="A":""Z:"" !523562 \,I1:23561 \,I1:23658j\,8 " 3000 PBC:BC:9 U:CM=0 X1;A,B:CO Z TS=I1:C7 dIR xER=I1338R I=I1NC:I$=C$(I)CF=I:J(CF) I 100d JPA,PV N/(23831])=06020:200 R'23764\CO420:100d TX=23762\-I2 ^Y=23763\-I2 h 1000 CO=23764\:CO "(A,B)=I11;8;A,B 3955s: PA,PV CM=TS760 $I=I1I2:3970:3950n:I .1}L,20 fOP=021,3;9 ;1;"Demo";0;" Press any key to start":760 =20,3;9 ;S$(TS);21,3;T$(TS); CM=TS  PA,PV TS=3:700  44000 IR ER0985 1100L:90Z !BC=23764\:23764\,CO  60< 6(A+X)0(B+Y)MB(B+Y)LB1030 1100L:1089A CO=BC1093E  A,B:X,Y $!X0A,(B+I1):1070. ) (A+I1),B .X,Y 8A=A+X:B=B+Y =1;A,B A 330J E%A=A+X:B=B+Y:1;8;A,B F1;8;A-X,B-Y G 330J LPA,PV M-21,28;9 ;1;"STOP" N3970:3950n O>0.1}L,10 :RE=-1:21,28;" ":  1 A,B:A,B:X,Y 45X0A,(B+1):A,(B+1):1340< 8(A+1),B <X,Y AST=31375_ B(I$=Q$(I):H(2)<0I$=R$(I) D(1345A+5*I$) F A+I1,B+I1 KA,B+I1:1395s P A+I1,B+I1 UA+I1,B:1395s `1IA=I1:IB=B+I1:P(I1,I1)>P(I2,I1)IA=-I1:IB=B bI=1A+IA,IB dI=2A-IA,IB s0:1570" PA,PV  C=A:D=B  I=I1ST A=P(I,I1):B=P(I,I2) K=I+I1  K>STK=K-ST X=P(K,I1)-P(I,I1) Y=P(K,I2)-P(I,I2)  1300 "I ,A=C:B=D:A,B ; PA,PV $1500:1900l:1500   I=I1I2  LN=I:1850: &I 0W(I1)=W(I2):2195 :PA,PV D 4000 X1;A,B,W(LN) g l 4000 nRE01970 pP(I1,I1)=A-W(LN)/I2 vP(I2,I1)=A+W(LN)/I2 {P(I1,I2)=B:P(I2,I2)=B ~P(3,I2)=B+H(LN) $ST=3P(ST,I1)=A:1970 P(3,I1)=A+W(LN)/I2 P(ST,I1)=A-W(LN)/I2 P(ST,2)=B+H(LN)  ST=52060   1900l RE=01500  2095/  4000  RE=01850: / 2690 4ST=52160p H 1700 \ 2195 p 1800  2700 ST=52260  1500  2295  1850:  2920h ST=I2+I:CO=BC2920h TS=I2:C7 7X=0:Y=0:IA=32 :IB=32 :LN=I2 &ST=5IA=16:IB=16 1IW=4:ST=3IW=8:IB=16 (W(I1)=IA:W(I2)=IA:H(I1)=IB:H(I2)=IB x 2000 RE02920h 44000 IR IA=0 I$="K"IA=1:2800 !I$="J"IA=-1:2800 I$="S"2880@ I$="D"2830 (COɾ23764\420:2810 IA=02920h ?H(2)=H(2)+4*IA:W(2)=W(2)+IW*IA 21004 PN=I1 , 2200 J$ST=53200 :2920h T 3300 h23560\,I1 n 90Z I1:I1::CO=6:5 8;" " 8;" " 8;" " 8;"" 26,2;" " #" " !" " !" " -12 ,3;"" "" " "" " " " "18,10 ;"" 10 ;" " 10 ;" " 10 ;" " CO $D=1:R=-1:RE=-1 J=13 $QS=(6*J)-2:3086 $RE=04100:3080 J 4370 7IR=6100:BP=23299[:OP=0:LB=1 A=116t:B=579 CO=8:BC=7  60< I=129 PS=I  3950n  3970 PA,PV ""RE=0:3099 I 1QS,29;" ";(QS+1),29;" "  ;PA,PV:T=0:W(I2)=W(I2):W(I2)=03295 J=0W(I2)+I1 J0T=J-I1 J=W(I2)+I1T=J-1.3&fff Z=(W(I2)*W(I2)-T*T) (A+Z),(B+J) -I2*Z,0 (A+Z),(B-J) -I2*Z,0 J B=B+W(I2):A,B  H(2)=03390> PA,PV 7K1=(P(2,1)-P(3,1))/H(2) 2K2=(P(ST,1)-P(1,1))/H(2) S=H(2) T=(S+1) J=0̽H(2) "SP=T+P(2,1)-(S*J*K1) FP=P(1,1)+(S*J*K2) SP,(P(2,2)+(S*J)) %S=1K20FP=FP-1 &S=-1K2=0FP=FP+1 (FP-SP),0 J SST=3S>0P(3,1),(P(3,2)+1):3390> ,7(T+P(2,1)),(P(2+T,2)+1) /3(P(1,1)-P(2,1)-S),0 >A,B: nPA,PV p*QS,(PS+R);" ";(QS+1),(PS+R);" "; s#QS,PS;"";(QS+1),PS;"" w PA,PV AD=1QS,(PS-1);" ";(QS+1),(PS-1);" "; %QS,PS;"";(QS+1),PS;""  JF=(W(LN)/2):G=H(LN):H=G:ST=5F=2*F:G=G:H=-I1*G  RE=0 $(A-F)<1(A+F)>MA4050 (B+G)>MB(B+H) Y U I O =B => J:- D:Delete 4:Green 5:Cyan 6:Yel.7:White Ollie Octopus' Sketchpad gh=\RIE"" DATA ,[]