' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?   1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (  ՠ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(`# d ֠z# u`CE OF A PARALLEL WIRE9  INDUCTANCE OF CIRCULAR WIRING_ " CAPACITIVE REACTANCE CALCULATOR , INDUCTIVE REACTANCE CALCULATOR 6 BYPASS CAPACITOR CALCULATION @ RESONANT CIRCUIT CALCULATION J:(4);"RUN APPLIED ELECTRONICS"7):"('ESC' TO EXIT TO MAIN MENU)"L (23):(9):" ENTER SELECTION NO. "\ (23):(30)d SNx (23):(30):SN :(SN23):(8):A$(SN);: PAUSE11000:PAUSE "":(4);"RUN ";A$(SN)  INDUCTANCE OF A STRAIGHT WIRE  INDUCTAN  330936$I223210(J140?2(I):"*";F<JMFIYPI322sZ(I):"*";:(40):"*"zdInI17xA$(I)I(2):(11):" BASIC ELECTRONICS "I17(I23):(4):"<";I;"> ";A$(I)I" (20):(  TER FREQUENCY (HZ): ";F= T"ENTER INDUCTANCE (HENRIES): ";LG ^::b hC1(39.4783553F2L)y rC(1E12C.5)1E6 |"C = ";C;" MICROFARADS" :: "DO YOU WANT TO TRY AGAIN? ";AN$ (AN$,1)"Y"90 :(4);"RUN BASIC ELECTRONICS"9.4783553F2C1E6)- L(1000L.5)1000F "L = ";L;" HENRIES"O 390q "ENTER CAPACITANCE (UF): ";C "ENTER INDUCTANCE (HENRIES): ";L :: CC1E6 "F1(23.14159(LC)) ,F(F.5) 6"F = ";F;" HERTZ" @390 J"EN( d" WHAT DO YOU WANT TO CALCULATE:"> n:"1. FREQUENCY"T x"2. CAPACITANCE"i "3. INDUCTANCE" :"ENTER CHOICE: ";:N :: N1250 N2330 "ENTER CAPACITANCE (UF): ";C "ENTER FREQUENCY (HZ): ";F :: L1(3  936:::6(11):"RESONANT CIRCUITS"B(:::o2"THIS PROGRAM WILL CALCULATE THE RESO-"<"NANT FREQUENCY OF AN L-C CIRCUIT. IF"F"L OR C IS UNKNOWN AND THE FREQUENCY IS"P"GIVEN, IT WILL CALCULATE THE UNKNOWN." Z::    ";C;" MICROFARADS" ::C "DO YOU WANT TO TRY AGAIN? ";AN$Y (AN$,1)"Y"110} :(4);"RUN BASIC ELECTRONICS"(TO BE BYPASSED AND THE VALUE OF"E d"THE RESISTOR IT IS BYPASSING."O n::y x"ENTER BYPASS FREQUENCY (HERTZ): ";F "ENTER BYPASS RESISTOR (OHMS): ";R :: PI3.14159 C1E7(2PIFR) C(100C.5)100 "BYPASS CAPACITOR IS ~  936:::5(12):"BYPASS CAPACITOR"A(:::m2"THIS PROGRAM CALCULATES THE VALUE OF"<"A BYPASS CAPACITOR FOR A CATHODE OR"F"EMITTER RESISTOR IN AN AMPLIFIER CIR-"P"CUIT. YOU MUST ENTER THE LOWEST FRE-" Z"QUENCY   n                        ŠΠٮΠōӠҠӠ٠٠ϠΠϠծӠ٠٠ϠΠϠŠվĠˡˡ (AN$,1)"Y"908 :(4);"RUN BASIC ELECTRONICS"LOENTER INDUCTANCE (H): ";L; n:"ENTER FREQUENCY (HZ): ";F` xXL(100(23.14159FL).5)100j :: "THE REACTANCE OF A ";L "HENRY INDUCTOR AT ";F;" HERTZ" "IS ";XL;" OHMS." :: "DO YOU WANT TO TRY AGAIN? ";AN$9  936:::8(10):"INDUCTIVE REACTANCE"D(:::q2"THIS PROGRAM CALCULATES THE INDUCTIVE"<"REACTANCE OF AN INDUCTOR. YOU MUST"F"ENTER THE VALUE OF INDUCTANCE IN"P"HENRIES AND THE FREQUENCY IN HERTZ."Z:: d"  ӯԠŮҠӠ҈ҠΠŠή͠ŠԠ٠ŻŠҍҠԈӯԠŬȍŬŠҠҠ¢ϠԠŠŠӠ΍ΠҠŠŮϠĠŠԍŠӠǠӮŠ̠ȬҠȠӠٮĠŠȍҠРԠ̠ԠԠӠōҮŠȠӠĠՠ̠ήҠȠŠƠӠӠӠƠҠӮȠԠΠҠ̠ӠӠŠà٠٠٠ЬؠàЍРЍР̬؍ؠҠЍàЍàЍàٍŠϠҠ̡ŠԠӠϠԠΠōΠ҈ЍӍŠҍϠҠөϠҠӠͩӍӍԍ׍ԠȠōԠōҠ̠ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ ŠĠ͠ŠӠЍŠΠ٠Ӡ͠Š !!!!!!!"""""""#######$$$$$$$%%%%%%%&&&&&&&''''''' @ @ @ @ @ @ @ @ @ @ @ @ @ @((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP  $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? @@@ժժժժժժժժժժժժժժժժժժ@@@@ըբժԪѪŪբժԪѪѪŪŪըըՂ*U*U*U*  U*U*U*U(@@*ՊժѪբժԪŪըՊժѪբբբՂԨՊ*U*U*U*  U*U*U*U*@@ժժժժժժժժժժժժժժժժժժ*U*U*U* U*U*U*U*U*U*U*U*U* U*U*U*U@@*U*U*U*  U*U*U*U@@Ѫ@@@@@@@@@@@::+ "DO YOU WANT TO TRY AGAIN? ";AN$@ (AN$,1)"Y"90d :(4);"RUN BASIC ELECTRONICS"! d"ENTER CAPACITANCE (UF): ";C* nCCC7 xCC1E6Y :"ENTER FREQUENCY (HZ): ";Fr XC1(23.14159FC) XC(100XC.5)100 :: "THE REACTANCE OF A ";CC "MICROFARAD CAPACITOR AT ";F;" HERTZ" :"IS ";XC;" OHMS" e  936:::9(10):"CAPACITIVE REACTANCE"E(:::s2"THIS PROGRAM CALCULATES THE CAPACITIVE"<"REACTANCE OF A CAPACITOR. YOU MUST"F"ENTER THE VALUE OF CAPACITANCE IN"P"MICROFARADS AND THE FREQUENCY IN HERTZ."Z::  A @@ժժժժժժժժժժժժժժժժժժ@@@@ըբժԪѪŪբժԪѪѪŪŪըըՠՊ*U*U*U*  U*U*U*U@@Ԉ*U*U*U*  U*U*U*U@@ժժժժժժժժժժժժժժժժժժ*U*U*U* U*U*U*U@@*U*U*U*  U*U*U*U @@Ъ``<@@qc0 `La @a x1`L3f 3 fL3fL3 `|@  D @իժժժժժժժժժժժժ݊pHeH)`` 0@`x?@ `f 80f0 g@03fN3La@ժժժժժժժժժժժժՊR+W*U+p `< f0 `La @a|sgL3f|3 `L3FO3իժժժժժժժժժժժժي ժժժժժժժժժժժժՊP " ""LENGTH OF ";L1;" CM", ,::S 6"INDUCTANCE = ";L;" MICROHENRIES"] @:: J"DO YOU WANT TO TRY AGAIN? ";AN$ T(AN$,1)"Y"110 ^:(4);"RUN BASIC ELECTRONICS"TER NUMBER OF WIRES: ";N" ::> R(D2NA(N1))(1N)Z L.002L1((2L1R)1)p L(100L.5)100 "FOR ";N;" WIRES WITH A:" :: "CIRCLE RADIUS OF ";A;" CM" "WIRE DIAMETER OF ";D;" CM"  "PERMEABILITY OF ";,"/ Z"AND THE PERMEABILITY OF THE WIRE (MU)"\ d"THE WIRE LENGTH MUST ALSO BE ENTERED."f n:: x"ENTER WIRE DIAMETER (CM): ";D "ENTER PERMEABILITY: ";P "ENTER WIRE LENGTH (CM): ";L1 "ENTER RADIUS OF WIRE CIRCLE (CM): ";A "EN  936:::F"INDUCTANCE OF A GROUP OF PARALLEL WIRES"R(:::~2"THIS PROGRAM FINDS THE INDUCTANCE OF"<"A CIRCULARLY ARRANGED GROUP OF PARALLEL"F"WIRES. TO USE YOU MUST ENTER THE" P"DIAMETER OF THE WIRE IN CENTIMETERS   `` 0N@@@p`f 0f0> f@03f3La@``?@xOxR*U*U*`cyGx" dAy"@Hwq ` xG `LaL@aL3fL3fL3 `L3L38@x@` `?`0|@`|@<`|0f0f| f@y33f3GaO@0` x`)  "QrE"PD" D "@$ 0 q f0 @Gg @axccxxq;xxq @GoqG30x@@`x `?`0|@@x@` x`|0f0f| g@y33f@3FCaO?@~p0 "Qp E"0x" D "@B 0`p f0 @@a`0 `::- ""DO YOU WANT TO TRY AGAIN? ";AN$C ,(AN$,1)"Y"100g 6:(4);"RUN BASIC ELECTRONICS"50L.5)100* "FOR A WIRE PAIR WITH A:"4 ::X "DIAMETER = ";D;" CENTIMETERS"^ w "PERMEABILITY = ";P} "LENGTH = ";L1;" CENTIMETERS" :"PAIR DISTANCE = ";D1;" CENTIMETERS" :: "INDUCTANCE = ";L;" MICROHENRIES" Z"THE WIRE LENGTH MUST ALSO BE ENTERED."4 d::X n"ENTER WIRE DIAMETER (CM): ";Dv x"ENTER PERMEABILITY: ";P "ENTER WIRE LENGTH (CM): ";L1 "ENTER DISTANCE BETWEEN WIRES (CM): ";D1 :: L.004L1((2D1D)P4D1L1) L(10h  936:::A(6):"INDUCTANCE OF A PARALLEL PAIR"M(:::y2"THIS PROGRAM FINDS THE INDUCTANCE OF"<"PARALLEL WIRES. YOU MUST ENTER THE"F"DIAMETER OF THE WIRE IN CENTIMETERS,"P"AND THE PERMEABILITY OF THE WIRE (MU)"*  `<0@`HjX2 @`fL0f0fL|cLs3fx1f@aLf@L7``"Q E"P@" E "@ `@(S*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U:0`xC @@?`0x|0@`(W*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U:U`<U*U*p0<`fL90f0fL|cLs3f|0f@aL 0@|@  rEC8 epy@Bsqt@`@y|00`?fpaC3p|a@a33xx@gO +`T*Y*0```fxp3f3fx gGq1|0FOGGpa@0`  ` @@C~pA~|GGO@?x9`gxx1fxcxCGsCO>`?fxqcG3x|c@q33||agGOvRQ*U( T*Q*@`x@`f0`3f3f0 fCa0x0OCg0Oa`                   NICS":Q&&`L                              `     F` n    x    7 Y`    `¥L¥L8`L8`L8`L8`L`  … Å `@'@&ༀAB` <" F`  7< F`  Y< F` < F`  < F`  < F``< F`< F`< F`<ՁՁՁ#*18?@'@&e&`  < F`  < F`  < F` < F` ààààààààààààààààààààààASIC ELECTRICITY"I.164A(K)1.2843 A(K)A(K)(A(5)(3A(4).8)): K\ X10A(3)A(X(A(1)A(2))1)j X(X.5)t :: "THE CLOSEST STANDARD VALUE TO ";Y :"IS ";X :: "COMPUTE ANOTHER VALUE? ";AN$ "(AN$,1)"Y"90 ,:(4);"RUN BNENT VALUE: ";X nYX8 x"ENTER TOLERANCE (%) ";A(6)B ::p A(4)1.19927E2(11.5A(6).004A(6)2) A(3)((X)(10)(2.23A(4))) XX10A(3) K12 A(K)((A(4)(((X)A(4))K1)).5) A(5)1.88E5A(K)3.00335A(K)2  936:::<(7):"STANDARD RESISTOR VALUES"H(:::q2"THIS PROGRAM COMPUTES THE CLOSEST"<"STANDARD VALUE OF RESISTORS."F"YOU MUST ENTER THE NON-STANDARD VALUE"P"AND THE TOLERANCE DESIRED."Z:: d"ENTER COMPO   S#C; CC::* "DO YOU WANT TO TRY AGAIN? ";AN$@ (AN$,1)"Y"100d :(4);"RUN BASIC ELECTRICITY"RORS IN OHMS." d:: nRT0I x"ENTER THE NUMBER OF RESISTORS: ";NT X1NZ r "ENTER R ";X;" ";| "";R RT1RRT X RT(1RT100.5)100 ::: "THE EQUIVALENT PARALLEL RESISTANCE" :"IS ";RT;" OHMS." e  936:::7(11):"PARALLEL RESISTORS"C(:::q2"THIS PROGRAM WILL CALCULATE THE RESIS-"<"TANCE OF ANY NUMBER OF PARALLEL RESIS-"F"TORS. YOU MUST ENTER THE NUMBER OF"P"RESISTORS AND THE NUMBER OF THE RESIS-" Z"T  ss+::(4);"RUN BASIC ELECTRICITY"XRR10QR S2G$"OHMS"9 S2S5G$"KILOHMS"M S2S5SS3d S5G$"MEGOHMS"t S5SS6 RE(RR.5)(10S.5S) RE(10RR10S.5)10  :: &"DO YOU HAVE ANOTHER RESISTOR (Y/N)? ";AN$ 0AN$"Y"100! 2 JD$"GOLD"T5* TD$"SILVER"T10> ^D$"NONE"T20E hXN r450X |::| "RESISTOR VALUE IS ";RE;" ";G$  "IT HAS A TOLERANCE OF ";T;" PERCENT"  BLACK,BROWN,RED,ORANGE,YELLOW,GREEN,BLUE,PURPLE  GREY,WHITE 540  C$"GRAY"C$"GREY"J :"ENTER COLOR OF FOURTH BAND (GOLD,SILVER"p "OR NONE): ";D$v X09 E$(X) A$E$(X)QX "B$E$(X)RX ,C$E$(X)SX 6C$"WHITE"C$"GOLD"S1 @C$"GREY"C$"SILVER"S." d( n:"POSSIBLE COLORS ARE:":3 xX09> E$(X)I E$(X)P XX :~ "ENTER COLOR OF FIRST BAND: ";A$ A$"GRAY"A$"GREY" :"ENTER COLOR OF SECOND BAND:";B$ B$"GRAY"B$"GREY" :"ENTER COLOR OF THIRD BAND: ";C$"  936:::8(11):"RESISTOR COLOR CODE"B(::N2E$(10)z<"THIS PROGRAM INTERPRETS THE RESISTOR"F"COLOR CODE. YOU MUST ENTER THE COLOR"P"OF EACH BAND AND THE PROGRAM WILL TELL" Z"YOU WHAT THE VALUE OF THE RESISTOR IS   $?6E-?7626v%$$?6.56M( ?)3-? --66666v- $$66 $$666`r$$$vn ( v6. <--.--I9?766.----666??*(--666M!$?d--623-  ?2*-( ?L?I--??*( 66%?66E-V$$6.6-- g!?26v- (u666-- $?--ޓ-:?'$$--6-6I9?66-%<6.3n $< $)66-I166? 676M(( 666--766M!$l(<66n $?h$<26v-6`$6v $* $M 6v-*- $$----666 $1>>n<(-, > >>w)(8`8.l N)<vm  $6I6q65>Nl($6?N.8--J )5N? $  66-*(.-%--? I.!8$,6- ?(-6v- ?`-R-6>?`-666-- ?J?6--I166>? d-(>?7--I9-6R-56?L8? 6.6$ w6-I66?666M;`()66--6$66-6$,R-6? ,-6?$$,J?6-V$$$ -;6.J?-?? -3v-6v-%$< _0;ENZen'K7<JYeps{!%*3;CXft)5<FP\hs}Eh ,iK ܢ@`L eL>:> LHI ȱBQPɬh`L MK `ML ȥQ@eLh>ȥD>ȥE>L` i ʈ0 ݞi`p8HHHXp8Xp8,iiii`+,-NOEFN?ժ0);:i Kb bDC [$ &h Kb :b -b UhC`DD HȱGJheDEKKK` :b` LbM ߦM:; PʝJHKIL:5H<$Hȱ? BC ,2`5 ߩ````  u` 0wr)e"!Z ``  i愤) i#L$` `L```" A`" !"                            WG.5) :::2 "FOR ";A$;" APPLICATIONS:"< ::k "A ";AWG;" AWG WIRE IS REQUIRED TO CARRY"q "A CURRENT OF ";I;" AMPERES." :: "DO YOU WANT TO TRY AGAIN? ";AN$ (AN$,1)"Y"100 ":(4);"RUN BASIC ELECTRICITY"Y"% Z"ENVIRONMENT (-55 TO 125 C)."/ d::X n"ENTER CURRENT CAPACITY (AMPS): ";I x:"GENERAL USE (1) OR MILITARY (2): ";T CMA400 A$"GENERAL" T2CMA700 T2A$"MILITARY" ACMAI AWG10((3252A))(10) AWG(A  936:::C(5):"WIRE SIZE FROM CURRENT CAPACITY"O(:::~2"THIS PROGRAM WILL FIND THE LARGEST DIA-"<"METER WIRE THAT CAN CARRY A DESIRED"F"AMOUNT OF CURRENT. YOU MUST INDICATE" P"IF IT IS FOR GENERAL USE OR MILITAR   GEN0 GъܮՠѠĨՠհ񸀁ǀĀՀŀՀԀŀԀրЀԀЀ؀𸀀ЀЀMLOOP 2FINITV ;FWIPESCaFWIPEBMhFHCLEARFSCOPRIFCHRPRIFNONFX1@8 (T*(5,|>t:8ՠĠѨՠհ老ǀĀՀŠՀǠԀĀԀր܀ШňnjĀĀԀԀԀՀЀЀЀЀԀрCONF.S@CONF.D@CONF.U@CONF.W@CONF.V@CONF.T@CONF.X@CLIDE0( P@"DCBRJcFBBE"E"U*WjU*8 ЀʨըߨըԠԠՠՠ׀Āက ррՀՀԀШnjnjĀĀԀ􀁪ԀЀՀЀЀЀЀԀЀSETFLOSETMUSGROW GROW0 GROW10B2ACK SLIDE SNITS5( P@@cFRJcFBBE"GbU*]:U*( Ѐʨը耂ըՠԠՠנՠՀĀ  р񀀪Հ݀Հ*UT"*"R R ^*T UU*UT"*"R R ^*T U?U@*UT"*"R R ^*T( UU BUKTUEXPRT3CLIPUS4CLIPUPAINITSHEINITS1JINITS3TINITS4uIMCHD2a"*" B *P((E#EEA  U"*"R R ^*T(UUUU  U"*"R R ^*T UU*U T"*"R R ^*T UUee$()I(`xȈ0` ``````` u/?``L r`ȹ`Ȅ u```L ߥ ߠHh` ,0,a08f` ,` L Lԍ``LLL`ª`LQLYL`LeL  TO WYE CONVERSION/ " WYE TO DELTA CONVERSIONT , WIRE SIZE FROM RESISTOR & LEN.z 6 WIRE SIZE FROM CURRENT CAPACITY @ WIRE RESISTANCE CALCULATOR J TRANSFORMER TURNS RATIO T:(4);"RUN APPLIED ELECTRONICS" 9):" ENTER SELECTION NO. "- (23):(30)5 SNI (23):(30):SNi :(SN23):(8):A$(SN);: PAUSE11000:PAUSE "":(4);"RUN ";A$(SN) RESISTOR COLOR CODE  PARALLEL RESISTORS  STANDARD RESISTOR VALUES  DELTA   340936$I223210(J140?2(I):"*";F<JMFIYPI322sZ(I):"*";:(40):"*"zdInI19xA$(I)I(2):(11):" BASIC ELECTRICITY "I19(I23):(4):"<";I;"> ";A$(I)I (23):(  z#   Š "   ֭͠Ԡ Π ЮƠ à2 Գ Զ7  Ҡ٠ԠŠԠҠԠ ӠҠ٠̠ŠĠҠŠĠҠ٠" Ϡ"֭Ԡ  ŠŠ͠Ԡ ̠ӠŠŠŠŠӠҠΠԠԠΠàӠ  ŠŠҠ ŠŠ͠Ҡή ŠϠΠŠƠԠŠŠƠҠǠĠӠà٠ ϠŠΠ"ՠ ĠҠӠ!Ҡ ҠҠŠ ŠƠ̠Š ҠӠϠb """""""$$$$$$$8Ii8Iir 61 e   Ln` e    L\QȍPWRL6Ml_`  `bn@nna0Ci` mn `ɡ`0i`8` : E)piy E)u>0>>yyʈQо `:R( Q!$S,0Q  K0,a LI,,L3J,H,00h> 5 5 5 HIHA@  D j = EL 5 5 5 LM LNɠ LN LNLM_i8 `3i K:  b L>yL b aLL/L8iL L) L K LL8؍L̩L`,P,R,W 5MSckL0L]MLgMckL  (8 @L qLLMID)| , G, G ɠLM[L @5MaL'N `h` J J J J J J J J J Jh Jg Jf Je Jd Jc JLJpL JoL JnL JmL JlL JkL JLJLL`LL`8؍LL) JLJJJJ L J J`@ ,0`     KL@LH)ecc 08 cdh)JJJJedd `8 dee `eff `fgg `ghhɢL [@,P,R,W z 7H Lp` 82J)IIlLJEZI KEZI$(8KEZI,ZKEZI04|KEZI8`J K $(8K ,ZK 04|K8`                     I   ' LI:A ZaT qk{@Yz`cmanS||G||` `Ypd) *eYY` TUHV/H`.H/H=U H,HH-H,H.-Hk,H.-HȱUJ/HeUUViV0H,HeWW-HeXX0H*1HI1H 1H,0LH,H*Hm+H+H0Hi0H.Hе/H`-^>~ Xm&DhHyGh) 'D m'Di8  T  EHT  Xm&D  TLF EHLmG ;A:A z` 8Ph LLLLL,Xp8x5HH G GLi G GG` }||GG|يGG8G`G |}zE  |EР b b GAGA GGلALgA͉GLg(D)Jip$Dx  HyGhH)I 'D m'Di8\  ^  h8lUIVzE{E  zE8{E  T EHd %D%D)HX8$Dx(D(D)Jip  $D,L~E%D%D)JJiX%D)yGH%D) 'D m'Di8H  %D)JJIiXhh  LD|Ex  zEV{E  |Ei }E}E,0}E,0zE{E  zEi@zE{Ei{E'3` ihhLB  p  ^` ;A{0{z,P,W%D&Dx  HyGhH) 'D m'Di8X  hHyGhH)I 'D m'Di8\  h8(D)Jip$Dx  UHV EH EH$Dx(D)Jip  $DLb'()*+ 0 @ P 0 :AB B H LB  L  ' ( ) * +LALLB'-(-)-*-+ l  LQC9A)К CLQC^'`p    ^3 ,0` ΅B Bh8$L4dHمB B B B h8㭎A ;A L:A z`9A9A)aLA ]I]LA J(`Hi Jh `9A9A)ѩB9A)       A ;A{0z{\ \߽lHhQ`1+a Z@ '3:` A:A ;A L z  ]I]L{LAz{ B H R  L  ')3LdH K0hH;[l E) E E)i@\ AТ;`;8A4 @8) `,00L@ A0}'l"`)7A87A l`%\\}  iɯ`\LA 8`*U,U#W*U*U*U*؂+`ժժ8ժժժժp""">>""<""""">`U*U*U*.UX*,UŨѨx` D`*U*U*U:W> +&U*ת*תаx><~?~|8|p~~*E `ժժժժՎܪժժ0>>""ժժ՚تՁժp`*U.UzU*U*U*U*؊+~@`L ֪ժժժܨiŨ0"""" ""$""""$$" `U*U*U*.UX*},U|բx`  U`*U*U*UVzp|A+~W*@Պ+ϨŪޓ>pp@(Qժժ՚تתժժ>Ȁ@x~`U* V*5.UX*U/U*U*U*U@`Ճݻ p`Q(`ժժժժ՞֪ժժ0ժժվ՚تՁߪ0`*U.Uj@3W*UzW*U*+Ġ~xppN9xp~?8@"`Վؿժժժժܨ)Ũp "2 >" >"$" ">  " `U*U*U* .UX*U/U:ըF|բÃx`p8@8~?p~?8*`*U*U*UVj}Qda+|?@Ղ윢Ѫ`p><>>88pQ `ժժժCժ՚תժժ@0">""՚تՁ `ժ0><">"`*U+U:s}+U~*U*p+ъీaÈdz``x@ U`Վs`ժժժժآ."""""$""" <`U*U*U*.UX*U+Uz|GpՊx`*P'Q`*U*U*uV*`*`Ъ ```A(ժժժ՚تՁتժժ؀ժ֪՚X*U)U*U*U*Up𐀀<|p`ժժoժպ@ժժժ|?0$"""""$""""p`ժժ`0"$$"""(10)(2.23A(4)))$vXX10A(3)/K12YA(K)((A(4)(((X)A(4))K1)).5)A(5)1.88E5A(K)3.00335A(K)2.164A(K)1.284A(K)A(K)(A(5)(3A(4).8))KX10A(3)A(X(A(1)A(2))1)X(X.5)&&:"UPPER THRESHOLD = ";U;" VOLTS"K0"LOWER THRESHOLD = ";L;" VOLTS"S::{D"WANT TO TRY ANOTHER DESIGN? ";AN$N(AN$,1)"Y"160X:(4);"RUN COMPUTER-AIDED CURCUIT DESIGN"bA(4)1.19927E2(11.5A(6).004A(6)2)lA(3)((X)"R(";J;") = ";R(J);" OHMS"! J' T :"THE POWER DISSIPATED BY THE LOAD IS" P;" MILLIWATTS. THE ACTUAL THRESHOLD" "VOLTAGES ARE:" UR(3)VCC(R(2)R(3)R(4)) U(100U.5)100 LVBER(1)VCC(R(1)R(2)) L(100L.5)100X rI(VUVBE)R(1)/ |P(1E4I2RL.5)10Y "FOR A SCMITT TRIGGER WITH AN UPPER" "THRESHOLD OF ";VU;" VOLTS AND A LOWER" "THRESHOLD OF ";VL;" VOLTS THE CLOSEST" "STANDARD VALUES OF ";A(6);" % RESISTORS ARE:" : J14 ENTER RESISTOR TOLERANCE (%): ";A(6). ::P R(1)RL(VUVBE)(VCCVUVBE)[ XR(1)d 610o R(1)X R(2)R(1)(VCCVLVBE)(VLVBE) "XR(2) ,610 6R(2)X @R(3)10R(1) JR(4)R(3)VCCVUR(3)R(2) TXR(4) ^610 hR(4)к"VALUE. ENTER ALL VOLTAGES IN VOLTS."/ :Y "ENTER UPPER THRESHOLD VOLTAGE: ";VU "ENTER LOWER THRESHOLD VOLTAGE: ";VL :"ENTER SUPPLY VOLTAGE: ";VCC "ENTER EMITTER-BASE VOLTAGE: ";VBE :"ENTER LOAD IMPEDANCE (OHMS): ";RL$ " VOLTAGE BEING USED, THE BASE-"K d"TO-EMITTER VOLTAGE DROP OF THE TRAN-"z n"SISTOR, AND THE RESISTANCE OF THE LOAD." x:"THE PROGRAM WILL ALSO ASK FOR THE" "TOLERANCE OF THE RESISTORS USED AND" "THEN CALCULATE THE NEAREST STANDARD"'   936::::(9):"SCHMITT TRIGGER DESIGN"F(:::q2"THIS PROGRAM DESIGNS A 2-TRANSISTOR"<"SCHMITT TRIGGER CIRCUIT. TO USE IT"F"YOU MUST ENTER THE UPPER AND LOWER"P"VOLTAGE TRIP POINTS, THE VALUE OF THE" Z"SUPPLY     `*U`+U:>*U+U*خ+𻿂Ǚp@`?|?|N9~?p~?<@T`*Up3>ժݪժժժ؊/$""""*""$"""" ""`U*U*U*.UX*U+Uj@ob@Պx0`@|?<`<~?p~?<@*qD`U*U*U.U\`*sЪ p@`|?|8>P(@*ժժժ՚تՁpժժЀժ֪՚تչժժժက<x|?p`ժժժpժժժ0  " "$""2&`ժժՂ0"$22>`*Ux*Uj>/u.U*>+źㆌx@ P`*U,U0`իݪժժժ(Ţ$""""6"$""""$ "" `U*}U*.UX*U+U*@*`@תԎp0`@@"yQ`U*U*U.UXz @Uբc p8@@@ @*ժժժ՚تՁ@ժժת՚تչժժժကx~`ժժժժժժߪ0 ">""**`ժժՎתժժ0" *"`*Uz_*Ujcl/}.U*+刊8~~=25BBB:875=CDD7@6D4?ߓ\8VmIVt/{=c^kBEZk=wY uBFz#H2BaiW![cazBNooPeD,7T1XN;At$%%TaguEg2nx69&(&+?+$-?42.$L  i  a^ ,^` a^8ek8ekiɨ` a`yL ~ˎJstݯKVP&: Z)g¿dQ\O.hP^>^3==4B872:C:8194C=2V "C(C1E6100.5)1000 ,VC(VC100.5)100] 6"WITH A CAPACITOR OF ";C;" MICROFARADS" @"THE OUTPUT VOLTAGE WILL BE ";VC;" VOLTS" J: T"DO YOU WANT TO TRY AGAIN? ";AN$ ^(AN$,1)"Y"110 h(4);"RUN COMPUTER-AIDED CIRCUIT DESIGN"1(WRL(VL2VO21).5)1E64 C(100C.5)100_ "THE VALUE OF 'C' SHOULD BE CLOSE TO"} C;" MICROFARADS. SELECT" "THE NEAREST STANDARD VALUE" "ENTER C (MICROFARADS): ";C CC1E6 :: VCVLRL(RL2(1(WC)2))IRED"0 Z"ARE THE LOAD RESISTANCE AND DESIRED"@ d"VOLTAGE."J n::g x"ENTER AC VOLTAGE: ";VL :"ENTER FREQUENCY (HZ): ";F "ENTER DC OUTPUT VOLTAGE: ";VO :"ENTER LOAD RESISTANCE (OHMS): ";RL :: W6.2831854F C  936:::@(6):"TRANSFORMERLESS POWER SUPPLY"L(:::{2"THIS PROGRAM DESIGNS A LOW COST, TRANS-"<"FORMERLESS DC POWER SUPPLY. YOU MUST"F"ENTER THE AC LINE VOLTAGE (110/220) AND" P"THE FREQUENCY (50/60 HZ). ALSO REQU    )D `monpmxn A q`monpman q B`:^ G^ z`>yop  ^>ymn`qL J(* J(ii`LΣLq  E)i8kex E)' L  L )Jipel\  l`\`^`3'` ) 8  i  i i Lq Lq vwLegYGi` E| E}| q I@ZIZ L L`monp@mxnL L 8 L E)IJL i L L E))i}  Lt)i] 8] )L E))} ɐ L)] 8] L 8 & iɠ8 L i 3L  l ) `l0i L! lPi'3 ybx ii8l '@ ` E| E} E|EO| bj ^ ^li ,0צּL '`     ^lL8O KR R`H>yo  h>ymnL 8sevewrDrsDr`N EP &N&OjPNEO`*8FTbp~z`H{  ih8ܩ 8  8   8l_`  `bn@nna0Ci` mn `ɡ`0i`8` : E)piy E)u>0>>yyʈQо `:R( Q!$S,0Q  a`_`l\  \``)_iuLBuLBuA>9y1LH>yo  h KLL;е ' _i8 `3i K:  b L>yL b aL\LH s h8`[  a ') :Ay '@H h8 @ @zL6MLz z L L8``a0 `a0`0`b` 5 [i_`aLl_`  `8`0@P`,a`L ' yx  k b3 'i E)i? 7H`X]3J[Y [[[L[[L[` ` `'  bdhI? L ? L  iɠ  i  dh]L b3\ ^\`3'b ` "FOR LIGHT LOADS AND HIGH LINE VOLTAGE"T ^"THE VOLTAGE DROP ACROSS THE REGULATOR" h"WILL BE ";(10VHVLVAC2.5)10;" VOLTS." r: |"DO YOU WANT TO TRY AGAIN? ";AN$ (AN$,1)"Y"80 (4);"RUN COMPUTER-AIDED CIRCUIT DESIGN"V ECONDARY VOLTAGE = ";2VAC;" VOLTS"V ":"EACH HALF OF THE SECONDARY = ";VA;" VOLTS" ,:"TRANSFORMER SECONDARY CURRENT = ";IO;" AMP" 6:"TRANSFORMER POWER RATING = ";(IOVAC2.5);" VA" @:"RECOMMENED CAPACITANCE = ";C;" MFD" J:' T:(AMPS): ";I * IO(1.2I10.5)10; CIORV6E3P C(1E7C.5)10_ I1CC3i :: " 2-DIODE FULL WAVE REGULATED SUPPLY" :: "FOR A ";VO;" VOLT, ";I;" AMP POWER SUPPLY:"  VAC(10VAC.5)10# :"TOTAL S"ENTER VOLTAGE REGULATOR DROP: ";VRK n"ENTER RIPPLE VOLTAGE (P-P): ";RVr x"ENTER NOMINAL LINE VOLTAGE: ";VN "ENTER LINE VOLTAGE LOW: ";VL "ENTER LINE VOLTAGE HIGH: ";VH VAC(VOVR1.25RV2)VN.92VL(2) "ENTER REQUIRED CURRENT   936:::D(4):"FULL WAVE REGULATED POWER SUPPLY"P(:::}2"THIS PROGRAM DESIGNS A TWO-DIODE FULL"<"WAVE RECTIFIED, REGULATED POWER SUPPLY."F"ENTER ALL VOLTAGES IN VOLTS."P::Z"ENTER OUTPUT VOLTAGE: ";VO$ d    T L H`T`T`T`T`M 5 b EHT  3  4 L2 2 `,0),0`bi8j Ȉ`,00`$S,0`,00` LYV    k`ik`b ij^ ^ 'jjZ L ` ] . ,P,T,R,W`]L      "   L`6MK ӛ     E)3,`Y`Y`Y`Y`ZY 訽Y JY Y L L ,,`b0`)`Q L? `iJeL e i1)\Q)Z1)\Q)Z1)\Q)Z L- `e i1)\Q)Z1)\Q)Z1)\Q)LPiiJeeJee i)Q)Q)Q)Qi1)\Q)Z1)\Q)Z1)\Q)Z1)\Q)Z                                  b@l  . $ ; &?1?=A>?I i`HH11`IJ듧ƙɾ5Ė+]̵h5`4ɺл1>@@A`41`>BD`8>6>) `LL u ?l:L``L@ 'A=?<) < `JJJ>Ie=?<=`K i! Ȉ2 ,`H h*:` R"3 ^"WILL BE ";(10VHVLVAC2.5)10;" VOLTS"= h::c r"DO YOU WANT TO TRY AGAIN? ";AN$x |(AN$,1)"Y"70 (4);"RUN COMPUTER-AIDED CIRCUIT DESIGN"V" V"8 ":"TRANSFORMER SECONDARY CURRENT = ";IO;" AMP"q ,:"TRANSFORMER POWER RRATING = ";(IOVAC.5);" VA" 6:"RECOMMENDED CAPACITANCE = ";C;" MFD" @: J:"FOR LIGHT LOADS AND HIGH LINE VOLTAGE" T"THE VOLTAGE DROP ACROSS THE REGULATO1.8I10.5)10 CIORV6E35 C(1E7C.5)10D I1CC3N ::x " REGULATED POWER SUPPLY DESIGN" :: "FOR A ";VO;" VOLT, ";I;" AMP POWER SUPPLY"  VAC(10VAC.5)10 :"TRANSFORMER SECONDARY VOLTAGE = ";VAC;:"ENTER RIPPLE VOLTAGE (P-P): ";RVN n:"ENTER NOMINAL LINE VOLTAGE: ";VNs x:"ENTER LINE VOLTAGE LOW: ";VL :"ENTER LINE VOLTAGE HIGH: ";VH VAC(VOVR2.5RV2)VN.92VL(2) "ENTER REQUIRED CURRENT (AMPS): ";I  IO(  936:::A(5):"BRIDGE REGULATED POWER SUPPLY"M(:::|2"THIS PROGRAM DESIGNS A BRIDGE FULL-WAVE"<"RECTIFIED, REGULATED POWER SUPPLY."F::P"ENTER OUTPUT VOLTAGE: ";VOZ:"ENTER VOLTAGE REGULATOR DROP: ";VR% d    `YE <Šӭpd`HVTQ PS 6" (!#%L" X`I`ɍ,,L8L,H ΰɐHJ) )h)i( ((`ɇ@ 0`$($$!fi#bZH&bTDThDt(ntJrtttrDh2"&&rr&HDDȅEhH 0l( Lh:h;l Le / XZ]_, :ILl `Ȇ׍숈l E@A  J 0,*i H/.  `0 .: VȘ L `8/;e:` T0 "T3  T3  T; "D3 D"D3 D"D3 "D3 &1!YMJؤ#]#)i#$S#$S[[i$$)|mi)S4J G(i.&E0%.Q&&` , iH h-`/'-'0 (`HJ) 'h)i& &&`0i)0 00`J G&(JJJJ)`:; H:J jɢ )Jb y.)/) JJJ Ȉ` H:  J/Ȑh,--&eʵ``` f f` &L L fLC`8i`uu  ee`` ` 0` ` ` 5I` 5Iй` f f`L ?5=ɥD 5 5 D4ɻɍЀL\ɠ` }Ɏ$ ``LXWVhY `XWYHV(` Jhh LH) JQ JJJH`HJ`hh ?l8e` %GQ/[҅n3pJ?>ʊ:>Ș;k/=:   S;:L 4 40K14 L= BC D..=D5֤4 J :3 g ɠɤ ɓՊ x= 4   &B&C= 44ݴ 4ݺ ɤ4&D`L# ȱ0` 4 `u` 7$ 8`0 &&` { %Ppĥ uv` 2e   %F8 2 8Hh&&&&& 0hhI`LLLHxܥyݥPQLuƵPxLhQεyϱΠ L 4) ؘ 甠` uHɃLh` ☪ T`  甠`ѥ΅ ΅ҥυө 甠0ХҠ ӕ "L 4i` F`ٚ .L 4 `$$L$Ն$L,L 8!$ L赟0L0ܤ } L赟L0ܤ } L ` ` [ S oP YVPL6 O 5OPL Ι_LfP0Q@PPxA@QPa`qp`HP8εxh`Ʌ۰եڅʥۅ , ` :L΄<Ȅ>=?`ʕ>?>`8M˕   , ` L:L``F`$ ܪȱ 婠Lܤ`Ś25 a0 穠LJKH۰hЅѠȱ0@ȱHШhh0JL JLKMMLILLILLLLy 2L,PQ܅x݅yL آ8ЕNЕKʵ˕ە LkLMNܕ`LΥΥLMLʥMː ʥ˰JυKL  8MϕڥL 4΅` ȑ` l΅υLD L4 xPiڄeΕPeϕxPȵxڰL# N ONi)OO i@ &N&O ϕLz JKLυML LMJυKL qL ȩ` 6 6P`JLKMLxL L6 L[` Oڵw۴Nv L`xw8OPL# (` 40!(L 4LdF`  %L"wL{ TL~&&&ڥې څΈ` l 4Ȑ,` 40L 4Ȑ-` 4(L(n ㊨ rLa ?&0ΰ` Δ䮥G 0 #gMghghPcQ)Wqqqqhhq`uuuQ줰䮲륥Q9O/Q) WjB`O~5'Q 䯭䮡ޜݜݞGg` ` `嶡䡯z~" `P O䯭䮡𥴳\@`` ~3`Gg壡yi壡yi` @Gh X{gggggg'(dgxkg~9g'7(*7ϠGX͠LϠ٠SGϠDĠHSĠNSĠTĠ 5EMҠL Šō?FِLϚΠ κ f ٢  ٦Τ ȹɀI ȄȹH h3 oLB oTMɅ"3J[NSJIfmzq# [$NYP;#o6#"#!0 9@0Ӷ:Pyإ<[(N>W']5Kgvq ʤ  Y YoܹݾЇ`TP@xL` Ιϙ_oܙݙᙯ` ??<<<<<<<0UUUUUUUUWΤ PڵxۥΑȥL`hh$ F`` %ֈ`ʤZA^ܙ ݙ0  m7;܄iȢٚ . y$IqܤݐLM͠1FLJܹ/ݾLuc ܪȱ L[ĨP?xO_ڹo  l`w0P`fLPεϵxϱHȱ΅hΈ` J  畠P` Y $0`  畠$0 8 P# o ΅ڥυ e epݕ` 4LL$ `  rPՆϦ ` ΅υȩ ` Ӡȱ0I@iHeШiH˰hhЈЈ͑Ј̑ЈЈ0JKЬ@iHe eѕxh$0 xx ԅբ H 0  敠$ ( x$0  xx 0$FԨֹ)U h)װ H ֐ι LhޤȄ h󰩠ɩch cɰ$0 $` d'ʅ˅LM&ȱϰqȥȥ`FLʥM˥J̥Kͩ`Lkȱ0@hJHȱШhЄ0)ȆȘHJI@hL`ȩ)?Jжi?oiO iȱ) zȵх 8 05X~")XȔ) v*Ȇ0LJɢ  Ȉ ϴX)HЄ ȹ)eHe0 ̥͐Eʑ˥ʥ˰ਈ$ u~q  u  mʥ` ȹ0 L uߙ`` $0LL*iS 0wh(VP`΅h(OM L6 T&ϐ eڅeۅ &L~ 畠(LoU [΅ڥυ   o ` l3 3` 4J G 4&(JJJJ) 甠` F٩ $ 婠 Ȣ ii)ɰLPx+L 4P xL# 48` PxL PeHxeH˰iکeۅȱhڙ`ꠀЕ x ت3 Q3ؕxQεy NvNδPPPL#Q8yڅ`Sε{ϵQڵyxȔPMuHOL L3L`) #L $  `  v mL;ʅ˅LM  mdžة * * *     % 0LH΢QPHΪ0h$0 )?i h](Њ q L H ϐ { lhHHH hHL? hυυ Ljݥ ,L mݰ % LߩƉ 慝 憨80 ў*%L L ު `  }LޢٹHH ޥLLޥШh^^h_H r륡HHHHHl^h#d j݄hJhhhhhhE` LJ }d.U"i L=8,LLTҐL {ݩ),(,,ѸLLԠhhL ߅` ȱLL  ߅ ei` 꺽  ' 8 uvL׊i , {$8$0`LԦƹƸ$HH `ީ 8ϐ*IEʼna Lݦ,{iweLi^ e^hٲаg jH hV_F*ƹƸٲаH $P )0 Z ۆ $1$P 膸 ": ,i = {LrH0h J c ,Lqۥ 3 LۥL Ȫ*ȱ_ȱ{ȱȅ| L+ܥLSؠߠL:`?EXTRA IGNORED ?REENTER  \I`$ !i)$ )L(ʊ$ L W 檠^ \ LD۩ ,? ɠ )H h`0{|uvLh$L :ۥyz` @ `" ީ; =L Z , ,խLc ZL,զ}~, ߅hL* ,h`PQ/ Q^ԥP &^ &^ePP^eQQP&QPe PQ L ߅ ޥHH {h* mh r ȥ`L'hpoj iLڠ 㥌 婝 5ȱȱ` = $)94,;D {$0 4 Lک?`gh<=ij>?`v(Le lL5٩ ӥHHvHuHH >L ٥vQ 8egh ֐` eӚɰ ,ZLLhhB;uhvhh ٘e`:,  "hhh` { ɫ ޥ L>L( HɰɫЉơ$v# \ۦuv $ W (Lb-逐@ HHLLF:L8gh}~`Ƀ` Sբ$Lׅ ׅLԱJHȱJh`LNפ0`L,׈L20`LF׈LL ׅJF8ȹe8ИL`Lø{{ttmnghab\\WWRRMNIIEEAA=>::673401..+,))&'$%"# !H ֥ h ߦ>  E֥ E & > ` E  E  H ֥ hL  ֥ -L L -EF# =Pi  ֤Lְ ׅ! ׅ  / ) ) "&6 B /`TLՆ8M˕  Tբ , Tզ`  . $ ; E.. 4L& >`Lk 34 Lh856!;<79)F:&8J9j*0v 婭   +<; LhLk'cg=%;!,<+k,w(gG gG]$ t < N8i| (|`ܠLդ4ɪ 4<`<  $ H h .Ю#` L}Э%J u ӊH Өh dѮ#` L Q ;Ү#` Q Ү#`#2 Ӎ'( H() 91 eȱm)h`JJ`#JȱJLh `#  <(eΨ=)eϰ%Hh>?iJK̅  #& ')*& "'JJ) ""% m% ʥ0)J!m%! `JJJJS)фPIȄR%*QTU'T8ePT UeRU QJJJ`JJJJS)фPIȄR%*QTU'T8ePT UeRU QJJJ` ӥ',"&,i8i#H&ii&hif&i'`'i,&i,.&iPII&&if&H !"hH8 H!S hIiHSQUhPTh !"IiR"fS8PQ% 8TeRTUU&E%0Q&&kS TePTUeQPفŴxaI10 &WSP& )`" !H)&JJ&&h' &' &' f&') &'#i%Ѕ0J$)` .ХQ&%0Q&&`$0JI0`'0% I`0 I0ܩ(ߠQ)'%01&*%0Q)&E%0*Q&&QeS)j00                $(R$,V,W) X(G$)!QXE1 Q(QY.5)Y*1);(R$,K,W);W);(R$,U,W);Q);Z$i4P1100:Pw>RSī850~HRRD$;"PR#0"\""ī6302"ARE YOU READY TO PLOT? Y OR N ";P$BP$""ī640HTD$(4)_D$;Q${:1);H$;W);S$;39)N$P$"N"ī850Y(HL)(CB)E(LY)BD$;"OPEN";F$",L";L%D$;"READ";F$;",R";R%R1400R$ G:SSR%*D"WHAT IS LOW TAB NUMBER?";LLN"WHAT IS HIGH TAB NUMBER?";HvX"WHAT IS THE HIGH PLOTTED NUMBER?";Cb"WHAT IS THE LOW PLOTTED NUMBER?";Bl"WHAT SYMBOL FOR PLOTTING?";Z$qZ$""ī620v"WHAT TITLE FOR THE PLOT? ";N${N$************"7 "INSERT /PD TEXT FILE DISK IN DRIVE"a "**********************************"g v L%(WM)1 K(FW)(W1) U(JW)(W1) V(VW)(W1) "START PLOT FROM WHAT ROW? ";R% &R%R%1 0"END PLOT AT WHAT ROW? ";S MN FIRST?";FA "WHAT HEADING FOR FIRST PRINTED COLUMN? ";H$:Q H$""ī410y "PRINT WHICH COLUMN SECOND? ";J: "WHAT HEADING FOR SECOND PRINTED COLUMN? ";S$: S$""ī430 "PLOT WHICH COLUMN? ";V  "********************** 6D$;Q$ @3 J"WHAT IS THE FILE NAME?";F$C OF$""ī330f T"WHAT IS THE COLUMN WIDTH?";W ^"HOW MANY COLUMNS IN RECORD?";M h r"*** IDENTIFY COLUMNS BY NUMBER***" |"*** COLUMN A=1, COLUMN B=2 ***"  "PRINT WHICH COLU***********************************"5 A14000:A; G D$(4)f "INPUT PRINTER SLOT: ";Q$v Q$""ī250 "RECORD THE PROMPTS ON THE PRINTER? (Y OR N) ";X$ X$""ī260 "TURN ON PRINTER AND ALIGN PAPER"  "X$"N"ī320 , *"4 "* V-PLOT *"d "* *" "* *" "* COPYRIGHT 1981 YUCAIPA SOFTWARE *" "* *"$ "***** L99L1:"CATALOG"nd: PLEASE READ THE INSTRUCTION MANUAL FOR COPYRIGHT RESTRICTIONStnx"****************************************""* *" "* ֠֠ԠԠԠԠԠԠ֠ԠԠԠԠԠԠԠԠԠԠԠԠԠԠԠРРРРРԠԠРРРРРРРРРРРРРРǠǠǠǠǠРРǠǠǠǠǠǠǠǠǠǠǠǠǠǠ̠̠̠̠̠ǠǠ̠̠̠̠̠̠̠̠̠̠̠̠̠̠̠ΠΠΠΠΠ̠̠ΠΠΠΠΠΠΠΠΠΠΠΠΠΠ٠٠٠٠٠ΠΠ٠٠٠٠٠٠٠٠٠٠٠٠٠٠ "DIAMETER = ";D;" CENTIMETERS"( A "PERMEABILITY = ";PG j "LENGTH = ";L1;" CENTIMETERS"t :: "INDUCTANCE = ";L;" MICROHENRIES" :: "DO YOU WANT TO TRY AGAIN? ";AN$ (AN$,1)"Y"100 ":(4);"RUN BASIC ELECTRO Z"THE WIRE LENGTH MUST ALSO BE ENTERED."5 d::Y n"ENTER WIRE DIAMETER (CM): ";Dw x"ENTER PERMEABILITY: ";P "ENTER WIRE LENGTH (CM): ";L1 :: L.002L1((4L1D)1P4) L(100L.5)100 "FOR A WIRE WITH A:" ::"  936:::A(6):"INDUCTANCE OF A STRAIGHT WIRE"M(:::y2"THIS PROGRAM FINDS THE INDUCTANCE OF"<"A STRAIGHT WIRE. YOU MUST ENTER THE"F"DIAMETER OF THE WIRE IN CENTIMETERS,"P"AND THE PERMEABILITY OF THE WIRE (MU)"+  ҠҠҠҠҠ٠٠ҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠҠ      Ҡ              ΠΠΠΠΠΠΠŠ͠Ա԰ĠΠΠΠΠΠΠΠ           ";S(29)S(30)X(N)X(1)/&"RANGE:";S(30)>0D$;"PR#0"D::(25)S(26)S(23)(S(13)2)H"MOMENT COEFFICIENT KURTOSIS:";S(26)lS(27)(S(22)N2)((N1)(N2))"UNBIASED ESTIMATE 3RD CENT. MOMENT;";S(27)S(28)S(20)((SN)(S1))S(29)3(S(3)S(12))S(15)"PEARSON'S 2ND COEFF. SKEWNESS::";S(22)S(23)S(11)N="4TH MOMENT ABOUT MEAN:"S(23)NU$"G"1730^OZ(2)Z(1)S(24)S(23).5(O2)S(17)(7240)O4"4TH MOMENT WITH SHEPPARD'S CORRECTION:";S(24)S(25)S(22)(S(15)3)"MOMENT COEFFICIENT OF SKEWNESS:";SATION USING THAT VARIANCE:";S(18)86S(19).67449S(15)U@"PROBABLE ERROR:";S(19)jJS(20)(S(17)N)T"STANDARD ERROR OF MEAN:";S(20)^S(21)S(15)S(3)h"COEFFICIENT OF VARIATION:";100S(21);"%"rS(22)S(9)N|"3RD MOMENT ABOUT MEAN)K$"Y"ī1840F"VARIANCE WITH SHEPPARD'S CORRECTION: ";S(14)YS(16)(S(14))"STANDARD DEVIATION WITH SHEPPARD'S CORRECTION:";S(16)S(17)S(13)N(N1)"UNBIASED ESTIMATE OF VARIANCE:";S(17)"S(18)(S(17))!,"STANDARD DEVI"SUM OF SAMPLES:";S(2),"MEAN:";S(3)H"SUM OF SQUARES:";S(4)d"MEAN DEVIATION:";S(7)y"MEDIAN:";S(12)S(13)S(4)NS(3)2"VARIANCE:";S(13)S(14)S(13)(112)(Z(2)Z(1))2S(15)(S(13))"STANDARD DEVIATION:";S(15DATA SORTED IN ASCENDING ORDER"-I1S(1)7 X(I)>IYS(1)2(S(1)2)1350i(MS(1)2.5x2S(12)X(M)<1370FMS(1)2PS(12)(X(M)X(M1))2ZNS(1)d"RESULTS TABULATED AS FOLLOWS:"nx"NUMBER OF SAMPLES:";S(1)NTITY OF",L"DATA. THANK YOU FOR WAITING"8VM1S(1)G`M1(M12)VjM101270dtKS(1)M1l~J1tIJLIM1X(I)X(L)1240WAX(I)X(I)X(L)X(L)WAIIM1IM11170JJ1JK11201160:"S(8)(X(J)S(3))3'S(9)S(9)S(8)?S(10)(X(J)S(3))4IJJ1[JSĂR:850qS(11)S(11)S(10)S(7)S(6)S(1)$::10."THE SORT TO ARRANGE THE DATA IN"8"ASCENDING ORDER TAKES FROM 5 TO 20" B"SECONDS DEPENDING ON QUA COMPUTER-AIDED CIRCUIT DESIGN: " ACTIVE FILTER DESIGNO , COMMUNICATIONSe 6 PASSIVE FILTERS{ @ ATTENUATOR PADS J:(4);"RUN APPLIED ELECTRONICS";I;"> ";A$(I) IJ (21):(4):"ENTER SELECTION NO. ('Q' TO QUIT) ";S SN$h SN$"Q"Č936:v SN(SN$) :(SN25):(9):A$(SN);: PAUSE11000:PAUSE "":(4);"RUN ";A$(SN)  BASIC ELECTRICITY  BASIC ELECTRONICS   330936$I223210(J140?2(I):"*";F<JMFIYPI322sZ(I):"*";:(40):"*"zdInI17xA$(I)I(2):(14):" GENERAL MENU "(4):(11):"APPLIED ELECTRONICS"I17 (I25):(5):"<" 1." ::4 "DO YOU WISH TO TRY AGAIN? ";AN$I (AN$,1)"Y"80m :(4);"RUN BASIC ELECTRICITY""ENTER SECONDARY IMPEDANCE: ";Z2+ n::: xT(Z1Z2)N T(10T.5)10X :: "THE TURNS RATIO FOR A TRANSFORMER WITH" "PRIMARY IMPEDANCE OF ";Z1;" OHMS" "AND A SECONDARY IMPEDANCE OF ";Z2;" OHMS"  "IS ";T;"/n  936:::;(8):"TRANSFORMER TURNS RATIO"G(:::p2"THIS PROGRAM CALCULATES THE TURNS"<"RATIO REQUIRED FOR A TRANSFORMER GIVEN"F"THE DESIRED INPUT AND OUTPUT IMPEDANCE."P::Z"ENTER PRIMARY IMPEDANCE: ";Z1! d    HAVE A RESISTANCE") "OF ";R;" OHMS."3 ::Y "DO YOU WANT TO TRY AGAIN? ";AN$n (AN$,1)"Y"80 :(4);"RUN BASIC ELECTRICITY"BIRE: ";L. x"COPPER (1) OR ALUMINUM (2): ";T4 D A$"COPPER"S RHO10.575j T2A$"ALUMINUM"} T2RHO17.34 A105532.79304AWG RRHOLA R(R10.5)10 : "A ";AWG;" AWG ";A$;" WIRE THAT IS ";L "FEET LONG WILL  936:::>(7):"WIRE RESISTANCE CALCULATOR"J(:::w2"THIS PROGRAM WILL FIND THE RESISTANCE"<"OF A GIVEN AWG SIZE WIRE FOR A GIVEN"F"LENGTH OF WIRE."PZ:d"ENTER AWG SIZE: ";AWG n"ENTER THE LENGTH OF W  "A ";AWG;" AWG ";A$;" WIRE THAT IS ";LR "FEET LONG WILL HAVE A RESISTANCE"h "OF ";R;" OHMS."n "DO YOU WANT TO TRY AGAIN? ";B$ (B$,1)"Y"80 :(4);"RUN BASIC ELECTRICITY" D RESISTANCE (OHMS): ";RA n"ENTER THE LENGTH OF WIRE (FT): ";Lg x"COPPER (1) OR ALUMINUM (2): ";Tm } A$"COPPER" RHO10.575 T2A$"ALUMINUM" T2RHO17.34 ARHOLR AWG((A105532))(.79304) AWG(AWG.5) :*  936:::H(2):"WIRE SIZE FROM RESISTANCE AND LENGTH"T(:::~2"THIS PROGRAM WILL FIND THE LARGEST"<"DIAMETER WIRE THAT WILL PRODUCE A GIVEN"F"RESISTANCE FOR A GIVEN LENGTH OF WIRE."PZ: d"ENTER THE DESIRE    (10AA.5)10  ::K "DO YOU WISH ANOTHER CALCULATION? ";AN$` (AN$,1)"Y"80 :(4);"RUN BASIC ELECTRICITY", ,: 6"RA = ";RA;" ";R$% @< J"RB = ";RB;" ";S$B TY ^"RC = ";RC;" ";T$b h480r rAA1E6410 |A$"MEGOHMS" AA(10AA1E6.5)10 470 AA1E3450 A$"KILOHMS" AA(10AA1E3.5)10 470 A$"OHMS" AAxZAR1R2R1R3R2R3# RAZAR2- AARA6 370@ RAAAJ R$A$W RBZAR1a AARBj 370t RBAA~ S$A$ RCZAR3 AARC 370 RCAA T$A$ "FOR A WYE TO DELTA TRANSFORMATION, THE" ""NEW RESISTOR VALUES ARE:"  936:::;(8):"WYE TO DELTA CONVERSION"G(:::v2"THIS PROGRAM CONVERTS RESISTOR NETWORKS"<"FROM A WYE CONFIGURATION TO A DELTA"F"CONFIGURATION."PZ:::d"ENTER R1, R2, R3 (OHMS): ";R1,R2,R3n::    4 ::"DO YOU WISH ANOTHER CALCULATION? ";AN$I (AN$,1)"Y"80m :(4);"RUN BASIC ELECTRICITY"6::"R1 = ";Z1;" ";R$/ 6:"R2 = ";Z2;" ";S$H @:"R3 = ";Z3;" ";T$Q J450a TAA1E6380r ^A$"MEGOHMS" hAA(10AA1E6.5)10 r430 |AA1E3420 A$"KILOHMS" AA(10AA1E3.5)10 440 A$"OHMS" AA(10AA.5)10 xZR1R2R3 Z1R1R3Z% AAZ1. 3408 Z1AAB R$A$Q Z2R2R3Z[ AAZ2d 340n Z2AAx S$A$ Z3R1R2Z AAZ3 340 Z3AA T$A$ "FOR A DELTA TO WYE TRANSFORMATION THE" ""NEW RESISTOR VALUES ARE:" ,n  936:::;(8):"DELTA TO WYE CONVERSION"G(:::v2"THIS PROGRAM CONVERTS RESISTOR NETWORKS"<"FROM A DELTA CONFIGURATION TO A WYE"F"CONFIGURATION."PZ:::d"ENTER R1, R2, R3 (OHMS): ";R1,R2,R3n::  RD$;"READ";F$;",R";R%(\R14000fR$ApG$(R$,C,W)MzX(G$)XX(J)XdR%R%1"DATA FROM ROW#";R%;"=";X(J)S(1)S(1)1S(2)S(2)X(J)S(4)S(4)X(J)X(J)S(3)S(2)S(1)S(5)(S(3)X(J))S(6)S(6)S(5)"DO YOU WANT ONLY THE FIRST EIGHT"L"EQUATIONS CALCULATED?(Y OR N) ";K$[K$""710a"ARE YOU READY TO CALCULATE? (Y OR N) ";P$A$"Y"ī790 810D$(4) D$;N$*P$"N"ī18404B$>D$;"OPEN";F$",L";L%HFROM WHAT ROW? ";R% N% XR%R%1@ b"END AT WHAT ROW? ";SF lS vSSR%1 "WHAT TITLE FOR THIS STATISTICS RUN? ";B$  B$""640 "DO YOU WANT THE STATISTICS AND SORT" "VALUES PRINTED? (Y OR N)";A$ A$""ī670 # ***" < "CALCULATE STATISTICS FROM WHAT COLUMN? ";FB p "**************************************" "* INSERT /PD TEXT FILE DISK IN DRIVE *" "**************************************" & 0L%(WG)1 :C(FW)(W1) D"START LINES IN RANGEINCREMENT TOO LARGEDUPLICATE LINE NUMBERSOUT OF MEMORYPROGRAM ON HOLD, USE "&M" TO RECOVERHOLD FILE IN USELIMITED MEMORY, MAY DESTROY PROGRAM CONTINUE (Y/N)?SYNTAX> 63999LINE TOO LONGINCREMENT = 0Ȫ`樥sthhRL`EȱEi樠 ȱȱ`ijEȱEi椠`H h`:808`ESIFee'Lѥȥ񥰶NO PROGRAM IN MEMORYNO ` Lӆ Ԇ8stijRLghLABCՆ>ֆ?sȥ Ȫ͆0 ҅ >&eee膝 & &ghȱ y y;L ۥghij L L  ͆0 ҅ >&eee膝JJJJ)ŝƝLpƞߥ ,LLL )WHLC L , Ɇ ɀL  , ҅LзLgş堰G L & & & .ee'Lѥȥ񥰶Ls 8tit8sB@tCtABCB>?><>=?>BPݱ>BL@ /@i ipm@8e@@AiA8ϥ_^8LKLKꤸ ML#gA$ (A$)3Ā% (A$)13220Q :4)"RENUMBER IS INSTALLED AND READY" 8:"IF YOU USE 'FP', 'HIMEM', OR 'MAXFILES'" :" YOU WILL HAVE TO RE-RUN RENUMBER" ' DO NOT CHANGE 10010 '(121)(122)256316yi<>zi=i?