' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL] 鷎귭෍ᷩ췩緈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:;<=>?  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#0EB 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`   vLDcpq` [` ~  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 iõ`  \ 濭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- ( D  Ϡ@跻~!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䵍䵐`"L ŵ8ŵH ~(`F d ֠z# u`ĠŠˠŠҍǠԠ͠ӠĠԍ΍  TAPE AND TYPE RETURN ";A$,LM/BACK TO MENU6LN/2235D WAIT 3 SECONDS"7K."THEN TYPE THE RETURN KEY...";A$`K.:"PLEASE WAIT WHILE READING TAPE."gK/SK/:"DONE READING PORTFOLIO":K&/I020K+/FOLIO$(I)""K0/J04K5/S(I,J)012100K:/FOLIO$(I)FOLIO$(I)(S(I,J))KD/JKF/ILI/"STOPEASE WAIT WHILE SAVING PORTFOLIO.")Jp+SPJz+:15:"PORTFOLIO HAS BEEN SAVED."J+:"STOP TAPE AND TYPE THE RETURN KEY...";A$J+BACK TO MENUJ+2235J.READ FOLIO FROM TAPEJ.:8J."PUT PORTFOLIO CASSETTE IN RECORDER":K."PRESS PLAY ANI*"PUT A BLANK TAPE IN THE RECORDER":4I+I020KI +J04:S(I,J)0:J`I+K(FOLIO$(I))1oI +K011090zI*+J0KI4+S(I,J)((FOLIO$(I),J1,1))I>+JIR+II\+"PRESS BOTH RECORD AND PLAY"Ia+"THEN TYPE THE RETURN KEY...";A$Ic+"Jf+"PLHV'54,68:55,3'H`'CUSTOM IN# AT $3000Hj'768IHo'GET LINE FROM PHONEWHt'"";Q$(5)H~'QUIT AFTER 2 CTRL-Q AND 3 SPACES FOUND.H'Q$(5)" "ċ0:0:H'SAVE LAST 6 LINESH'I04:Q$(I)Q$(I1):IH'10100H*SAVE FOLIO ON TAPEH*:8( G3'7000"G5'A$"TIMEOUT"100705G8'TIMEOUT ERROR@G9'LGIN0IG:'0:rG;'"SORRY, YOU HAVE BEEN DISCONNECTED"G<'"BECAUSE OF TIMEOUT ERROR."G='"YOU WILL HAVE TO HANG UP AND DIAL AGAIN."G>':1305GB'DISABLE SCREEN PRINTGL' $344 HOLDS RTSICS"ĺ(9);(75);(30);(14);(F@#23:19FA#(10);: LFLFF#J123:24:1]FP#I10241062nFZ#((I));:I|Fd#:J:0:F'SUB TO RETURN 3 QUOTESF' IN Q$(0-2)F$'CSLOTF.'",";SYM$(0);" ";SYM$(1);" ";SYM$(2)F0'WAIT FOR RESPONSE OR TIMEOUT10:I0'EvII1:I500A$"TIMEOUT":9E(DA)J7030HEJ(DA):KVEA$"OK":qE@SUB TO GET NEXT FOLIOEJA$FOLIO$(SF)ETSFSF1:SF20SF0EYA$""8010E^E'#E(# SUB TO PRINT SCREENE*#PT$"NONE"ıE-#PSLOTF2#PT$"CENTRONI HAVE NO PRINTER"+D:"TYPE 1,2 OR 3 ";3DA$BD(A$)3ijNDI(A$)`DI1I36050zDI1PT$"CENTRONICS"DI2PT$"OTHER"DI3PT$"NONE"D$2235: MENUDXSUB TO WAIT 10 DIFFERENT CHARACTERS OR 10 SEC TIMEOUTDbJ0ElK1DJUSTED FOR EX-DIV"C::5GC"PRESS THE RETURN KEY TO BEGIN...";OCA$YC:10C"WHAT KIND OF PRINTER DO YOU HAVE?"C:"CHOOSE ONE OF THE FOLLOWING:"CC" 1. CENTRONICS"C" 2. OTHER BRANDS (E.G. EXTEL OR AXIOM)"D" 3. THE"(Bx:11:"DOW JONES & CO., INC."QB|:7:"STOCK QUOTE REPORTER PROGRAM"vB~:10:"BY APPLE COMPUTER, INC."B:19:"***"BB:5:"DOW JONES STOCK REPORTER SERVICE."B5:"STOCK QUOTES DELAYED OVER 15 MIN."C5:"*=CLOSE PRICE AR CONTROL CHARS"A (B$)323220+A B$;>A A$A$B$:3220ZASUB TO PRINT PORTFOLIOA:"STOCKS CURRENTLY IN PORTFOLIO:"AI0AH02412AV3162AV:H2:FOLIO$(I);AII1:V:HAAp:3:19:"***"Bu:13:"WELCOME TOPE TRAP@ A$""@ B$&@ CTRL-C?5@ (B$)3ijB@ ESCAPE?X@ (B$)27ġ:2235n@ CARRIAGE RETURN?~@ (B$)13ı@ BACKARROW?@ (B$)83258@ (A$)03210@ (A$)1ĺB$;:3210@ A$(A$,(A$)1)@ B$;:3220A IGNORE OTHE(A$)53100?D FOLIO$(L)A$8?N CONTINUE IF NOT NULLK?X (A$)03195^?] SKIP IF LASTm?^ L193195y?b JL19?g FOLIO$(J)FOLIO$(J1)?l J?v FOLIO$(20)""?z PRINT FOLIO AND LOOP TILL ESCAPE?{ 5000:3000@ SUB TO GET A$ WITH ESCAE RETURN KEY...";/> 3200:GET A$,TRAP ESCAPEA> (A$)53010M> L020d> FOLIO$(L)A$3100k> L> SYMBOL NOT FOUND> 3010> 22:1:958>& "ENTER NEW STOCK SYMBOL">0 "AND TYPE THE RETURN KEY...";>5 3200:GET A$,TRAP ESCAPE ?: OR."!= H2:(Q$(S),10I9,7);,= HH103= S== VV2D= Ie= NEXT 3 STOCKS, LOOP FOREVERo= 2200= CHANGE A STOCK= 17:1:958= "TYPE ESCAPE KEY TO GO BACK TO MENU."= 19:1:958= "ENTER OLD STOCK SYMBOL"> "AND TYPE TH8: ERASE$<< PRINT HARDCOPY? ("P")CH0305Q8HV:H2:FOLIO$(I);a8RII1:H:Vz8READ AND MASK KEYBD8K(16384):K127KK1288SKIP IF NOT "ESCAPE"8K272400816368,0:RESET KEYBD85000:PRINT FOLIO917:1 UNSUCCESSFUL"27^"PLEASE HANG UP AND TRY AGAIN"O7hLGIN0:1305: TRY AGAINy7:" APPLE STOCK QUOTE REPORTER"77:"STOCK"7:"BID/CLOSE"7:"ASK/OPEN"7:"HIGH"7 :"LOW"7:"LAST"7 :"VOL(100)"8*:"STOCKS CUMEOUT"16006"DOW1;;";$67000;6A$"TIMEOUT"1600G6"DJNR"Q67000_6P$:P$""f60p670006"A$"TIMEOUT"16006'LGIN16,SUCCESSFUL LOGIN,WAIT 10 SEC61I18000:I6620006@ TIMEOUT ERROR6J07T:2:"CONNECTIONOGIN IF DEBUG5ZDEBUG12000V5 CALC ADDR OF COMMUNICATIONS CARD FOR SUB AT 7000l5DA4929516CSLOT522:1:"PLEASE WAIT WHILE COMPUTER SIGNS ON."5WAIT 10 SEC5I18000:I5CSLOT:"E";5 WAIT FOR 10 CHARS57000 6A$"TIA$)1313224#(A$)3ij-4$P$P$A$:1312@4*(P$)101327]4,:"INCORRECT PASSWORD."t4-I11500:I:13054/12:142"DIAL YOUR LOCAL DOW JONES NUMBER"4<"INSERT THE PHONE INTO THE MODEM"4F"AND PRESS THE RETURN KEY...";A$ 5PSKIP LHLT","TXN","LVI"3`"END"#3jI0+3oA$>3tA$"END"1160O3~FOLIO$(I)A$_3II1:1135u3 ALL STOCKS READ36000:PRINT HEADER338:958: ERASE3"ENTER YOUR PASSWORD"3"AND TYPE THE RETURN KEY...";3P$""3 A$ 4"(,37,164,36,96'2I768836:J:I,J:IE2FOLIO$(20),SYM$(2),Q$(5)R2S(20,4)h2 SET FULL DUPLEX2CSLOT::1912CSLOT,255:02V "IBM","ITT","GULF","COKE","GE","DEC","XON"2Y "DJ","DIS","GM","F","PRD","MAT","EK"3\ "BA","ED","S","HWP","LY LANGUAGE ROUTINESv1n173,248,7,141,29,3,169,15,133,56,169,3,133,57,96,224,0,208,8,72,169,162,157,0,2,232,104,32,71s 194,160,9,136,240,7,217,68,3,208,248,240,24,201,147,208,2,169,141,201,141,240,8 2x 201,160,176,10,169,145,144,6,224,41,208,2,19880DOW JONES STOCK QUOTE30 COPYRIGHT 1978M0 APPLE COMPUTER INC.S0|0IF DEBUG=1, SKIP TELEPHONE PORTION0 DEBUG002PSLOT1: PRINTER SLOT0<CSLOT2: COMMUNICATIONS CARD SLOT0Z WE ARE NOT LOGGED IN YET0_LGIN01dASSEMB                   ààH /Ѽdd`dЅ deԄ8ҍӍd`D}Tߥ҅ީd LԦ}dҍ` ǠҠÍǠԠÍϠٮɆ0&⽌D}T L֠ $Ȅф(0PLddLԩՠԑihL* ۄکڍ ȱڍ `D`ߠ h  *L`,0,0I,0`d hhLd t Ld L di#Ld)ʽdʽdȄф L Pd0G  @dd0 RHDThЮ$0lp  :DL DLld 4ILILHUЍ`(S(L Lީߩ$, Lީߩ$hL  % "  hH ބ ބߩdҩ Ȍ  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 ֥ h ֥  ֥ -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فŴxaI1( &WSP& )`" !H)&JJ&&h' &' &' f&') &'#i%Ѕ0J$)` .ХQ&%0Q&&`$0JI0`'0% I`0 I0ܩ(ߠQ)'%01&*%0Q)&E%0*Q&&QeS)j00                :4"NOTE: THIS PROGRAM EXPECTS AN APPLE"Z"COMMUNICATIONS CARD IN SLOT 2."("AFTER LOADING, IT WILL BE MODIFIED TO"2"RUN WITHOUT THE CARD."<(4);"EXEC STOCKQUOTE PATCH"Iz #??     Ϡ à*Үʰ ŠˠŠҠ ŠȠ