' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?   1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- ( 0 Ϡ@跻~!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 ~(` i d ֠z# u` L 7 RX,tk#}"%5  8 \ 8 C; 8 \ 8 A; n 8 o 8 \ 8 A; : L 8 \ 8 C; _8 o L  8 \ 8 C; 8 \ 8 A; n c 8 o 8 \ 8 A; n Y8 (L 8 \ 8 C; : o 8 A 8 \ 8 \ 8 C; 8 k8 o L 5 X 8 \ _8 A; n 8 8 \ _8 C; _8 o  8 \ _8 C; 8 o 8 8  8 \ _8 A; n Y8 $L 8 \ _8 C; : o 8 \ 8 C; c: o + +9 > 49 ]  Z; 8 ; ;    ; 7  8 1 X; L 18 A; n 8 o 8 \ _8 A; n G8 LD 8 \ _8 C; 8 o 8 \ _8 A; n 8 (L| 8 \ _8 C; 8 J8 o 8 \ 8 C; 8 \ 8 A; n 8 o 8 \ 8 A; n h8 L 8 \ 8 C; 8 o 8 \ 8 A; n 8 (L 8 `  _8 A "9 T 8 ;` 8 ; 8 \ _8 ;    H: 7 A 8 \ _8 ; P; _8  N;  7 '  T 1 : > 8 \ _8 ;  T 8 A 8 \ 8 A; T`  _8 8 _8 8 7  8 8L 8 8L 8 8L 8 8 8 \ _8 C; 8 \ _ q,$` L( L5 LD 8 XL XLR XQHPH RPhPhQ8 XL.0'L+ LfLLLLL ꥪLYԨé D?;=D? L1 'L : > 8 \ _8 A; T ; > 8 \ 8 A; TӠƹӠ HBAYR RRAADY YDAARR RYABH* :: (YTW):GYLYY5254,LX:255,LY:250,GX:251,GY:@EXIT?i24:O1::"E";::"XIT ";::"C";:"LEAR WORK AREA ";::"B";::"ACK TO SEARCHWORD";16384,128:A$:A$"E"A$"C"A$"B"1730O1:24:64578:A$"C"Ĭ A$"B"330:13509h:"COLUMNS IN SEARCHWORD =>";X:X38X51640ir:"ROWS IN SEARCHWORD =>";Y:Y23Y51650|X(X):Y(Y):AO1Y:WS$(A)(WS$(Z),X):AO1NW:W$(O1,A)"":W$(Z,A)"":W%(Z,A)Z:W%(O1,A)Z:W%(TW,A)TW:LX20(XTW):GXLXX:LY11".":AO15:WS$(Z)WS$(Z)WS$(Z):V@:::5)"CORE WORD SEARCH EDITOR/CREATOR":4J:"PRINTER SLOT =>";PR:PR7PRZ1610TPR(PR)::"CHARACTERS PER LINE =>";PX:PX40PX2551620^:"DISK ACCESS? (Y/N) N"(8);:A$:(37):64578:A$"Y"ġTIALIZE VARIABLESFAO1XYZTWLXLYGXGYNWBPRPXWOMLXSYSA$"":K$"IJKMAPDLNEG"(8)(21)(27):G$(7):M$(13)W$(1,75),WS$(24),W%(2,75)"O11:Z0:TW2:WOO1:ML768,(768)6ĺ(4)"BLOAD WORD SEARCHER.OBJ,A$300"#6WS$(Z)$:T$"OPEN"A$CT$"READ"A$:NW,X,Y:AO1NW:A$,W$(Z,A),W$(O1,A)rBZTW:W%(B,A)((A$,BO1))63:::1680T$"CLOSE":1360(A$,O1)"B"Ĺ222,11:1520A$"X"Ĺ216,Z::300T$A$W$:1360932::"ERROR #"(222)G$:1360INIn(A$,4)"SAVE"1440IxA$(A$,(A$)4):T$"OPEN"A$W$:T$"DELETE"A$rT$"OPEN"A$:T$"WRITE"A$:NW","X","YAO1NW:BZTW:(63W%(B,A));:","W$(Z,A)","W$(O1,A)::1480(A$,4)"LOAD"1490 1670:A$(A$,(A$)4):T$"VERIFY"A$WO1:Z,Z:ML:WS$(A)""B2BO1X:WS$(A)WS$(A)((703B)):::S<DISK ACCESSF:5)"DISK ACCESS (TYPE 'X' TO EXIT)":34,O1:3P:"COMMAND=>";A$:(512(A$))Ģ(37):64578ZW$"":A512(A$)767:(A)W$W$((A)):dT$(4):1520WORD120:Z,Z:ML:120/Z,96::ML::>DROP WORDQ(Z)2551270oZ,128:ML:(Z)2551280G$;::330Z,96:120:ML: CONVERT SCREEN IMAGE24:O1:"ONE MOMENT PLEASE";O1,TW:249,X:AO1Y:252,LX(253,LYAW$,A,O1)" "A$A$(W$,A,O1)L:AO1NW:(A$)(W$(Z,A))Ă:ANW:1200BNWAO1:W$(Z,B)W$(Z,BO1):W%(TW,B)W%(TW,BO1)W%(Z,B)W%(Z,BO1):W%(O1,B)W%(O1,BO1):W$(Z,A)A$:W%(Z,A)Z:W%(O1,A)Z:W%(TW,A)TW:HIGHLIGHT THE CURRENT 8 A; o 7 \ 8 C; 8 7 \ 8 A; o 1 7 \ _8 ; X; o 7 \ _8 C; _8 o 7 \ 8 C; _8 o 7 \ 8 C; 8 o `  _8 A _8 Q 8 ;  _8 A =9 T w 8 ; s` _8 G ; $L+ _8 A 49 T 8 ; _8 G ; $L+ ;  { L L* b; 7  8 1 * L9* b; 7  8 1 X;  Z; 1 8 ; 9   X;  7 7 \ _8 ;  7 L* 1 9 7L/+ 9 ; 7  8  7 \ _8 ; 8 7 \ _8 ; o 7 \ 8 C; 8 7 \ 8 A; o 7 \ _8 C; 8 7 \ _( L?)L ) b; 5  ) Lp( 9 8 9 _8 8 C) 9 -: (Lp( ` 8 ; 9   7 \ 8 ; b; 2L) 1 9 \ 8 ; b; o L) 9 ; 7  8  7 \ 8 ; 8 7 \ 8 ; o 1 7 \ 8 ; b; o L) ) Z; 8 ; b;  ERASE WORDS IN MEMORY (Y/N) Y '  6:    d;L6(N b; 5 4( LR( 4 _8 9 8  : ; 9  j9 > 8 Q 'L(WORD => y(  d;  b;  n 8  7 b;  n 58 ;  7 b;  : ; L( ; L(TOO LONG (  Lp(L(X b; 5 7 b;  : ; L& C)LL# 8 ; 9   7 \ 8 ; P; 8 7 \ 8 ; N; L^' 7 aLj') g'  7 \ 8 ;  s +9 D u: L' 1 : > _8 QLL# X 9 L'WORD ENTRY (TYPE 'X' TO EXIT) '  9  9LR(L( wL&D &  sL&ELETE &  +9 > 49 ]  Z;L=&CLB&D X; 5 ;&  7 X; 5 @& ; L#& 9 D  : ;L&D X; 5 ~& L& 8 9 9L&DELETED &  LL# 'L& NEW WORD=> &  d;  b;  n 8  7 b;  n 58 ;  ; o 8 7 \ _8 C; 7 \ _8 A; o 8 7 \ 8 C; 7 \ 8 A; o 8 7 \ 8 C; 7 \ 8 A; o 1 9 \ _8 ;L% % o 9 \ 8 C; 8 o 9 \ _8 C; _8 o 9 \ 8 C; _8 o wL%C %  sL% HANGE OR %  ; b; L7$ 1 L#$?WORD NOT FOUND $  ;  LL# 7 8 8 ; 9   7 \ 8 ; b; Lm$ 1 7 8 8 ; 9   8 7 \ 8 ; 7 \ 8 ; o 1 9 \ 8 ;L$ $ o 8 8 ; 9   8 7 \ _8 ; 7 \ _8  7 8L + X 9 L5#EDIT WORDS (TYPE 'X' TO RETURN) #  j9 > 8 Q 'L]#WORD => U#  d;  Ls#X b; 5 q# L# L 9 Y8 $L# 'L b;  Y8 L# b;  \ 8 ; d;L# b; 5 # L' 8 ; 9   7 \ _8 8 ;  n 7 7 7   n 7 c 8 7 |9 8 7  7 8 aLF") C"  7 8 \ 8 ;  1 l;  _8 ?L^ + j9 > : T :  'L" GRAB WORD=> "  d;  X j9 > _8 Q 8 ; 9   7 \ _8 ; b; L" 1 ;  LL   ;  XL; READY THE PRINTER )   Z; 8 8 8 8 8 &Li 8 8 9 ?Ls ; 5 r L ;  n #8 c 8 i  ;  l;  8 ; >8   8L l;  8 8 #8 c 8 i  8 ; 8   8 Y8 $LINGLE SPACED OR   wL D   sL< OUBLE SPACED? .  +9 > 49 ]  Z;LaSLfD X; 5 _  7 X; 5 d ; L^ :  : ;L SINGLE SPACED   LD X; 5  L 8 8 : L DOUBLE SPACED   l: SS   wLESC    sL#APE   +9 > 49 ]  Z;LHWLMA X; 5 F  7 X; 5 K ; L 9  : ;L ANSWER SHEET   _8 8LW X; 5  L 8 8 9 L WORD SEARCH   :  wLS   s8 \ _8 A; n 8 8 8 8 \ _8 C; _8 o  8 8 \ _8 C; 8 o L 'L + , X : rLt PRINT OUT j  9  wLA   sLNSWER SHEET OR   wLW   sL ORD SEARCH?   _8 8 : LTO LEAVE PRE A; TL : 8 8 ; 9   7 \ _8 A; n Y8 $LA 1 ` 7 8  _8 A =9 T  8 ; 8 7 1 ` 8 8L} 8 8 + 8 8 8 9 L 8 8 8 8 (L 9 8  8 \ _8 A; n Y8 $L 8 \ _8 C; : o 8 \ 8 C; c: o L 7L 7L 7L 7L 7L 7L 7L 8  <K8=L 8=L 8=L 8=L 8  =8>L 8  >K8?AL 8?CL 7hLd7mLd7rL 7tL 7vLd7{Ld7L 7Ld7Ld7Ld7Ld7L 7L 7L 7L 7L 7Ld7L 7L 7L 7L 7L 7L 7L 7L 7L 7L 7L Ld<Ld<Ld7L 7L 7L 7L 7L 7!Ld7&L 7(Ld7-L 7/Ld74Ld79Ld7>L 7@Ld7EL 7GLd7LL 7NLd7SLd7XL 7ZL 7\Ld7aLd7fL;Ld;Ld;Ld;Ld;Ld;Ld;Ld;Ld;Ld;Ld;Ld;Ld;Ld;Ld;5 6 L XLcLc@@`" `0P%8  7/@ |B??;L ;Ld;Ld5  wL 6C  6  sL)6LEAR WORK AREA 6  wL96B 76  sLY6ACK TO SEARCHWORD G6  +9 > 49 ]  Z;L{6EL6CL6B X; 5 y6  7 X; 5 ~6 ;  7 X; 5 6 ; La6 8  :  : ;L6C X; 5 6 L6LL6B X; 8 ;L 5 5 o 7 \ _8 ;L$5 #5 o 7 \ _8 C; _8 o 7 \ 8 C; _8 o 7 \ 8 C; 8 o 1 8 8 # 9 8 8 M8 8 28 # 9 8 88 n8 ; > 8 Q #; > 8 Q : > P8 Q : > q8 Q` :  8  wL5E 5  sL5XIT L4 { L, 'L'4COLUMNS IN SEARCHWORD => 4  8  8 :  7 8 9 (; L4 'Lt4ROWS IN SEARCHWORD => ^4  ;8  >8 9  7 >8 9 (; LU4 8 # 8 >8 # ;8 8 ; >8   7 x; _8 v; 8  o 1 8 ; 9   7 \  9  'L!3PRINTER SLOT => 3  9  9 9  7 9 Y8 (; L3 9 # 9 'Lx3CHARACTERS PER LINE => a3  &8  )8 9 ( 7 )8 ?: ; LO3 L3DISK ACCESS? (Y/N) N 3  6:    Z; 9 D  : ;L3Y X; 5 3  :  ; ~:  n; a9 8 O9 \8 s9 8 8 8 Z: }8 X9 D 9 Lr2 9  Lg2BLOAD WORD SEARCHER.OBJ,A$300 I2  _8 x;L2. ~2 o 8 ; 9   _8 x; _8 v; P; _8 v; N;  o 1 X s 9 L2CORE WORD SEARCH EDITOR/CREATOR 2 L ;  X;  b;  L?- 9 8 L/1ERROR # '1  ; D ^ ;  L?- 8 8 $ 58 $ Y8 $ 8 $ 8 $ 8 $ G8 $ h8 $ 9 $ 7 $ 9 $ 8 $ 8 $ z8 $ 8 $ 8 $ 7L1 1 Z;L1 IJKMAPDLNEG 6:  1  P; :  N;  P; :  N;  ; ;8  8 ; 9   '  Z; 7 \ _8 ;  o 7 \ 8 ;  o  _8 ; 8   7 \ 7 C; 7 8 X; '  u 8; o 1 1 y5 ; L0CLOSE 0  L?-L0B X; 8  0 L0 ; > c: TL1L0X X; 5 0 L1 : > _8 Q  1 L /, /  7 \ _8 ; L(/, &/  7 \ 8 ;  1 L0LU/LOAD X; 9  P/ L0 4 X;  u 9 X;  Z; ; L/VERIFY /  X;  b;  ; L/OPEN /  X;  ; L/READ /  X;  '  9  8   u 9 X;  Z; ; L.OPEN .  X;  b;  ; LF.DELETE ?.  X;  ; Le.OPEN `.  X;  ; L.WRITE .  X;  9 aL., .  8 aL., .  >8 a 8 ; 9   _8 ; 8   7 \ 7 A; 5; 9 L"-DISK ACCESS (TYPE 'X' TO EXIT) -  j9 > 8 Q 9  'LR- COMMAND=> H-  Z;  X;  F9 DL- 9 D  : ;L- - d; X;  F9 ; ,;   7 GL- 7 G  b;  d; 1 9  ; 71L-SAVE X; 9  - LM/ X; _8 A =9 T  8 ;` :  8 L5,ONE MOMENT PLEASE #,  8 A 8 Q : > 8 Q 8 ; >8   : > 8 Q ; > 8 7 c 8 Q _8 A _8 Q 8 ; 7 x;L, , o 8 ; 8   7 x; 7 v; P; Q: 7 G  N;  o 1 1 ` X `췢ʎ: : :Щw :Щq 췭`ͫԠԠ§󍱹àϫàӠԠŠҠƠӠϠōŠŮŠƠԠŬŠҠōӠĬӍĠŠԠŠŠĠŠӍԠŠĠōϩ٠ĠŠԠŠԠӍ٠ŠȠōŠŮŠϠРǠΠԍàƱ٠͠ĠŠ٠ԠϠҠԍ٠ύŮŠͩ٠ԠōĠŠԍϩ٠ԠŠŠŠŠĠŠӍͩ٠ٍٍ̲̩٠à̲Ӎ330$ HBAYR RRAADY YDAARR RYABH. ::11(YTW):GYLYY9254,LX:255,LY:250,GX:251,GY:DEXIT?m24:O1::"E";::"XIT ";::"C";:"LEAR WORK AREA ";::"B";::"ACK TO SEARCHWORD";16384,128:A$:A$"E"A$"C"A$"B"1730O1:24:64578:A$"C"Ĭ A$"B"Y"ġ:1350=h:"COLUMNS IN SEARCHWORD =>";X:X38X51640mr:"ROWS IN SEARCHWORD =>";Y:Y23Y51650|X(X):Y(Y):AO1Y:WS$(A)(WS$(Z),X):AO1NW:W$(O1,A)"":W$(Z,A)"":W%(Z,A)Z:W%(O1,A)Z:W%(TW,A)TW:LX20(XTW):GXLXX:LY$(Z)".":AO15:WS$(Z)WS$(Z)WS$(Z):Z@:::5)"CORE WORD SEARCH EDITOR/CREATOR":4J:"PRINTER SLOT =>";PR:PR7PRZ1610TPR(PR)::"CHARACTERS PER LINE =>";PX:PX40PX2551620 ^:"DISK ACCESS? (Y/N) N"(8);:A$:(37):64578:A$"TIALIZE VARIABLESFAO1XYZTWLXLYGXGYNWBPRPXWOMLXSYSA$"":K$"IJKMAPDLNEG"(8)(21)(27):G$(7):M$(13)W$(1,75),WS$(24),W%(2,75)"O11:Z0:TW2:WOO1:ML768,(768)6ĺ(4)"BLOAD WORD SEARCHER.OBJ.//E,A$300"'6WS$:T$"OPEN"A$CT$"READ"A$:NW,X,Y:AO1NW:A$,W$(Z,A),W$(O1,A)rBZTW:W%(B,A)((A$,BO1))63:::1680T$"CLOSE":1360(A$,O1)"B"Ĺ222,11:1520A$"X"Ĺ216,Z::300T$A$W$:1360932::"ERROR #"(222)G$:1360INIn(A$,4)"SAVE"1440IxA$(A$,(A$)4):T$"OPEN"A$W$:T$"DELETE"A$rT$"OPEN"A$:T$"WRITE"A$:NW","X","YAO1NW:BZTW:(63W%(B,A));:","W$(Z,A)","W$(O1,A)::1480(A$,4)"LOAD"1490 1670:A$(A$,(A$)4):T$"VERIFY"A$WO1:Z,Z:ML:WS$(A)""B2BO1X:WS$(A)WS$(A)((703B)):::S<DISK ACCESSF:5)"DISK ACCESS (TYPE 'X' TO EXIT)":34,O1:3P:"COMMAND=>";A$:(512(A$))Ģ(37):64578ZW$"":A512(A$)767:(A)W$W$((A)):dT$(4):1520WORD120:Z,Z:ML:120/Z,96::ML::>DROP WORDQ(Z)2551270oZ,128:ML:(Z)2551280G$;::330Z,96:120:ML: CONVERT SCREEN IMAGE24:O1:"ONE MOMENT PLEASE";O1,TW:249,X:AO1Y:252,LX(253,LYAW$,A,O1)" "A$A$(W$,A,O1)L:AO1NW:(A$)(W$(Z,A))Ă:ANW:1200BNWAO1:W$(Z,B)W$(Z,BO1):W%(TW,B)W%(TW,BO1)W%(Z,B)W%(Z,BO1):W%(O1,B)W%(O1,BO1):W$(Z,A)A$:W%(Z,A)Z:W%(O1,A)Z:W%(TW,A)TW:HIGHLIGHT THE CURRENT ˍӱӍҠ·µàҍ̠ӱƍҍàˍˍРŠӱòɍҠōɍҠōɍŠč·٠Ÿؠō؍ؠɭɍРҠōàɍɍРӠЍƠҮҍŠѠ·ˠѠ·ÍҠѠ·čɠѠ·ƱĠѠ·ƴƍҍˍؠҮҍӠŠӠŠōҠ͠٠ύӠӠƠ΍ĠˍҠİ     ,P,W,R,U췢ʎ_ d@: d dw dq dQTL 췭`q u2L3 РĹˍРŠӱˍӱӍԠؠг؍؍؍ŠгҠԍĠč·٠ŸҠӍàҍ̠ӱƍҍàˍɍҠčɍҠčɍҠčððР؍ɍРӠбɍвҠčàɍɍРӠвƍҍˍؠؠō؍ؠɭƍɍбҠčàɰŠѠ·ˠѠ·ÍҠѠ·čɠѠ·ƱĠѠ·ƴӠѠ·µԠðԠðԠðԠðҮҍӠӠԠĠϠōԠƠŠҍŠԠӠǍҠ·ƠҮҍ   7L 7L 7L 7L 7L 7L 7L 7L 8  <K8=L 8=L 8=L 8=L 8  =8>L 8  >K8?EL 8?GL @7jL 7lLd7qLd7vL 7xL 7zLd7Ld7L 7Ld7Ld7Ld7Ld7L 7L 7L 7L 7L 7Ld7L 7L 7L 7L 7L 7L 7L 7L 7L 7L <Ld<Ld< Ld7L 7L 7L 7!L 7#L 7%Ld7*L 7,Ld71L 73Ld78Ld7=Ld7BL 7DLd7IL 7KLd7PL 7RLd7WLd7\L 7^L 7`Ld7eLd;Ld;Ld;Ld;Ld;Ld;Ld;Ld;Ld;Ld;Ld;Ld;Ld;Ld;Ld6B \; 5 6 L XLcLc@@`" `0P%8  7/@ |B??;L ;Ld;Ld5XIT 5  wL6C  6  sL-6LEAR WORK AREA 6  wL=6B ;6  sL]6ACK TO SEARCHWORD K6  /9 > 89 ]  ^;L6EL6CL6B \; 5 }6  7 \; 5 6 ;  7 \; 5 6 ; Le6 8  :  : ;L6C \; 5 6 L6LL 7 \ 8 ;L 5  5 o 7 \ c8 ;L(5 '5 o 7 \ c8 G; c8 o 7 \ 8 G; c8 o 7 \ 8 G; 8 o 1 8 8 # 9 8 8 Q8 8 68 # 9 8 <8 r8 ; > 8 Q '; > 8 Q : > T8 Q : > u8 Q` :  8  wL5E 5  sL3 L 4 { L, 'L+4COLUMNS IN SEARCHWORD => 4  8  8 :  7 8 9 (; L 4 'Lx4ROWS IN SEARCHWORD => b4  ?8  B8 9  7 B8 9 (; LY4 8 # 8 B8 # ?8 8 ; B8   7 |; c8 z; 8  o 1 8 ; 9  OR 2  9  'L%3PRINTER SLOT => 3  9  9 9  7 9 ]8 (; L 3 9 # 9 'L|3CHARACTERS PER LINE => e3  *8  -8 : ( 7 -8 C: ; LS3 L3DISK ACCESS? (Y/N) N 3  ::    ^; 9 D  : ;L3Y \; 5  ; :  ; :  r; e9 8 S9 `8 w9 8 8 8 ^: 8 \9 D 9 Lv2 9  Lk2!BLOAD WORD SEARCHER.OBJ.//E,A$300 I2  c8 |;L2. 2 o 8 ; 9   c8 |; c8 z; T; c8 z; R;  o 1 X s 9 L2CORE WORD SEARCH EDITOR/CREAT8 Q L ;  \;  f;  L?- 9 8 L/1ERROR # '1  ; D ^ ;  L?- 8 8 $ 98 $ ]8 $ 8 $ 8 $ 8 $ K8 $ l8 $ 9 $ 7 $ 9 $ $8 $ 8 $ ~8 $ 8 $ 8 $ 7L1 1 ^;L1 IJKMAPDLNEG ::  1  T; :  R;  T; :  R; 8  ?8  8 ; 9   '  ^; 7 \ c8 ;  o 7 \ 8 ;  o  c8 ; 8   7 \ 8 G; 8 8 \; '  u <; o 1 1 }5 ; L0CLOSE 0  L?-L0B \; 8  0 L0 ; > g: TL1L0X \; 5 0 L1 : > c   1 L /, /  7 \ c8 ; L(/, &/  7 \ 8 ;  1 L0LU/LOAD \; 9  P/ L0 4 \;  u 9 \;  ^; ; L/VERIFY /  \;  f;  ; L/OPEN /  \;  ; L/READ /  \;  '  9   \;  u 9 \;  ^; ; L.OPEN .  \;  f;  ; LF.DELETE ?.  \;  ; Le.OPEN `.  \;  ; L.WRITE .  \;  9 aL., .  8 aL., .  B8 a 8 ; 9   c8 ; 8   7 \ 8 E; 9; 9 L"-DISK ACCESS (TYPE 'X' TO EXIT) -  n9 > 8 Q 9  'LR- COMMAND=> H-  ^;  \;  J9 DL- 9 D  : ;L- - h; \;  J9 ; 0;   7 GL- 7 G  f;  h; 1 9  ; 71L-SAVE \; 9  - LM/{ L c8 A A9 T  8 ;` :  8 L5,ONE MOMENT PLEASE #,  8 A 8 Q : > 8 Q 8 ; B8   ; > 8 Q ; > 8 7 c 8 Q c8 A c8 Q 8 ; 7 |;L, , o 8 ; 8   7 |; 7 z; T; U: 8 G  R;  o 1 1 ` X c8 E; o 8 \ 8 G; 8 7 \ 8 E; o 1 7 \ c8 ; \; o 7 \ c8 G; c8 o 7 \ 8 G; c8 o 7 \ 8 G; 8 o `  c8 A c8 Q 8 ;  c8 A A9 T w 8 ; s` c8 G $; $L+ c8 A 89 T 8 ; c8 G $; $L+ ;    L* f; 7  8 1 * L9* f; 7  8 1 \;  ^; 1 8 ; 9   \;  7 7 \ c8 ;  7 L* 1 9 7L/+ 9 ; 7  8  8 \ c8 ; 8 7 \ c8 ; o 8 \ 8 G; 8 7 \ 8 E; o 8 \ c8 G; 8 7 \5 ( L?)L ) f; 5  ) Lp( 9 8 9 c8 8 C) 9 1: (Lp( ` 8 ; 9   7 \ 8 ; f; 2L) 1 9 \ 8 ; f; o L) 9 ; 7  8  8 \ 8 ; 8 7 \ 8 ; o 1 7 \ 8 ; f; o L) ) ^; 8 ; f; L(ERASE WORDS IN MEMORY (Y/N) Y '  ::    h;L6(N f; 5 4( LR( 4 c8 9 8  : ; 9  n9 > 8 Q 'L(WORD => y(  h;  f;  n 8  7 f;  n 98 ;  7 f;  : ; L( ; L(TOO LONG (  Lp(L(X f;  7 f;  : ; L& C)LL# 8 ; 9   7 \ 8 ; T; 8 7 \ 8 ; R; L^' 7 aLj') g'  7 \ 8 ;  s /9 D y: L' 1 : > c8 QLL# X 9 L'WORD ENTRY (TYPE 'X' TO EXIT) '  9  9LR(  wL&D &  sL&ELETE &  /9 > 89 ]  ^;L=&CLB&D \; 5 ;&  7 \; 5 @& ; L#& 9 D  : ;L&D \; 5 ~& L& 8 9 9L&DELETED &  LL# 'L& NEW WORD=> &  h;  f;  n 8  7 f;  n 98 ; ; o 8 7 \ c8 G; 7 \ c8 E; o 8 7 \ 8 G; 7 \ 8 E; o 8 7 \ 8 G; 7 \ 8 E; o 1 9 \ c8 ;L% % o 9 \ 8 G; 8 o 9 \ c8 G; c8 o 9 \ 8 G; c8 o wL%C %  sL% HANGE OR %8 ; f; L7$ 1 L#$?WORD NOT FOUND $  ;  LL# 7 8 8 ; 9   7 \ 8 ; f; Lm$ 1 7 8 8 ; 9   8 7 \ 8 ; 7 \ 8 ; o 1 9 \ 8 ;L$ $ o 8 8 ; 9   8 7 \ c8 ; 7 \ c8 L 7 8L + X 9 L5#EDIT WORDS (TYPE 'X' TO RETURN) #  n9 > 8 Q 'L]#WORD => U#  h;  Ls#X f; 5 q# L# L 9 ]8 $L# 'L f;  ]8 L# f;  \ 8 ; h;L# f; 5 # L' 8 ; 9   7 \ c\ 8 ;  n 7 7 7   n 7 c 8 7 9 !8 7  7 8 aLF") C"  7 8 \ 8 ;  1 p;  c8 ?L^ + n9 > : T :  'L" GRAB WORD=> "  h;  X n9 > c8 Q 8 ; 9   7 \ c8 ; f; L" 1 ;  $L   ;  XL; READY THE PRINTER )   ^; 8 8 8 8 $8 &Li 8 8 9 ?Ls ; 5 r L ;  n '8 c 8 i  ;  p;  8 ; B8   8L p;  8 8 '8 c 8 i  8 ; 8   8 ]8 sLINGLE SPACED OR   wL D   sL< OUBLE SPACED? .  /9 > 89 ]  ^;LaSLfD \; 5 _  7 \; 5 d ; L^ :  : ;L SINGLE SPACED   LD \; 5  L 8 8 : L DOUBLE SPACED   PRESS   wLESC    sL#APE   /9 > 89 ]  ^;LHWLMA \; 5 F  7 \; 5 K ; L 9  : ;L ANSWER SHEET   c8 8LW \; 5  L 8 8 9 L WORD SEARCH   :  wLS   8 \ c8 E; n 8 8 8 8 \ c8 G; c8 o  8 8 \ c8 G; 8 o L 'L + , X : rLt PRINT OUT j  9  wLA   sLNSWER SHEET OR   wLW   sL ORD SEARCH?   c8 8 : LTO LEAVE 8 E; TL : 8 8 ; 9   7 \ c8 E; n ]8 $LA 1 ` 7 8  c8 A A9 T  8 ; 8 7 1 ` 8 8L} 8 8 + 8 8 8 9 L 8 8 8 8 (L 9 8  8 \ c8 E; n ]8 $L 8 \ c8 G; : o 8 \ 8 G; g: o L 1 L 7 RX,tk#}"%5  8 \ 8 G; 8 \ 8 E; n 8 o 8 \ 8 E; : L 8 \ 8 G; c8 o L  8 \ 8 G; 8 \ 8 E; n c 8 o 8 \ 8 E; n ]8 (L 8 \ 8 G; : o 8 A 8 \ 8 \ 8 G; 8 o8 o L 5 X 8 \ c8 E; n 8 8 \ c8 G; c8 o  8 \ c8 G; 8 o 8 8  8 \ c8 E; n ]8 $L 8 \ c8 G; : o 8 \ 8 G; g: o + /9 > 89 ]  ^; 8 ; ;    ; 7  8 1 \; L c8 E; n 8 o 8 \ c8 E; n K8 LD 8 \ c8 G; 8 o 8 \ c8 E; n 8 (L| 8 \ c8 G; 8 N8 o 8 \ 8 G; 8 \ 8 E; n 8 o 8 \ 8 E; n l8 L 8 \ 8 G; 8 o 8 \ 8 E; n 8 (L ; T`  c8 A &9 T 8 ;` 8 ; 8 \ c8 ;    L: 7 A 8 \ c8 ; T; c8  R;  7 '  T 1 : > 8 \ c8 ;  T 8 A 8 \ 8 E; T`  c8 8 c8 8 7  8 8L 8 8L 8 8L 8 8 8 \ c8 G; 8 \ q,$` L( L5 LD 8 XL XLR XQHPH RPhPhQ8 XL.0'L+ LfLLLLL ꥪLYԨé H?;=H? L1 'L ; > 8 \ c8 E; T ; > 8 \ 8 Ez#????    ҮҠҮҠ ĠҮŠĠҮʮŠĠҮӮŠ"ĠҮЮŠ5 ҮҮӠ ҮҮӠ ήΠĠҠĠҮʠĠҮӠĠҮР5ӮӠϠҠ ®ʰ!®ӠĮΠЮΠ UNABLE TO READ DIRECTORY !!!":+ |:1000F 1:" 80N":0,63998:00A$(105),T(105)& "X138:B$B$"=":D ,X10511:NAME$(X)B$:Z 6NAME$(0)(B$,19)f @D$(4) E12:12:"READING CATALOG ":12:29 Y63075 ^2054:D$"CATALOG" c216,0:D$"PR#0":D$"IN#0": h(NA$(0),1)" "Ģ12:868:"!!! ERROR -  L40  MAXX' 85:34,225 23:958o "SELECT A FILE BY NUMBER -->";A$:A(A$):AMAX2010z A1Ĭ T(A)66T$"BRUN " T(A)84T$"EXEC " T(A)65T(A)73T$"RUN " ::T$A$(A) D$T$A$(A)  NAME$(105),NA$(N),8,1))6520002 ((NA$(N),8,1))942000< XX1U A$(X)(NA$(N),8,30)o T(X)((NA$(N),2,1)) X21İ30:2000 X21X61X101İ80 X41İ40:2000 $X41X81İ90 .X61İ30:2000 8X81İ40:2000 BX101İ30:20002,19:1:1::* U33,40:32,0:23:1::p Z85:23:"IS YOUR PROGRAM LISTED HERE? Y/";::"N";::" ";:A$: dA$"Y"MAXN1:N105::2000 n23:958:34,1:35,21::35,24: 60:X0 N1105 ((NA$(N),8,1))61N105:2000 ((G8(ST6UVk,ȱk-`),-`b ::12:12:"ALIGNING MEMORY":63000xY140:"=";::X;:5:A$(X):(" "X" ";:6:(A$(X),15):2X" ";:5:(NA$(X),8,15):<1:20:22:20:34,1:2:F P33,21:3     \ ``'`حJJJJLԩLLhhߚHH`Hh`E MISMATCH ERROR"-((ERR4A$"DRIVE ERROR"H2(ERR8A$"READ ERROR"]<(20:450:(7):u0DATA FOR MARKS $(13)A$(((40)(41)256(36))128)5'A$;:E'DISK ERRORp'ERR(222):ERR15ERR254Ĺ216,0:822'ERR254ĺ"TYPE AGAIN PLEASE:"::(ERR255ij (ERR0A$"INITIALIZATION ERROR"(ERR1A$"WRITE PROTECTED"(ERR2A$"VOLUM"İ380=':A$"INSERT DISKS IN PROPER DRIVES.":470::1000V'GET SLOT AND DRIVE#'450:::10)"SLOT=>"S28)"DRIVE=>"D2;'16:B$"7":10180:S2(A$)'32:B$"2":10180:D2(A$):'GET A KEY'A$:(A$"1"A$B$)A$(13)10180*'A10220PV'IO768:SLT779:DRV780:VOL781:TRK782:SCT783:BUF787:CMD790:OVL792d`':DOS16:MB151j'8::A$"ORIGINAL":S26:D21:10140:S1S2:D1D2t':::D2(D21)1:A$"DUPLICATE":10140~'A$"FORMAT BACK UP FIRST? N"(8)::12:450:A$:A$"Y(769)50710060R.':A$"* SUPER IOB *":450:::A$"CREATED BY RAY DARRAH":4508'10:A$"INSERT SUPER IOB DISK":450::::A$"PRESS ANY KEY TO CONTINUE":450:16384,128:A$B':(4)"BLOAD IOB.OBJ0,A$300"L'TKSTVLCDDVSO:RD1:WR2:INIT4:TING"450::809ONERR IGNORE UNREADABLE SECTORSd&822:ERR(222):ERR15ERR254Ĺ216,00(ERR255ERR254)CDRD10230:ERR15ĦD(7);:BUF,(BUF)1:(BUF)MBBF1N'CONFIGURATION TIME'BLOAD RWTS HERE$'(768)13:A$"PRESS ANY KEY TO CONTINUE":450:16384,128:A$:OTOGGLE READ/WRITECD(CD1)1:CDRDA$"INSERT SOURCE DISK.":SOS1:DVD1:510A$"INSERT TARGET DISK.":SOS2:DVD2D1D2S1S2İ470:1:1:39);::A$"READING":CDWRA$"WRIERT BLANK DISK IN SLOT "(S2)", DRIVE "(D2):470a80::A$"FORMATING"::450::IO:VL0:|PRINT TRACK & SECTOR#3:10:"TRACK=>"TK2)"SECTOR=>"ST2):CENTER MESSAGE21(A$)2:A$;:PRINT MESSAGE AND WAIT8:11:450:7378,170:47389,173:C ^SWAP RWTS AT $1900 WITH THE ONE AT $B800f h253,25:255,184:224,8:832:w rFORMAT DISK |A$"VOLUME NUMBER FOR COPY =>254"::450:32:"";VL$:VL(VL$):VL$""VL254 VL255VL03804CMD,INIT:SOS2:DVD2:A$"INS ALTERED ADDRESS MARKSH "A1,A2,A3:47478,A1:47488,A2:47499,A3:` ,ALTERED DATA MARKS 6A1,A2,A3:47368,A1:47378,A2:47389,A3: @NORMALIZER J47530,208:47531,183:47438,208:47439,19:47478,213 T47488,170:47499,181:47368,213:47356,A3: NORMALIZERS 47405,208:47406,19:47497,208:47498,183:47445,213 47455,170:47466,150:47335,213:47345,170:47356,173: 13 SECTOR RWTS ALTERATIONS IGNORE CHECKSUM & END MARKS 47530,24:47531,96:47438,24:47439,96:0 + 16 SECTOR RWTS ALTERATIONS L IGNORE CHECKSUM & END MARKSz 47405,24:47406,96:47497,24:47498,96: ALTERED ADDRESS MARKS A1,A2,A3:47445,A1:47455,A2:47466,A3: ALTERED DATA MARKS A1,A2,A3:47335,A1:47345,A2:4:VOL,VL:SLT,SO16:% ZR/W SECTORi dBF0:TRK,TK:SCT,ST:CMD,CD:IO:BUF,(BUF)1:(BUF)MBBF1o n xMOVE S PHASES 49289SO16DV,0:49289SO16,0:APH(PH4)4:1144,128A:811,128SA:813,SO16:810:49288SO16,0:PHPHS:PH0PHv  *************************?** SUPER IOB **^** BY RAY DARRAH **}(*************************2SET HIMEM BELOW BUFFER AND SET LOMEM ABOVE THE BLOADED RWTS<8448:9983:10010FINITIAL IOB SETUP PBUF,39:DRV,DV     ĺG$"TOO LONG":1060%8W$"X"11205BW$""1060MLNWNWO1:XSZ:1140]VNW751060e`:jFIND A PLACE FOR THE WORDtAO1NW:W$W$(O1,A)Ă:W$(O1,NW)W$:1160~BNWAO1:W$(O1,B)W$(O1,BO1)::W$(O1,A)W$A$"":AO1(W$):("W$(O1,A)::(16384)141Ă016368,Z:850AINPUT WORDSo:5)"WORD ENTRY (TYPE 'X' TO EXIT)":4NWĺ"ERASE WORDS IN MEMORY (Y/N) Y"(8);:W$:W$"N"İ1660:NWZTW:64578:4:34,TW$:"WORD =>";W$.(W$)X(W$)Y(W$)20Z1:"C";::"HANGE OR ";::"D";::"ELETE"Z16384,128:A$:A$"C"A$"D"950((37)):64578:A$"D"NWNWO1:"DELETED":850"NEW WORD=>";W$:(W$)X(W$)Y(W$)209701140:850AO1NW:W$(O1,A)W$(O1,AO1)ğA") NOT FOUND"G$:8503XSA:AO1NW:W$(O1,A)W$ĂlYSA:AYSO1NW:W$(O1,AO1)W$(O1,A)::W$(O1,NW)""AXSO1NW:W$(Z,AO1)W$(Z,A):W%(Z,AO1)W%(Z,A):W%(O1,AO1)W%(O1,A)W%(TW,AO1)W%(TW,A)::W$(Z,NW)"":W%(TW,NW)TW:W%(Z,NW)Z:W%(O1,NW)$(Z,A)W$Ă:G$;:140:320)4WOA:5009>EDIT WORDSrH1250::4)"EDIT WORDS (TYPE 'X' TO RETURN)":34,O1R:"WORD =>";W$::W$"X"ĉ:300\NWZĉ:1030:300f(W$)ZW$W$(O1,(W$))pW$""990zAO1NW:W$(Z,A)W$Ă:"?WORD (WS$(A),B,O1); WOTWĺ" ";2:M$;::M$;[AO1NWTW:PX4)A") "W$(O1,A)" ";NW(A)ĺPX58(W$(O1,A))((A))TWPX4)AO1") "W$(O1,AO1) :M$:Z:560GRAB WORD 1250:34,23:24:"GRAB WORD=>";W$::34,Z*AO1NW:W""12:64578::"TITLE=>";T$:U"READY THE PRINTER":A$:WOO1:XTWPXWOTWlPR:PRINTER SETUPT$""ĺ(PX(T$))TW)T$:M$;AO1Y:YSĺM$;(PXXWO)TW);:BO1X:XSZ730(WS$(A),B,O1)"."ĺ((O1)2665);:740W"A$"A"300Rb4:64578:"ANSWER SHEET":YSZ:A$"W"XSO1:4:"WORD SEARCH "xl7::"S";::"INGLE SPACED OR ";v:"D";::"OUBLE SPACED?"16384,128:A$:A$"S"A$"D"5607:64578:"SINGLE SPACED":A$"D"YSO1:7:"DOUBLE SPACED%(Z,WO)XS:160:320#ADD WORDS21030:300HPRINTER PRINTOUTX&1250:1300r0:15)"PRINT OUT":4::"A";::"NSWER SHEET OR ";D:"W";::"ORD SEARCH?":XSZN23:"TO LEAVE PRESS ";::"ESC";::"APE"X16384,128:A$:A$"Ă:* WOA:160:Z,96:120:ML:AWO::A TRY FOR NEXT WORDP XSO1:480c TRY LAST WORDn XSO1 1250:WOWOXS:WONWWOO1 WOO1WONW 160:W%(Z,WO)ZW%(Z,WO)19:W%(O1,WO)11:320XSW%(Z,WO):YSWO:W%(Z,WO)Z:420:WOYS:W530,550,1350,470,450,840,800,390,370,1710: hROTATE WORDs r140:W%(TW,WO)W%(TW,WO)O1:W%(TW,WO)7W%(TW,WO)Z| |400 140:W%(TW,WO)W%(TW,WO)O1:W%(TW,WO)ZW%(TW,WO)7 O1,W%(TW,WO):320 PRINT WORD SEARCH 903:AO1NW:W%(Z,A)ZWO)LYW%(O1,WO)GYO1 320; "MANIPULATE WORD SEARCHu ,1690::XSW%(Z,O1):W%(Z,O1)Z:420:W%(Z,O1)XS:WOO1 6160:W%(Z,WO)ZW%(Z,WO)19:W%(O1,WO)11 @1220 J16384,128:A$ TAO1(K$):A$(K$,A,O1)Ă:330) ^A190,190,190,190,A DIRECTION1 140:XSZ:YSZ:A200,210,220,230A YSO1:240Q XSO1:240` XSO1:240j YSO1 W%(Z,WO)W%(Z,WO)XS:W%(Z,WO)GXW%(Z,WO)LX W%(Z,WO)LXW%(Z,WO)GXO1 W%(O1,WO)W%(O1,WO)YS:W%(O1,WO)GYW%(O1,WO)LY W%(O1,0:1030:300% nPOKE IN COORDINATESH x252,W%(Z,WO):253,W%(O1,WO):` ERASE CURRENT WORDu 120:Z,64:ML: POKE IN STATS OF CURRENT WORD AO1(W$(Z,WO)):735A,((W$(Z,WO)(Z),A)) :249,(W$(Z,WO)):O1,W%(TW,WO): MOVE IN + /\/\/\/\/\/\/\/\/\/\/\/\=\ /[/ CORE PRESENTS \y(\ /2/ \<\ WORD SEARCHER /F/ \P\/\/\/\/\/\/\/\/\/\/\/\/Z d154          k` NDeȹDe`$0()p``pP %2(`.`!H hi(!`hhߚHH`Ԡō̠ȍӍؠàӍӠŠ֍ҠàԠҍŠӍ٠ؠȍҠ̲Š͍àýР٠͍àѠР٬ؠȿѠؠÍӍҮӠؠŠȍȱ٠ٍ̩֠ӳӍ٠ؠàΠōؠԱؠҠſӠӳӡ٬ؠԠōРӠȍĮӠ٬؍ӍҠӠĮ̍٬؍àčĮ̠٬؍ĠōĠǠſƍҠԠàĠҠֿɠҠġ̩٠Š΍ĠƠɠԍӠĮӍ٬؍ӍӵӠԱӲؠؠҠčӠӱӬōƍà̠ÍӱӍӠӠưƠàӲàý٠ӠԍٍӬ٠ؽثӍà؍؍Рؠ̠οӠӲР؍į֠үÍ٠ҠïÍàýӬ٠ٽ٫ӍàٍٍРٍӠӲ̠οРٍԱؠDZؠҠſàϱšӍϱ٠ҠàԠҍ٠ؠȍҠҠŠԠӠנƠӍҠƠĠҮʍ̠àٿؠƠǮԍӠ٠ӍŠҠԍàѠñŠԠӠԠΠӍ̠ѠŠŠΠӠӠč٠Ѡð٠Ҡ٠ѠŰ٠ҍ̲ѠҠѠΠϠįōҠѠƹҠƠӠϠōàѠΠϠͬ¶įŬµٯ٠Ҭ·ٿǠѠǠԠӠҠԠӠɠōؠѠԠŠō٠Ѡ ԠŠōؠѠàǠĠԠؠō٠ѠĠǠĠԠ٠ōɱĠҍŠŠƍؠѠŠԠԠؠŠō٠ѠƠԠԠ٠      L ,-` Leh8PhHQH`hbihciHHb\ȱb]`ߚl hhHHHH`L⥠`ʆ  hdheHdHHHH08  X Xhdhe + eHdHHHeHdH`  `% 0 L0`,wyywxzzx,Hyw wȄffȪ yw fh0`h&Hwyxzwy wy h Lh` ` ` ` 憅` ` ᥠQP` Lh 8e`LԩLcغh8uhHvH` L L L~ 憅 L ʊ8$!  W$Li)$` LY L   hPhQP 8ePQiHHš`hh PȱPʘHH Z ,խwqq膸 J즸 , hhlP,q`h8uhv] :  ڢ hgʆbcb KLf/q ߠ :۩q` S0 L,Hh*Mȱڦhwx%ȱH J 5BwУ8 ewwx𴰺 抦5?wtsʆwx8dedЕБt Z Z ,խvqq ", ȹ,ȹ ,W,qewix8 ZeCBw U  yUUwyVxz`ЗПwyxz`ywzx`GH o8 UpVUVƠ UVUʆoph3]eФk ЮU 4Г U 5,wЅƩѤ wU! hē唐\tsʆbc83o񁪥pTopȆbcĂbUVdf0Ѓe8oph0L8 MLh8HH`BLE? ";:1120:RF2:1360: IF A DISK COMMANЗ{y SՠUEowyywxzzxwIy:w \`hH,Hops8otpf,k8UlV*U$f&łkUŁdbUȥcUUŭSVŮKsłEUŁ< UV0ЅUŕȱU喰!0UUdUV0+UiUVmVn̢͊wUV0ЦyyUUݤ.QP$  "LWHhL:5~  e  eȱeeLaL LRwwxȆH Jh`w5U,w`,hbhcbwȱbxcȘHH`wȄ ep`0CBe]Q=b`LicbbbE0`Ġ``MMLeڢD ! SL3LH h%LddЉ`?0 HH chh ޥ Yަ`н  eE   堰>Ffee0  &ߢEX$ƫv` ꥪLYDcbbwyȱbxz`ݥܦL+3UV UwȱUx`wUȥxU`Ncbbȱb`cbbȥb`cbbȱb8塅堅PEncbbȱbe HH`0S,,hdehUhVhhHHU hehHehUU HHk`UiȱUiuкe& & &eeHHqUȥqUeFdO݅܆`ycbbȱbƫ8pM0UȥUU +뺠ЧUV욥VHUHthhЁ HHf ㈱ۺQi e 纼 +뺊i  e HH`iiiHH`(bcbebbePE1b]  0  j=i<<=kbޙץ,,stHʈzyhH ʈpoophMm X RQtPsh`yhH               ԍӬϬ΍ƬϬŬ΍ƬȬǍˬì޿ĬύƬ΍Ǭ޿ŬčŬάӬĬōſɬӍŬȍŬĬ΍ͿӬŬŬɍƿӬɍŬ٬տŬ¬ϬōŬٍύԬˍ¬ɍŬύƬάӍŬάʿϬĬӍĬٍŬ٬ōƬɬčάӍƬĬ¬ӬѿӍƬŬìύ¬ĬԍԬōŬɬ    ĺG$"TOO LONG":1060%8W$"X"11205BW$""1060MLNWNWO1:XSZ:1140]VNW751060e`:jFIND A PLACE FOR THE WORDtAO1NW:W$W$(O1,A)Ă:W$(O1,NW)W$:1160~BNWAO1:W$(O1,B)W$(O1,BO1)::W$(O1,A)W$A$"":AO1(W$):("W$(O1,A)::(16384)141Ă016368,Z:850AINPUT WORDSo:5)"WORD ENTRY (TYPE 'X' TO EXIT)":4NWĺ"ERASE WORDS IN MEMORY (Y/N) Y"(8);:W$:W$"N"İ1660:NWZTW:64578:4:34,TW$:"WORD =>";W$.(W$)X(W$)Y(W$)20Z1:"C";::"HANGE OR ";::"D";::"ELETE"Z16384,128:A$:A$"C"A$"D"950((37)):64578:A$"D"NWNWO1:"DELETED":850"NEW WORD=>";W$:(W$)X(W$)Y(W$)209701140:850AO1NW:W$(O1,A)W$(O1,AO1)ğA") NOT FOUND"G$:8503XSA:AO1NW:W$(O1,A)W$ĂlYSA:AYSO1NW:W$(O1,AO1)W$(O1,A)::W$(O1,NW)""AXSO1NW:W$(Z,AO1)W$(Z,A):W%(Z,AO1)W%(Z,A):W%(O1,AO1)W%(O1,A)W%(TW,AO1)W%(TW,A)::W$(Z,NW)"":W%(TW,NW)TW:W%(Z,NW)Z:W%(O1,NW)$(Z,A)W$Ă:G$;:140:320)4WOA:5009>EDIT WORDSrH1250::4)"EDIT WORDS (TYPE 'X' TO RETURN)":34,O1R:"WORD =>";W$::W$"X"ĉ:300\NWZĉ:1030:300f(W$)ZW$W$(O1,(W$))pW$""990zAO1NW:W$(Z,A)W$Ă:"?WORD (WS$(A),B,O1); WOTWĺ" ";2:M$;::M$;[AO1NWTW:PX4)A") "W$(O1,A)" ";NW(A)ĺPX58(W$(O1,A))((A))TWPX4)AO1") "W$(O1,AO1) :M$:Z:560GRAB WORD 1250:34,23:24:"GRAB WORD=>";W$::34,Z*AO1NW:W""12:64578::"TITLE=>";T$:U"READY THE PRINTER":A$:WOO1:XTWPXWOTWlPR:PRINTER SETUPT$""ĺ(PX(T$))TW)T$:M$;AO1Y:YSĺM$;(PXXWO)TW);:BO1X:XSZ730(WS$(A),B,O1)"."ĺ((O1)2665);:740W"A$"A"300Rb4:64578:"ANSWER SHEET":YSZ:A$"W"XSO1:4:"WORD SEARCH "xl7::"S";::"INGLE SPACED OR ";v:"D";::"OUBLE SPACED?"16384,128:A$:A$"S"A$"D"5607:64578:"SINGLE SPACED":A$"D"YSO1:7:"DOUBLE SPACED%(Z,WO)XS:160:320#ADD WORDS21030:300HPRINTER PRINTOUTX&1250:1300r0:15)"PRINT OUT":4::"A";::"NSWER SHEET OR ";D:"W";::"ORD SEARCH?":XSZN23:"TO LEAVE PRESS ";::"ESC";::"APE"X16384,128:A$:A$"Ă:* WOA:160:Z,96:120:ML:AWO::A TRY FOR NEXT WORDP XSO1:480c TRY LAST WORDn XSO1 1250:WOWOXS:WONWWOO1 WOO1WONW 160:W%(Z,WO)ZW%(Z,WO)19:W%(O1,WO)11:320XSW%(Z,WO):YSWO:W%(Z,WO)Z:420:WOYS:W530,550,1350,470,450,840,800,390,370,1710: hROTATE WORDs r140:W%(TW,WO)W%(TW,WO)O1:W%(TW,WO)7W%(TW,WO)Z| |400 140:W%(TW,WO)W%(TW,WO)O1:W%(TW,WO)ZW%(TW,WO)7 O1,W%(TW,WO):320 PRINT WORD SEARCH 903:AO1NW:W%(Z,A)ZWO)LYW%(O1,WO)GYO1 320; "MANIPULATE WORD SEARCHu ,1690::XSW%(Z,O1):W%(Z,O1)Z:420:W%(Z,O1)XS:WOO1 6160:W%(Z,WO)ZW%(Z,WO)19:W%(O1,WO)11 @1220 J16384,128:A$ TAO1(K$):A$(K$,A,O1)Ă:330) ^A190,190,190,190,A DIRECTION1 140:XSZ:YSZ:A200,210,220,230A YSO1:240Q XSO1:240` XSO1:240j YSO1 W%(Z,WO)W%(Z,WO)XS:W%(Z,WO)GXW%(Z,WO)LX W%(Z,WO)LXW%(Z,WO)GXO1 W%(O1,WO)W%(O1,WO)YS:W%(O1,WO)GYW%(O1,WO)LY W%(O1,0:1030:300% nPOKE IN COORDINATESH x252,W%(Z,WO):253,W%(O1,WO):` ERASE CURRENT WORDu 120:Z,64:ML: POKE IN STATS OF CURRENT WORD AO1(W$(Z,WO)):735A,((W$(Z,WO)(Z),A)) :249,(W$(Z,WO)):O1,W%(TW,WO): MOVE IN / /\/\/\/\/\/\/\/\/\/\/\/\=\ /[/ CORE PRESENTS \y(\ /2/ \<\ WORD SEARCHER /F/ \P\/\/\/\/\/\/\/\/\/\/\/\/Z d154          k` NDeȹDe`$0()p``pP %2(`.`!H hi(!`hhߚHH`(!`ӍؠàӍӠӠƹӠŠӍ٠ؠȍҠ̲Š͍àýР٠͍àԠō̠ȍѠؠÍӍҮӠؠŠȍȱ٠֠Š֍ҠàԠҍàΠōؠԱؠҠſӠӳӡ٬ؠԠōРӠȍѠР٬ؠȿҠӠĮ̍٬؍àčĮ̠٬؍ĠōĠǠſٍ̩ӳӍ٠ؠƠɠҠġ̩٠Š΍ĠƠɠԍӠĮӍ٬؍ӍĮӠ٬؍ӍؠҠčӠӱӬōƍà̠ÍӱӍӠӠưƍҠԠàĠҠֿ٠ӠԍٍӬ٠ؽثӍà؍؍Рؠ̠οӠӲР؍ӠԱӲؠàýӬ٠ٽ٫ӍàٍٍРٍӠӲ̠οРٍàӲàýɠſàϱšӍϱ٠ҠàԠҍ٠ؠȍҠҠį֠үÍ٠ҠïàҠƠĠҮʮō̠àٿؠƠǮԍӠ٠ӍԱؠDZؠҠŠҠԍàѠñŠԠӠԠΠӍ̠ѠŠŠΠӠӠč٠Ѡð٠Ҡ٠ѠŰ٠ҍҠѠΠϠįōҠѠƹҠƠӠϠōàѠΠϠͬ¶įŬµٯ٠Ҭ·ٿǠѠǠԠӠҠԠӠɠōؠѠԠŠō٠Ѡ ԠŠōؠѠàǠĠԠؠō٠ѠĠǠĠԠ٠ōɱĠҍŠŠƍؠѠŠԠԠؠŠō٠ѠƠԠԠ٠     ԽԫԼαԽ˽˫ƽ˼α˼αźԢǠϮˮϠӠΠ٢č̱˨ҤĠӮРҠĮ̱Рҍ˽ԽԽĽҍԱ˺´³ϵ´±ԽԫԼααԽ˽˫˼α´˽ԱԽ³´± Խ˽˫ƽ˼α˼αźԢŠȠ٢čĠҠĮ̱Ġҍ˽ԽԽĽҍԱ˺´´±ԽԫԼααԽ˽˫˼α´˽ԱԽ´±ԽԫԼα ΠҠĮ³´±ԽԫԼαԽ˽˫ƽ˼α˼αźԢǠϮˮӠԠĢč̱˨ҤĠӮ̱͠ŠΠԠҍ˽ԽԽ½ĽҺӽԱ˺´³ϵ´±ԽԫԼӪααԽ˽˫˼α´˽ԱԽ  ŠŠԠΠӍӍŠӧ󠠠٠ϠŠ§ŠϠРƠŠΠéӍٍؠӮҫԠԠŠˠĠŠƠŠ ΧԠōӠԠԠӠŠˠҍҠؠӮҠàӠŠΠҠϠŠŠҠҠԠРҍРƠΠРϠؠؠĠŠ٠ӠԠ̠ŠĠϠ٠ŠӠӢРӍŠҠΠҠҠŠàҍŠŠˠ͠ӠŠϠԠРŠӠŠǠӍӮҠӠӠĠΠҬԠŠҠōҠŠԠ٠ҍҍҍؠҠԠϠؠϠà̠ŠŠŠҠōРˠ֠ӠŠ٠ĠԠӠŠŠƠŠӠōӠӠӭҠˬҠԠӠĸҭΠŠԍӮҠҠөĠӠĠŠ˩ӮҠӠҠŠŠӮ¸Ӡȍ̠ӠŠҠƠԠĠˍԠӠԠ٠ĠҠϠŠŠӠōϠӠӠŠ ƠҠҠϡƠӠҠҠŠҠǠӠԠčԠӠŠԠҠ̠Ԭϩ֠ӠŠϠŠĠԠҠ̠ӠŠϠŠĠǠ̠ϩˠӠˠϠӍԠӠҠϠӍҠԠϠϠŠӠԠ¸ӠӮҠƠŠ٠ԠΠŠàҍӠŬ̠Ӡ̠Ϡ΍РӠŠƠŠ©ԠӠԠϠŠĠԠ̠֭ӠϠР٠ԠҠǠŠӠȠÍ٠Р٠ԠϠŠ ōҠӮ¸͠ҍϠѠŠŠӠϧҍӠѠŰҠƠӠƠ٠ϠōҠӠԠŠōƠ®ʰàϠϠŠҠĠΠ؍ӮѠŰ٠ԠϠŠӠԠӠѠ¹٠ԠϠŠӠŠԠ¸ӮҠѠàΠҠҠō͠ѠàŠ 󍱰٠٠ȍӮ¸ѠĹ٠ԠϠӠ¸ҠѠĴŠԠӠ!! ! ! ! ! !!!!!!!!!L L ,-` Leh8PhHQH`hbihciHHb\ȱb]`ߚl hhHHHH`L⥠`ʆ  hdheHdHHHH08  X Xhdhe + eHdHHHeHdH`  HH`% 0 L0`,wyywxzzx,Hyw wȄffȪ yw fh0`h&Hwyxzwy wy h Lh` ` ` ` 憅` ` ᥠQP` h 8e`LԩLcغh8uhHvH` L L L~ 憅 L ʊ8$!  W$Li)$` LY L   hPhQP 8ePQiHHš`hh PȱPʘ Z Z ,խwqq膸 J즸 , hhlP,q`h8uhv] :  ڢ hgʆbcb KLf/q ߠ :۩q` S0 L,Hh*Mȱڦhwx%ȱH J 5BwУ8 ewwx𴰺 抦5?wtsʆwx8dedЕБt Z Z ,խvqq ", ȹ,ȹ ,W,qewix8:eCBw U  yUUwyVxz`ЗПwyxz`ywzx`GH o8 UpVUVƠ UVUʆoph3]eФk ЮU 4Г U 5,wЅƩѤ wU! 报hē唐\tsʆbc83o񁪥pTopȆbcĂbUVdf0Ѓe8oph0L8 MLh8HH`BLE? ";:1120:RF2:1360: IF A DISK COMMANЗ{y SՠUEowyywxzzxwIy w \`hH,Hops8otpf,k8UlV*U$f&łkUŁdbUȥcUUŭSVŮKsłEUŁ< UV0ЅUŕȱU喰!0UUdUV0+UiUVmVn̢͊wUV0ЦyyUUݤ .QP$  "LWHhL:5~  e  eȱeeLaL LRwwxȆH Jh`w5U,w`,hbhcbwȱbxcȘHH`wȄeep`0CBe]Q=b`LicbbbE0`Ġ``MMLeڢD ! SL3LH h%LddЉ`?0 HH chh ޥ Yަ`н  eE  䡥堰>Ffee0  &ߢEX$ƫv` ꥪLYDcbbwyȱbxz`ݥܦL+3UV UwȱUx`wUȥxU`Ncbbȱb`cbbȥb`cbbȱb8塅堅PEncbbȱb  HH`0S,,hdehUhVhhHHU hehHehUU HHk`UiȱUiuкe& & &eeHHqUȥqUeFdO݅܆`ycbbȱbƫ8pMV0UȥUU +뺠ЧUV욥VHUHthhЁ HHf ㈱ۺQi e 纼 +뺊i  e HH`iiiHH`(bcbebbePE1b]  0 hHj=i<<=kbޙץ,,stHʈzyhH ʈpoophMm X RQtPsh`y"" " " " " """""""""