ZXTape! 0Created with Ramsoft MakeTZXSYS-AMA-2 wNLN?yNR(N)=0:S(Np)=0R:C(Np)=0P:I(N,A$K,B$))=0B:A(N,N)=0b:K$(NN)=N,N=0:N)=0-:O(NN)=N,N=0:N)=0Y:X(NN)=N,N=0:N)=0P:C$(N=0:N)=0:N(C$Bg)=0:H$(N)=0:D(H$j)=0:U$(S$,1d,N )=0:S$(N,S$E)=0:P(N\)=0:B$(N )=0x:T$()=0:M$()=0:V(NB,N)=0k:M()=0-0:F()=0::U(@$B$)=$,@$=0:$)=0:L(N,@$)_)=0k:Z$(N,A$)=0:E(N)=0:T()=0@:0 R10 : SYSTEM >>AMA.01 OPRACOWAL J.Korytkowski 1988   Wrt:,;ܼ;"SYSTEM";16;"AMA.01";31;" ":ٰ"7":"":ٲ:584193 粧:"23693","71":  MENU dEDYTORB$,D,S,E,W i D="1",S="31",E="127",W="0" nA$,A pB$="" x "_";8; n2;4;2,579;("C.LOCK"ƨA(23658j\,8));(" "èA(23658j\,8)) A$:A=A$ A="7" 0A=8" ";S$("1"+B$,12 );:B$="" D(A=12 ƱB$>0)A$;"_ ";°"8";°"8";:B$=B$((B$-"1")) (A>SAD) A="7"B$="#" WB$=""120x  , SYSTEM Q 6QN:QN=0,Q="Q-1" T8QN=QN+"1":"6000+Q*200+QN":23692\,"255"::A$ r(A$("1")-34");700,400,500,600X,650,660,666,340T,680,675,687 " Podaj ";A$("2"):P$=A$ oR$,S$,T$,U$,V$:" ";R$;" [";S$;"] =(";T$;")= <";U$;";";V$;">";S$((U$+V$)+16,°"8");  EDYTOR A$,"10",44,,58::A$<"36"A$=T$:"6"+(Q+Q)+U$("00",QN)+""+34"+P$+34"+","+R$+","+34"+S$+34"+","+A$+","+U$+","+V$ :A$V$" ";S$(A$+"1",12 );:425 "440"+R$+"="+A$ kgj=502 " ":340T 26100+(Q+Q)*100d+A$("2"):340T b7R$,V$:" ";A$("2")'" ";R$;" = ";R$;" [";V$;"]" l 340T 0" ";A$("2");:A$(A$)"/":12 ;  340T $" 1- ";A$("2");:A$:" 2- ";A$ A:A>"2"662 A="1"340T K:QN=QN+"1":"6000+Q*200+QN":A$:A$("1")=")"A$("1")="*":340T  ENT:340T R$,S$,T$,A:A$("2")'" ";R$;"=";R$;" [";T$;"] ";:(A="1"ưR$>S$)"> ";S$;"=";S$;" O.K. !":Aɰ"2"" ";S$;"=";S$;" ZLE!":װ"1",-20 d(A="2"ưR$ ";S$;"=";S$;" ZLE !":װ"1",-20  340T  ENT::340T  ENT:MENU1 (Q+1),"1":  MENU *:9000(# ,"2":"2";" MENU:" 4E::"8";''" 0.- MENU BIS"'':N="1"̰"5":'"8";" ";N;".- "; 5D"5800"+N*200:A$:A$()="!""7","8";ް"2";A$("2"): 9N HHOPC:EDYTOR A$,"1",47/,557,1:A$"#"Q=A$:840H JQMENU1 Q:MENU2 L NMENU2 P:"2":"2";" MENU BIS":''"8";" 0.- MENU"'''" 1.- NAGRANIE BLOKU"''" 2.- WGRANIE BLOKU"''" 3.- NAGRANIE SYSTEMU"'' R>"8";" 4.- PROGRAMATOR"''" 5.- SKASOWANIE PROGRAMATORA" U=OPC:EDYTOR A$,"1",47/,546,"1":A$="#"853U V'A$="1"872h:A$="2"882r WA$="3"MAGNET: MENU X'A$="4"858Z:A$="5"892| Y MENU Z"2"::"2";" PROGRAMATOR" [H"Podaj nr. bloku (1-5):";:EDYTOR A$,"1",480,546,"1":A=A$ \"5800+A*200":A$:A$"! ""1- Kasowac blok2- Kontynuowac...podaj: ";:EDYTOR A$,"1",480,513,"1":A$="2":PRGM A,"1" ]6" "'"Podaj nazwe bloku: ";:EDYTOR A$,25,,,"1" ^l:5800+(A+A)*100d5999o+(A+A)*"100":"6"+(A+A-2)+"00 "+34"+"!"+A$+34" `"6"+(A+A-1)+"99" b PRGM A hc:OKMAG:"Podaj nr bloku do nagrania:";:EDYTOR A$,"1",480,546,:A=A$,X="5800+A*200" j_''"CHWILECZKE...- kilka efektow ubocznych"::ٲ::* XX+98b7000X1:OKMAG k8* X+100dX+19871001::OKMAG lA:ٰ"7":"Podaj nazwe (max 8 znakow):";:EDYTOR B$,8,,,"1" nM7000X7200 ;B$:"7200":61017200 :׼,20:MENU2 r OKMAG:"Podaj nazwe bloku,ktory chcesz wgrac:";:EDYTOR A$,8:" "'"Podaj numer pod ktorym mam umiescic ";A$;":";:EDYTOR B$,"1",480,546,1:" " tw'"Wlacz magnetofon i czekaj...(4s po wgraniu)":P1=5800+B$*200,KP=P1+100d,K2=KP+99c:A$:P1K2 vO0:7000X7099P11::71007199KP1 xK2+""::7::MENU2 |T2::"POTWIERDZ WYBOR KASOWANIA PROGRAMATORA (T/N)":A$:A$"T"A$"t"MENU2 ~O"850":"856":858Z866b:8000@8210 :892|894~  MENU2   MENU1 Q,QC QC=0:A$,B$,N,A::"2":"2";" OPCJE:":''"8";" 0.- MENU"'''" 1.- Realizacja programu"''" 2.- Lista zmiennych" @OPC:EDYTOR A$,"1",47/,513,1:A$="#"905 FA$ưA$<"3""2":"5800"+Q*200:B$:"2";" ";B$("2"): A$="1"SYSTEM Q  A$="0"MENU QK=2:"920":940 #QK;"DANE WEJ.:":N=0 ]:"5800+Q*200+N":A$("1"):A$("1")="$"A$:#QK;" ";A$;" = ";:A$,A:#QK;A;" [";A$;"]" #N=N+"1",A$=A$+" ":A$("1")="#" QC=0940 #QK;"DANE WYJ.:":N=0 ]:"5800+Q*200+N":A$("1"):A$("1")="&"A$:#QK;" ";A$;" = ";A$;:B$:#QK;" [";B$;"]" [A$("1")="+"A$:#QK;" ";A$;" = ";A$;:A$,A$:#QK;" [";A$;"]";(10 QK=3) N=N+"1":A$("1")="#": Q#1;"WYDRUKOWAC (T/N)?":A$:"":A$="t"A$="T"QK=3:"970":"920"  ENT:MENU1 Q,QC: O#1;"DRUKARKA STAR / ZX PRINTER ?":A$:"":A$="S"A$="s":/10  -OPC:17,"4";"PODAJ NUMER OPCJI:";: 9ENT:#0;0,"4";"NACISNIJ ENTER":0: 2OKMAG::"2":"2";" OPERACJE Z MAGNETOFONEM"  9000(#  p "!Wcisk nakretki" q#"'Program opracowal: A.J.Lipski." r6"'Moment oporu gwintu wywolalby obrot nakret-ki razem ze sruba.Momentowi temu przeciwdzilaja: moment statyczny sil tarcia na czlowej powierz-chni oparcia nakretki o dno otworu w mostku, i ( w przypadku ciasnego pasowania nakretki w ot- worze ) moment statyczny sil tarcia na powierz- chni bocznej nakretki." s "'Uwaga!" tv"'Jezeli mostek wykonany jest z materialu kruchego (zeliwo),to nie moze pracowac w stanie sprezysto-plastycznym." u"-" v8"$wysokosc nakretki",H,"mm",38&,5,200 wH"$Srednice rdzenia gwintu nakretki",dr,"mm",24,5,100d xF"$wewnetrzna srednice nakretki",dw,"mm",20.5$,5,100d yE"$zewnetrzna srednice nakretki",dz,"mm",34",10 ,200 zD"$najwieksza szerokosc mostka",dm,"mm",60<,20,400 {G"$liczbe Poissona materialu mostka",nip,"",0.3,.1}L,2 |H"$liczbe Poissona materialu nakretki",nin,"",.3,.1}L,3 }I"$modul Younga materialu mostka",Ep,"MPa",2E5CP,1E4',1E6t$ ~K"$modul Younga materialu nakretki",En,"MPa",2E5CP,1E4',1E6t$ V"$wspolczynnik tarcia miedzy mostkiem a nakretka",mi,"",0.1}L,0.02{# =,1 1"$Skok gwintu",hz,"mm",2,1,502 >"$sile na wrzecionie",Q1,"N",25000a,1E4',5E5t$ , "(Liczenie wcisku","Sprawdzenie naprezen" "%01" "&Wcisk minimalny",w,"mm" ")" 9"$wcisk maksymalny",ww,"mm",.05|L,.01z# =,5 U"$granice plastycznosci materialu nakretki",Ren,"MPa",300,,502,3000 r"$granice plastycznosci lub wytrzymalosc narozciaganie materialu mostka",Rep,"MPa",500,502,3000 "%11" "*"  "#2622"  Blok obl.417 &a2=dz/dm:a1=dr/dz:dmc=(dw+dr)/"2" Hro=mi:gamma=(hz/(*(dr+dw/"2"))):Ms=Q1*((dr+dw)/"4")*(gamma+ro) 2p=("1.5"*Ms-mi*Q1*dmc/"2")/(mi**dz*dz*H/"2") Hǰ"1.5"*dz6108 H>"1.5"*dz6109 +w=p*dz*(Cn/En+Cp/Ep)+"0.012":6110 FCn=("1"+a1*a1)/("1"-a1*a1)-nin:Cp=("1"+a2*a2)/("1"-a2*a2)+nip: |Cn=("1"-nin*nin)*(("1"+a1*a1)/("1"-a1*a1)-nin/("1"-nin)):Cp=("1"-nip*nip)*(("1"+a2*a2)/("1"-a2*a2)+nip/("1"-nip))   Blok obl.423 nRep=Rep/"1.5":Ren=Ren/"1.5":a1=dr/dz:a2=dz/dm:pp21=Rep*("1"-a2*a2)/"3":pp11=Ren*("1"-a1*a1)/"3" Hǰ"1.5"*dz6108 H>"1.5"*dz6109 8wp11=dz*pp11*(Cp/Ep+Cn/En):wp21=dz*pp21*(Cp/Ep+Cn/En)  Cww"-" ?J"$wartosc obciazenia tloczni :",Q1,"N",62500$,0,9000000 T@ @P"$przyblizona dlugosc boku l1 tloczni:",l1,"mm",250,0,100000CP AP"$przyblizona dlugosc boku l2 tloczni:",l2,"mm",470,0,100000CP BP"$przyblizona dlugosc boku l3 tloczni:",l3,"mm",600X,0,100000CP Cu"$zakladany,przyblizony stosunek momentow bezwladnosci przekrojow 1 i 2 [J1/J2]:",a,"",0.3,0,100d D}"$zakladany,przyblizony stosunek momentow bezwladnosci przekrojow 2 i 3 [J2/J3]:",z,"",3.333333333UUUT,0,100d Ef"$wartosc dopuszczalnych naprezen kgj [dla Zl25 kgj=50 [MPa]]:",kgj,"MPa",502,0,500 F"%01" G"-" H+"&Sila rozciagajaca boki 3 wynosi:",P,"N" I)"&Moment w przekroju 1 wynosi:",M1,"Nm" J)"&Moment w przekroju 2 wynosi:",M2,"Nm" K&"&Moment w narozu A wynosi:",Ma,"Nm" L&"&Moment w narozu B wynosi:",Mb,"Nm" M"-" NR"&Minimalny wskaznik wytrzymalosci na zginanie przekroju 1 wynosi:",W1x,"mm^3" OR"&Minimalny wskaznik wytrzymalosci na zginanie przekroju 2 wynosi:",W2x,"mm^3" PR"&Minimalny wskaznik wytrzymalosci na zginanie przekroju 3 wynosi:",W3x,"mm^3" Q"-" R"'Znajac minimalne wskazniki wytrzymalosci nazginanie oraz pamietajac o zalozonych stosunkachmomentow bezwladnosci przekrojow nalezy dobrac ich ksztalt i wymiary.Nastepnie nalezy sprawdzicwystepujace naprezenia z dopuszczalnymi dla danego materialu.W wypadku nie spelnienia tego warunku wytrzymalosciowego nalezy zaloayc nowe dlugosci bokow jarzma oraz inne stosunki momen-tow bezwladnosci."  "#2614"  Blok obl.115 Tka=(z*l3/l2+l2/l1+2)/(3*l1/(z*a*l3)+2*l1/(a*l2)+z*l3/l2+2) "Ma=Q1*l1/8000@*(1-ka) Tkb=(a*z*l3/l1+l1/l2+2)/(3*l2/(z*l3)+2*a*l2/l1+a*z*l3/l1+2) "Mb=Q1*l2/8000@*(1-kb) "M1=Q1*l1/8000@*(1+ka) "M2=Q1*l2/8000@*(1+kb) -s=(1-((l2-l1)/(2*l3))^2) P=Q1/(2*s) W1x=M1*1000/kgj W2x=M2*1000/kgj #W3x=Mb*1000/(0.6*kgj)     "!Jarzmo2" ="' Prog.opr.A.Ferenc Program ten sluzy do obliczania momentow bezwladnosci przekrojow/ktore porownujemy z wynikami otrzymanymi w bloku Jarzmo1/oraz do obliczenia naprezen wystepujacych w konstrukcji w miejscach najbardziej obciazonych." "'W programie istnieje mozliwosc obliczen roznych przekrojow i dlatego tez na wstepie nalezy podac numer wariantu przekroju-patrz:instrukcja. Z reguly przekroj nr 1 jest stosowany w wypadkupodstawy jarzma tloczni." "-" 0"'UWAGI: 1)Podczas wczytywania danych moze zaistniec sytuacja w ktorej ilosc wymiarow charakteryzujacych dany przekroj bedzie mniejsza od ilosci wymiarowzadanych przez program.Wowczas pod wymiary ktore nie beda wykorzystane /dla danego przekroju/ wczytujemy zero." "' 2)W wypadku obliczania podstawy /wariant nr1/wazne sa naprezenia wystepujace w przekrojach 2 i B /moment Ma mimo ze jest obliczony nie dotyczy tego przekroju-chyba ze projektujemy tez slupki boczne o takim zarysie/.Przy obliczaniu przekro jow slupkow bocznych wazne sa naprezenia wystepujace w przekrojach A i B/obliczony moment M2 nie dotyczy tego przekroju/." "-" "' 3)Przy wydruku wynikow koncowych pojawia sie na pis scroll? - aby nie spowodowac przerwania pro gramu nalezy przycisnac klawisz y." "-"  L"$numer wariantu przekroju-patrz:instrukcja",w,"",3,0,15  /"$wymiar:",x,"mm",70F,0,1000  /"$wymiar:",y,"mm",60<,0,1000  /"$wymiar:",z,"mm",557,0,1000  /"$wymiar:",v,"mm",20,0,1000 /"$wymiar:",f,"mm",10 ,0,1000 /"$wymiar:",u,"mm",10 ,0,1000 ."$wymiar:",e,"mm",0,0,1000 ."$wymiar:",h,"mm",0,0,1000 ."$wymiar:",l,"mm",0,0,1000 ."$wymiar:",g,"mm",0,0,1000 v"$wartosc momentu wystepujacego w przekroju A /obliczony w bloku Jarzmo1/:",Ma,"Nm",515,0,10000000 ["$wartosc momentu wystepujacego w przekroju B:",Mb,"Nm",1526,0,10000000 ["$wartosc momentu wystepujacego w przekroju 2:",M2,"Nm",6577,0,10000000 b"$wartosc sily rozciagajacej boki 3 /wg.bloku Jarzmo1/:",P,"N",31790.|,0,1000000t$ "%01" "-" 4"&Moment bezwladnosci przekroju wynosi:",Jx,"mm^4" E"&Wskaznik wytrzymalosci na zginanie przektoju wynosi:",Wx,"mm^3" V"&Maksymalne naprezenia rozciagajace w przekroju A jarzma tloczni wynosza:",SA,"MPa" N"&Maksymalne naprezenia rozciagajace w przekroju B jarzma wynosza:",SB,"MPa" e"&Maksymalne naprezenia w przekroju 2 jarzma wynosza/wielkosc ta dotyczy tylko podstawy/:",S2,"MPa" d "#3027" e Blok obl.218 fw=1 6505i gw=26511o hw=36517u is=2*(x*v*(y+v)/2) jfa=y*z+2*x*v k%dz=s/fa:qwe=dz-y/2-v/2 lSJx=z*y^3/12 +z*y*dz^2+2*(x*v^3/12 +x*v*qwe*qwe) mWx=Jx/(v+y/2-dz) n 6523{ o1s=(z+v)/2*z*u+(z+v/2+f/2)*y*f pfa=x*v+y*f+z*u q%dz=s/fa:qwe=dz-z/2-v/2 rJx=x*v^3/12 +x*v*dz^2+u*z^3/12 +z*u*qwe*qwe+y*f^2/12 +y*f*((z+v/2+f/2-dz)^2) sWx=Jx/(dz+v/2) t 6523{ u=s=x*v^2/2+2*z*u*(v+z)+y*f*(v+z+f)/2 vfa=x*v+y*f+2*z*u w dz=s/fa xJx=(x*v^3+y*f^3+2*z*u^3)/12 +x*v*(dz-v/2)^2+y*f*(v+z+f/2-dz)^2+2*u*z*(z/2+v-dz)^2 y Wx=Jx/dz z 6523{ {,SAA=ma/wx*1000:sbb=mb/wx*1000 | sp=p/fa }+sa=saa+sp:sb=sbb+sp:s2=m2/wx*1000 ~    "! " , "#0001"  "! "  "#0001" W @ PRGM Q,Q1 BQN,QR,N$,A$,QL:Q1=0 CQ="Q-1",QR=,QN= DHQ1"6100+Q*200":A$:QR=A$(23),QN=A$(45) EX"0";"4";"4","0";"Text Pyt Odp Ent Cls Licz Spr War-a war-B Kon-war Quit D-kas." F_"2";"4","8";0,44,;"WOLNA PAMIEC:";M():23692\,255:':QR=QR+"1" H">";:EDYTOR N$ J" ";S$("2"+N$,12 ); L"N$=Z$("1",N$):N$="P""8034" MN$="W""8074" NN$="O""8046" ON$="T""8070" PN$="Q"8090 QN$="B"8078 RN$="L"8058z SN$="E"8094 TN$="C"8100 ^N$="K"8088 _N$="D"8110 `!N$="S"8080:8008H b" Podaj ";:EDYTOR P$,"200" d" "'"Nazwa zmiennej: ";:EDYTOR R$,"4",,,"1":"=";S$("10"," ");"݅ H Ăo:?(_͘Ñ vŠ0%(h"_\*W\~ ( ,(͆w(V6~Ͷ"]\#H (, RDMS[\6 *[\ͧ+ͧͲ**"W\*_\6&x,͔́ҟ!&r8s+rȧs=((54!fr!|s*O\ s#r11.8˾86#3t*~w.*S\~##N#FT] ݽ 9 "B+++70&l"<:*">2)T]-MT],M > > >> !I\.l͕!s?\62)ͻàg:%|(: 0V ͨ7:'(( *[\R (+!~:00( :<(͓?:\=20j>20*:/ 8 !S(Ê!!F#p#F#p(7(3(/(( {F+p"(## {(( 44>(G9 #556KI\̀>(s-~@:&( > #(###z( ;> ~ #2#:%~07n :' *_\R>?~Ͷ# ʴ͗(+##N#FDog DMp+q0 DOU#O*W\Y>2>ͣo@ͬ*"W\=w ́8*=\*E\ʹ"E\s=\"E\&!9~=> >ׯׯ> !7 ~6!!w*n[:* +=>; :\W!~69 >; 2J ;0%(  :~\(-8:}\(-8>Â##F#^#V##ͺ#~~#N#fi*h\#wG#s#rͼ#N#fi =Rȟ/G7N.*M\~#"h\=( 8!*h\^#V#~#~͈,8 (*[\###U #6=>0ͪ8 > < > <{8(!>2>ͣ*n*F#~W͍,0 W_~F#NC##u0#6 :>'82K > @S:" #˹ͳ*"[\ȹ>27oͥPY*W\N#x(+!""&""(( $vֹ& +/-8 ͍͂,Ҋ$(͈,0RM*y>0Oq#ͦ+|_ɯ26yŔ* RSͥ=(G#͍,0 # ~$7Ĉ,8 +~#͈,0#~Ͷ 7ݼ # Ȼ ~`~#`( ~~#(0z@ >$(G0>(##^>,#N#F >)N> >N#F>>"z(#~,()>"$> 30>>>^#V(> >ʹ3-ɀ`@<((@H x~o#,}0*K\~(ݽ̌͸> K!:<6:'2`\O#~( #ݤ #~  (#ݤ(͢8,-8[a\*Y\!0"]\S_\ #~8x*_\7R0x!j\͍,8<(>( " ~wV !>͹ )!x> ͹ !>\͹ ?!/>&͹(W$e( O 6#+~ (#w#~ # Ƥ͔0 =>(>2ҟ2'Á͔ڢ 0:"[\ͱx( < *[\RDM"=\S0!( ,=( &=(-= ͱ6 RDM*S*Q\^#VͧÀ $ 61͂>O /\͔W!G\w͎͘8 "]\*U\"!G\~26(!:@:ž!vKE\3..&:(͂ 6xp+qvKE\p+q! ò!ͧ(ͪا[\s#r#:\w! >ͪ< 2?͂H K\: 2?͂!! ~2 '^#VS\#~2\#ͷ5z5z͔͙#>8 ͻq#p#zŸyچ w#oͪ0ͪ0 ͽr#q#p#!͔ƀ !ìMͼ͟²͹͟ͷ->2|F*O\͟F:\MU)"\!~<( =ݶCwC~Cw#!\6͔(2\!ͷ!8 0!"\2ͦ24!4~8TT >M!Mͬ2\*3&"\$2>ů2G\go"]\"E\:t\6!\\:\B(N( ̀ͅ͏ͩ|>2\:6*S\[[\"[\SS\>  >>>@2t\0% 8/ ͷ0 0%("]\57260% ͷ0͂5*(-ͷ("|2\ͷ0 "\5!"\2"=\!6~(< "Y\"K\"S\ͯ!:\~ +(<{=\6:6(.*S\"[\*K\<("S\*Y\* n"S\*#n"K\#"Y\*=\ìp#qÑ͍,Ҋ͔N(  !3q#w=(>25=o:5< 0%(7N 08+"]\Z,(!. ( 4~#+>(w6+4#~ (͆! 9~q(+++++++[͍,_7ȧ!)F#~67ȧ( #:\#*I\nB:(n(V#^DM:Y"=\"À !.6+6`i####Ϳ~Fq#p#xچ wM !<\˞ˮ*\*=\!gs=\*\7͕~#H 8ֻDeÀ ~ #F#~(++#"[\!n~@͕0~>0-P͋|g !1~6 67N 0*M\Kr\v(#ʹ3.8+"a\ *[\U"[\ÌUW$tArq!"T `$BBBB$R"w"R @ddrVRRRw&Q!Av4VQq7AbRT$rU%SQv""'@'E! BbէubUdTUbgTVTTgrEtGEBWRrRRWVU%EGGEEurUUUURgUUeEGsTRaaVu%%%%'UUUWW%UU%"RRw$$DwAa!1 p  VAE@CdTTc5WT30CeECAB@bRRRU `%'%%ubUUURcUUcAA3DBAF@eEEE#UUW'%UU%SQr"Bs&"!""&W f( ^-x \J5R ET*\:\> !;\ˮ (( n>2\"\> ͧ:22!~#N+O!:!0x2\ 080(0͓K! 0A00٧(ˆ*\"2\2\>O8x O{_0+8>!˅on89!F 0G8 \:I:3֥ [{\[6\͏K:8*"\> ;  !ˆ[!:w6:2!:OD0G:==ҫp!:ODw:0!882!:w:wÏ>?; Ð::D!w::D!!~6Qbx0 >2ԝj?Qȝ<̀ *\W}8 z!6 "6ڒ  D:!2B:+2"bz<ùͷ0"͙x(CI\ͩq̀ ñ0%(21+ 'o&:=8)))} 0))) ˅DM))9B\8 ~# ~#!~#6 8_w: RO*e\&_?O~#W>A0 w}o0$>  #% yKRyO= !!:\606#6##606:0++6+6y WN}<oyNBwq:=2 % |f9*\3ͱ=2G\"E\*K\~G0%¾o!\~!~#<## 0y2(Š?:G\"<*W|@zÿ"O͂B8Nyy(Fo i w‹(ki CAO8*W\怰w*[\###U#6#W*U\0+"U\"y` *U\[-(*ͽ*U\*U\> ͑k*M\"͂"+"U\"M\*[\R*U\"Q\ʹ8[*Q\"U\"}ʑ(0(+͂0"U\Ͳ(y` ) v("]\͈,8ø ~(G#N#8 "_\`i"]\*_\[[\#"]\=(F#*K\8~˸w+"]\!Ͳ(.#ʹ3~*#( `,0x0͓& 0% *C]\Rn,`iͷSM\U#p#qÑ}`"_\ 0x/=Gy/O͗BÑ*[\#^#V#~#0(#= ~#= Bͭ( Ͳ(H (,Šݼ ͒ x[[*K\)͸0"[\#N#F #!"##~ͶH 7" # ( <# *K\V6Ͳ(r*Y\+U#6["[\#6#q#p**U\xH ,~͍,? $( ( ) #"]\*~H 7, *U\0"U\# "]\('*K\ U#!*\R!f"\͍,("]\!,U}O"S50% ͭ( ,(H ͒$xU""U\*Q\e}( *U\"W\S͂‹("Q\G͎>*0% ͭUF#N+͑*B\""]\:0G2Y/2kvŠ!"2y, !=, !=; !=:0*|(!ҟ}lb))])(_ͩ0DMP& (%|ڟgzG>> B}}òRDMͲ**ͪ",qn͉OV#^z(PySI\+0GDG:O> (-śO!q\ (n͉!I\_!(N0~>>þqR( ̀K Q́> ##N#F# KW>z{*I\n (B 0j~%(-0 ͍,#~$(7&!H ݼ8,&0%> !'" S(͈,K B " > ͈,*B`i"ɀFailed at!~ˆ*7"* n=" KKE\ͿCB\:G\<2D\!z('BBR8 C1*@U\*u7R8$CF( ͊[u͊#$* n+>L*un(V#^R8*un"M\+"U\* n+"Q\#"_\##N#FCFF#N+*B "0"_\*Q\#~6$*Q\#w*S\*_\"S\$"S\;KI\ͿCI\ͮ>x(9կ >:;> 2+|ݵ*Y\"]\(0 601͔0%' *O\ ~M !,"\2s r !9~?T]"=\F+N+#@R*S\!!?ͳͱ""\""\V *͈ U ( i"\*\R8DM+-K\+-'8͙7B8#"]\͒ix*\[\"\̈́ GO*\*\*[[H ìͷ0 i"u:"_\ i"" (ʊŠ> 2 "M\GOR0 |/G}/O!SC\"\:~(**[DM* ͳ*u:~̱KKK\x(: K\ [_\:~"_\̈́ +"]\D>ïͷگi:>7~/wBl~0 ͩ0DM#^#V8BJr+s##"*O\#####s#rPPYͭ*0%+ͩ0`iͩ0 BKͭ*( R*()(`i#* * )Š͔ͱ"]\5"]\ʘ=BK= [[\*M\7Rr+sͱx(N! =(0.=(+! =(%%. =( =(=Ÿ.A&( 0>. x ͍,0 x *S\~#!s*E\:G\<="2:G\ =ͧ!^õ*W\~ (, ͫ("#~V:;\$0%(v +:q\( R0B++Ͷ*]͂,Š$v€+͙PYç+"###"| 2?5*"!H ( ;(,Šx y(ҟQ{":8*\>!o|g"Ky/1ox1g"\ͪ""\ "*2*!l\ ;L͌iͻ+C< oÆ*_\ͭ*[\7R$,7*[\ L1~+F +~(#:> 0bz2/!f((y.X$ x˯ 8# yxɯ2!2#͟e,2p ͆K\    ; ; BCHKMSTUZACDEFILMNOPRSTUVXBICHAHESCRMEMORSTRINTIMUSINSHIFFN[ɀANCOSDEEOFILLEINSTRINLENGTMENUMBEODPEERNDSINITEINARRAMOXO. ~2#~460+60|}^ !!5 h626:.ͫԫԫ:܁(AO 7+I(!˾˶A($ :H\8@ P  !9^#V;B 6+67^}ǧ!;\nͦˮ#nđ Ô͌("*U\7RDM ! ͌++ x(͈,( ͪx(Eͽyx >> 66͈,_ ͪ{ +~:  *[\US[\!BDM*\ "\*=\ "=\>0ͪ<{8W*\#~#N#F#7Ⱥ *\!9R}##R ̈́bk rDM9#'@Gt  0TOoͪ#+++*=\*W\ê:O!~#<0P:0͂0$(1! 6P4 5 > ; 5F ( @ $א͂Š͌6*O\\R͸# *]\ ߽߽߀߽+0%(>͑6 K\:k\8!GC\G Ñ5SM\*E\:G\͗*Y\U#*M\ͬ~]{(*Y\"]\x >*8'͗s>!>60%ʔp Bʘ =2X* |(ڟ8"I\n!b"&!͎+Ԯ(7>.* \##0 ,ʹ38͗2~#N#na,0Oݭy8 G!><< }l˅<&^,V,N,fiR:0>=)|(\U8˻4-7-O8(:= R8 |)=y'/7Y?GNKV].e{lsz@ϕ:}LMĎdt׬۬u[wWcy'gZbi >": >4 = FÔ7e0} p [̀ :W:=0 ^ K> 7 (͎>22t* \##~ ##~#7-ʹ3'80%!/ç*O\^#V>(Sr+s> 29\͹> !~/#6!*E\|?g#n~"M\~:Š6 *Y\"]\xʊ*a\"[\##"a\]*[\"a\*M\[]\"[\2`\61xì͙*I\x(`i##N#F T]#~n ##~#fo q#p6:#@ xͱ"_w !4#4T  Ȯ!q##p(x [e\!"&R">G*90#x  (  x(>!!9!###N#F(͖8DMT]++, $)9*98!<47]â*Y\W~ z0f 3ʹs=\>H ,#y0_y@Wx ҟ*6\$M%+y= *{\O%+y= &Kv\a.xBB_R0#"v\>=j\U4-K0!0.:W:G&*T](ڟg͕M͕͕% g$%(M͕% E}r,o͕% `!T]DM*M͕% :*}8Do-L:GM~T]#% :}=8D_:WD*M}o~i͕i%|<} o|g:\!+#og:-0 XE!96#r#s#q#6$|} o|gH >  >2>2͂;(&, ͂0%(͔2;( !y;Šy#x(y(`#͔8!~ qTx<8>g}!07=80o(- 0)(= DMͪ""Gx_(W8 ͚ GO:8 W!=yo~wwx (::8 :\I% ~I% ɧ :\?% ~?%  8:o[GM bk GM% GM:(A:\ͻ*"|Xg2!"#0+"x2qy2s:8\0 ́!"y- .."́=*\++6+!Uͧ%*S\~\# !\q#͂F#N+*B0͌;Š́< ́ͧ['!96w#6*"B\:<2D\y͙s+rͱ x4F#N../-8+H YØ!#*S\Ͱ#?~_*02G\  ; #~-0# ʹ3"]\͙#Ϳ8+-.8+SW\* "]\ͿH (' :\ >O(>> ˮ>7ˮ!'~6}2'*M\+U##"M\*_\}((:G\3*F#NͿØ*Y\+U#6[#q#p999*U*U\#F#NBq+p##N#F *Q\#~ͺ +~<6#6p |p |*F#N* 7RЧ*RzH ( , *I\ B?22"I\C:xé:2*I\K: |'П!vs+r(q ͔ QVRŠKEYWORDDEF PROPROEND PRORENUWINDOAUTDELETREJOIEDIKEYILOCADEFAULDEF KECSIZALTEBLANCLOCDELSFILGEBLANEXIT IWHILUNTILOOSORON ERROODPOKPOROLSCROLTRACUSIN*=\"8ìN”8+~ ( (.(+:8k!; _"E\r !GG :ìGà :F\!~(--~0! ~˾;!5 F-N!}+-N +a>.( ERROR=STAT=LINO=::\<͂!:\~6'O+-*]\!\x "]\*$d(#18:45:34000:00:000͹~+w~ݽ ~$*V#^"E\"I\!{=\;;(&Þ@~+o&=~# $v( x y0 2>G^C+! .y>0( a(-8w#~:(>8 >02 2:yoR~w# o Ͳ(.v~(i4#N#F>0#~#N#F_=W(= #^#V#5}ĩ05:BK:0%!.(+bk)) x *Ͳ*bk))!8ͩ0 JCͿ+x *y% #T] -(8 +C#?(?8!+͗2 - % % T] -((8C (#(JCH ( vʊ0 (F#N+-*[À ͕!<\ˮoF1D!Z:?:\(:̈́ o.^Z 8( 7(>7͂0%(840?*1:68!87- *~B "[\ǘ0%Ĕw͐+"[\ Missing LOOLOOP without DNo such linNo POP datMissing DEF PRONo END PRO͍,Ҋw (H 0H 8 ͱx y(0!G:800))))oDMf $3ʹ2D\&"Ê^#Vz(8D G!<~ww *uKM!@r#s+*RT#nV#^* 7R0##r#s# 0ͱ18+-8͙x(%͙h= - !4-8!;\n'͢-ڟ( /Ox/G(x(yAKAw+84ͥ8@Y8B0>Gco&F#~O#~͂0%(͔D"ѳ_,C7( Q4y/W!!X~ ~w#- % *=\s=\ F+N+V+^!!"W\'!T^õ,Š0% &#>?G>G!}\ˆ* ! "u"ͦ!u_!_H͎>22͙͙DOxGDOxGDOxG 0%²2͙x(A:61860+#*\.88"\*@ KS\B!!g(͂͂;Š0% ͂,(-(O͂ 8,(! 6:͖:2*=\s#r++6+6w!?~wͳͱ͙x * z4{(AR8=#B88 #DM>#=((#(B DMH8: *\++6+6"=\2~<8 60+~<860++w 80x ! +6+6vV>?Goorr͟5+xgE͢-Ax K\x8[K\*Y\+/!;\ˮͯ0v (-/8-00(-*^( (:6*B* B(?!@̀0##| gF#N*K\ ô3!;\ˆ  #%),/258;>ADGKNSVY`cfilswz}\4&V i.rrn,lHY͙`iN#F( 0%(ڟ)@@@y .(5+~.(# >0-8 <:860 >%w80%(840~ "ҳw )<#####~#( (%"@~#"9:((غM*"]\7~">&*Q\^#VS|XƸ:G\! +wW*Y\͋ͧ6 5 (Z د\DM*S\~0 ##^#V#þ#~+>>!v ˾,,,;͟8+bk +x~ (Ͳ*18͞͞+0>%gŃ0_y+0OA~.( #(0>% w#A ~#(-80q#ͳͲ*j61Ͱ>ͥ~ 0f(@{26*Y\"]\x(0Fĕ͑G66 v0N::\22 8> xͣ 6 KE\>::G\ :O͗::\<( ( 4 p\!D\~( 6 :'.2!Ué0[[\R C~W 0Ҕ!` (ڔ  ր0A   ô3L>2 ͋֯2G\=2:\Ϳ4 R (z:(!wHڊO!H N *t\~#"t\R]֑oo&U-%T{ ~ q*B\|(!"E\*a\+[Y\:D\3͹:D\( CG~x(0%*U\>͍#^SE\#^#V#"U\"]\W6 r (͋(0% (:(( Ao(* -\ CI\*]\!U*a\7R`in ͸y=((+[S\U"S\*a\++*I\p+q+s+r!n*K\( ŠH (Ը7R#͂0%7͙`i*=\!s=\+0 >+ͣ! ( ¶= !w&QK}*O\s#r߸xʟq#pͷ:?! ȧ_ jᶪ"Voͼ: ( 2> ͧ M D o%>6Rn_{ 0ր&on`E&o^#VU>>0%o&E ( N (