' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` L 鷎귭෍ᷩ췩緈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,&"LɺɺLƩ  !"#$%&'()*+,-./0123456789:;<=>?@L@距i@췩뷩A񷩷 0L i@LπҠӠˠĠ٠ŠҧӠŠŢ80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 ˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n ``ff 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 ~(`F  d ֠z#??? ӮʠӠΠu`1):"1":,X(34),Y(6):"1"e,X(3),Y(12):"Add the quotient to":"the next column:":"E + 2 + 1 =":ANSWER$(1)"17":FDBCK$(1)"Yes! On to the next step now.":FDBCK$(NMTCH)"Sorry. Try again.":FDBCK$(NMTCH1)"Sorry. Try 17."eAXPSX(14):AYPSN*CONTROL-SYSTEM-INIT /%ND$"BLOAD CHRPRNT1"G*N823,3:824,16:819d4N16302,0:232,0:233,17y>NFILE$LS$:13500$:13500m$:1350094N16302,0:232,0:233,17>NFILE$LS$:13500:3):D$M$(4):EX$(27)5dKCLR%816:SWD%825:HP%826O,LLS$"INDEX.NUM.SYS.1"i6LD$"BLOAD ALL-BINARY" N*CONTROL-SYSTEM-INIT %ND$"BLOAD CHRPRNT1"*N823,3:824,16:8194N16302,0:232,0:233,17>NFILE$LS$:1350000 3500ARY" L-BINARY":D$"BLOAD ALTS.FONT,A$4000":>NFILE$LS$:13500LS$:135000L16302,0:232,0:233,17>NFILE$LS$:1350011000:135006120006103,1:104,64:18J*INITIALIZATION VJZ94097:YE1:NO0:BOYE:A$"":A1$A2$:G$(7):M$(1"BLOAD ALTS.FONT,A$4000"->NFILE$LS$:13500>NFILE$LS$:13500,A$4000"d>NFILE$LS$:13500I"BLOAD ALL-BINARY":D$"BLOAD ALTS.FONT,A$4000">NFILE$LS$:13500Y":D$"BLOAD ALTS.FONT,A$4000">NFILE$LS$:135000I.3.MR%*ND$"BLOAD AL":NXNO:1000:13500 61200066103,1:104,72:1<8JVJZ9815:YE1:NO0:BOYE:A$"":A1$A2$:G$(7):M$(13):D$M$(4):EX$(27)dKCLR%809:SWD%803:HP%812,LLS$"INDEX.ELEC.MATH.3" N*CONTROL-ELEC.MATH.3.MR*ND$"BLOAD ALL-BINARY":D$ @@@ @ H$ "H"A"@ >A>`0> ē@c2iO  %GA G$<@c@pPDaPH @pERG$G$qdG$@$Oy‡@ H$H$ HRQH$< @pC>q E@>y8#q>A #q8@A@@@  J'H#y@ qH$8>#>#@q"'@p80" @ "J%"I%H$q#Hȣ<y>@ "H$q":AHOV]dkry @  &A@@@AQ!‡@@ ALeq_ ")07>ELSZahov} %,3P0HH-#$-  $#-hh`( &H(h`H#) c)h Hh` J ɠɍɘɈɕ ɛɃک./ ?.`L ` ` )!) !` `LLLR LX  m!8!` )` J 0 ?`$H$ h$`% $(&)m,'`,#P $&! `'i'`"% %%#LX  0 >H h`,# 릡`67 `6789 `    L`` -` ! "!  "蘝`     ` ) 8  8m$ imi8 %8mߠ:)p):=pLȘe::HH`UNHOOREHOOCLRWINWRITREWRITEXADDRESEBOXIHSPACVSPACCHARMODLMARGIPAGEPAGENMCOBEE$KQW^ ,69N<q{ {):YPSY(13):17000:,AXPS,AYPS:REWRITE:" 15265":1000:I*PAGE-17T16000,X(17),Y(7):" AB":" FC":" 19":"+ 30":" 1%%%0":QUESTIN5:LNGTH3:ANSWER$(1)"1F0":ANSWER$(2)"1E0"NFDBCK$(1)"Right!":FDBCK$(2)"Sorry. You shouldDBCK$(1)"Yes!":FDBCK$(NMTCH)"Sorry. Try again."FDBCK$(NMTCH1)"Sorry./3 + 2 = 5 /12 + 10 = 22; 22 1#0 16 = 1, R = 6 /1 + 6 + 11 = 18; 18 1#0 16 = 1, R = 2 /1 + 7 + 13 = 21; 21 1#0 16 = 1 , R = 5 ";AXPSX(16):AYPSY(11):XPSX(30 = 20; 20 1#0 16 = 1 , R = 4 "AXPSX(15):AYPSY(11):XPSX(3):YPSY(13):17000:,AXPS,AYPS:REWRITE:" 144F4E":1000:*PAGE-16ˆ16000̈,X(16),Y(7):" 76C3"::"+ DBA2":" 1%%%%0":QUESTIN4:LNGTH5:ANSWER$(1)"15265"2ֈFactice!":::"If you want to review the"::"lesson first, type R."$Du,X(7),Y(12):"To start practicing, press"::"RETURN.";:FROMOTHERYES:1000:RESPNSE$M$RESPNSE$"R"30020:IN6:ANSWER$(2)"1"#qFDBCK$(1)"Yes.":FDBCK$(NMTCH)"Sorry. Try carrying the 1./Try again.":FDBCK$(NMTCH1)"Sorry. You carried 1, so put/a 1 here. Type it in now."#qAXPSX(16):17000#/u#0u*PAGE-11D$:u7000:,X(7),Y(5):"It's time to prlso, you forgot the carry./Try again.""qFDBCK$(NMTCH)"Sorry. Try again.":FDBCK$(NMTCH1)"Sorry. 1 + A + C + 3 = 26./26 1#0 16 = 1, R = 10 = A ./Type in A.""qAXPSX(18):17000:JUDGEIGNRE29999:,X(17),Y(5):REWRITE:"1 ":WRITE#qQUEST4./Try again."n!qAXPSX(20):AYPSY(12):XPSX(6):YPSY(14):17000:JUDGEIGNRE29999:,X(19),Y(5):"1"&"qQUESTIN5:ANSWER$(2)"A":ANSWER$(3)"5":ANSWER$(4)"6":FDBCK$(1)"Correct. Don't forget to carry.":FDBCK$(2)"Sorry. We're adding in hex./A(1)"Yes. Don't forget to carry."!zqFDBCK$(2)"Sorry. You're adding in hex./Try again.":FDBCK$(3)"Sorry. This is/the quotient. Try/again.":FDBCK$(NMTCH)"Sorry. Try again.":FDBCK$(NMTCH1)"Sorry. 3 + 2 + F = 20;/20 1#0 16 = 1, R = 4 . Type in X(6),Y(2):"Add these hexadecimal numbers:":X1%25:Y1%4:X2%254:Y2%20:H1%2:S1%1:D1%2:2000fq,X(17),Y(6):" A 3 16^"::" C 2 16^"::"+ 3 F 16^":" 1%%%%0":" 16^"" pqQUESTIN4:ANSWER$(2)"4":ANSWER$(3)"0":ANSWER$(4)"1":FDBCK$WER$(2)"6":ANSWER$(3)"5":FDBCK$(1)"Right!":FDBCK$(2)"Sorry. You forgot to add the/carry. Try again."mFDBCK$(NMTCH)"Sorry. Try again.":FDBCK$(NMTCH1)"Sorry. 1 + 3 + 2 = 6 . Type/in 6."mAXPSX(18):17000GqHq*PAGE-9aRq7000:,l. Try again.":FDBCK$(NMTCH)"Sorry. Try again.":FDBCK$(NMTCH1)"Sorry. F + C = 27; 27 1#0 16 = 1,/R = 11 = B . Type in B./Try again."mAXPSX(20):AYPSY(10):XPSX(6):YPSY(12):17000:JUDGEIGNRE28999:,X(19),Y(5):"1"jmQUESTIN3:ANSLAGYEST~m,X(17),Y(6):" 3 F 16^"::"+ 2 C 16^":" 1%%%%0":" 16^"mQUESTIN2:LNGTH1:STPYES:LEAVEITNO:ANSWER$(2)"B":ANSWER$(3)"7":FDBCK$(1)"Right! Don't forget to carry."mFDBCK$(2)"Careful! You're adding in hex,/not decimas RETURN."ai::"If you need help while working on"::"one of the problems, type H.":1000:n`m*PAGE-8jm7000:,X(6),Y(2):"Add these hexadecimal numbers:":X1%25:Y1%4:X2%254:Y2%20:H1%2:S1%1:D1%2:2000tmANSWER$(1)"H":FDBCK$(0)"":HFow we put the one in the 256s column.":,X(33),Y(11):"1":1000:Qxi*PAGE-7i7000:,X(5),Y(6):"Now let's add a few hexadecimal"::"numbers, column by column." i:"Type in the hexadecimal sum of"::"each of the columns and then"::"pres7000eFDBCK$(1)"Yes! We put the remainder in the/sixteens column, and carry the/quotient.":FDBCK$(NMTCH)"No. Check work and/try again.":AXPSX(20):17000:,X(34),Y(11):"1"DfREWRITE:,X(33),Y(6):"1 ":WRITE:X1999::,X(2),Y(19):"NY(14):YPSY(16):17000^e,X(3),Y(16):"Divide the sum by 16:":"17 1#0 16 = ,R ="eANSWER$(1)"1":FDBCK$(1)"Correct.":FDBCK$(NMTCH)"No. Try again.":FDBCK$(NMTCH1)"No. The answer is 1./Type it in.":AXPSX(12):AYPSY(17):YPSY(19):1 = 111, R = 7 / 111 1#0 8 = 13, R = 7 / 13 1#0 8 = 1 , R = 5 " dsAYPSY(13):YPSY(16):17000:JUDGEIGNRE29999 ns,AXPS7,AYPS:REWRITE:"1577":WRITE:1000 /u 0u*PAGE-14#!:u7000:,X(8),Y(7):"Are you ready to practic999:,AXPS7,AYPS:REWRITE:"895":WRITE:1000:FN23000:15000HN24000:15000RN25000:15000\N26000:15000fN27000:15000pN28000:15000zN29000:15000"":A1$A2$:G$(7):M$(13):D$M$(4):EX$(27)VJMA8:MF8:AN$(MA):FD$(MF2):FD(MA2,2):NMMF1:DNMF2:J1MA1:FD(J1,1)IG`JZX%YEStJMOD(A)(A2)A2JCLR%809:SWD%803:HP%812JI$(9):QU$(34) JB1$"0":T1$"9":B2$B1$:T2$T1$0,,3,0, |G11! G2,,1,1,,1,1,) G12@ G3,,1,1,,2,0,,3,0,H G13U G1,,1,1,] G14o G2,,1,1,,2,0,w G15 G2,,1,1,,1,1, G16 G2,,1,1,,2,0, 8J1BJZ9815:YE1:NO0:BOYE:JU0:NR1:LS2:QTNR:LENO:CR1:IN0:IG3:G04:RI0:WR0:A$ers to their":"hexadecimal equivalents.":::"To review before practicing,":"type R."$a:"To return to the menu of this":"lesson, press RETURN."::"To leave the lesson now, press"%a,X(5),Y(17):"ESC.";:FROMOTHERYES:NXNO:1000:RESPNSE$MCK$(3):3000# _JUCR24310/#_1000:15100J#_,X(32),Y(2):"112"#(_,X(3),Y(19):"There it is! You just converted":"4228^ to 11216^."#2_1000:#a*PAGE 16#a7000X$a,X(5),Y(5):"It's time to practice converting":"octal numbplace,/so 1 x 2 = ?. Try again.":FDBCK$(3)"Sorry. Since the 1 is in the twos/place, the digit's value is 2./Type it in.""^FDBCK$(NMTCH)FDBCK$(2):FDBCK(J1NMTCH,1)IN"^AXPSX(30):AYPSY(11):XPSX(3):YPSY(19):3000 #_JUCRFDBCK$(NMTCH)FDB1)INractice Set" Z1000:5 methods." Z,X(6),Y(21):" Press RETURN to choose a part.";:FROMOTHERYES:1000:RESPNSE$M$23050ZT0Z"V1000:Y*PAGE.3! Y7000 Y,X(4),Y(2):"This lesson consists of two parts.":"You may complete either part":"first." YRXPS14:RYPS6:15000 Z,X(4),Y(7):"Type a number now for a part:":::" 1. Conversion eview"::" 2. Pexadecimal equivalents.":VSPACE,0= VRXPS14:RYPS10:15000 V,X(5),Y(10):VSPACE,2:"This lesson provides you practice":"with conversions from octal to":"hexadecimal. It will take you":"about 30 minutes to complete":"the lesson.":VSPACE,0 MS, INC."d &R,106,128:"2 ABCDEF ":" HIJKLM ":"OPQRSTUV":"WXYZabcd":" efghij ":" lmnopq 0"p XR1000:| U*PAGE2 U7000" V,X(5),Y(4):VSPACE,2:"Sometimes it is necessary to":"convert numbers from octal":"representation to their":"hC ELECTRONICS"::" ELECTRONIC MATH":" Disk #3":" Conversions from":" Octal to Hexadecimal" RX1%28:Y1%7:X2%254:Y2%75:D1%3:S1%2:H1%1:2000:X1%29:Y1%8:X2%254:Y2%76:H1%2:S1%2:D1%3:2000 R,57,106:"CONVERGENT SYSTE2$:G$(7):M$(13):D$M$(4):EX$(27)A VJMOD(A)(A2)A2_ tJCLR%809:SWD%803:HP%812| NLS$"WELCOME.OCT.TO.HEX" N*CONTROL*WELCOME.OCT.TO.HEX *N21000:22000:13000:FILE$"OCT.TO.HEX.MENU":13500 Rs R7000:,X(7),Y(3):" BASI  612000-6103,1:104,72:16302,0:1H:*ADD.ON.PRESS.RETURN :VSPACE,0:HSPACE,0::,X(RX),Y(RY):"Press RETURN.";:FROMOTHERYES:1000:RE$M$15010:REWRITE:,X(RX),Y(RY):13)" ":WRITE:8J( BJZ9815:YE1:NO0:BOYE:A$"":A1$AWER$(1)"B":ANSWER$(2)"11"|VFDBCK$(1)"Correct.":FDBCK$(NMTCH)"Sorry. You need a hexadecimal/symbol for decimal 11. Try again.":FDBCK$(NMTCH1)"No. The answer is B./Type it in now."(VFDBCK$(2)"That is correct in decimal/representation, but you(13):AYPSY(11):XPSX(2):YPSY(17):3000:QUESTIN0:FE1SCSC.5:22100qMVFENMTCHİ3000:FE22100:22093OVNMTCHNMTCH1:STPNO:LEAVEITYES:3000TV1000:16000^V,X(3),Y(14):"B. 1110^ = 16^"hVQUESTIN2:LNGTH2:STPYESrVANS1. Type/it in now.":FDBCK$(2)"Sorry. Remember that you are dealing/with a number in binary/representation. Try again."@VFDBCK$(3)"Sorry. Your response stands for 7/in octal representation. Try again.":FDBCK$(NMTCH)"Sorry. Try again."KJVAXPSX,X(16),Y(8):"138^ = 16^":3:147,65154,65^V,X(3),Y(11):"A. 138^ = 2^"|"VQUESTIN1:LNGTH4:STPYES,VANSWER$(1)"1011":ANSWER$(2)"103":ANSWER$(3)"111"z6VFDBCK$(1)"You are correct!":FDBCK$(NMTCH1)"Sorry. The answer is 101cessfully":"if your score is at least 6."6:R1000:CU*PAGE18U7000:,X(2),Y(2):"Convert the number below to its":"hexadecimal equivalent. Type your":"response and press RETURN."VX1%3:Y1%4:X2%248:Y2%36:H1%3:S1%1:D1%1:20001V":"convert numbers from octal to":"hexadecimal."&R,X(14),Y(11):"Press RETURN.";:FROMOTHERYES:1000:RESPNSE$M$21030:,X(14),Y(11):REWRITE:13)" ":WRITE*0R,X(4),Y(12):"There are 8 items in this section.":"You will complete it suc0:FE1SCSC.5:23100=2ZFENMTCHİ3000:FE23100:23090O5ZNMTCHNMTCH1e7Z3000:FE123100z8ZFENMTCH23095:ZNMTCHNMTCH1:STPNO:LEAVEITYES:3000`Ȯ  'x 8(i8逅i 8ԥΥд`$ 08 !      Т @ `` @ @ŠĠӠԠōԠΠԮŠӠŠԠƠōˠŠĠԠΠҠӢŠΠӠ΍ŠҠӠ٠άԍӠŠˠΠŠōĠӠΠӍΠàՠĠŠƠźΠŠ۠ӍΠԠ͠čҠŠĠˠĮŠԠӠϠҠҮҠ΍@@   ` X  (! M %8 M ` %! M `HI2$% "h  2`x ɧ͠٬ՠĠŠԍŠΠҠҠōՠΠŠӠŮ  G / XZ]_    L  L``ꩿ 0 XL,L ,L ` HhH#J  h`@hg@        °ùàŹùĠİưĠĠàưčİǍ̷ ʛ˛͛=ɛڕڝڝڝڝǍǍ@峳@˨˨610رٱزٲȱӱ԰ܢŠéΠΠֳ"\_Tҧ̭ @Р̧ĺŹù婍, N \,LLL/Hh( Q՗$`h Y,LL,0`,HHɓ4ɛ0ɐ,Ƀ ɘ )L՗hh`, b:/8`Ԡƌ0c L` 0 H h`hNNɝ``? D ? 0`? H h0ED Lɠj,LH)? h`, 3ɍNɖ HH hh`,0ɍ3 ɛɓ 8I)I h`$8n ,L -,,0ɁϬ,c0 ې II ,Pɛ,0@L,?ɛ&,! ŗ0̗ $L$,0ɕ ڔ`( Q8nN 2ɧ )ɧɝ$Lj ) O,I LE CL$8f< NE$<CC CE?AC8A  L$>I Ԗ8LE? L ? ?L CC ` LH@ɠ$@ ɢE@@EE=h`(,L$(H,0 @))(N CEEɛ@ . L٪ $ .`DH )hhhNCLȎHH$`ʩ L ɠE .CH $h L\ $>N ґ  ԖEH3ɾɪ$@ɢE@@$@0 )ߝh` LcEEC Lؓ N EE ڔ`n ,8`0 őɢɢLԗ8ӗ ԗ )` EHӗȹɿh` h` Eɠ`AɀeE*EEA ʽAIE EA`C  LE `N ɍHh`C$3P톸Eɍ$3p C L ED C` NL$= Бӗ Y ԗ0 : YL E  $L ԖF>JL őɠɰɺ8``ɯɍ`C葌ɮ NC`  CЅ$`CDԗӗ 0N Б +0I ԑ m ӗ [) ԗI]IƍID$3p CL ő(ɬ őɮ ɬ ɢ `ʨ`hh )N E$` L  ɠiɺ>F=E$3pDмER$(1)"1E7" L^FDBCK$(1)"Right!":FDBCK$(NMTCH)"Sorry. Starting at the right, group/the binary digits into groups of 4./Then convert them to hex digits:/01112^ = 716^, 11102^ = E16^, 12^ = 116^//The answer is 1E7. Type it in.":!`^AXPSX(20):AY 1112^//111100111 is the correct answer."w^AXPSX(14):AYPSY(11):XPSX(3):YPSY(17):3000:FE1SCSC.5:24100^STPNO:3000$^1000:16000.^,X(3),Y(14):"B. 1111001112^ = 16^"8^QUESTIN6:LNGTH3:LEAVEITYES:STPYES B^ANSW],X(3),Y(11):"A. 7478^ = 2^"e]QUESTIN5:LNGTH9:LEAVEITYES:STPYES:FD(J1,1)IN]ANSWER$(1)"111100111"*^FDBCK$(1)"Yes!":FDBCK$(NMTCH)"Sorry. Convert each octal digit to/a group of 3 binary digits:/7 = 1112^, 4 = 1002^, 7 =ZFENMTCHİ3000:FE23210:231706ZNMTCHNMTCH1LZ3000:FE123210aZFENMTCH23185ZNMTCHNMTCH1:STPNO:LEAVEITYES:3000Z,X(22),Y(8):"A5":1000:]*PAGE21]16500:,X(15),Y(8):"7478^ = 16^":3:147,65168,65/ember that four binary/positions equal one hexadecimal/position. Try again.":FDBCK$(NMTCH1)"Sorry. Try again.":FDBCK$(NMTCH2)"No. The answer is A5. Try again."xZAXPSX(17):AYPSY(14):XPSX(3):YPSY(17):3000:QUESTIN0:FE1SCSC.5:23210$PYES:ZZANSWER$(1)"A5":ANSWER$(2)"5A":ANSWER$(3)"105"dZFDBCK$(1)"You are correct.":FDBCK$(2)"Your response is in reverse order./Try again.":FDBCK$(3)"Sorry. Decimal 10 is represented/as hexadecimal A. Try again."nZFDBCK$(NMTCH)"Sorry. Reműű \_Tҧ̭ @Р̧ĺŹù°ùàŹùĠİưĠĠàưčİǍ̷ ʛ˛͛=ɛڕڝڝڝڝ԰ܢŠéΠΠֳ"Рŧ˨űű˨ Рŧ) ɛɓ 8I,I)ې婍,+ +N+۝ ,LHH:LVԩHGFh( {ڬGۈG۹ۤ$`h ,LHHݶhܶhLضHuH,0`,,HHɓ4ɛ0ɐ,FɃG ɘGۍG SLڙیFhh`Ԡƌ55ۭ;ٙ5ۭ<ٙ=ې 7) v,/0c CL;<٭` 20 H55۹5ۍ;ٹ=ۍ< 2h`hN4N-ɝ`;٩ۍ<`? k 2 ? 20`+ۍ/ۥ? 2H h0ED LԽɠj,LH)? 2ɧ >)ɧ-ɝ$LC <ڈL  2N3۩ <کEE I LE ֦CL$8f< 7N+E$<CC CE?AC8A 7L.$>I  8LӥE? ע L ֩? } 2 ٦EH,ۥ3ɾɪ$@,ɢE@@$@0 )ߝh` 7L֤EEՠɮ }ڙr` Ԑ ԰r`n2۩ ,3gۙ`Wՠ ɢɢGLӭ8 հ X۝`0 ՐEH۰ȹGɿh`0 Րh` ԰Eɠ`AɀeE*EEA ʽAIE ɺ>F=E$ۍ%۩$3pDмɍH%h`C$3P톸Eɍ$3p C %ۢL#ED צC` ԰N3L$= ԭ Ր2 0 aհ հ1L E Ԑ $L F>%J$ۢL ɠɰɺ8``ɯɍ`rՌ#) ٩ ٩ 2H hߦ$! ٩$`rsۘۍ3ێ 0N3 +0x ԍ3 mH AՌۘ [X AՌ۽I]Iƍ1I0ۭs$3p ڙrۈL (ɬ ɮ ɬ ɢ Ԑ`ʨ`hh SN3 2ѢE$` )L  )ՠ ɠiPɗ*ɘɍL=Ʌ-ɖ5 I 2ѩ$`$3p,ۆE  Lԥ3ɾ` ) k 2L,Hh)hRhذdfۈ ,ѩHHLԶ 2L L@  QѠ67%`N-۠89$`&ۍ'ۮ%۽HH'ۮ&`(&ۺwn(ۮ&,3L ©éĭ$@JL Ll&3jَϹB@/ v,3L 5,(``````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````````I hh,`ӠˠϠŠ̠ŠéԠé̠΍$$8HIL,նh, ,`, ,`, , ,:/8`$ɝ ,L* `HHZ ,̠$ , Hȱh  ȩБ,'ȱ,H  h iЩH, MMТF¶LL           Š ԠŠ ˠŠ ԠŠ ˠŠ ̠ŠŠŠ͠ŠŠ: ŠԠE ĠŠ ŠԠ ˠɯϠ |Aȑȩȑȩȑ |AfLAȩEY ȩ |A |ALAɍ`BH h0`  6uX fG nALA,E,C,D@LA X?25A 2 <=I?߮=<,,<>=?  AO:1000:RESPNSE$EX$RESPNSE$"R"310500;Tyt:"To review any part of the lesson"::"type R.";Jy,X(6),Y(21):"Press ESC to leave.";:FROMOTHERYES:NXNO:1000:RESPNSE$EX$RESPNSE$"R"31050;Ty,X(6),Y(7):"You seem to need more practice"::"with this type of conversion,"::"since your score was "SC%" correct"::"out of 8.":@y::"To review any part of the lesson"::"type R."*;Jy,X(6),Y(21):"Press ESC to leave.";:FROMOTHERYES:NXNanswers"::"out of 8.":::"You have completed this lesson!"9Xu,X(6),Y(17):"Press ESC to leave.";:FROMOTHERYES:NXNO:1000:RESPNSE$EX$300409bu9y*PAGE259"y70009,yCHARMODE,3:COL,5:,X(12),Y(4):"SORRY":CHARMODE,0:COL,3:6yŭFE129300 8`rFENMTCH29270K8jrNMTCHNMTCH1:STPNO:LEAVEITYES:3000n8tr,X(22),Y(6):"362":1000:{80u*PAGE248:u70008DuCHARMODE,3:COL,1:,X(11),Y(6):"FANTASTIC!":CHARMODE,0:COL,3>9Nu,X(6),Y(9):"Your score was "SC%" correct in.":FDBCK$(NMTCH1)"Sorry. Try again.":FDBCK$(NMTCH2)"Sorry. The answer is 362./Type it in now."7BrAXPSX(19):AYPSY(12):XPSX(2):YPSY(17):3000:QUESTIN0:FE1SCSC.5:293007LrFENMTCHİ3000:FE29300:292607QrNMTCHNMTCH1 8Vr3000:S:30006q1000:16000J6r,X(3),Y(12):"B. 11011000102^ = 16"i6rQUESTIN16:LNGTH3:STPYES6$rANSWER$(1)"362":ANSWER$(2)"263"6.rFDBCK$(1)"Correct.":FDBCK$(2)"Your answer is in reverse order./Try again."f78rFDBCK$(NMTCH)"No. Try agaDBCK$(NMTCH1)"Sorry. Try again."y5qAXPSX(13):AYPSY(9):XPSX(2):YPSY(17):3000:QUESTIN0:FE1SCSC.5:291505qFENMTCHİ3000:FE29150:291005qNMTCHNMTCH15q3000:FE1291505qFENMTCH291206qNMTCHNMTCH1:STPNO:LEAVEITYE"!4zqQUESTIN15:LNGTH12:STPYESW4qANSWER$(1)"1101100010":ANSWER$(2)"001101100010"#5qFDBCK$(1)"That's right!":FDBCK$(NMTCH)"No. Please check your answer/carefully and try again.":FDBCK$(NMTCH2)"No. The answer is:/1101100010./Type it in now.":FC.5:2830013dnFENMTCHİ3000:FE28300:28260\3nNMTCHNMTCH1:STPNO:LEAVEITYES:30003n,X(21),Y(6):"149":1000:3Hq*PAGE22D3fq16500:,X(14),Y(6):"15428^ = 16":3:147,49168,494pq,X(3),Y(9):"A. 15428^ = 2FnFDBCK$(1)"You're right.":FDBCK$(2)"Your answer is in reverse order./Try again."2PnFDBCK$(NMTCH)"No. Try again.":FDBCK$(NMTCH1)"Sorry. The answer is 149./Type it in now." 3ZnAXPSX(18):AYPSY(12):XPSX(2):YPSY(17):3000:QUESTIN0:FE1SCS3000:QUESTIN0:FE1SCSC.5:28150K1mFENMTCHİ3000:FE28150:28100v1mNMTCHNMTCH1:STPNO:LEAVEITYES:30001m1000:160001(n,X(3),Y(12):"B. 1010010012^ = 16"12nQUESTIN14:LNGTH3:STPYES1(ZFDBCK(J1NMTCH,1)INu2ZAXPSX(14):AYPSY(11):XPSX(3):YPSY(17):3000NRIGHT5İ26000:11500HN27000:RESPNSE$"R"İ13000:FILE$"OCT.TO.HEX.MENU":13500RN11500RR7000CR,X(3),Y(2):" It's time to practice conver3:AN$(MA):FD$(MF2):FD(MA2,2):NMMF1:DNMF2:J1MA1:FD(J1,1)IGQ`JZX%YESjtJMOD(A)(A2)A2JCLR%809:SWD%803:HP%812JI$(9):QU$(34)JB1$"0":T1$"9":B2$B1$:T2$T1$:PR$".":CM$",":SP$" ":NG$"-"NLS$"WELCOME.OCT.TO.HEX":33,40:34,15:35,24:CLR%9 >32,0:33,40:34,0:35,24? >S PF*QUESTION DATAe ZF 1,1: 1,1,1k 8J BJZ9815:YE1:NO0:BOYE:JU0:NR1:LS2:QTNR:LENO:CR1:IN0:IG3:G04:RI0:WR0:A$"":A1$A2$:G$(7):M$(13):D$M$(4):EX$(27)EVJMA2:MF000 : < INSTRUCTIONS 2 <,X(3),Y(2):"Convert this octal number to hex,":"using the ";I$;"binary";I$;" method. Type your":"answer and press RETURN." PARTIAL ERASE >32,0 5118^ = 2^"70mQUESTIN13:LNGTH9:STPYESR0mANSWER$(1)"101001001"0mFDBCK$(1)"Correct.":FDBCK$(NMTCH)"Sorry. Try again.":FDBCK$(NMTCH1)"No. The answer is:/101001001./Type it in now."%1mAXPSX(12):AYPSY(9):XPSX(2):YPSY(17):):3000:QUESTIN0:FE1SCSC.5:27300M/|jFENMTCHİ3000:FE27300:27260x/jNMTCHNMTCH1:STPNO:LEAVEITYES:3000/j,X(20),Y(6):"F5":1000:/`m*PAGE22C/~m16500:,X(14),Y(6):"5118^ = 16":3:140,49161,490m,X(3),Y(9):"A.is in reverse order./Try again.":FDBCK$(3)"Sorry. In hexadecimal representation,/you use F for 15. Try again.".hjFDBCK$(NMTCH)"No. Try again.":FDBCK$(NMTCH1)"Sorry. The answer is F5./Type it in now."'/rjAXPSX(17):AYPSY(12):XPSX(2):YPSY(17FENMTCH27120:-jNMTCHNMTCH1:STPNO:LEAVEITYES:3000K-j1000:16000{-@j,X(3),Y(12):"B. 111101012^ = 16"-JjQUESTIN12:LNGTH3:STPYES-TjANSWER$(1)"F5":ANSWER$(2)"5F":ANSWER$(3)"155"p.^jFDBCK$(1)"Correct.":FDBCK$(2)"Your answer ne octal position."V,iFDBCK$(NMTCH2)"No. The answer is 11110101./Type it in now.",iAXPSX(12):AYPSY(9):XPSX(2):YPSY(17):3000:QUESTIN0:FE1SCSC.5:27150,iFENMTCHİ3000:FE27150:27100,iNMTCHNMTCH1,i3000:FE127150-iAYPSY(6):XPSX(3):YPSY(15):3000P2ZJUCRFDBCK$(NMTCH)FDBCK$(3):23080aN13000:FILE$"OCT.TO.HEX.MENU":13500WRaR7000R,87,Y(2):"BINARY METHOD":X1%77:Y1%0:X2%189:Y2%24:H1%2:S1%1:D1%2:2000 &R,X(3),Y(5):"The secret behind the binary method":"of conversionMA1:FD(J1,1)IG `JZX%YES6 tJMOD(A)(A2)A2T JCLR%809:SWD%803:HP%812j JI$(9):QU$(34) JB1$"0":T1$"9":B2$B1$:T2$T1$:PR$".":CM$",":SP$" ":NG$"-" NLS$"WELCOME.OCT.TO.HEX" N *CONTROL'OCT.TO.HEX-2*N21000:22000:2300 ZF 1,1: 1,1,1 dFQ#2" nF2,1 xF1,1,,1,1,7 8J BJZ9815:YE1:NO0:BOYE:JU0:NR1:LS2:QTNR:LENO:CR1:IN0:IG3:G04:RI0:WR0:A$"":A1$A2$:G$(7):M$(13):D$M$(4):EX$(27) VJMA2:MF3:AN$(MA):FD$(MF2):FD(MA2,2):NMMF1:DNMF2:J11,1):A1$A1$A$:A$;:" d7BEEP:1 n7NX9000:E : PARTIAL ERASEj :32,0:33,40:34,13:35,24:CLR% :32,0:33,40:34,0:35,24 : : PARTIAL ERASE ;32,0:33,40:34,17:35,24:CLR% ;32,0:33,40:34,0:35,24 ; PF*QUESTION DATA$(RE$,1,L11):9 7(RE$,1,1)" "RE$(RE$,2):14110l (7RE$""RE(RE$):RL(RE$):NXYES::WRITE: 27BEEP:BEEP::14010 <7A1$""A1$(A1$,1,(A1$)1):(8); F7 P7A1$""A2$""A$(A2$,1):14070 Z7(A2$)(A1$)A$(A2$,(A1$)90 6(A1$)IL14180^ 6C1(B1$A$)(A$T1$):C2(B2$A$)(A$T2$):C3(A$PR$)(A$NG$)q 6(C1C2C3)ı 6A1$A1$A$:C9(A2$)(A1$):C9A2$A1$(A2$,(A2$)(A1$)) 7C9A2$A1$ 7A$;: 7RE$A1$:" ":L1(RE$)11:(RE$,1)" "RE 612000-6103,1:104,72:16302,0:1K6*ALTERNATE INPUT ROUTINEX6REWRITE6,IX,IY:IL1)"";:A1$"":A2$"":JD$"":,IX,IY616368,06A$:14040:140306TY(Z9):ILĭNXTY5RE$A$:14120 6TY14100,14130,14140,14160,141+i,X(3),Y(9):"A. 3658^ = 2^"M+iQUESTIN11:LNGTH9:STPYES~+iANSWER$(1)"11110101":ANSWER$(2)"011110101",iFDBCK$(1)"That's correct.":FDBCK$(NMTCH)"Sorry. Try again.":FDBCK$(NMTCH1)"No. Remember that 3 binary/positions equal oBCK$(3)"Sorry. Here's the calculation://317 1#0 16 = 19, R = 13 = "I$"D"I$"/19 1#0 16 = "I$"1"I$", R = "I$"3"I$ZFDBCK$(NMTCH)FDBCK$(2):FDBCK(J1NMTCH,1)INZAXPSX(28):AYPSY(12):XPSX(2):YPSY(17):3000ZJUCRFDBCK$(NMTCH,0:35,24rkZ,X(3),Y(12):"Step 2: 31710^ = 16^":,X(5),Y(14):"Divide the decimal":"number by 16."lZ3:133,97154,97nZQUESTIN1:LNGTH3:LEAVEITYES:STPYESxZANSWER$(1)"13D"ZFDBCK$(1)"Right!":FDBCK$(2)"Sorry. Try again.":FD12 + 5 = 31710^"A(ZFDBCK$(NMTCH)FDBCK$(2):FDBCK(J1NMTCH,1)INw2ZAXPSX(28):AYPSY(6):XPSX(2):YPSY(17):3000N13000:FILE$"OCT.TO.HEX.MENU":13500u R R7000 R,X(14),Y(3):"DECIMAL METHOD" &RX1%84:Y1%8:X2%196:Y2%32:H1%2:S1%1:D1%2:2000Y0R,X(3),Y(6):"Converting an$(MF2):FD(MA2,2):NMMF1:DNMF2:J1MA1:FD(J1,1)IGC `JZX%YES\ tJMOD(A)(A2)A2z JCLR%809:SWD%803:HP%812 JI$(9):QU$(34) JB1$"0":T1$"9":B2$B1$:T2$T1$:PR$".":CM$",":SP$" ":NG$"-" NLS$"WELCOME.OCT.TO.HEX" N *CONTROL1,1):A1$A1$A$:A$;:" d7BEEP:1 n7NX9000:E PF*QUESTION DATAW ZF 1,1: 1,1,1] 8J BJZ9815:YE1:NO0:BOYE:JU0:NR1:LS2:QTNR:LENO:CR1:IN0:IG3:G04:RI0:WR0:A$"":A1$A2$:G$(7):M$(13):D$M$(4):EX$(27)7 VJMA2:MF3:AN$(MA):FD$(RE$,1,L11):9 7(RE$,1,1)" "RE$(RE$,2):14110l (7RE$""RE(RE$):RL(RE$):NXYES::WRITE: 27BEEP:BEEP::14010 <7A1$""A1$(A1$,1,(A1$)1):(8); F7 P7A1$""A2$""A$(A2$,1):14070 Z7(A2$)(A1$)A$(A2$,(A1$)&*fFENMTCHİ3000:FE26300:262608*fNMTCHNMTCH1N*f3000:FE126300c*fFENMTCH26270*fNMTCHNMTCH1:STPNO:LEAVEITYES:3000*f,X(21),Y(6):"1BA":1000:*xi*PAGE22B*i16500:,X(14),Y(6):"3658^ = 16":3:133,49147,49.Try again.":FDBCK$(NMTCH1)"No. Remember that 4 binary/positions equal one hexadecimal/position. Try again.":FDBCK$(NMTCH2)"No. The answer is 1BA./Type it in now."*fAXPSX(18):AYPSY(12):XPSX(2):YPSY(17):3000:QUESTIN0:FE1SCSC.5:26300(lfANSWER$(1)"1BA":ANSWER$(2)"AB1":ANSWER$(3)"11110"(vfFDBCK$(1)"Correct.":FDBCK$(2)"Your answer is in reverse order./Try again.":FDBCK$(3)"Sorry. You are working with a/number in hexadecimal representation./Try again.")fFDBCK$(NMTCH)"Sorry. z # ?   ŠŠ Ůà Ů  خϮԭ ŮԮϮؠ ԮϮخՠԮϮحԮϮحԮϮح5ԮŠ  îȮҠخîȮŮĮؠ ĮحĮحŮخϮԠخϮԭîȮǮԠ Ϡ̭٠ӮԠ ӮԠĮîȮîȮOICE". "I$(CHOICE,0);:BOXIT,0:,X(5),Y(21):80)" ":23090^ xZFILE$I$(CHOICE,1):WRITE: "I$(CHOICE,0)(9):BOXIT,3 dZREWRITE:,X(5),Y(21):"Press RETURN to take this part":"or press the space bar to choose":"another.";:FROMOTHERYES:1000:RESPNSE$" "RESPNSE$M$23140> nZRESPNSE$" "įREWRITE:,X(8),Y(10CHOICE2):RESET:CHO.HEX-2": ZI$(2,0)"Practice Set":I$(2,1)"OCT.TO.HEX-3"i (ZX12:,X(8),Y(10X2):X". "I$(X,0): 2Z,X(33),Y(7):FROMOTHERYES:1000:RESPNSE$"1"RESPNSE$"2"23090 PZCHOICE(RESPNSE$):REWRITE:,X(8),Y(10CHOICE2):RESET:(9)CHOICE".HN13000:13500 Y*CHOICEPAGE Y7000:,X(4),Y(2):VSPACE,2:"This lesson consists of two parts.":"You may complete either part":"first." YVSPACE,0:,X(4),Y(7):"Type a number now for a part:" YI$(1,0)"Conversion Review":I$(1,1)"OCT.T` 612000-6103,1:104,72:16302,0:138JBJZ9815:YE1:NO0:BOYE:A$"":A1$A2$:G$(7):M$(13):D$M$(4):EX$(27)VJMOD(A)(A2)A2tJCLR%809:SWD%803:HP%812NLS$"OCT.TO.HEX.MENU" N *CONTROL'OCT.TO.HEX.MENU*N23000     4 D$(13)(4):3:D$"BRUN HELLO":AIC MATH DISK #3"::p2A$:A$"E"ĺ:D$"BRUN HELLO":<:D$"RUN BOOT.PLE"ANSWER$(1)"010":ANSWER$(2)"10"ZFDBCK$(1)"Yes!":FDBCK$(2)"Sorry. Try again.":FDBCK$(3)"Sorry. The answer is 010./Type it in."ZFDBCK$(NMTCH)FDBCK$(2):FDBCK(J1NMTCH,1)IN(ZAXPSX(14):AYPSY(6):XPSX(3):YPSY(15):30002ZJUCRFDBCK$digits in octal and hex."%rV1000:2Y*PAGE13<Y7000Y,X(3),Y(2):"Try practicing this: 4228^ = 16^.":3:217,17238,17Y,X(3),Y(5):"1. Type in the binary equivalent":" of 2:"ZQUESTIN2:LNGTH3:LEAVEITYES:STPYES  Z05189,118:,X(27),Y(16):"2"s^V161,105164,118:168,105165,118:,X(24),Y(16):"1":,X(22),Y(7):"12B"hVRXPS14:RYPS19:15500:,X(2),Y(19):"The method works because 4 + 2 + 1 = 7":"and 8 + 4 + 2 + 1 = 15. 7 and 15 are":"the highest 0):"5":196,81189,95:203,81210,95:,X(28),Y(13):"101"6V,X(25),Y(10):"4":168,81161,95:175,81182,95:,X(24),Y(13):"100"@VRXPS14:RYPS18:15500JV203,105217,118:238,105224,118:,X(32),Y(16):"B" TV168,105182,118:203,16:15500BV,X(15),Y(7):"4538^ = 16^":3:147,57168,57V,X(2),Y(10):"Octal":::"Binary groups":::"HEX"VRXPS14:RYPS18:15500"V,X(33),Y(10):"3":3:224,81217,95:231,81238,95:,X(32),Y(13):"011"=,V,X(29),Y(1 hexadecimal place.":VSPACE,0*XR1000:7U*PAGE12AU7000V,X(2),Y(1):"This means that when you convert":"from octal to binary and from binary":"to hex, you should think of each":"octal or hex digit as a single digit:" VRXPS14:RYPS00RRXPS14:RYPS12:15500:R,X(7),Y(12):VSPACE,2:"1. The first three binary":" places make one octal":" place.":VSPACE,0DRRXPS14:RYPS17:15500NR,X(7),Y(17):VSPACE,2:"2. The first four binary":" places make one":" :13500R*PAGE 11R7000|R,X(12),Y(3):"CONVERSION REVIEW":X1%70:Y1%8:X2%203:Y2%32:H1%2:S1%1:D1%2:2000&R,X(3),Y(7):VSPACE,1:"Conversion from octal to hexadecimal":"requires that you remember two":"important facts.":VSPACE,(9):QU$(34)QJB1$"0":T1$"9":B2$B1$:T2$T1$:PR$".":CM$",":SP$" ":NG$"-"nNLS$"WELCOME.OCT.TO.HEX" N *CONTROL'OCT.TO.HEX-2*N21000:22000:23000:24000:250004NRESPNSE$"R"200109NRE$EX$11000>N13000:FILE$"OCT.TO.HEX.MENU"LS2:QTNR:LENO:CR1:IN0:IG3:G04:RI0:WR0:A$"":A1$A2$:G$(7):M$(13):D$M$(4):EX$(27) VJMA2:MF3:AN$(MA):FD$(MF2):FD(MA2,2):NMMF1:DNMF2:J1MA1:FD(J1,1)IG `JZX%YES tJMOD(A)(A2)A2 JCLR%809:SWD%803:HP%812 JI$ETURN PARTIALERASE >NMMF1:TR0 >32,0:33,40:34,15:35,24:CLR% >32,0:33,40:34,0:35,24 > t@.PARTIAL y@NMMF1:TR0 ~@34,5:CLR% @34,$(RE$,1,L11):9 7(RE$,1,1)" "RE$(RE$,2):14110l (7RE$""RE(RE$):RL(RE$):NXYES::WRITE: 27BEEP:BEEP::14010 <7A1$""A1$(A1$,1,(A1$)1):(8); F7 P7A1$""A2$""A$(A2$,1):14070 Z7(A2$)(A1$)A$(A2$,(A1$)90 6(A1$)IL14180^ 6C1(B1$A$)(A$T1$):C2(B2$A$)(A$T2$):C3(A$PR$)(A$NG$)q 6(C1C2C3)ı 6A1$A1$A$:C9(A2$)(A1$):C9A2$A1$(A2$,(A2$)(A1$)) 7C9A2$A1$ 7A$;: 7RE$A1$:" ":L1(RE$)11:(RE$,1)" "RE33 612000-6103,1:104,72:16302,0:1K6*ALTERNATE INPUT ROUTINEX6REWRITE6,IX,IY:IL1)"";:A1$"":A2$"":JD$"":,IX,IY616368,06A$:14040:140306TY(Z9):ILĭNXTY5RE$A$:14120 6TY14100,14130,14140,14160,141           !"         H|>p ~>@ `0|>1 $ $@ |>p8?8|> y` `>1|<|vۮLeq1 $ $@ >@ #q0@@ ` 0D( ʦ|>``8|>s8> %,3:AHOV]dkry  P>@@@Tq ‡@@  0@ `0_ ")07>ELSZahov}H$ "H"A"@ >A>`0> ē@c2iO  %GA G$:@c@pPDaPH @pERG$G$qdG$N$Oy‡@ H$H$ HRQH$< @pC>q E@>y8#q>A #q8@p0 qDD$$J'H#y@ qH$8>#>#@q"'@p80" @ "J%"I%H$q#Hȣ<y>@ "H$q":AHOV]dkry @  A@@@AQ!‡@@  "#Leq_ ")07>ELSZahov} %,3     PSY(14):XPSX(3):YPSY(17):3000:FE1SCSC.5:24170K!e^STPNO:3000n!j^,X(22),Y(8):"1E7":1000:{!a*PAGE22!a16500:,X(15),Y(8):"6618^ = 16^":3:147,65168,65!a,X(3),Y(11):"A. 6618^ = 2^""aQUESTIN7:LN 3f @0 @ $3`e ) E a }      % A ] y      ! = Y u     P 0  ?P_ )Ea} %A]y!=Yu9Uq5Qm1Mi-I  GTH9:LEAVEITYES:STPYES4"aANSWER$(1)"110110001""aFDBCK$(1)"Right!":FDBCK$(NMTCH)"Sorry. 6 = 1102^, 6 = 1102^, 1 = 0012^//Therefore, the correct answer is/110110001. Type it in." #bAXPSX(14):AYPSY(11):XPSX(3):YPSY(17):3000:FE1SC$RESPNSE$"R"RE$EX$25030$%a=<103,1:104,72:72256,0::(4)"RUN ELEC.MATH.3.MR":,47000:,63,40:"Please put the diskette"::"marked - "5:(9)24)" ":" BASIC ELECTRONICS ":24)" ":" ELECTRONIC MATH ":" DISK #3 ":25)(9)H5:"in drive 1 and make sure"::"that the drive door is"::"closed.:16384,022UNHOOKk216301,0:32,0:33,40::23:2:"** PREPARING LESSON--PLEASE WAIT. **";2REHOOK:,0,8:44135504D$"BLOAD ID.ELEC.MATH.3,D1"4D$"MAXFILES1"4103,20:104,874D$"RUN "FI$",D1"412000922)255Č641669.SWD%,8:UNHOOK:::32,5:33,35:5:1t."ERROR TYPE = "(222):"LINE NO. = "(218)(219)256 /:::31)(0):" PLEASE REPORT THIS TO YOUR ":" INSTRUCTOR. ":31)::16:1:"PRESS CTRL-RESET TO START OVER."A$"3"11000#11500*j+7000:,X(10),Y(9):"Going to the menu."::"Please wait one moment." +FI$"INDEX.ELEC.MATH.3":13500,*BYE NOW,7000:,X(9),Y(10):"BYE NOW --"::" come back soon!":16368,0:16384,0..(2"3. GO TO THE MENU?"::5)"4. STOP THIS LESSON?"S#:" TYPE 1, 2, 3, OR 4."w#20:23:A$:A$"1"A$"4"9130#16300,0:16297,0:16302,0:16304,0:SWD%,EW:REHOOK:32,0:33,40:34,0:35,24:A$"1"ı#A$"2"İ13000:FI$LS$:13500 #HSPACE,0:(# -#EW(SWD%)2#SWD%,8:UNHOOK:::32,5:33,30:5:1:" YOU ENDED THE LESSON IN THE":"MIDDLE."::" DO YOU WANT TO:"::5)"1. GO BACK TO WHERE":9)"YOU LEFT OFF?"3#:5)"2. START THIS LESSON":9)"FROM THE BEGINNING?"::5)QI1:L1QIQU:FD(0,0),FD(0,2):L21FD(0,0):FD(L2,0),FD(L2,1),FD(L2,2):::QIQU:\pz3(UL0):UX,UY1UX(UL)((775)(804))1,UY1:3:XbHP%,32:SWD%,72:32,0:33,40:34,0:35,24:CLR% l:16302,0:LMARGIN,0:WRITE:VSPACE,0:(778)2563:Y1%(779)Y(1)3:X2%(780)(781)256X(2)3:Y2%(782)(776)3:D1%1:S1%1:H1%(JUCR)41:2000J((LE)JUCR)LWİ1000:X1%X1%1:X2%X2%2:Y1%Y1%1:Y2%Y2%1:CLRWIND,X1%,Y1%,X2%,Y2%TWRITE:QUQIĮ:QI0VQI)3030* ,AX,AY:REWRITE:" ":WRITE:0<FE0ıPRESET:,XP,YP|OU$FD$(FE):LO(OU$)1:OU$""JUG0:L11LO:OC$(OU$,L1,1):OC$"/"ĺOC$;:L1LOĺM$;:OC$(OU$,1):OC$"*"FEFE1:4020OC$;tX1%(777)1FD(0,0):RE$AN$(L1)Ă  L1FD(0,0)JUFD(L1,1):FOYE:FEFD(L1,2(FD(0,2)TR)):QTLSFD(L1,0)DN:FD(L1,2)DN:FD(L1,1)IG b FOFENM(LN0):JUFD(J1,1) l 4000:JUIGTRTR1 (TR1JUIGJUG0)RIRIJU:WRWRJU STP(JUIGJUIN1%:X1%X1%S1%:Y1%Y1%S1%:X2%X2%S1%:Y2%Y2%S1%::< ^ REWRITE:TRTRST:QU05000 Z(0):FONO:,AX,AY:"1?0";:SWD%,684SH:ILLN:IXAXX(3ZX%):IYAY:UXIX:UYIY:ULLN:6000 ALT110,14000:,IX,IY:RE$(IL(RE$))(IL0));:L169)256:IY(770)Y(1)1:IL0:109 FRFRNO:WRITE:n $RE$M$įREWRITE:,X(7),Y(24):27);:WRITE:x 81000~ 6 H1%:X1%(X1%(MOD(X1%)MOD(H1%))):X2%(X2%(MOD(X2%)MOD(H1%))):L11D1%S1%:X1%,Y1%X2%,Y1%X2%,Y2%X1%,Y2%X1%,YA1$(A1$,1,(A1$)1):(8);" F A1$""A2$""A$(A2$,1):80 (A2$)(A1$)A$(A2$,(A1$)1,1):A1$A1$A$:A$;: BEEP: NX9000:  REWRITE FRĹSWD%,72:,X(8),Y(24):"Press RETURN to continue.";" IX(768)(7(A2$)(A1$):C9A2$A1$(A2$,(A2$)(A1$))? dC9A2$A1$J nA$;: xRE$A1$:" ":L1(RE$)11:(RE$,1)" "RE$(RE$,1,L11): }(RE$,1,1)" "RE$(RE$,2):125 RE$""RL(RE$):NXYES::WRITE: BEEP:BEEP::20 A1$"". 12000-X(A)7(A1):Y(A)8A1819000> KREWRITExA1$"":A2$"":,IX,IY:IL1);:,IX,IY#16368,0(A$:50:402TY(Z9):ILĭNXTY5RE$A$:130<TY120,140,150,170,200F(A1$)IL190. PA1$A1$A$:C9     SC.5:25100#bSTPNO:3000/# b1000:16000c#b,X(3),Y(14):"B. 1101100012^ = 16^"# bQUESTIN8:LNGTH3:LEAVEITYES:STPYES#*bANSWER$(1)"1B1"$4bFDBCK$(1)"Yes.":FDBCK$(NMTCH)"Sorry. Starting at the right, group/the binary digits inHOICE2:CHOICE". "I$(CHOICE,0);:BLNGTHBLNGTH:15000:20:1:99)" ":24100ft^FILE$I$(CHOICE,1)::~*bRESPNSE$" "įREWRITE:,X(6),Y(7CHOICE3):RESET:CHOICE6". "I$(CHOICE,0);:BOXIT,0:,X(3),Y(21):99)" ":250704bFILE$I$(CHOICE,1):HOICE,1):ES:NXNO:1000:RESPNSE$EXIT$RESPNSE$" "RESPNSE$M$24140Mj^RESPNSE$" "Ģ6C7CHOICE3):RESET:(9)CHOICE6". "I$(CHOICE,0)(9);BbBOXIT,3 bREWRITE:,X(6),Y(21):"Press RETURN to take this lesson":"or press the space bar to choose":"another.";:FROMOTHERYES:NXNO:1000:RESPNSE$EXIT$RESPNSE$" "RESPNSE$M$25120E:,X(6),Y(21):"Press ESC to stop, or H for":"help with special keys.";:FROMOTHERYES:NXNO:1000:RESPNSE$EXIT$RESPNSE$"H"(RESPNSE$"7"RESPNSE$"9")25070:REWRITEaRESPNSE$EXIT$ıbRESPNSE$"H"ı5 bCHOICE(RESPNSE$)6:,X(6),Y( ":I$(2,1)"WELCOME.HEX.TO.OCT"aI$(3,0)"Conversions from Octal to Hexadecimal ":I$(3,1)"WELCOME.OCT.TO.HEX"a,35,48:"Press the number of the lesson":"you want to study:"aX13:,X(6),Y(7X3):X6". "I$(X,0):aREWRITng the":9)"X key to erase the answer":9)"that you typed in.":1000:Za*CHOICE'PAGEa7000:CHARMODE,3:,115,16:"MENU":CHARMODE,0aI$(1,0)"Hexadecimal Addition":I$(1,1)"WELCOME.ADD.HEX"#aI$(2,0)"Hexadecimal to Octal Conversions 9)"to the next display."::" 1<-0 Press this key to go back":9)"over a letter that you":9)"typed by mistake."H]:" ESC If you want to stop at":9)"any time, press this key."::" CTRL-X Hold down the key marked":9)"CTRL while pressi.";:FROMOTHERYES:1000:RESPNSE$" "RESPNSE$M$23020? YN ]*KEY HELP ]7000:,X(4),Y(2):"To help you practice, you will be":"able to use the following keys on":"the computer's 1keyboard0:"y]::" RETURN Press this key to go on":oration, Chicago, ILL."# hV1000:2 Y*ASK HELP Y7000:,35,41:"Some special keys will help"::"you to go through this lesson."::"If you want to see which they"::"are, press the SPACE bar now."9 Y,X(6),Y(14)::"To continue, press RETURN other"5 ,V"electronic devices nor copied, recast,"a 6V"transformed, adapted nor utilized in" @V"any information or retrieval system" JV"in whole or in part without the written" TV"permission of Encyclopaedia Britannica" ^V"Educational CorpR*TITLE-PAGE-PAUSEC lR16368,0:X1500:X1(16384)128:X1ĂS R16368,0:f U*WARNING PAGE UBONO:7000:BOYES:32,0:33,40 V,X(1),Y(7):"WARNING:" V:"ALL RIGHTS RESERVED. This work may not" "V"be transmitted by television orX.ELEC.MATH.3 *N(6909)85(6910)170(6911)85İ21000:5120:6909,85:6910,170:6911,85:ADDR,1,64256:ADDR,2,17441:16302,0:22000:23000:RESPNSE$" "24000 4N25000:RESPNSE$EXIT$ī11500 HNRESPNSE$"H"İ24000:20020 \N13000:13500 612000-6103,1:104,72:16302,0:1B8J*INITIALIZATIONVJZ9815:YE1:NO0:BOYE:A$"":A1$A2$:G$(7):M$(13):D$M$(4):EX$(27)JMOD(A)(A2)A2:I$(5,1)dKCLR%809:SWD%803:HP%812,LLS$"INDEX.ELEC.MATH.1" N*CONTROL-INDE     to groups of 4./Then convert them to hex digits:/00012^ = 116^, 10112^ = B16^, 12^ = 116^//The answer is 1B1. Type it in."$HbAXPSX(20):AYPSY(14):XPSX(3):YPSY(17):3000:FE1SCSC.5:25170$MbSTPNO:3000%Rb,X(22),Y(8):"1B1":1000M$24140V^RESPNSE$" "įREWRITE:,X(3),Y(6CHOICE2)CHOICE3:RESET:CHOICE". "I$(CHOICE,0);:BOXIT,0:,X(5),Y(21):99)" ":24090`^FILE$I$(CHOICE,1):A(CHOICE,0);:BOXIT,0:,X(5),Y(21):99)" ":24090`^FILE$I$(CHOICE,1):E(RESPNSE$):,X(3),Y(6CHOICE2)CHOICE3:RESET:(9)CHOICE". "I$(CHOICE,0)(9);cB^BOXIT,3 L^REWRITE:,X(5),Y(21):"Press RETURN to take this part":"or press the space bar to choose":"another.";:FROMOTHERYES:1000:RESPNSE$" "RESPNSE$)"Review of hexadecimal addition":I$(1,1)"ADD.HEX-1.1"i]I$(2,0)"Practice set":I$(2,1)"ADD.HEX-2.1"^X12:,X(3),Y(6X2)X3:X". "I$(X,0):^REWRITE:,X(37),Y(5):FROMOTHERYES:1000:RESPNSE$"1"RESPNSE$"2"24080:REWRITEV8^CHOICgin with either part,"::"but to complete the lesson you need"::"to do the practice set. The whole"::"lesson takes about 30 minutes to"::"complete.":1000: ]*CHOICE'PAGE ]7000:,X(3),Y(5):"Choose the part you want to study:"8]I$(1,0ESPNSE$M$22030: Y*PAGE-3 Y7000:,X(4),Y(3):" The lesson is divided into two"::"parts. The first part is a review"::"of hexadecimal addition, while the"::"second part is a practice set." Y1000:,X(4),Y(12) Y" You may beeview your knowledge of addition"::"of numbers in hexadecimal"::"representation. It will also provide" V:"you with some practice in adding"::"hexadecimal numbers." V,X(2),Y(18):" Press RETURN to find out more.";:FROMOTHERYES:1000:R76:D1%3:S1%2:H1%2:2000E R,57,106:"CONVERGENT SYSTEMS, INC." &R,106,128:"2 ABCDEF ":" HIJKLM ":"OPQRSTUV":"WXYZabcd":" efghij ":" lmnopq 0" XR1000: U*PAGE-2k U7000:,X(2),Y(5):" Hello! This lesson will help you"::"r000:23000:24000# HN13000:13500) R R7000:,X(7),Y(3):" BASIC ELECTRONICS"::" ELECTRONIC MATH":" Disk #3"::" Hexadecimal Addition" RX1%28:Y1%7:X2%254:Y2%75:D1%3:S1%2:H1%1:2000 RX1%29:Y1%8:X2%254:Y2% 612000-6103,1:104,72:16302,0:138JBJZ9815:YE1:NO0:BOYE:A$"":A1$A2$:G$(7):M$(13):D$M$(4):EX$(27)VJMOD(A)(A2)A2tJCLR%809:SWD%803:HP%812NLS$"WELCOME.ADD.HEX" N*CONTROL'WELCOME.ADD.HEX *N21000:22     y again.":FDBCK$(NMTCH1)"No. The answer is 1./Type it in.":AXPSX(12):AYPSY(10):YPSY(12):17000eFDBCK$(1)"Yes! We'll enter the/remainder under the/units column.":FDBCK$(NMTCH)"No. Check work and try again.":AXPSX(20):17000:,X(35),Y(1FDBCK$(NMTCH)"Sorry. Check your/addition.":FDBCK$(NMTCH1)"Try 17."|eAXPSX(22):AYPSY(7):XPSX(3):YPSY(9):17000e,X(3),Y(9):"Divide the sum by 16:":"17 1#0 16 = ,R ="geANSWER$(1)"1":FDBCK$(1)"Correct.":FDBCK$(NMTCH)"No. Trry this one yourself. Type your":"answer and press RETURN.":::"Add units column:"e,X(32),Y(7):" EE16^"::"+ 2316^":" 1%%%0":" 16"FeQUESTIN1:LNGTH2:STPYES:LEAVEITNO:ANSWER$(1)"17":FDBCK$(1)"Right! Now for the next/step.": Then repeat the":"first step until you're":"done.":,X(34),Y(19):" 1":" 4":"+3":"1%%0":RY24:15000b,X(34),Y(22)4:" 8":15000 bREWRITE:X16:,X(19),Y(7)4:" 8 ";::WRITEb1000:e*PAGE-6Ve7000:,X(3),Y(3):"T#0 16 ="::" R ="MaRY20:15000:,X(39),Y(13)4:"1"::"1":15000aREWRITE:X15:,X(20),Y(7)4:" 1 ";::WRITEaREWRITE:X16:,X(19),Y(3):" 1 ";::WRITEa15000oa,X(2),Y(19):"Add the carry to the next":"column. :,X(34),Y(9):" 7":"+A":"1%%0":RXPS14:RYPS14:15000:,X(34),Y(11)4:"17":15000a,X(2),Y(13):"Divide the sum by 16.":"The remainder is the sum":"of the column. Carry":"the quotient to the next":"place.":,X(29),Y(13)4:"17 100a*PAGE-5a7000:,X(2),Y(2):"Follow these steps in hex addition:":,X(17),Y(4):" 4716":"+ 3A16^":" 1%%%0":" 16":RX14:RY10:15000]a,X(2),Y(9):"Add the units column.":"If the sum is 15 or less,":"skip the next step."CM$",":SP$" ":NG$"-":HFLAGNO:NLS$"WELCOME.ADD.HEX"T N*CONTROL-ADD.HEX-1.1m*N25000:26000:27000+N28000:JUDGEIGNREİ25000:20011,N29000:JUDGEIGNREİ25000:20012/N300004NRESPNSE$"R"20010>N13000:FILE$"ADD.HEX-2.1":135(27)WVJMA4:MF6:AN$(MA):FD$(MF2):FD(MA2,2):NMMF1:DNMF2:J1MA1:FD(J1,1)IGb`JZX%YEtjJCHOICE$(3,1)tJMO(A)(A2)A2JCL%809:SW%803:HP%812JI$(9):QU$(34):ARROW$"1------>0" JB1$"0":T1$"9":B2$"A":T2$"F":PR$".":,0, FQ#4 F4,- F0,3,,1,1,,2,0,,3,0,6 FQ#5> F4,W F0,3,,1,1,,2,0,,3,0,` FQ#6h F2,w G0,3,,1,1,} 8JBJZ9815:YE1:NO0:BOYE:JU0:NR1:LS2:QTNR:LENO:CR1:IN0:IG3:G04:RI0:WR0:A$"":A1$A2$:G$(7):M$(13):D$M$(4):EX$TRIES0:STPYES:ALTYES:FDBCK(J1NMTCH,1)INCRRECTz |B3000:QUESTIN0:JUDGEINCRRECTFDBCK$(NMTCH)FDBCK$(NMTCH1):17020 B PF*QUESTION'DATA ZFQ#1 dF3, nF1,1,,2,0,,2,0, xFQ#2 F3, F0,3,,1,1,,2,0, FQ#3 F3, F0,3,,1,1,,2 Z7(A2$)(A1$)A$(A2$,(A1$)1,1):A1$A1$A$:A$;:D d7BEEP:S n7NX9000:b :*P-RETURN :VSPACE,0:HSPACE,0:,X(RX),Y(RY):"Press RETURN.";:FRYE:1000:RE$M$15010:REWRITE:,X(RX),Y(RY):12)" ";:WRITE: hB*SPECIAL'THINGIE1 rBL1(RE$)11:(RE$,1)" "RE$(RE$,1,L11):X 7(RE$,1,1)" "RE$(RE$,2):14110 (7RE$""RE1.97635E26:RL(RE$):NXYE::WRITE: 27BEEP:BEEP::14010 <7A1$""A1$(A1$,1,(A1$)1):(8); F7 P7A1$""A2$""A$(A2$,1):14071890 6(A1$)IL14180^ 6C1(B1$A$)(A$T1$):C2(B2$A$)(A$T2$):C3(A$PR$)(A$NG$)} 6(HFLAGA$"H")RE$A$:: 6(C1C2C3)ı 6A1$A1$A$:C9(A2$)(A1$):C9A2$A1$(A2$,(A2$)(A1$)) 7C9A2$A1$ 7A$;:0 7RE$A1$:" ": 612000-6103,1:104,72:16302,0:1K6*ALTERNATE'INPUT'ROUTINEX6REWRITE6,IX,IY:IL1)"";:A1$"":A2$"":JD$"":,IX,IY616368,06A$:14040:140306TY(Z9):ILĭNXTY5RE$A$:14120 6TY14100,14130,14140,14160,141          )"144F4E"FFDBCK$(1)"Correct!":FDBCK$(NMTCH)"Sorry. Try again."#FDBCK$(NMTCH1)"Sorry./15 + 15 = 30; 30 1#0 16 = 1, R = 14 = E /1 + 12 + 7 = 20; 20 1#0 16 = 1, R = 4 /1 + 11 + 3 = 15 = F /8 + 12 = 20; 20 1#0 16 = 1, R= 4 /1 + 9 + 1= 19; 19 1#0 16 = 1,/R= 3 /1 + 13 = 14 = E "AXPSX(16):AYPSY(11):XPSX(3):YPSY(13):17000:,AXPS,AYPS:REWRITE:" E366":1000:Є*PAGE-15ڄ16000 䄯,X(15),Y(7):" 98BCF"::"+ AC37F":" 1%%%%%0":QUESTIN3:LNGTH6:ANSWER$(1-1416000j,X(16),Y(7):" D43F"::"+ F27":" 1%%%%0":QUESTIN2:LNGTH5:ANSWER$(1)"E366"FDBCK$(1)"Right!":FDBCK$(NMTCH)"Sorry. Try again."0FDBCK$(NMTCH1)"Sorry./15 + 7 = 22; 22 1#0 16 = 1,/R = 6 /1 + 3 + 2 = 6 /4 + 15 y. Try again."(}FDBCK$(NMTCH1)"Sorry./F + C = 27; 27 1#0 16 = 1, R = 11 = B /1 + B + 8 = 20; 20 1#0 16 = 1, R = 4 /1 + A + 4 = 15 = F "2}AXPSX(17):AYPSY(11):XPSX(3):YPSY(13):17000:,AXPS,AYPS:REWRITE:" F4B":1000:耲*PAGE2:2000},X(17),Y(7):" ABF"::"+ 48C":" 1%%%0":QUESTIN1:LNGTH4:STPYES:LEAVEITYES:ANSWER$(1)"F4B":ANSWER$(2)"1617":ANSWER$(3)"0F4B"}FDBCK$(1)"Right!":FDBCK$(2)"Sorry. You're not using hex/symbols. Try again.":FDBCK$(NMTCH)"Sorr section."c6y,X(6),Y(21):"Press RETURN to begin.";:FROMOTHERYES:1000:RESPNSE$M$31030:q}*PAGE-13 }7000:,X(4),Y(2):"Add these hexadecimal numbers, type":"your answer, and press RETURN.":X1%11:Y1%4:X2%268:Y2%28:H1%2:S1%1:D1%0y*PAGE-12"y7000:,X(6),Y(5):"This practice set contains six"::"questions. In order to complete"::"the lesson successfully, you"::"need to answer four of them"::"correctly." ,y::"H for additional help is"::"not available in the9":B2$"A":T2$"F":PR$".":CM$",":SP$" ":NG$"-":HFLAGNOUNLS$"WELCOME.ADD.HEX"o N*CONTROL'ADD.HEX-2.1*N31000:32000:33000:34000:35000:36000:370004N(RIGHT4)138000,39000>NRESPNSE$EXIT$11000HN13000:FILE$"ADD.HEX-2.1":13507):M$(13):D$M$(4):EX$(27)rVJMA4:MF6:AN$(MA):FD$(MF2):FD(MA2,2):NMMF1:DNMF2:J1MA1:FD(J1,1)IG}`JZX%YEjJCHOICE$(3,1)tJMO(A)(A2)A2JCL%809:SW%803:HP%812JI$(9):QU$(34):ARROW$"1------>0";JB1$"0":T1$",,1,1, xFQ#2 F1,! F1,1,* FQ#32 F1,< F1,1,E FQ#4M F1,W F1,1,` FQ#5h F2,w F1,1,,2,0, FQ#6 F1, G1,1, 8J BJZ9815:YE1:NO0:BOYE:JU0:NR1:LS2:QTNR:LENO:CR1:IN0:IG3:G04:RI0:WR0:A$"":A1$A2$:G$(32,0:33,40:34,4:35,24:CLR%+ >34,0:A hB*SPECIAL'THINGIE rBTRIES0:STPYES:ALTYES:FDBCK(J1NMTCH,1)INCRRECT:LWRNGNO |B3000:JUDGECRRECTFDBCK$(NMTCH)FDBCK$(NMTCH1):LWRNGYES:3000 B PF*QUESTION'DATA ZFQ#1 dF3, nF1,1,,2,0: Z7(A2$)(A1$)A$(A2$,(A1$)1,1):A1$A1$A$:A$;:F d7BEEP:U n7NX9000:d :*P-RETURN :VSPACE,0:HSPACE,0:,X(RX),Y(RY):"Press RETURN.";:FRYE:1000:RE$M$15010:REWRITE:,X(RX),Y(RY):12)" ";:WRITE: >*PARTIAL'ERASE >L1(RE$)11:(RE$,1)" "RE$(RE$,1,L11):X 7(RE$,1,1)" "RE$(RE$,2):14110 (7RE$""RE1.000001E29:RL(RE$):NXYE::WRITE: 27BEEP:BEEP::14010 <7A1$""A1$(A1$,1,(A1$)1):(8); F7 P7A1$""A2$""A$(A2$,1):1407190 6(A1$)IL14180^ 6C1(B1$A$)(A$T1$):C2(B2$A$)(A$T2$):C3(A$PR$)(A$NG$)} 6(HFLAGA$"H")RE$A$:: 6(C1C2C3)ı 6A1$A1$A$:C9(A2$)(A1$):C9A2$A1$(A2$,(A2$)(A1$)) 7C9A2$A1$ 7A$;:0 7RE$A1$:" ":* 612000-6103,1:104,72:16302,0:1K6*ALTERNATE'INPUT'ROUTINEX6REWRITE6,IX,IY:IL1)"";:A1$"":A2$"":JD$"":,IX,IY616368,06A$:14040:140306TY(Z9):ILĭNXTY5RE$A$:14120 6TY14100,14130,14140,14160,141         :FD(J1,1)IG:%e*PAGE22A]%e16500:,X(14),Y(6):"6728^ = 16^":3:140,49161,49%e,X(3),Y(9):"A. 6728^ = 2^"%eQUESTIN9:LNGTH9:STPYES%eANSWER$(1)"110111010"Q&eFDBCK$(1)"You are right.":FDBCK$(NMTCH)"Sorry. Hav.";:FROMOTHERYES:1000:RESPNSE$M$22030:$:" Press RETURN to start.";:FROMOTHERYES:1000:RESPNSE$M$22030:" VVSPACE,0:,X(3),Y(22):" Press RETURN to start.";:FROMOTHERYES:1000:RESPNSE$M$22030:gives you a"::"chance to practice converting numbers"::"in hexadecimal representation to"::"their octal equivalents." V,X(3),Y(14):" It will take you about 40 minutes"::"to complete the lesson."- V,X(6),Y(20):"Press RETURN to start1%13:Y1%8:X2%265:Y2%76:H1%2:S1%2:D1%3:2000\ R,57,106:"CONVERGENT SYSTEMS, INC." &R,106,128:"2 ABCDEF ":" HIJKLM ":"OPQRSTUV":"WXYZabcd":" efghij ":" lmnopq 0" XR1000: U*PAGE-2{ U7000:,X(3),Y(4):" Hi! This lesson 00:220000 HN13000:FILE$"HEX.TO.OCT-1":135006 R R7000:,X(5),Y(3):" BASIC ELECTRONICS"::" ELECTRONIC MATH":" Disk #3"::"Hexadecimal to Octal Conversions"2 RX1%12:Y1%7:X2%265:Y2%75:D1%3:S1%2:H1%1:2000:X/ 612000-6103,1:104,72:16302,0:138JBJZ9815:YE1:NO0:BOYE:A$"":A1$A2$:G$(7):M$(13):D$M$(4):EX$(27)VJMOD(A)(A2)A2tJCLR%809:SWD%803:HP%812NLS$"WELCOME.HEX.TO.OCT" N*CONTROL-WELCOME.HEX.TO.OCT *N210    1%%%%0":,X(24),Y(12)1:"8)121":" 8":" 1%%0^":" 41":" 40":" 1%%0^"e" 1":,X(28),Y(22):RESET:" 1 ";:BOXIT,3:" ":,X(29),Y(8):"1":RY24:15000e,X(15),Y(11):" 1":" 1%%%0":,X(15),Y(12)1:"8)15":" " 121":" 1%%%%0":,X(34),Y(12)1:"8)969":" 8":" 1%0^":" 16":" 16":" 1%%0^"e" 9":" 8":" 1%0^":" 1":,X(38),Y(22):RESET:" 1 ";:BOXIT,3:" ":,X(30),Y(8):"1":RY24:15000Ze,X(24),Y(11):" 15":" ,X(3),Y(2):" Once you have converted the hex"::"number to decimal, the second step"e:"is to convert the decimal number to"::"octal: 3C916^ = 96910^ = 8^.":" 1%%%%0":RX14:RY10:15000ae,X(34),Y(11): x 9 = 9":" 1%%%0":RXPS14:RYPS16:15000:,X(2),Y(16):"* Add the":" products: 96910":RXPS14:RYPS19:15000a,X(5),Y(20):"The sum of the products is what":"you will then convert to octal.":1000:e*PAGE-7[e7000:rocess you":" follow to check the accuracy of a":" conversion!)"aRXPS14:RYPS8:15000:,X(2),Y(9):"* Multiply each place-value":" by its digit:":X1999::,X(7),Y(12):"256 x 3 = 768":X1999:a" 16 x C = 192":X1999::" 1t's follow the steps"::"to convert 3C916^ from"::"hex representation to its"t]:"octal equivalent.":1000:a *PAGE-6Fa7000:,X(2),Y(2):"1. Convert the hexadecimal number to":" a decimal number. (This step":" involves the same poctal:":::" 1. Convert the hexadecimal"::" number to a decimal number.":RX14:RY12:15000Y,X(4),Y(14):" 2. Convert the decimal number"::" to an octal number."Y1000:]*PAGE-4Q]7000:,X(9),Y(7):"Le:JUDGEIGNREİ25000:20040QRN29500:JUDGEIGNREİ26000:FLINYES:29000:20050\\N30000tfNRESPNSE$"R"20010pN13000:FILE$"HEX.TO.OCT-2":13500Y*PAGE-3lY7000:,X(4),Y(3):" There are two major steps in"::"converting from hex to JB1$"0":T1$"9":B2$"0":T2$"9":PR$".":CM$",":SP$" ":NG$"-":HFLAGNOfNLS$"WELCOME.HEX.TO.OCT" N*CONTROL-HEX.TO.OCT-1*N23000:24000:25000:260004N27000:JUDGEIGNREİ25000:20020>N28000:JUDGEIGNREİ26000:20030HNFLINNO:29000U0:NR1:LS2:QTNR:LENO:CR1:IN0:IG3:G04:RI0:WR0:A$"":A1$A2$:G$(7):M$(13):D$M$(4):EX$(27) VJMA4:MF6:AN$(MA):FD$(MF2):FD(MA2,2):NMMF1:DNMF2:J1MA1:FD(J1,1)IG `JZX%YE tJMO(A)(A2)A2 JCL%809:SW%803:HP%812IS0:STPYES:HFLAGYES:FDBCK(J1NMTCH,1)INCRRECT:LWRNGNO:FDBCK$(NMTCH)"Sorry. Try again." |B3000:JUDGEINCRRECTLWRNGYES:FDBCK$(NMTCH)FDBCK$(NMTCH1):3000 B PF*QUESTION'DATA ZFQ#1 dF2, nF0,3,,1,1, 8Jk BJZ9815:YE1:NO0:BOYE:J(A2$)(A1$)A$(A2$,(A1$)1,1):A1$A1$A$:A$;:@ d7BEEP:O n7NX9000:^ :*P-RETURN :VSPACE,0:HSPACE,0:,X(RX),Y(RY):"Press RETURN.";:FRYE:1000:RE$M$15010:REWRITE:,X(RX),Y(RY):12)" ";:WRITE: hB*SPECIAL'THINGIE[ rBTRIEL1(RE$)11:(RE$,1)" "RE$(RE$,1,L11):X 7(RE$,1,1)" "RE$(RE$,2):14110 (7RE$""RE(RE$):RL(RE$):NXYE::WRITE: 27BEEP:BEEP::14010 <7A1$""A1$(A1$,1,(A1$)1):(8); F7 P7A1$""A2$""A$(A2$,1):140714 Z790 6(A1$)IL14180^ 6C1(B1$A$)(A$T1$):C2(B2$A$)(A$T2$):C3(A$PR$)(A$NG$)} 6(HFLAGA$"H")RE$A$:: 6(C1C2C3)ı 6A1$A1$A$:C9(A2$)(A1$):C9A2$A1$(A2$,(A2$)(A1$)) 7C9A2$A1$ 7A$;:0 7RE$A1$:" ": 612000-6103,1:104,72:16302,0:1K6*ALTERNATE'INPUT'ROUTINEX6REWRITE6,IX,IY:IL1)"";:A1$"":A2$"":JD$"":,IX,IY616368,06A$:14040:140306TY(Z9):ILĭNXTY5RE$A$:14120 6TY14100,14130,14140,14160,141       256 x 2 = 512/ 16 x 0 = 0/ 1 x D = 13/ 1%%%%0/ 462110*"FDBCK$(NMTCH1)"// 2. 4621 1#0 8 = 577, R = 5 / 577 1#0 8 = 72, R = 1 / 72 1#0 8 = 9, R = 0 / 9 1#0 8 = 7,AYPS:REWRITE:ANSWER$(1):WRITE:1000:8Є*PAGE-18Cڄ16000䄯,X(13),Y(8):"120D16^ = 8^":QUESTIN1:LNGTH5:LEAVEITYES:ANSWER$(1)"11015":FDBCK$(1)"Right!"lFDBCK$(NMTCH2)"Sorry. Here's the solution:/ 1. 4096 x 1 = 4096/ 1 x 2 = 2/ 1%%%%0/ 323410*" FDBCK$(NMTCH1)"// 2. 3234 1#0 8 = 404, R = 2 / 404 1#0 8 = 50, R = 4 / 50 1#0 8 = 6 , R = 2 "*AXPSX(21):AYPSY(8):XPSX(3):YPSY(11):17000:,AXPSWRITE:ANSWER$(1):WRITE:1000:.耲*PAGE-17916000,X(14),Y(8):"CA216^ = 8^":QUESTIN1:LNGTH4:LEAVEITYES:ANSWER$(1)"6242":FDBCK$(1)"Yes!"CFDBCK$(NMTCH2)"Sorry. Here's the solution:/ 1. 256 x C = 3072/ 16 x A = 160/ rrect. This is the correct way://1) 16 x D = 208 2) 212 1#0 8 = 26, R=4/ 1 x 4 = 4/ 1%%%0 26 1#0 8 = 3, R=2/ 21210//The answer is 3248^." (}AXPSX(21):AYPSY(8):XPSX(2):YPSY(11):17000:,AXPS7,AYPS:REmber to its":"octal equivalent. Type your answer,":"and press RETURN.":X1%2:Y1%3:X2%277:Y2%37:H1%2:S1%1:D1%2:2000},X(15),Y(8):"D416^ = 8^":QUESTIN1:LNGTH3:LEAVEITYES:ANSWER$(1)"324":FDBCK$(1)"Right!"}FDBCK$(NMTCH2)"Incoplete"::"the lesson successfully, you"_6y:"need to answer four questions"::"correctly."@y,X(5),Y(18):" Press RETURN to begin.";:FROMOTHERYES:1000:RESPNSE$M$31040:}*PAGE-16| }7000:,X(2),Y(2):"Convert this hexadecimal nuRESPNSE$EXIT$11000;>N13000:FILE$"HEX.TO.OCT-1":13500Iy*PAGE-15"y7000:,X(15),Y(3):"PRACTICE SET":X1%91:Y1%10:X2%188:Y2%29:H1%3:S1%1:D1%2:2000(,y,X(5),Y(6):" This practice set contains six"::"questions. In order to com(A2)A2'JCL%809:SW%803:HP%812tJB1$"0":T1$"9":B2$"0":T2$"9":PR$".":CM$",":SP$" ":NG$"-":HFLAGNONLS$"WELCOME.HEX.TO.OCT" N*CONTROL-HEX.TO.OCT-2*N31000:32000:33000:34000:35000:36000:37000:(RIGHT4)138000,390004N nF1,1, 8J BJZ9815:YE1:NO0:BOYE:JU0:NR1:LS2:QTNR:LENO:CR1:IN0:IG3:GO4:RI0:WR0:A$"":A1$A2$:G$(7):M$(13):D$M$(4):EX$(27) VJMA4:MF6:AN$(MA):FD$(MF2):FD(MA2,2):NMMF1:DNMF2:J1MA1:FD(J1,1)IG `JZX%YE tJMO(A)4,5:35,24:CLR% >34,0:2 hB*SPECIAL'THINGIE rBTRIES0:STPYES:ALTYES:FDBCK(J1NMTCH,1)INCRRECT:LWRNGNO:FDBCK$(NMTCH)"Sorry. Try again." |B3000:JUDGECRRECTLWRNGYES:NMTCHNMTCH2:3000:NMTCH7 B PF*QUESTION'DATA ZFQ#1 dF1,(A2$,(A1$)1,1):A1$A1$A$:A$;:0 d7BEEP:? n7NX9000:N :*P-RETURN :VSPACE,0:HSPACE,0:,X(RX),Y(RY):"Press RETURN.";:FRYE:1000:RE$M$15010:REWRITE:,X(RX),Y(RY):12)" ";:WRITE: >*PARTIAL'SCREEN'CLEAR >32,0:33,40:3(RE$,1)" "RE$(RE$,1,L11):H 7(RE$,1,1)" "RE$(RE$,2):14110z (7RE$""RE(RE$):RL(RE$):NXYE::WRITE: 27BEEP:BEEP::14010 <7A1$""A1$(A1$,1,(A1$)1):(8); F7 P7A1$""A2$""A$(A2$,1):14071$ Z7(A2$)(A1$)A$90 6(A1$)IL14180^ 6C1(B1$A$)(A$T1$):C2(B2$A$)(A$T2$):C3(A$PR$)(A$NG$) 6(C1C2C3)(HFLAGA$"H")ı 6A1$A1$A$:C9(A2$)(A1$):C9A2$A1$(A2$,(A2$)(A1$)) 7C9A2$A1$ 7A$;: 7RE$A1$:" ":L1(RE$)11:} 612000-6103,1:104,72:16302,0:1K6*ALTERNATE'INPUT'ROUTINEX6REWRITE6,IX,IY:IL1)"";:A1$"":A2$"":JD$"":,IX,IY616368,06A$:14040:140306TY(Z9):ILĭNXTY5RE$A$:14120 6TY14100,14130,14140,14160,141               a part.";:FROMOTHERYES:1000:RESPNSE$M$230507Z" Press RETURN to choose a part.";:FROMOTHERYES:1000:RESPNSE$M$23050ZT0Zd, and a practice set. You may"::"do the parts in any order. To"::"complete the lesson successfully, you" Z:"need to complete the practice set,"::"which has questions on ";I$;"both";I$;" methods."1 Z,X(6),Y(21):" Press RETURN to choose conversions."O V::" You'll need 40 minutes for the"::"whole lesson."[ "V1000:a Yk Y7000 Y,X(2),Y(3):" The lesson is made up of three"::"parts: conversion by the decimal"::"method, conversion by the binary"o Y:"metho0 V,X(5),Y(4):VSPACE,2:"Sometimes it is necessary to":"convert numbers from octal":"representation to their":"hexadecimal equivalents.":RXPS14:RYPS11:15000 V:"equivalents. This lesson will show"::"you two methods of making such"::"X2%254:Y2%75:D1%3:S1%2:H1%1:2000:X1%29:Y1%8:X2%254:Y2%76:H1%2:S1%2:D1%3:2000 R,57,106:"CONVERGENT SYSTEMS, INC." &R,106,128:"2 ABCDEF ":" HIJKLM ":"OPQRSTUV":"WXYZabcd":" efghij ":" lmnopq 0" XR1000: U*PAGE2 U700ELCOME.OCT.TO.HEXP *N21000:22000:23000:13000:FILE$"OCT.TO.HEX.MENU":13500V R R7000:,X(7),Y(3):" BASIC ELECTRONICS"::" ELECTRONIC MATH":" Disk #3":" Conversions from":" Octal to Hexadecimal"Z RX1%28:Y1%7:8 612000-6103,1:104,72:16302,0:1G:*ADD.ON.PRESS.RETURNM8JBJZ9815:YE1:NO0:BOYE:A$"":A1$A2$:G$(7):M$(13):D$M$(4):EX$(27)VJMOD(A)(A2)A2tJCLR%809:SWD%803:HP%812NLS$"WELCOME.OCT.TO.HEX" N*CONTROL*We you counted the number/of binary positions? There should/be nine. Try again."&eFDBCK$(NMTCH1)"No. Try again.":FDBCK$(NMTCH2)"No. The answer is 110111010./Type it in now." 'eAXPSX(12):AYPSY(9):XPSX(2):YPSY(17):3000:QUESTIN0:FE1SCHOICE,0);:BOXIT,0:,X(5),Y(21):99)" ":23090K xZFILE$I$(CHOICE,1):"BOXIT,3 dZREWRITE:,X(5),Y(21):"Press RETURN to take this part":"or press the space bar to choose":"another.";:FROMOTHERYES:1000:RESPNSE$" "RESPNSE$M$231402 nZRESPNSE$" "įREWRITE:,X(3),Y(6CHOICE2)CHOICE3:RESET:CHOICE". "I$(COCT.TO.HEX-3"? (ZX13:,X(3),Y(6X2)X3:X". "I$(X,0): 2ZREWRITE:,X(30),Y(5):FROMOTHERYES:1000:RESPNSE$"1"RESPNSE$"3"23080:REWRITE PZCHOICE(RESPNSE$):,X(3),Y(6CHOICE2)CHOICE3:RESET:(9)CHOICE". "I$(CHOICE,0)(9); ZZHN13000:13500 Y*CHOICEPAGEt Y7000:,X(3),Y(3):"Type the number of the"::"part you want to study now:" YI$(1,0)"Decimal Method":I$(1,1)"OCT.TO.HEX-1" YI$(2,0)"Binary Method":I$(2,1)"OCT.TO.HEX-2" ZI$(3,0)"Practice Set":I$(3,1)"M 612000-6103,1:104,72:16302,0:138JBJZ9815:YE1:NO0:BOYE:A$"":A1$A2$:G$(7):M$(13):D$M$(4):EX$(27)VJMOD(A)(A2)A2tJCLR%809:SWD%803:HP%812NLS$"OCT.TO.HEX.MENU" N *CONTROL'OCT.TO.HEX.MENU*N23000 SC.5:261503'eFENMTCHİ3000:FE26150:26100E'eNMTCHNMTCH1['f3000:FE126150p'fFENMTCH26120'fNMTCHNMTCH1:STPNO:LEAVEITYES:3000'&f1000:16000'Xf,X(3),Y(12):"B. 1101110102^ = 16"'bfQUESTIN10:LNGTH5:STPYES7