d 0,0: "": 646,118 d 11,0:d 0,0,319,199,1u d 160,10,164,25,1:d 164,25,178,18,1:d 178,18,170,31,1 d 170,31,185,35,1:d 185,35,170,39,1:d 170,39,178,53,1d 178,53,164,45,1:d 164,45,160,60,1:d 160,60,156,45,1, d 156,45,142,53,1:d 142,53,150,39,1:d 150,39,135,35,1i d 135,35,150,31,1:d 150,31,142,18,1:d 142,18,156,25,1 d 156,25,160,10,1:du 160,35,1 do 157,28,"M",2,2,8 do 75,90,"POLE STAR",1,2,20 do 85,120,"SOFTWARE",1,2,20 df 109 d 11,0:d 0,0,319,199,1:do 45,5,"# POLESTAR SOFTWARE PRESENT #",1,2,8^ do 105,25,"STOCK EXCHANGE",1,2,8 dk 160,75,270,90,6,20,26,1:d 139,75,181,75,1:du 160,60,1 d 142,78,147,98,1:d 152,78,157,98,1:d 163,78,168,98,1 d 173,78,178,98,1:d 139,100,181,101,1:d 135,102,185,105,1] do 85,120,"TECHNICAL ANALYSIS",1,2,8:do 135,145,"PART I",1,1,8 do 106,160,"MURAT ERBAS",1,1,10:do 206,163,".",1,1,8 do 90,180,"COPYRIGHT 1991",1,1,10:df 10 : TR$(1000): IA(1000): KA(1000): T(130)! dp 0: "FILE :";:d' "$",16,F$: : ""f 15,8,15: 15: ST0 "DEVICE NOT PRESENT ERROR":df 5: 30 ! F$"$" "":dJ "$:*=SEQ":dr "UJ":df 60: 30 " 53265,(53265) 239:dr "UI-":d 75,11,0 # 4,8,4,F$",S,R": 4 $ 2,8,15:2,A: 2 % A0 418 &d 0:d 0,0: 53265,(53265) 16:dr "UI+"u ' A62 ""F$" ; FILE NOT FOUND":dr "UJ":df 5: 30 ( "DISK ERROR :";A:dr "UJ":df 5: 30 ) 5,8,5,F$",S,R" *QQ1 +5,TR$(Q): TR$(Q)"" 45,5,IA(Q):5,ED:5,EY:5,KA(Q): 42-- 5: 53265,(53265) 16:dr "UI+"I. d(14,10)"PLEASE WAIT"l/ED1000000000:EY0:EKED:EBEY0SQ131: S1 S11 XS Q12 KA(X)EY EYKA(X)3 KA(X)ED EDKA(X)4 IA(X)EB EBIA(X)5 IA(X)EK EKIA(X) 6 X:EB(EB1000):EK(EK1000)<9EB$((EB),((EB))1)X:EK$((EK),((EK))1)h;d 0:d 0,0<d 11,0:d 0,0,319,199,1:d 0,20,319,20,1:d 50,20,50,189,1:J1=d 0,165,319,165,1:d 0,189,319,189,1:d 130,0,130,20,1:d 245,0,245,20,12> Y35 160 12: X54 319 10:d X,Y,1: X,Yj? Y172 182 10: X54 319 10:d X,Y,1: X,Y@do 2,2,F$,1,1,8:do 2,11,"CLOSING:",1,1,8:do 132,2,"AVERAGE:",1,1,8Ado 132,11,"TREND :",1,1,8:do 249,2,TR$(S),1,1,8:do 249,11,TR$(Q1),1,1,8;Bdo 7,191,"F1>QUIT F3>AVERAGE F5>TREND F7>DRAW",1,1,8^Cdo 58,11;(KA(Q1)),1,1,8:V52D X0 10:D(EY((EYED)10)X)ED$((D),((D))1)Fdo 2,31X12,D$,1,1,8: XGdo 2,168,EB$,1,1,8:do 2,178,EK$,1,1,8H XS Q2IY1((EYKA(X))((EYED)120))35CJY2((EYKA(X1))((EYED)120))35qKY3((EB(IA(X1)1000))((EBEK)8))172LVV2:d V,Y1,V2,Y2,1:d V2,Y3,V2,182,1: X:D$" "M A$: A$"" 77N A$(95) 60O A$(133) 30P A$(134) 84Q A$(135) 100+R A$(136) 1304S 77TT "":dp 0:JJ1: J2 60uU D$" " D$"_" do 196V "AVERAGE:": "DAY :";:d' "1234567890_",2,D$: D$"_" dp 2:JJ1: 77Wdo 196,2,D$,1,1,8:dp 2:d 75,11,0:D(D$):R1:V52:I0X SD1 RDS:V52D20YRR1:T0:II1FZ XSDR SR1W[ SRQ 93w\TTKA(X): X:T(I)TD: 89]d 0:d 0,0:dv 2J3,0,0^d 65J80,29,85J80,29,1:do 9080J,25,D$,1,1,8_ X1 I2`Y1((EYT(X))((EYED)120))35&aY2((EYT(X1))((EYED)120))35PbVV2:d V,Y1,V2,Y2,1: X:HICOL: 77pd "":dp 0:JJ1: J2 60e D$" " D$"_" do 196,11,D$,0,1,8f "TREND:": "DAYS:";:d' "1234567890_/",5,D$: D$"_" dp 2:JJ: 77gdo 196,11,D$,1,1,8:dp 2:d 75,11,0:R1:V52:I0;hK((D$,2)):U((D$,2))Xi SU1 RUS:V52U2rjRR1:T10:T20:II1k XSUR SR1l SRQ 112mT1T1KA(X)n XSKR1 T2T2KA(X)o X:T(I)((T2K)(T1U))100: 106 pd 0:d 0,0:dv 2J3,0,0Bqd 65J80,29,85J80,29,1:do 9080J,25,D$,1,1,8WrM1000000000:L0gs X1 I1}t T(X)L LT(X)u T(X)M MT(X)v Xw L100 L100x M100 M100yY((L100)((LM)120))35zd 50,Y,319,Y,1{ X1 I2)|Y1((LT(X))((LM)120))35M}Y2((LT(X1))((LM)120))35w~VV2:d V,Y1,V2,Y2,1: X:HICOL: 77db 0,2556449152@........................@........................@........................@........................#@........................A@........................_@........................}@........................@........................@........................@........................@........................@........................1@........................O@........................m@..................BB....@..................BBB...@..................BBB.B.@..................BBBB..@..................BBB...@..................RBBB..d 1,255,11,1,05X2159:Y2100:X1X2:Y1Y2Rd 1,159,100,159,100,0,0[MdQo M1 Y2Y21 M2 Y2Y21:X2X21 M3 X2X21 M4 X2X21:Y2Y21 M5 Y2Y21 M6 Y2Y21:X2X21 M7 X2X21 M8 Y2Y21:X2X21> M128 X3X2:Y3Y229: 170V M133 dh 1: 77od 1,X1,Y1,X2,Y2,0,0X1X2:Y1Y2: 156MdQ M1 Y2Y21 M2 Y2Y21:X2X21 M3 X2X21 M4 X2X21:Y2Y21 M5 Y2Y21 M6 Y2Y21:X2X212 M7 X2X21N M8 Y2Y21:X2X21v M128 d X3,Y3,X2,Y231,1: 156 M133 dh 1: 77d 1,X1,Y1,X2,Y2,0,0d X3,Y3,X1,Y129,2:d X3,Y3,X2,Y229,2X1X2:Y1Y2: 170