Included herein is the main BASIC program for Little Red Reader 2.6 "lrr-128" and the machine language support module "lrr.bin". CRC-32 values are included on the "nucode-end" lines. --nucode-begin 1 lrr-128 begin 640 lrr-128 M`1PD'`4`_B8@.B!35[+."2@Q*2`Z((L@S"@P*;&R-2"G(/XE`%L<"@"9(,`)D@(LE.251)04Q)6DE.1RXN+B(@.B"9 M`#X>*`#^`C`@.B!02[+1*"(U-#`P(BD@.B!05K)02ZHS,`!G'C(`BR#"*%!6 MJC`ILM$H(D-"(BD@KR#"*%!6JC$ILC$S-""G(#8P`*<>-P"9(LQ/041)3D<@ M34%#2$E.12U,04Y'54%'12!23U5424Y%4RXN+B(@.B#^$2),4E(N0DE.(BQ5 M*$)$*0#('CP`ER!05JHS+$16(#H@ER!05JHT+$14(#H@GB!02P`+'T8`AB!4 M+%(L0BQ)+$$D+$,L1%0D+$9,)"Q)3"0L6"Q8)"Q%+$),+$)(+$1#+%,L1%`L M1$(L4UHL348L4U4L2U``11]'`$--)+(B1$U&5$,K+5$@(JK'*#$S*:K'*#$T M-2FJQR@Q-RFJQR@Q-3@"#("+&24Q%($Y/5"!/5510550B+"+-25-324Y'($9)3$5. M04U%(BPBR4Q,14=!3"!$159)0T4@3E5-0D52(@`/(WL`@R`BQDE,12!214%$ M($524D]2(@`9(WT`B2`T.3(`'R."`#H`02.#`(\@*BH@3$]!1"!-4RU$3U,@ M1$E214-43U)9("HJ`&@CC`"9(LQ/041)3D<@S=,MQ,_3($1)4D5#5$]262XN M+B(@.B"9`( M(%!+(#H@GB!02ZHS+%@`+22@`$1,LC``2R2J`/X)($),+$1#+$)(+%,@.B!% MLL(H4%:J,BD`;22T`(L@*%,@KR`Q*2"G((T@,S@P(#H@1$RRJS$@.B".`*LD MO@"9(M-#04Y.24Y'($1)4D5#5$]262XN+B#04D534R#!(%1/($%"3U)4(B`Z M()D@.B!354)$25)3LC``O"3(`$1"LD),JC(U-JQ"2`#L),T`GB!02ZHR,2`Z M(/X)($),+%@L0D@@.B!-0;)"3*I"2*PR-3:J6*PV-34S-@#])-(`BR!$0[(P M(*<@,S8P`!TEW`"!($10LD1"(*0@1$*J,S*L*$1#JS$I(*D@,S(`/27>`(L@ MPBA$4"FR,""G($10LCDY.3DY(#H@B3,U,`!3)>8`BR#"*$10*;(R,CD@IR`S M-3``<"7K`(L@PBA$4*HQ,2FO(#$V(*<@4U6R4U6J,0"*)?``BR#"*$10JC$Q M*2"O(#(T(*<@,S4P`)8E^@!$3+)$3*HQ`-HE!`%$)++)*"(@(JK$*$1,*2PS M*:HB("`@("!"24X@(%!21R`@(B`Z((\@*BH@1$5&055,5"!314PO5%(O1E0@ M*BH`!28.`4$DLB(B(#H@@4FR,*0Q,"`Z($$DLD$DJL`:$@020ZBR!!)+(B02(@IR!$3+*K,3J.(#H@U2"+($$DL[$B M(B"G(#,U,`!>*&`!@B!$4`"#*&,!F3J9(D9)3$53(#TB.T1,.R(@(%-50D1) M4E,@/2([4U4`B2AH`8X`CRAR`3H`M"AS`8\@*BH@4D503U)4($U3+41/4R!$ M25-+($524D]2("HJ`.LH?`&9(,2F+`:$@020ZBR!!)+.Q(B(@IR`S.34`ARF0`:'Y($$D(#H@C@"- M*9H!.@"H*9L!CR`J*B!30U)%14X@2$5!1$E.1R`J*@#"*:0!F2#'*#$T-RD[ MQR@Q-"D[QR@Q."D[``(JI0%8)+(BP\+-+<3/TR(Z022R(B`@1E)%13TB.HL@ M4U>S-S4@IR!8)+(BP\+-Q,_3(CI!)+(B("!&4D4](@`L*J8!BR!-1;(P(*<@ MF2+-TRW$S],B.SI8LDU!.M4@F2!8)#LZ6+)#00!5*J`DFRU"A#320L020I`)\PJ`*+($U&L3`@IR"9(,@H24PD+%*J-2D[R"A$ M220H344L5*I2*2Q35RD`OS"L`I$@U"@B7CDQ(BQ!)"D@B2`W-C`L-S@X+#@.+(,HH1$DD*$U%+%@I+#8L,2FR(B`B(*<@6"2R(BHB(#K5(%@DLB(@ M(@!^,X0#RBA$220H344L6"DL-BPQ*;)8)"`Z((X`L#..`XL@RBA$220H344L M6"DL.2PQ*;(B02(@IR!8)+(B0DE.(B`ZU2!8)+(B05-#(@#,,Y@#RBA$220H M344L6"DL.2PS*;)8)"`Z((X`_S.B`XL@RBA$220H344L6"DL,30L,2FR(E,B M(*<@6"2R(E!21R(@.M4@6"2R(E-%42(`'#2L`\HH1$DD*$U%+%@I+#$T+#,I MLE@D(#H@C@`N-+8#BR!-1K.R,""G(#8P,``]-,`#@2!8LC$@I"!-1@!5-,H# MD2!#JC$@C2`X.3`L.3$P+#DS,`!=--0#@B!8`&(%!+(#H@ M1$RRJS$@.B!-0;(P(#H@1DRRJS$`]C5,!(D@,3$R,``+-E8$F2!)3"0[QR@R M-RD[(D`B.P`?-F`$BR!$5K.Q0T0@IR`Q,3(U`#@V8@2+($16LC@@IR!#1+(Y M.M4@0T2R.`!@-F4$A2`BP\+-+<3/TR!$159)0T4@3E5-0D52("@P+3,P*2([ M0T0`I#9J!(L@0T2R1%8@IYDBS=,MQ,_3($%.1"##PLTMQ,_3($1%5DE#15,@ M35535"!"12!$249&15)%3E0A(CJ),3$R,`"]-G0$0T:RJS$@.B!#0;(P(#H@ MB2`U,#``PS9U!#H`VC9V!(\@*BH@0T]062!&24Q%4R`J*@#L-GX$BR!-1;(Q M(*<@,C`P,``B-W\$F2#'*#$T-RD[(L-/4%D@S=,MQ,_3("T^(,/"S2W$S],L M(,&@5$\@04)/4E0B.IDZF0`^-X@$BR!$3+.R,""G($9#LC`@.B")(#$Q.3`` M=3>2!$9#LC`@.B"!($:R,2"D($1,(#H@BR#**$1))"@P+$8I+#8L,2FR(BHB M(*<@C2`Q,C`P`'TWG`2"($8`J3>F!)D@.B"9(L9)3$53($-/4$E%1"`](CM& M0SLB("T@T%)%4U,@2T59(@"[-Z<$H?D@020@.B")(#4R,`#'-[`$1D.R1D.J M,0#T-[H$6"2RRBA$220H,"Q&*2PQ.2PX*:HB+B*JRBA$220H,"Q&*2PR.2PS M*0`P.,0$0T8DLB(B.H%)LC&DPRA8)"DZBR#**%@D+$DL,2FQQR@Y-2D@IR!# M1B2R0T8DJB(@(CJ),3(S,`!9.,D$BR#**%@D+$DL,2FSL2(@(B"G($-&)+)# M1B2JRBA8)"Q)+#$I`%\XS@2"`(@XSP2+(,DH0T8D+#$ILB(N(B"G($-&)++( M*$-&)"S#*$-&)"FK,2D`J3C0!$-&)+)#1B2J(BPBJLHH1$DD*#`L1BDL,30L M,2D`W3C8!)D@Q"A&0RD[(BX@(CO'*#,T*3M#1B0[QR@S-"D[HS(P*3M36BA& M*2)"651%4R([`/@XW029(*,S-2D[RBA$220H,"Q&*2PY+#,I`"!9D@QR@Q."FJ(L/"S2!$25-+($52 M4D]2.B`BJD13)"`Z($9#LD9#JS$@.B!&LD1,(#H@H#$@.B".`.0Z*`67(%!6 MJC8L0TRM,C4V(#H@ER!05JHU+$-,J\(H4%:J-BFL,C4V``X[,@67(%!6JC@L M3$*M,C4V(#H@ER!05JHW+$Q"J\(H4%:J."FL,C4V`!L[-P69(,(%!+JC8L5%(L6`"@.TD%H2!!)#J+ M022R(D$BIR!3LC$Z1;(Q-CJ),3,V,"`ZU2"+($$DL[$B(B"G(#$S-3,`NSM+ M!?X)(%@L6"Q8+%,@.B!%LL(H4%:J,BD`TSM0!8L@0T2SL3`@KR!#1+,X(*<@ MH#$``#Q:!8L@0T2QLC@@IR#^#R,Q()$@52A#1"D@.B"+($13L;(R,""G(#$S M,3``)SQ?!8L@*%,@KR`Q*2"G((T@,S@P(#H@1D.R1D.K,2`Z($:R1$P`+3QD M!8X`,SQV!3H`4CQW!8\@*BH@4D5-3U9%($U3+41/4R!&24Q%("HJ`&0\>`6+ M($U%LC$@IR`U,#`P`)P\>069(,P5!)+(B3B(Z MA2+!4D4@64]5($Q)2T4@4U5212!!0D]55"!42$E3("A9+TXI(CM!)``?/7P% MF3J+($$DL[$B62(@IR")(#4R,``[/8(%BR!$3+.R,""G($9#LC`@.B")(#$T M-#``2CV,!49#LC`@.B!&LC$`?SV1!8L@RBA$220H,"Q&*2PV+#$ILB(J(B"G M((T@,30W,"`Z($9#LD9#JC$@.B!&LD:K,0"9/9(%H2!!)#J+($$DL[$B02(@ MIR`Q-#,P`-8]DP69(,!9D@.B"9(,(%!+JC(Q(#H@_@D@ M02Q8+%D@.B!-0;)!JEFL,C4VJEBL-C4U,S8`S3ZJ!:'Y($$D(#H@B2`U,#`` M_#Z^!9DBTD5-3U9)3D<@(CO'*#,T*3O**$1))"@P+$8I+#$Y+#$S*3O'*#,T M*0`N/](%ER!05JHQ,"Q$4"A&*:TR-38@.B"7(%!6JCDL1%`H1BFKPBA05JHQ M,"FL,C4V`#H_U`6>(%!+JC$U`'@_U@5$220H,"Q&*;)$220H,"Q$3"DZ4UHH M1BFR4UHH1$PI.D10*$8ILD10*$1,*3I#3"A&*;)#3"A$3"D`A#_7!41,LD1, MJS$`BC_8!8X`D#_:!3H`JS_;!8\@*BH@0T]062!#0DT@1DE,15,@*BH`U3_< M!9D@QR@Q-#!5BR,"`Z((4BQ$5624-%($Y534)%4B!43R!#3U!9(%1/(CM8 M(#H@F0!N0-\%BR!8L[(P(+`@6+&R,S`@IR"9(L)!1"!$159)0T4@3E5-0D52 M(2(@.B")(#(P,S``HD#@!8L@6+)#1""G()DBPT%.3D]4($-/4%D@5$\@4T%- M12!$159)0T4B(#H@B2`R,#,P`-U`X0544K(P(#H@BR!!)+(BV"(@IR!44K(R M-34@.B"9(BA44D%.4TQ!5$E.1R!&4D]-(,'3P\G)*2(`#$'B!8$@1K(Q(*0@ M0T8@.B"+(,HH1$DD*#$L1BDL-BPQ*;.Q(BHB(*<@,34W,`!)0>,%F2!$220H M,2Q&*2`Z(/X-(S$L*$-.)"A&*2DL52A#1"D@.B"+($13L;(R,""G($:R0T8Z MB3$U-S``94'D!8L@6+,X(*<@GR`R+%@L-R`Z((DQ-34P`)-!Y05#1B2R(C`Z M(JI#3B0H1BFJ(BPBJLHH1$DD*#$L1BDL,S$L,2FJ(BQ7(@"L0>8%_@\@52A8 M*2`Z()\R+%@L,RQ#1B0`P$'G!8L@1%.SL38S(*<@,34S,`#'0>@%H#(`"T+I M!5@DLB).(CJ%(L9)3$4@15A)4U13.B!/5D525U))5$4@*%DO3BDB.U@D.E.R M,#H@BR!8)+.Q(EDB(*<@,34V,``>0O`%\BA#3B0H1BDI+%4H6"D`+4+U!9\R M+%@L,RQ#1B0`2D+Z!8L@1%.QLC(P(*<@1K)#1B`Z((D@,34W,`!=0@X&GB!0 M2ZHR-"PQ+#(L5%(`>$(3!OX)($$L02Q!+%,@.B!%LL(H4%:J,BD`HD(8!OX/ M(S$@D2!5*$-$*2`Z((L@1%.QLC(P(*<@1K)#1CJ)(#$U-S``U4(9!HL@6+,X M(*<@H#(Z(-4@_@\@52A8*2`Z((L@1%.QLC(P(*<@1K)#1CJ)(#$U-S``]D(: M!J$@020@.B"+($$DLB)!(B"G($6R,38@.B!3LC$`#4,;!HL@*%,@KR`Q*;(P M(*<@,34W,`!"0QT&F2`Z()D@QR@Q."D[(L-/4%D@15)23U(@(R([RBC$*$4I M+#(I.R(Z("([15,D*$4I`$M#'@9&LD-&`%-#(@:"($8`9D,C!HL@1%.S,C`@ MIR`Q-3@P`)-#)`:9(#H@F2#'*#$X*3LBP\+-+<3/TR!%4E)/4CH@(CM$4R0[ MQR@Q-#8I`)]#)0:@,2`Z(*`R`-I#)@:9(#H@F2`BT%)%4U,@04Y9($M%62!4 M3R!215154DX@5$\@345.52(@.B"A^2!!)"`Z((DU,3``"T0L!ID@.B"9(L9) M3DE32$5$("T@T%)%4U,@02!+15DB(#H@C2`S.34@.B")-3$P`!%$S@/("HJ($-/4%D@0T)-+41/4R!43R!-4RU$3U,@*BH`;D30!YD@QR@Q-#+($1,L;(P(*<@,C`S-0"N1.0'F2+-TRW$S],@1$E214-43U)9($U5 M4U0@0D4@3$]!1$5$($9)4E-4(@#71.X'F2`Z()DBT%)%4U,@04Y9($M%62(@ M.B"A^2!!)"`Z((D@-3$P`.!$\P=&0[(P``]%]`>!($:R,2"D($-&(#H@BR#* M*$1))"@Q+$8I+#8L,2FSL2(J(B"G(#(P-#4`)T7X!T9#LD9#JC$@.B!#)+)# M3B0H1BD`847Y!YG**,0H1D,I+#(I.R(@(CO**$1))"@Q+$8I+#$T+#$V*3O* M*$1))"@Q+$8I+#,T*3LB.B([`(-%^@>-,C`U,"`Z()D@R"A-)"PX*3LB+B([ MR2A-)"PS*0"M1?L'5%*R,"`Z((L@RBA$220H,2Q&*2PY+#$ILB)!(B"G(%12 MLC(U-0#11?P'C3(Q,#`@.B"+($6SL3`@IR!&LD-&(#H@1D.R1D.K,0#Z1?T' M@B`Z((L@1;.Q,""G($1,LD1,JT9#(#H@1D.R,"`Z((DR,#0X`!=&_@>9(L9, M55-(24Y'+BXN(B`Z()X@4$NJ,3(`0T;_!YX@4$NJ,C$@.B#^"2!!+%@L62`Z M($U!LD&J6:PR-3:J6*PV-34S-@!G1@`(F3H@F2)&24Q%4R!#3U!)140@/2([ M1D,@.B"),C`S,`!M1@$(.@"C1@((6++4*$,D+"(N(BD@.B"+(%BR,""G($TD MLD,DJB(@("`@("`@("`@("(@.B"),C`Y,`#11@<(6++#*$,D*:HQ(#H@ZR`Z M(%BR6*LQ(#H@["#\(,HH0R0L6"PQ*;(B+B(`\D8,"$TDLL@HR"A#)"Q8JS$I MJB(@("`@("`@("(L."D`"4<6"%@DLLHH0R0L6*HQ*:HB("`@(@`61R`(322R M322J6"0`)D"HL@ M0T:R,""G()DB1$E32STB4218)%$D(#H@F2`Z((DR-C4P``Y-*`I#3B0H0T8I MLE@D`$U-,@I!)++(*%@DJB(@("`@("`@("`@("`@("`@("(L,3`J9(#H@ MF2#'*#$X*3LBP\+-+<3/TR!%4E)/4CH@(CM$4R0[QR@Q-#8I`$A.@@J9(#H@ MF2`BT%)%4U,@04Y9($M%62!43R!215154DX@5$\@345.52(@.B"A^2!!)"`Z M((X`3DZV"SH`;$ZW"X\@*BH@4T54(%1(12!$051%4U1!35`@*BH`H4ZX"YD@ MQR@Q-#8$I03- M6U20ZB"J5!A88*ETA0*F!!BI7WU_584#8``($`8.!`P""B"[5"D/C2!4R0*0 M`6"B`J``J0@L#=SP^ZT`W4D0C0#=K0S*E`A04X($?_>"P- MW*("H`"M`-W-`-W0^$4%*4#P\K$"C0S8#RM#8 M&"!'_RP-W""J5""S5*X,W""J5(HI#XT@5,D"6&"I#HT`_ZG_C4E4C4I4H@V= M3%3*$/J-2U088,U)5-`0[$I4T`N(F`H8:5^HJ7088(U)5(Y*5(0%(!95D".M M(%0I#\D+\`JI_XU)5(Y*5#A@(,94K4E4KDI4I`60TTQ\5JU)5*Y*5*0%3%%6 MHO_H..U@5+#YB!#V&&U@5,BHBF`@H5:B`,Q;5)`)2)CM6U2H:*(!R&"&"R"U M5H4(A@F$"J4(I@FD"B!15I`!8(4,A`VB`J``L0R1!LBQ#)$&R-#TY@WF!\K0 M[>8*I0K-6U3P%)`2J0&%"N8)I0G)`I`&J0"%">8(Q@O0N!A@..D"L`&(KCU4 MX`'P!PJ$!R8'I`<8;4-4D`'(8"`?5Z)TA@:B@X8'KCU43,I6(+56S4E4T`_L M2E30"DBI_XU)5(U*5&@@MU5@```@'U>B=(8"HH.&`XUG5XQH5R!,5Y`!8*T] M5,D"L`%@K6=7K&A7&&D!D`'(($Q78*(.C@#_R=#0!B#&5)`!8*D`H``@M58@ M45:0`6"%`H0#H`VQ`HT]5,D#D`>I$8T@5#A@H!"Q`LD"T/&@%K$"C3Y4R0JP MYJ`1L0*-0%3)X;#;2DI*2HT_5*`3L0*-053(L0*-0E2@&+$"R1.POZ`:L0+) M`M"WH`ZQ`LD!T*^M/E0*&&D!C414&&T_5(U#5*U!5*Q"5#CM0U2P`8B-152, M1E2M/53)`M`&3D94;D54&*U%5&D"C4=4K494:0"-2%2I=*"'A0:$!ZD!H`"N M/E0@RE:0`6"I=*"9A0:$!ZU$5*``KC]4(,I6D`%@J72@F:Y`5!A@A06$`T8# M:H4$I@,*)@,8902%`HIE`X4#&*4":72%`J4#:8>%`Z`"L0*9!@"($/A@((I8 MI04I`=`(I00`6`8I5QE8H5UJI M`(4.L`-,R%Q@H`Z,`/^J(,;_D`RI`(TL5(TI5(TJ5&`@8ET@8ET@8EV-*50@ M8EV-*E2I`(TL5"!B77\!! M0D-$149'2$E*2TQ-3D]045)35%565UA96MO'EZ6UQ=7E\````````````````````` M```````````````````````````````````````````````````````````` M``````````````````````````````````````````````!@04)#1$5&1TA) M2DM,34Y/4%%24U155E=865I[?'U^?P`````````````````````````````` )``````````!^ ` end --nucode-end 1 2934 78b3f1f8