' +JJJJ ?\>m0M='+l> /+l   d']6@5L&]655]6LF%5 & "L}"BB5L&]6 X  `6 77777777777JJJJx 77L? L7877777777 776i 7 7867 7`77 777777`x =(`(8`5775I7`B` 76`77`>J><;VU<)?<`8'x0|<&HhHh 8 8 8 8V&` aI꽌ɪVɭ&Y:&<&Y:&;: 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8 9: :' 9: :& :x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?8  1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#000'#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 < <݌ < < h < < < <`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 (G FG HZXj 80x D9$xxH` >( Z>h Z>L=.xxH >hh@(LH>9L>HH/Hh/ H?-З( 8(& 8$8 H` *8HNx`* >x$50x*$50xL9JJJJ`HHjf5 >h $50x`HA>VD;;P >(ED Z> ?$0x8x D9- 8DD# H8`?E Vˆʎ55L $ 5 55555 &a*5`*5` "L&5_*b*JL%u**Lz%`** $  Q(lXJ̥KlV $  Q(lV eօ3L e3L &%R*L &%Q*L d' "L4% N'e*)n*5 5 &`@-e*f*f* 5 "L# "5f*`L %.* *t*Q*L$ %L&*L` "O**P**u** d' "L% N'e*)n*o*o*n* &8ɍ` ^&f\*555L& ^&NR* & "R*ΩL&)\*Z* ʽ LH*v 3h`0h8` " ['L & N'С55 &5`*A*@` +5L^6L65`  \* ?*0 '\* '  Q( ^&\*lZl^?*c*q)H c*h`f*5h*5j*555@O*AP*`u*@`@5&`Q*R*`E 'Ls' ' ' @DAE@u*`8` %@ @A@`@`**@*A`M5 ) "L&`8@AW*c*@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@c*h8&ȑ@Hȑ@Ah@L'Hȑ@ȑ@* htphso`hMhL`9V*8U*897T*6S*67`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- (   Ӡ734@~3!+,W,o,*--,,9,-.-~3~3,,,,~3~3,,,,~3_*3 j.5 *H*H`Lc3 (+L3 +55555 1^3_* )3J Q*L_3Ls3443 D23455545554 70 / 7 :/354545455454555535L^/5-5I5555 55` / 4/ 2-5! / 08555454 70L3 (+50+5B5C3 2 70L35 *H*H`Lg3L{3505 *H*H` 3 ,5L3 3 1 ,H 1hBL, 0 BH [1 1h`Lo3 35 ,L3 3 1B , 1L,H 0hB@ 55 [1L133 (+34) 34 70L3 3L3 (+ 055L- (+34L{33454445 70 ^/* / 3B0 HȱBh -355 -8 /L38 25` +5 /3 /. /. 3 E7D B. /. /. 0]34S0J4 4) 3 4D4E B. 4  /. 02L3 Ν3 3`HD٤33DEEhiHLG.h ` /5B5-` /5B-` + X05I33383 33DH /4 E03744Ȍ7 X040 7 J7L35B5C`,5p` / R0-55`50` K/ R0-55`575755` 4/ K/ /( 55L/BȱBL/58` D2BH5BH :/ 75Bȭ5Bhh55 R0B5m55ȱB5m55` /LR0557755`*7*75LR0 E0(33 48`433 R0` E033LR0*7*7`777 555I7575757577** 7757`7 L35555f /55555555 ^/`855 i /B58` 41L 15ȱB5 /5555 /5`3 D23ȑB55B5 / 7 55`5555555555 5555`555`55BC55`5555`L3 /5B5C355 0Q340"B4 3` 02۰Ϭ33B438`3i#`3ЗLw35!50>5555`53 /3m3 3 3733i35 3583 /35ЉLw35`H /5h 25L/~43 533`55555555J5m55m5jn5n5n5ۭ55m5555m55m55`"L? 585H ~.(3` # d ֠z# u*`~x>@@ap<`pGA~xxpx"$"$$"*p@?|~Awq <> ""|x?~x>""&""*"$"x@Gq`?``"""$"`|x~x~py?>``, `~`>@?``>``A~xqp@*<  <& "`@>|Cga """"|`?|p""<"< @GC`?@?@""" <~~x|}x`{``, 8`|~>@?``>`@A?|papp?*6 """@@@xw@>ppA|>"  "88@@xGOO>>>xx@" "_|?x~>"8 ppxr8@~p8``F ` 8|c@>|?px@pG|?|?>@@_p?p|`C|~~|8ppxo;x0ppp@|@>?px~@`O~"$<.$.">x??~@q>~@?@".< .*, $< p`~?p >$< x~|?````~`~>@``p8|?@`<|"$"$" """"x?>~@{"""""~??""*"* "* $" $ @`~?~~"""* "$"" @|x?8`@@|?phpp@x pp~~>@|`p<`xAA@||p"$"$$" 2>"""p@?>~As   " >""~~?~?|?""*"* **" $~@G|`x> ""*"$" ||xp@@?xp?88``  `8 z#      ǠŠà"Ӡ" ՠ "̮ʠ,Рήʠ  ɮʠ)ˠ"YES":A(J)0A$"NO"SJ30āK12:A$(CNL(K)):36,39(A$):A$::A$(CNL(3))h36,39(A$):A$n140:EF1İ2060:1380A(28)0(A24A28)İ2060:280A(28)0(A24A32)İ2060:280A26A28A(A)255A(A):1160A30_jDT(K)B(K):(8K):A$(B(K)):36,35:868:36,39(A$):A$:B(K)0ĭK7KK1:B(K)0:1130kt:1010{~2000:1680:J2432J28A(28)01230J30J31āK139:"-";::(" "(J)") ",4);A$(J);:A$(A(J))J26J28A$ 160%A19B99ĺ(7);:1020I$A20(B40B254)ĺ(7);:1020g.A19BA(9)ĺ(7);:10208A22(B1B(A(11)A(21)))ĺ(7);:1020BA(A)B:970LK17:V8K:B(K)DT(K)V200:B01130`BB(K1)1B(A(19)A(20))ĺ(7);:1110920:8801970:1620D:J1923:J23āK140:"-";:o(" "(J)") ",4);A$(J);:A$(A(J))J23āK16:A$(DT(K)):36,39(A$):A$::A$(DT(7))36,39(A$):A$:140:EF1İ2000:1380A19A251150A231100IS FOUND IN THE TEXT.";2p140:EF1İ1970:1380EzA17A18960|AA17:K17:V3A8K:B(K)CR(K):(A)B(K)CS(K)200A0CR(K)B(K)A1CS(K)B(K)(3A8K):A$(B(K)):36,35:868:36,39(A$):A$:B(K)0ĭK7KK1:B(K)0: "(J)") ",4);A$(J);:A$(A(J))Q>J17āK17:A$(CR(K)):36,39(A$):A$:HJ18āK17:A$(CS(K)):36,39(A$):A$:R\6:3:"TRANSMITTED WHEN CTRL-P2";:7:3:"IS FOUND IN THE TEXT.";f14:3:"TRANSMITTED WHEN CTRL-P3";:15:3:"15:K17:V3A8K:B(K)CP(K):(A)B(K)CQ(K)7200KA0CP(K)B(K)_A1CQ(K)B(K) (3A8K):A$(B(K)):36,35:868:36,39(A$):A$:B(K)0ĭK7KK1:B(K)0:760:720 1940:1590*:J1718:J18āK140:"-";:!4(" (A$):A$:6:3:"USED TO INITIALIZE THE";:7:3:"PRINTER AND ALSO SENT IF";:8:3:"CTRL-P0 IS FOUND IN THE TEXT.";14:3:"TRANSMITTED WHEN CTRL-P1";:15:3:"IS FOUND IN THE TEXT.";140:EF1İ1940:1380A15A16800.AA)):36,35:868:36,39(A$):A$:B(K)0ĭK3KK1:B(K)0:600Jv:510Z1860:1560:J1516:J16āK140:"-";:(" "(J)") ",4);A$(J);:A$(A(J))J15āK17:A$(CP(K)):36,39(A$):A$: J16āK17:A$(CQ(K)):36,39A14640* A9A10A(A)255A(A):450= A12A13580F &160e 0A8(B1B7)ĺ(7);:520 :A12A14A(A)B:450 DAA12:K13:V8A4K:B(K)NL(K):(A)B(K)EL(K) N200 XA0NL(K)B(K) bA1EL(K)B(K)?l(8A4K):A$(B(K(" "(J)") ",4);A$(J);:A$(A(J))M J9J10A$"YES":A(J)0A$"NO" J12āK12:A$(NL(K)):36,39(A$):A$::A$(NL(3)) J13āK12:A$(EL(K)):36,39(A$):A$::A$(EL(3)) 36,39(A$):A$: 140:EF1İ1860:1380 A8 ^A1A(1)255A(1):290: hA6A7A(A)255A(A):290C r160Q |A1420n B13568B0ĺ(7):330 B((978)7)256ĺ(7):330 A(1)B:290 A5B1ĺ(7):330 A(A)B:290 1780:1480 :J814:J11āK140:"-";:& CP(7),CQ(7),CR(7),CS(7),DT(7),CNL(3)9 J1NL:A$(J):C 1400l ":J17:(" "(J)") ",4);A$(J); ,A$(A(J)):J1J4J5A$"YES":A(J)0A$"NO" 636,39(A$):A$: @140:EF1İ1780:1380 JA1A7440 TA4A(4)1A(4):290B$) A1ı) B0B255ĺ(7);:160/ J V:37:"";B$:B$""ım B(B$):B0B255ĺ(7);:200z B(K)B: :(6):"PEN-PAL CONFIGURATION SYSTEM" 6:J128:"-";:::10:1::34,3:: V255$ NL32:A$(NL),A(NL),NL(3),EL(3),ad(4)"BLOAD CONFIGFILE"7n::(4)"NOMONC,I,O"RxBASE18432: $4800[230EF0:22:1:868:"ENTER: NUMBER, M)ENU, OR ";:"";A$:A$"M"A$"m"EF1:A(A$): 22:1:868:"CHANGE PARAMETER "A" TO ? ";:"";B$:B(          EM INSTALLED,MODEM SLOT,MODEM NEW LINE SEQUENCE,NULLS AFTER MODEM NEW LINE,END OF FILE CHARACTER E,CTRL-P0 COMMAND,CTRL-P1 COMMAND,CTRL-P2 COMMAND,CTRL-P3 COMMAND! LEFT MARGIN,HORIZONTAL TEXT WIDTH,TOP MARGIN,VERTICAL TEXT LENGTH,DEFAULT TABS,FORMATTER LEFT MARGIN,FORMATTER RIGHT MARGIN,RIGHT-JUSTIFICATION ENABLED,FORMATTER LINE SPACING`"MODCARD,PADDLE FOR X COORDINATE,PADDLE FOR Y COORDINATE,CONFIRM CMD COMMANDS,KEYBOARD BUFFER SIZE,LOWER CASE VIDEO,KEYBOARD MODIFIED,PRINTER SLOT,FORM FEED OK,USING CONTINUOUS FORM,LINES PER PAGEA!z NEW LINE COMMANDS,EMPTY LINE COMMANDS,NULLS AFTER NEW LINSE69),A(25)(BASE11), (BASE70),A(26)A*(BASE71),A(27)|4A(28)0Ĺ(BASE65),237:(BASE66),253:(BASE67),32:>(BASE66),A(29)192HJ13:(BASE72J),CNL(J):R(BASE72),A(31)\(BASE67),A(32)f p DO YOU HAVE A RAM CQ(J1):1J06:(BASE37J),CR(J1):SJ06:(BASE45J),CS(J1):Yp(BASE11),A(19)1(BASE5),A(20)1(BASE9),A(21)(BASE10),A(22)J06:(BASE53J),DT(J1): (BASE68),A(24)(BASE11)(BA,A(7) :0D(BASE64),A(8)192:(BASE63),0CN(BASE6),A(9)WX(BASE7),A(10)kb(BASE8),A(11)lJ13:(BASE12J),NL(J):vJ13:(BASE16J),EL(J):(BASE4),A(14)J06:(BASE21J),CP(J1): J06:(BASE29J),192:A(29)1A(29)6A(29)0FA(30)0:J13:CNL(J)(BASE72J):[A(31)(BASE72)pA(32)(BASE67)vBASE79,A(1)(BASE61),A(2)(BASE62),A(3)(BASE3),(A(4)1)64(BASE2),A(5)&(BASE77),A(6)0(BASE78)ASE9)rA(22)(BASE10)F|A(23)1:J06:DT(J1)(BASE53J):LlA(24)(BASE68)(BASE11)A(25)(BASE69)(BASE11)A(26)(BASE70)A(27)(BASE71)A(28)255:(BASE65)237(BASE66)253A(28)0A(29)(BASE66)BASE4) 8A(15)1:J06:CP(J1)(BASE21J):c"A(16)1:J06:CQ(J1)(BASE29J):i,6A(17)1:J06:CR(J1)(BASE37J):@A(18)1:J06:CS(J1)(BASE45J):JTA(19)(BASE11)1^A(20)(BASE5)1hA(21)(BSE77)A(7)(BASE78) 8A(8)(BASE64)192KA(9)(BASE6)_A(10)(BASE7)sA(11)(BASE8)A(12)1:NL(1)(BASE13):NL(2)(BASE14):NL(3)(BASE15)A(13)1:EL(1)(BASE17):EL(2)(BASE18):EL(3)(BASE19)A(14)(B(K)):36,35:868:36,39(A$):A$:B(K)0ĭK3KK1:B(K)0:1360OZ:1240xd(4);"BSAVE CONFIGFILE,A$4800,L$50"n(4)"RUNMENU"xA(1)(BASE79)A(2)(BASE61)A(3)(BASE62)A(4)(BASE3)641A(5)(BASE2)A(6)(BA1350  1608A24(B(BASE11)B60)ĺ(7);:1250nA25(B(A(24)L15)B(BASE5)1)ĺ(7);:1250(A27(B1B5)ĺ(7);:12502A29(B1B7)ĺ(7);:1250<A(A)B:1160FK13:V10K:B(K)CNL(K):200CPCNL(K)B(K):10K:A$(HPGB 2  @ P RIGHT-JUSTIFICATION ENABLED,FORMATTER LINE SPACING"MODEM INSTALLED,MODEM SLOT,MODEM NEW LINE SEQUENCE,NULLS AFTER MODEM NEW LINE,END OF FILE CHARACTER NEW LINE COMMANDS,EMPTY LINE COMMANDS,NULLS AFTER NEW LINE,CTRL-P0 COMMAND,CTRL-P1 COMMAND,CTRL-P2 COMMAND,CTRL-P3 COMMAND2" LEFT MARGIN,HORIZONTAL TEXT WIDTH,TOP MARGIN,VERTICAL TEXT LENGTH,DEFAULT TABS,FORMATTER LEFT MARGIN,FORMATTER RIGHT MARGIN,,A(31) \(BASE67),A(32)! f p DO YOU HAVE A RAM CARD,PADDLE FOR X COORDINATE,PADDLE FOR Y COORDINATE,CONFIRM CMD COMMANDS,KEYBOARD BUFFER SIZE,LOWER CASE VIDEO,KEYBOARD MODIFIED,PRINTER SLOT,FORM FEED OK,USING CONTINUOUS FORM,LINES PER PAGE|!z% (BASE68),A(24)(BASE11)E(BASE69),A(25)(BASE11)Z (BASE70),A(26)o*(BASE71),A(27)4A(28)0Ĺ(BASE65),237:(BASE66),253:(BASE67),32:>(BASE65),0:(BASE66),A(29)192HJ13:(BASE72J),CNL(J): R(BASE72)(BASE21J),CP(J1):7J06:(BASE29J),CQ(J1):=_J06:(BASE37J),CR(J1):J06:(BASE45J),CS(J1):(BASE11),A(19)1(BASE5),A(20)1(BASE9),A(21)(BASE10),A(22)J06:(BASE53J),DT(J1):ASE2),A(5)&(BASE77),A(6)30(BASE78),A(7)9:^D(BASE64),A(8)192:(BASE63),0qN(BASE6),A(9)X(BASE7),A(10)b(BASE8),A(11)lJ13:(BASE12J),NL(J):vJ13:(BASE16J),EL(J):(BASE4),A(14)J06:37(BASE66)253A(28)0KA(29)(BASE66)192:A(29)1A(29)6A(29)0tA(30)0:J13:CNL(J)(BASE72J):A(31)(BASE72)A(32)(BASE67)BASE79,A(1)(BASE61),A(2)(BASE62),A(3)(BASE3),(A(4)1)64 (BBASE11)1 ^A(20)(BASE5)14hA(21)(BASE9)IrA(22)(BASE10)t|A(23)1:J06:DT(J1)(BASE53J):zA(24)(BASE68)(BASE11)A(25)(BASE69)(BASE11)A(26)(BASE70)A(27)(BASE71)A(28)255:(BASE65)2EL(2)(BASE18):EL(3)(BASE19)5A(14)(BASE4);fA(15)1:J06:CP(J1)(BASE21J):"A(16)1:J06:CQ(J1)(BASE29J):,6A(17)1:J06:CR(J1)(BASE37J):@A(18)1:J06:CS(J1)(BASE45J):J TA(19)((BASE3)641 A(5)(BASE2)4A(6)(BASE77)HA(7)(BASE78)NfA(8)(BASE64)192yA(9)(BASE6)A(10)(BASE7)A(11)(BASE8)A(12)1:NL(1)(BASE13):NL(2)(BASE14):NL(3)(BASE15)!A(13)1:EL(1)(BASE17):K:B(K)CNL(K):200qPCNL(K)B(K):10K:A$(B(K)):36,35:868:36,39(A$):A$:B(K)0ĭK3KK1:B(K)0:1360}Z:1240d(4);"BSAVE CONFIGFILE,A$4800,L$50"n(4)"RUNMENU"xA(1)(BASE79)A(2)(BASE61)A(3)(BASE62) A(4)#A26A28A(A)255A(A):11602A301350; 160fA24(B(BASE11)B60)ĺ(7);:1250A25(B(A(24)L15)B(BASE5)1)ĺ(7);:1250(A27(B1B5)ĺ(7);:12502A29(B1B7)ĺ(7);:1250<A(A)B:1160FK13:V10)") ",4);A$(J);:A$(A(J))CJ26J28A$"YES":A(J)0A$"NO"J30āK12:A$(CNL(K)):36,39(A$):A$::A$(CNL(3))36,39(A$):A$140:EF1İ2060:1380A(28)0(A24A28)İ2060:280A(28)0(A24A32)İ2060:2800.`BB(K1)1B(A(19)A(20))ĺ(7);:1110jDT(K)B(K):(8K):A$(B(K)):36,35:868:36,39(A$):A$:B(K)0ĭK7KK1:B(K)0:1130t:1010~2000:1680:J2432J28A(28)01230J30J31āK139:"-";::(" "(J2000:1380A19A251150.A2311007160SA19B99ĺ(7);:1020w$A20(B40B254)ĺ(7);:1020.A19BA(9)ĺ(7);:10208A22(B1B(A(11)A(21)))ĺ(7);:1020BA(A)B:970LK17:V8K:B(K)DT(K)V200:B011368:36,39(A$):A$:B(K)0ĭK7KK1:B(K)0:920=:880M1970:1620r:J1923:J23āK140:"-";:(" "(J)") ",4);A$(J);:A$(A(J))J23āK16:A$(DT(K)):36,39(A$):A$::A$(DT(7))36,39(A$):A$: 140:EF114:3:"TRANSMITTED WHEN CTRL-P3";:15:3:"IS FOUND IN THE TEXT.";`p140:EF1İ1970:1380szA17A18960AA17:K17:V3A8K:B(K)CR(K):(A)B(K)CS(K)200A0CR(K)B(K)A1CS(K)B(K)2(3A8K):A$(B(K)):36,35:8$*:J1718:J18āK140:"-";:O4(" "(J)") ",4);A$(J);:A$(A(J))>J17āK17:A$(CR(K)):36,39(A$):A$:HJ18āK17:A$(CS(K)):36,39(A$):A$:R\6:3:"TRANSMITTED WHEN CTRL-P2";:7:3:"IS FOUND IN THE TEXT.";Ef:EF1İ1940:1380%A15A16800\AA15:K17:V3A8K:B(K)CP(K):(A)B(K)CQ(K)e200yA0CP(K)B(K)A1CQ(K)B(K) (3A8K):A$(B(K)):36,35:868:36,39(A$):A$:B(K)0ĭK7KK1:B(K)0:760:720 1940:1590$):A$:8J16āK17:A$(CQ(K)):36,39(A$):A$:>6:3:"USED TO INITIALIZE THE";:7:3:"PRINTER AND ALSO SENT IF";:8:3:"CTRL-P0 IS FOUND IN THE TEXT.";14:3:"TRANSMITTED WHEN CTRL-P1";:15:3:"IS FOUND IN THE TEXT.";140K)bA1EL(K)B(K)ml(8A4K):A$(B(K)):36,35:868:36,39(A$):A$:B(K)0ĭK3KK1:B(K)0:600xv:5101860:1560:J1516:J16āK140:"-";:(" "(J)") ",4);A$(J);:A$(A(J))J15āK17:A$(CP(K)):36,39(A(A$):A$:% 140:EF1İ1860:13807 A8A14640X A9A10A(A)255A(A):450k A12A13580t &160 0A8(B1B7)ĺ(7);:520 :A12A14A(A)B:450 DAA12:K13:V8A4K:B(K)NL(K):(A)B(K)EL(K) N200XA0NL(K)B(1480) :J814:J11āK140:"-";:T (" "(J)") ",4);A$(J);:A$(A(J)){ J9J10A$"YES":A(J)0A$"NO" J12āK12:A$(NL(K)):36,39(A$):A$::A$(NL(3)) J13āK12:A$(EL(K)):36,39(A$):A$::A$(EL(3)) 36,390 JA1A7440, TA4A(4)1A(4):290H ^A1A(1)255A(1):290h hA6A7A(A)255A(A):290q r160 |A1420 B13568B0ĺ(7):330 B((978)7)256ĺ(7):330 A(1)B:290 A5B1ĺ(7):330 A(A)B:290 1780: V255R NL32:A$(NL),A(NL),NL(3),EL(3),CP(7),CQ(7),CR(7),CS(7),DT(7),CNL(3)g J1NL:A$(J):q 1400 ":J17:(" "(J)") ",4);A$(J); ,A$(A(J)):J1J4J5A$"YES":A(J)0A$"NO" 636,39(A$):A$: @140:EF1İ1780:138868:"CHANGE PARAMETER "A" TO ? ";:"";B$:B(B$)< A1ıW B0B255ĺ(7);:160] x V:37:"";B$:B$""ı B(B$):B0B255ĺ(7);:200 B(K)B: :(6):"PEN-PAL CONFIGURATION SYSTEM" 6:J128:"-";:::10:1::34,3::/ COPYRIGHT 1983 BY CHRIS AND ANN MOLLERKd(4)"BLOAD CONFIGFILE"en::(4)"NOMONC,I,O"xBASE18432: $4800230EF0:22:1:868:"ENTER: NUMBER, M)ENU, OR ";:"";A$:A$"M"A$"m"EF1:A(A$):1 22:1:         D" "RUN"Y D$"CLOSE";TF$:D$"DELETEDD":15:"YOUR DATA DISKETTE IS NOW PREPARED." 21:"REMOVE THE DATA DISKETTE AND INSERT THE PEN-PAL DISKETTE. NEXT, PRESS .":RET$::RET$(13)200 22:(4)"RUNMENU"CREATOR") D$"OPEN";TF$:D$"WRITE";TF$j "0HOME:D$=CHR$(4):?"Q$"ENTER YOUR APPLESOFT PROGRAM NAME"Q$ "1INPUTNA$:?D$"Q$"OPEN"Q$";NA$:?D$"Q$"WRITE"Q$";NA$" "2?CHR$(1);:LIST 5 - :?D$"Q$"CLOSE"Q$"NA$:?:?"Q$"YOUR PROGRAM IS NOW NAMED "Q$";NA$:EN BE SURETO REMOVE THE PEN-PAL DISKETTE TO PROCEED." <13:"ARE YOU SURE YOU WANT TO PROCEED? ";::"N":13:35:YES$:YES$::YES$"Y"ĺ"RETURNING TO MENU":(4)"RUNMENU" Z:11::"INITIALIZING"::(4)"INITDD" dD$(4):Q$(34):TF$"FILE  2008:5:"CREATE PEN-PAL DATA DISKETTES":4"REMOVE THE PEN-PAL DISKETTE AND INSERT A NEW DISKETTE. NEXT, PRESS .":RET$::RET$(13)309 2::"CAUTION";::": INITIALIZATION ERASES ALL THE INFORMATION ON THE DISKETTE! SO  NOT FOUNfO DISK I/OQ DISK FULL LOCKE MISMATC DOS ERRONAME? NEW PAG'S FRE MEMOR GO T= RANGEQ ILLEGAL=& STRINNEWY?OLD[ALL OR SOME_? REPLACY NOT FOUN TAPEbQ INPU SLOT DRIVE VOLUM DEFIN DELET END O COP CANNO OR COMMAN CHARACTE BEGINNING O WHOLEc( AFTER"$# WITHIN#INSUFFICIENTUNO MENUS IN THIS VERSION AT CURSO MOV JUSTIF FORMA LEF MARGI;< SCROLJUST? (Y/N) TYPEOP P WRITE-PROTECTEDP @FP\cfjo{CMD ALTERNATE DISPLAV(#5 ELIMINATE TAB FINDY< & PAGINATE KILL THIS LIN LOAD57 NULLIFY MARKER PRINT% QUI_Y SAVE% SET/CLEAR TAB5 UNUSEDU SIZf CATALO("V"CMD-# = BLOC FIL{R<߁ du%Hs 1  CDJLPRST"&5mwЅ? :契<=  LɅ67` Lƺ0`Y}$ 0  L ݩ`m 7tɥ0uZ) tK =mwЅ?>?> +aL  m0 g ^,Y ymvЅyzmwЅz` X .XX   l 6L`$0 ҩ ƖiDL  1mj~斄Ė㥨` <^ 0d b V <^ 0e b G  AL,, ӈ`H \h  hh` 8kvХlw`tЅ=i?`yŠ  $ CӦ ĕ CƘ y$ X ML慕 ƕ` ӤĘ򦱆X X ƕ` Ȅ` !` ҅Y@'p9)_X V! Ӣ 9  ǥY C!` CөXw8` ҡ} V ҡ} Vl /馗А HȄČӠȱ} ? V 0 0 C+ Cө X ҈X L7 CӦX L L5ȱĘ 8啐ᤘĕ CLg8啅X" 4 LX Cӥ = L  XX 0  .X SL<礘ȄĨ 䑣 ƗL WL8ii`8哅8哅`` ``L`` u8fu ӆZццхх 4酨 X $0 LCӠX L祠 Lघ 7X ^LX  LYLY C奼ź Ź`hh*L}~`撢` H h`zWyQ Ңy y} 8榕yz8}呅}~咅~ 0 W摣ƢƤ Ɨ` WL婹 ҆} 8哅}y 8榕}~yeyzez ұ0*ľ XLK, Ls *$ `澥А X , ZІ sƕ` B􅡽C􅢠 s` l  V*=0: V8 s $Ɨ  :  s  XX`ȱ Vп : Ԣ`H Fu8&u` $u Čwą A =۩` `Tu R斤Ĉ< Ա  &Ɩ斤Ĉ{0𤕄uj d`uJ ݠU` UVu` ץuIuL M!h    L ݢ` \ߠ զ`)i*`ŔU 󅣹`HHH PiQ)?iQK敱0 =E 敱 \LȱЧ) Ȅhhh`ȱeТ 敱) ! \L泦U V Fuu Rդ" Č G s&uJ G Č  - ަxx Lݠȑċw`uTFuuR 9 `luT <੠SU  إ  <॔d  `A[)Ls⥔ 0ߥ Q&)H < `)@E$0 A՘` i 8嗪K݅ Fuu(`(` ` >Ԥ,ߑ`ܥ` >Ԥ`  0`إ ۦdd3 : 'uJ Rձ UU Rե   L$uʩ dd [,  ݥ`ƵLܩ,a0,b $u Euuuu ܰ,Ƨ {ݮ إ O0 6Ɨ3 +Ɨ( إ *0 -Ɨ Ɨ ݩSU L۠ ƨL ܩ2Ƨ {),", 0 AՊ` ƪ $u0  C Աȑ` Ȅ8 8 ۩`$u0+ ԅ Rȱ 8$u0 Ҥ`Ҥ ,0` JĐ ȄL? .xwʊ)Ѧď&Ȅ`ƽd AمwUUVu` $u0 ڤwxćx`  U i Ӡ eש`  U Rթ` Ll `  RLz   /昤ċ ԥŞŝ𵤌  G ڢ Ӥ ֩`  LƘ Lإ &Ŝś۱ H 8مj8`$u0!,ʆ!ʆ,x ӥei &ԥ` R Ա` Rձ`x Ax`x Ax` ƕ` ƕ` 8ąƚ` A $uČ` 82w wUTVU` $u0*w `x䇰W Ux`xL Gx`` Aw   Lؤ u)u`ę şŠ` VH H h  hLӱ } V LC` %ҭ\]}؍I آUʆ Lݭ)Ѫ ؅ ؅`` ؄pd` ب`i8 0ӤL(Ԥē  Č ӢȄČ Ȅ Č ` ۩ ֤ $u  VIČȄ $u*& V! CӤē CƘ Lԩ Č$up` RՄ Ӡ /ؕ 8 V$ Ɨ  ƕYʆ إx8weŅŋe8包ww Rե8x eƗ RդxȄ Ɨ զ` Aƚ`Lڱ ``` ۤH ֤$u V[ $u H h V IQɮ.ꤕ{`, I`` 0)_  @)᩠, 0$Q`x ӥwe8充`$u0H R  Ҥ ԥō ۥŎ R Ҥ ō ۥŞu @u`x x  oբ R  V Ɨƕ Rթ eYei` Ӥ`8勅` NԅOԅ`((((PPPP` (Ԧ` >Ԥ$up kեuJ, RU,S A$u0 < Mअ ƕƓ  8 ӥ0   ~``yz``q %y ` ҡy0  ҩ 詀iۢy `r %} ` ҡ}0  ҩ 詀iۢ} Ԡ,`uiui ```# > ?঱`哪 &`Č Laة!Ѕ#ʆʆ!ʆ`I`i7ТlSHЕSh`I`ii) JJJJ ,{Ĉ؈`$q0( ҡy0`0 y ҩ ` q`$r0( ҡ}0`0 } ҩ ` r`}~}`}~`yzy6A F OGRЩэЩaЩ؍ТlSI % /ةuqrwxx .8mЅ{i|{eZ|i[Z RҢ efeeefifeeef8eyiz ҭЅ~Ѕ} ө C 'L!L!ʠѠؠĠƠɠ °РĠ IJҰ٠Ġ Ơɠ °Šà֠֠ƠΠРҠƠ ΠĠŠ°à Š֠² IB@ 6A86            b@Ll  . $ ; &?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*:` `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,--&   LLЭLЭLVE VOLUMŚUST? (Y/N) TYPEOP P WRITE-PROTECTEDP  NOT FOUNfO DISK I/OQ DISK FULL LOCKE MISMATC DOS ERRONAME? NEW PAG'S FRE MEMOR GO T= RANGEQ ILLEGAL=& STRINNEWY?OLD[ALL OR SOME_? REPLACY NOT FOUN TAPEbQ INPU SLOT DRIFTER VIA *806G,OR ]CALL 2054B 4CEMBEDDED=&S!P FORCES!T SET TITLE!C CENTRE LINE!L >?!R ;?!S  LINE SPACING!J @!D DISABLE@B AT CURSO MOV DOW CTL MEN RIGH JUSTIF FORMA LEF MARGI;< SCROLCMD 0-4 OTHER:JP9X 7689Q A>9E A;9R RESTORE6ESC =CAPS/UNLOCK-CAPSESC,ESC = CAPS-LOCKPADDLES - A! UP/8B 1CBASIC&S:ABZKb/OUTPUT:PLSB 2CYS:FR MANIPULATION:XYNCDMB 3CTAB CONTROL:TEJUVQRE-ENTER A PEN-PAL V2.1:>/; END O COP CANNO OR COMMAN CHARACTE BEGINNING O WHOLEc( AFTER"$# WITHIN#INSUFFICIENTU 0CCONTROL-KEY OPERATIONS:9A & MODE9C ABORT&9I INSERT'S9D '9T TAB <- -> 76!9W 76 UCMD ALTERNATE DISPLAV(#5 ELIMINATE TAB FINDY< & PAGINATE KILL THIS LIN LOAD57 NULLIFY MARKER PRINT% QUI_Y SAVE% SET/CLEAR TAB5 UNUSEDU SIZf CATALO("V"CMD-# = BLOC FIL DEFIN DELETY$~"Qh)$}"":  CDJLPRST  "&5JYgu```` *.9DMVZ`hqy +󤟢 H+m@`V烈୛ L+`{B+ȹB+  5% & L[+Ɩƴƶצ!hhhh` +L+@)_ 'L+)L c]crb1!~!!!!!"=";U 1)"""v  4*L])L)V0妕)_ƕ $u0`L & /`WW0i  ٛ+ $V0 @ ٛ $<ň0ٛ,Wȹиm $ `m` 8` Е LƖʆxw LH EhLVH Eh e^Ș^ ' ^)`H +(h8`^ )`` )*[ * 4* / ?* * $ ƗܥT)uu` )*\ *nZ *] *AS  L~)n 4* ?* *n!^ *YN  L) 4* / W }@`  ` ` U'` A'`^)$m0 m +(8``^ '``ɱɳ)b`ɱ ɸ b``wHx %^ (` /y^ȭz^ȑ^ȑ^^ (H +(h8`L+(^ȑ^w^ȩ^^L'^ (` i# +(`y^ȭz^yȑ^zȑ^^Л` `)0:) e`8` ^_ bc{{`^ ^L'{^ȩ^$m,m^ {'H 6(h8` 'a``Hȱ`ah` ahh 8``$ߩ`L'^^ȑ^bJJJJ^b^n^``H$h^  ^` U' 8}y~z` ER emn{ ' H+{ L & '{{ɬL&Z{ɠɬ-1 L &mЩm{ K( { <(жL &{ 'nLd&{{ `͠Š {& m( $L% )$- /Y$ p   O ?. hԥL$ j # ` 7  Х % %wZx x# % &my>mz? /<= % # L%6%7` Lƺ0`Y}y~z`8L{$ # `m x# #7wɥ0xZ) i#K # =mz?>?> #+aL   &m0 (g (^,Y ymyyzmzz` X (.XX  l +(L{$`$0 ƖiDL   & &mj~ ' % _ # ' E^ 0d W# K(  E^ 0e W# <(  {' 6(L$,, `H eh  (hh` 8kylz`w=i?`yŠ88埐1-  $ F ĕ F Ƙ n $ " X B L ƕ` Ę򦱆X X ƕ` Ȅ` !` Y@'p9)_X Y!  B ǥY F !` F Xw8` } Y } Yl $! H F hH F h ? Y 0 0 F + F X X L, F X L L* ȱĘ 8啐ᤘĕ F L\8啅X" )! { LX F 2 { L  XX 0  .X SL1ȄĨ L LL8ii`8哅8哅`` ``L ``  u8fu   Z    )! X $0 LF X L { L 7X ^LX  ȄČӠȱ}Y 8ź Ź`hh*L}~`撢` H h`zWyQ y y} -yz8}呅}~咅~ 0 LƢƤ Ɨ` LL } 8哅}y -}~yeyzez 0 Ɨ@, Lh $ `澥 X , O hƕ` 7,8, h` l   Y*=0: Y8 h $Ɨ  /  h  XX`ȱ Yп / ED  NYhh` LYLflkl`6 텣`   / 7  EX h &L$0 /'Y p H .L? hL@ p h  # /`) OL@!  hLX XL@@)_P"T) / YXL@H! hhА ,0 S $ X ľ XL{`  n D0`   n D0` `  ʆxʆw`\]I J hhLi-H h eL  E8kHllhkh$Ɠ 'ƓʢTL'd   kň`  `8}yk~zl8kekl  Bwx` U    ^`Lv  `zź ~+L   k呥l咰,L} - ` ;` ) Y` 8 `}~}   L ``  L ``$u0` U {IL泦 A `H  Eh ` e (`   @)_  ` V!`LA Fu8&u` $u Čwą D @` `Tu U 斤Ĉ<   &Ɩ斤Ĉ{0𤕄uj d`uJ U` UVu` uIuL E *h     L Lh e  `)i,`ŔU ++`HHH E,iF,)?i-F,K敱0  =E 敱 eLȱЧ)  Ȅhhh`ȱeТ 敱) * eU Y Fuu U " Č J v&uJ J Č   0 xx Lȑċw`uTFuuR B LhluT ESU    Ed  `A[)Lh 9 F,&)H`)@E$0 D ` i 8嗪N Fuu(`(` ` A ,ߑ`ܥ` A `  0`إ dd3 : 'uJ U UU U    L$uʩ dd ^,  `Ƶ L,a0,b $u Euuuu ܰ,Ƨ ~  O0 6Ɨ3 +Ɨ(  *0 0Ɨ Ɨ SU L ƨL2Ƨ ~),",# 0 D ` ƪ $u0  F  ȑ` Ȅ8 ; `$u0+  U ȱ 8$u0 `Ҥ ,0` JĐ ȄL? .xw ʊ) ď&Ȅ`ƽd DwUUVu` $u0 wxćx`  X l h`  X U ` Lo c  U L}   2昤ċ  Şŝ𵤌  J  `  OƘ O ) Ŝś۱ H ;j8`$u0!,ʆ!ʆ,x ei ) ` U  ` U `x Dx`x Dx` ƕ` ƕ` ;ąƚ` D $uČ` ;2w wUTVU` $u0*w `x䇰W Xx`xL Jx`` Dw #     O #u)u`ę şŠ` YH H h  hL } Y LF ` ( \]I  Uʆ L )    `` pd` `i8 0 L+ ē Č ȄČ Ȅ Č `   $u  YIČȄ $u*& Y! F ē F Ƙ L Č$up`  U 2 ;  Y$  Ɨ   ƕYʆ  x8weŅŋe8包ww U 8x hƗ U xȄ Ɨ ` Dƚ`L ``` H $u Y[ $u H h  Y IQɮ.ꤕ{`,"  I`` 0)_  @)᩠,# 0$Q`x we8充`$u0H U   ō Ŏ U ō Şu @u`x x  r U   Y Ɨƕ U eYei` `8勅` Q R `((((PPPP` + ` A $up n uJ, RU,S D $u0 E V ƕƓ  ; 0   ``yz``q %y ` y0  詀iۢy `r %} ` }0  詀iۢ} Ԡ,`uiui ```# A H`哪 ) `Č Ld 2#ʆʆ!ʆ` I `i7 lSH Sh ` I `ii) JJJJ ,{Ĉ؈`$q0( y0`0 y ` q`$r0( }0`0 } ` r`}~}`}~`yzy6A F OGU dlS  I  ( /ةuqrwxx #'8m{i|{eZ|i[Z U efeeefifeeef8eyiz ~} F *L$ L$ ڠҠIJɠʠ²ѠؠĠƠ °РĠ ڠIJҰʠٰ  Š֠ ΠΠijƠ ŠιưҠ IB@ 6A86"""!!! ! ! ! ! !!!!!!!!!                :"NOTICE: THE APPLESOFT EDITOR SHOULD ONLYBE USED TO EDIT OR CREATE APPLESOFT PRO-GRAMS."::"LOAD THE APPLESOFT EDITOR (Y/N) ";:Y$:lY$"Y"640vY$"y"110230(4)"RUNDATA DISK": EDITOR":4:"THE PEN-PAL DATA DISKETTE WHICH YOU CREATE BY MENU SELECTION 4, HAS A PROG- RAM CALLED 'FILE CREATOR'.":7X:"'FILE CREATOR' WILL CHANGE AN APPLESOFT PROGRAM INTO A TEXT FILE IF YOU WISH TO EDIT IT BY USING THE APPLESOFT EDITOR."b,1,208,2,169,0,141,0 D 3,104,205,0,224,240,3,173,128,192,96 \769:(768)1570}(4);"BLOAD MON.OBJ,A$F800"&(4);"BLOAD PPHI.OBJ,A$D000"0(4);"BRUN PP:(4);"BRUN PENPAL.OBJ"D(4)"RUNCONFIG"|N:8:"APPLESOFT PROGRAM79)0570#J768832:H:J,H:H --POKE LANGUAGE CARD FINDER  0,173,0,224,72,173,129,192,104,72,205,0,224,208,35,173,131,192,173,131,192,169,165,141,0,208,205 0,208,208,19,74,141,0,208,205,0,208,208,10,173,129,192,173,129,192,169h"THE SCREEN.";- rB$::(20):(12):"O";9 |H1:V1] X1(X):Y1(Y):(H):(V):" ";s H148X1:H1H1 V140Y1:V1V1 H39H39 V23V23 H20V12Ė16:12:"PEN-PAL":470 (H):(V):"X"; J150::390 :(BE PADDLES? ,A0(X):A1(Y):D25:(A0128)D(A1128)D470N 6:5:(7)| @"TO USE PADDLES WITH PEN-PAL, THEY MUST" J"BE CENTERED BEFORE YOU BEGIN.": T"PRESS ANY KEY, THEN MOVE THE PADDLES" ^"UNTIL THE O AND X ARE IN THE CENTER OF" );"BLOAD CONFIGFILE"= B18432: $4800=BASE OF CONFIGFILEb SET WIDTH FOR APPLESOFT EDITOR SEL3Ĺ18437,160::"THE PEN-PAL EDITOR IS BEING LOADED."  FIND OUT WHICH PADDLES TO USE X(B61):Y(B62):X254İ470 "X4470:NONSENSS ":20:26:R$::R$(13)ĢV:H:SEL$:130R SEL230,580,590,650,660 THE PEN-PAL PROGRAM,CONFIGURE PEN-PAL,APPLESOFT EDITOR,INITIALIZE DATA DISKETTES,END 169,32,32,168,252,160,32,169,10,32,168,252,173,48,192,136,208,245,96 (4ION ";:868:SEL$::SEL(SEL$):SEL1SEL5130W 768::SEL$"1"ĢV:H:SEL$:190| SEL$"2"VV2:V:H:SEL$:190 SEL$"3"VV4:V:H:SEL$:190 SEL$"4"VV6:V:H:SEL$:190 SEL$"5"VV8:V:H:SEL$:1905 :20:11:"PRES / COPYRIGHT 1983 BY CHRIS AND ANN MOLLERddI15:CH$(I)::H8:V7:I018:SO:768I,SO:n::13::" PEN-PAL MENU ":::3:"COPYRIGHT 1983 BY CHRIS & ANN MOLLER":I039:"-";:x7:I15:8:I;" ";CH$(I)::1 11:20:V7:"SELECT" " " " " """""" H(175)(176)256:H772(4)"RUNMENU" X췩뷩   %췭,T,W,R,P` ""