' +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*`&$6M?666$ u6&6&I66?666$-  6666&$ & 6&66$, u6& -6?$666$,e$? u66$$66$, u -=?-?/ 666$$=/6ve $666 $66 $$& 6ve $66?----I9w-i-?*- ?$ 26666$$$ -6? -%46666$$<?$2. -u?76& --u??v--u??I6?--?666ve26v- %$466&26e $4266f u$$$ruۛ e 26v- %$4666?*---/---II9?*v-= .l1%)-n:?/-R)-u6?$ 26666$$$ -6? -%46666$$<?$2. -u?76& --u??v--u??I6?--?666ve26v- %$466&26e $4266f u$$$ruۛ e 26v- %$4666?*---/---II9?*v-= .l1%)-n:?/-R)%466&<?$ 66666$d -6? --??6--  -%$$46666&<?$ -u>???v--*-=766&$$$d - -%4666?-e$$?$666f -66#$$I66&6II6666?66666$d I$$66666266&$ 66&$d 66&266&$ -66 ----?w?766$$$$$ --??v--??----??666666666-- $$$$666 $$$6666v  $$$$4vd 4v66&$$ 4----.---=66666----$$$$,---r----66666????LI $$$$*-----R  -- $666?/*----=I ?v-2%M.<)?-R/6666d  666646$du6&$ 56&6&$t -6& -u6?$2666$$d -6? u$666$$26&d - --??-u?? 6-??-66ve26- $662ve $626f u$$ru e 26u>??v-=266$$/=$ u -$66?4m1?6666$ -6&I66I666?/6666d  666646$du6&$ 56&6&$t -6& -u6?$2666$$d -6? u$666$$26&d - --??-u?? 6-??-66ve26- $662ve $626f u$$ru e 26`+* N̮.#ɠɬ 80 ` L#`H HH  h}h} h}L#>>`PQRSU T RiΰRPQm '`PQRLU! $09@ 0`/. @ ./` JL9*+*++8 `m`*U.*m@m  ii@``@Lu@@@@  ii8@ȑ`hh8` RSPQTU PQ880808RSPQTU PQRSPQTU PQ`dM OYHQAI:A39+1$)08  l   +    g `ɫL RSPQTU PQRSPQTU PQmm`%0)&E%0Q&&e)jLeLJJJJӊ)TIUȄҤѢԆզ8eЅԐ e҅Ր JJJ`& ')*& 'JJ) e ʥ0)Je`08  li҄f8Ъх 8e҅ԥձ&E%0Q&&Ӱ eeЅԥeP`ŴxaI1h`H I) hHjjeejh ) q, E   'hhhhhh L  a  L= `)%%01&S0J1` Q&%0Q&&`,H gh(0JI0`'0 I`H gh(0 I0ԩ(נ08H gh(',S"&,i8i#H&ii&hif&i'`H gh('i,S&i,&iPII&if&H8HӰ hIiHӅхhЅhI* i   i jjj 2L L% ɟO  E 'hhhh `ͷ͸/jjmmHjhJJJJ)`hh  2 2`H(h`H)&JJ&&h' &' &' f&')'#iԮ̭Šή@@ŠůŭҠͮ@@נĠŠΠήӠRETURNµŰ ѹ ؤ a ӑ t7LL !C/]͛!/C] x  i wwoO?w{nsox|?xO>n?_}xA|xA?ooo}@{ 0`o|?8ok=?o{z^>?Wt?~Ox?x|}{ow`v[o>{ 0_|?OO|O@_~{~?k{m?_}v~?|x~0W]v[k6wmo.{~?y>x`ow[m_?[wsownw_opq?xg~xA?oOoy]_{??oogO{}>_owqqpnpqan`{qqqwqq`}Oox>?|}?~?xp~@|_>?7{ox?s}|q{o;_}v]o>{m?ow{?oo~o@_~{~?g]{m?_}v}?~~~?~PO>zog>{k/{~?|>{o7ow[n_?Wwxo?~_|pn6|Xg]_cnw_opg?xw~xA?o/wu>o{{^o_k~s}>_owwg?|{_R)?$ 26666$$$ -6? -%46666$$<?$2. -u?76& --u??v--u??I6?--?666ve26v- %$466&26e $4266f u$$$ruۛ e 26v- %$4666?*---/---II9?*v-= .l1%)-n:?/- -66 -u6?$ 26666$$$ -6? -%46666$$<?$2. -u?76& --u??v--u??I6?--?666ve26v- %$466&26e $4266f u$$$ruۛ e 26v- %$4666?*---/---II9?*v-= .l1%)-n:?/- -%466&<?$ 66666$d -6? --??6--  -%$$46666&<?$ -u>???v--*-=766&$$$d - -%4666?-e$$?$666f -66#$$I66&6II6666?66666$d I$$66666266&$ 66&$d 66&266&$ ??$$$ ----?w?766$$$$$ --??v--??----??666666666-- $$$$666 $$$6666v  $$$$4vd 4v66&$$ 4----.---=66666----$$$$,---r----66666????LI $$$$*-----R  e 26- $666?/*----=I ?v-2%M.<)?-R/6666d  666646$du6&$ 56&6&$t -6& -u6?$2666$$d -6? u$666$$26&d - --??-u?? 6-??-66ve26- $662ve $626f u$$ru?$ - -u>??v-=266$$/=$ u -$66?4m1?6666$ -6&I66I666?/6666d  666646$du6&$ 56&6&$t -6& -u6?$2666$$d -6? u$666$$26&d - --??-u?? 6-??-66ve26- $662ve $626f u$$ruox<@}~??|_Oox?g}xG{o=_}v^o>{m?w{?go?~o@|?p>{m?_}v{?ppx?X_~zoo>{k/?{~?~>{o7owoW?O~ox_8onV;W[]_]nw_ox?|g?~xc?oox p|ao?lxg}]_owsO{_qq~{nqan{`xq`o88`}~?~~gox?O}x~{o>_6`>{m?{{?|p{{@|~?~~1wvwg?o@q?|C>{m?_}~g?@~`?@_O~zog>{K/{~??~>{o7_ow[oO?_gxs_X_nfWO{]_>nwOo?~?o?x?ocO}k_ow{o_nn~{v{nn{{wn~O0?~}~?_qwlw`\o<~`ox?a@}xx8_}\o>{ <`|?8o{;?o{~_}~.wvsw?o@G?xx>{m?_mv_??`@?`@?W~v[k>w-w.{~?> x`\o_`wpg_X_nvW_{]_~nwoo|?o?x?o~_}wx?@{?|c@ooo}}`|a?l?~gO>x~n~{z{fn{{on}_ |~?_?|k{o;_ow[o_?>_ox? }xc{m7_}w[o6[m?_w?X_{{?ww~_>wv{w?o@?x?~>{m?_Uv?G_@X~nx1{~?G wpO_X_lfW_{_>fwooq?o           yxA?ooo}={{^o^k|sg>_ow~np{p{~`{{aqswxO8oJV[_{]n]vox?>pp}xO{m7_}w;w*+m?_ow?X_{{@ww~_>?wvyx?o`}?__`_@_~{~?p_0G~~?]{o}_ow[g_?^wgog?wox?o@?~?x>{m?_9v>}xA?ooo}];?oogy{s>_ow~nnun{~n{{nnow?~oxp67\_{]qcfoxG?G|}x{m7_}v{zsl?_ow{?X_s;ww|_>?gv|_x?o~?~}?__y_@_8{~??~wp`}xxs~xXc{o~_ow[k_?]:::255"D$(13)(4)Z:16302,0:::D$"BLOAD LOGO":16304,0:16368,0J1(16384)128:J127J132JJ1:J40030#16368,0(2::D$"CATALOG"  -????66.--??766--------????66.--??766 --u??666--e$$?/66.---=???766MI $$$$$ --?66666-??II 6666??466666$ 66666----66666$$$$$ 6666666666$$$$$6&u&$$$$4 --666??$$$ ----???66&$$$$4 --666 - ??d - ---66&??-- 566&I  Ibb5 II----????   --?6 --66'$<6I:???$$$ Iq>???/---566$$$ 66666--- ???--- ??/ --&??666-- 466666--- $$$???-----????-I16666&$$??----J  6R---  4II --&&$$$ 666-- $$$I 66666?/--= ------b--u??--??66.---='$$66666----????66.--u???d -?6e--??$----6& --??v-$$$,6666666.$$$$$$$,6666666.$$$$$$$,6666666.$$$$$$$,6666666>I1666 6n $4I66666$O`{&5IVer6666666.$$$$$$$,6666666.$$$$kl8`iiLȱȱȱ`231 23L1`X "͏Ԣ ۋL@ȑhhLW` +L̠ҮҠɤȮΤĮ̠Ů̠ĮɥԧCBFFL=$<% " C0` UUUUUUUUUUUUUUUU UU P ̋ 0 EL %% "$`)*ij)*hLD D0 ELLiF?eԢ ۋ L뭒ȑ륦BC I ۋLFȩȩ멍 ` i X L LB>H)hɠFȄBLL$B<%=eB$$ " Eȱ81ׅh<&݅ۅ߅,`߅߅ h%<$=ЅFȄB@ i1i>CBCC`  EH)HJJh)JJL)%"# !L-`Ԣ ۋȱLKТLF ۋH?@DE >L- Li0 ࢌL81Hȱ81Hȥ 8$Ʌ<ȥ 8$(=ȱ8"(>ȱ8#>L~?ȱ81@ȱ Dȱ` 憍` 憍` Ii`` Lo0`LMLS0`LgLm JF8ȹe8ИL`Lø{{ttlnghab\\WWRRMNIIEEAA=>::673401..+,))&'$` 0 `{80 ``hhhhz{L2  c `#! "`#67 X ? T @UWWRP{``` 0䍃$% W `  ` Ii }1~20 y|1}2~00` L䄥ޅhhL-$(`L XL׆+**++8 $%` $%%#"%L"$$!L` 0`*U HmhHmh c` z獀筇`z{{z`䭀yxz`6 zzɡ`hhL2hh7n8o L2z F8   ` e vȱ e w|}~ vw ΁ }~`67 ( cTQLX hhL2 FhhL/    `LL#L3L n A s %`섉n䄌NK3Ʉ9ņ %| m||i|$~}~m}}~L"i}~L"xy0 i          ?$$$ 6666$$$$--u6??/u)-u??6--6??---??5666&666v-- $$$466v $$46666 $$$$v# 4v66$$ 4---.--=6666---$$$,--r---6666???LI$$$----=R) -$66$?$ 6666$ -6? -u?6-eI 6666$6--e$??-- $??7)-u&??666-- 46666--e$$$??/---???66--??66------???66--??66)-u??666--%$?-6666$$---$$6666)-=7666>/-=II666??46666$$4- 6666---6666$$$$ 66666666$$$t&$$$4)-u666??$$$ -6666$$$$--u6??7)-u66I 6666?/--= --.--= --6?/-6??66---'$4666&---???66--u6??/II?.--6??$,---6&)-u6??6-- $??$ )-u6?$)--6666II I---???  --L -6$vN??$$ I66#$--=??$ 666?7----5????7----5????7----5????'I666M 6 $ 6666 $$$$6/-???-66=?---I6666<-- ??d--II& #7J 5' v-e dI6II66 I6666$$ LI:---I266&$?/--=R <. *--=R <.II )-u666??$$$ --Į  `(=Vhlw"3EOdw|$4FWcn'3CT`n#*4EL[gs'2----5????7----5????7----5???kl8`iiLȱȱȱ`231 23L1`X "͏Ԣ ۍL@ȑhhLW` +L̠ҮҠɤȮΤĮ̠Ů̠ĮɥԧCBFFL=$<% " C0` UUUUUUUUUUUUUUUU UU P ̍ 0 EL %% "$`)*ij)*hLD D0 ELLiF?eԢ ۍ L뭒ȑ륦BC I ۍLFȩȩ멍 ` i X L LB>H)hɠFȄBLL$B<%=eB$$ " Eȱ81ׅh<&݅ۅ߅,`߅߅ h%<$=ЅFȄB@ i1i>CBCC`  EH)HJJh)JJL)%"# !L-`Ԣ ۍȱLKТLF ۍH?@DE >L- Li0 ࢎL81Hȱ81Hȥ 8$Ʌ<ȥ 8$(=ȱ8"(>ȱ8#>L~?ȱ81@ȱ Dȱ` 戍` 戍` Ii`` Lo0`LMLS0`LgLm JF8ȹe8ИL`Lø{{ttlnghab\\WWRRMNIIEEAA=>::673401..+,))&'$` 0 `{80 ``hhhhz{L2  c `#! "`#67 X ? T @UWWRP{``` 0䍃$% W `  ` Ii }1~20 y|1}2~00` L䆥ޅhhL-$(`L XL׈+**++8 $%` $%%#"%L"$$!L` 0`*U HmhHmh c` z獀筇`z{{z`䭀yxz`6 zzɡ`hhL2hh7n8o L2z F8   ` e vȱ e w|}~ vw ΁ }~`67 ( cTQLX hhL2 FhhL/N   `LL#L3L n A s %`솉n䆌NK3Ɇ9ň %| m||i|$~}~m}}~L"i}~L"xy0 i          6&$6M?666$ u6&6&I66?666$-  6666&$ & 6&66$, u6& -6?$666$,e$? u66$$66$, u -=?-?/ 666$$=/6ve $666 $66 $$& 6ve $66?----I9w-i-?*- ?$$ 666$$$-u?7)u6 $$L666$$$-u?)u?v-?--?66666v- $$466 $$666 4$$$vd 4v6&$ 4--.-=666--#$$-=r--666??L!$$---J u$66$>4666$ u6 -?6- I166&$ -6" ->?7--'du66& - ?d)u6?d-6/? I--??q - )66:?$$ 66$?-- 666H)hɠFȄBLL$B<%=eB$$ " Eȱ81ׅh<&݅ۅ߅,`߅߅ h%<$=ЅFȄB@ i1i>CBCC`  EH)HJJh)JJL)%"# !L-`Ԣ ێȱLKТLF ێH?@DE >L- Li0 ࢏L81Hȱ81Hȥ 8$Ʌ<ȥ 8$(=ȱ8"(>ȱ8#>L~?ȱ81@ȱ Dȱ` 才` 才` Ii`` Lo0`LMLS0`LgLm JF8ȹe8ИL`Lø{{ttlnghab\\WWRRMNIIEEAA=>::673401..+,))&'$` 0 `{80 ``hhhhz{L2  c `#! "`#67 X ? T @UWWRP{``` 0䍃$% W `  ` Ii }1~20 y|1}2~00` L䇥ޅhhL-$(`L XL׉+**++8 $%` $%%#"%L"$$!L` 0`*U HmhHmh c` z獀筇`z{{z`䭀yxz`6 zzɡ`hhL2hh7n8o L2z F8   ` e vȱ e w|}~ vw ΁ }~`67 ( cTQLX hhL2 FhhL/   `LL#L3L n A s %`쇉n䇌NK3ɇ9ʼn %| m||i|$~}~m}}~L"i}~L"xy0 i          766--------????66.--??766 --u??666--e$$?/66.---=???766MI $$$$$ --?66666-??II 6666??466666$ 66666----66666$$$$$ 6666666666$$$$$6&u&$$$$4 --666??$$$ ----???66&$$$$4 --666 ??$$$ ---66&??-- 566&I  Ibb5 II----????   --?6 --66'$<6I:???$$$ Iq>???/---566$$$ 66666--- ???--- ??/ --&??666-- 466666--- $$$???----????66.--??666&$$??----J  6R---  4II --&&$$$ 666-- $$$I 66666?/--= ------b--u??--??66.---='$$66666----????66.--u???d -?6e--??$----6& --??v-- ??d -$$$$$$$,6666666.$$$$$$$,6666666.$$$$$$$,6666666>I1666 6n $4I66666$O`{&5IVer6666666.$$$$$$$,6666666.$$$$$$$,6666666.iiLKȱȱȱ`&L'L%L &L'LL%L`LLLX LLLL"L̓LԢ KL4JȑhhLKJ` LL̠ҮҠɤȮΤĮ̠Ů̠ĮɥԠĮ BFFLI=$<% " C0` UUUUUUUUUUUUUUUU UU P KL 0 9LLKL%% "$`LLijLLkl8` D0 ELJLJiF?eԢ K LLL}LLL뭆Lȑ륦BC KI KLL}LFȩȩ멍 ` Li LX LLLLI KLIB>H)hɠFȄBLILJB<%=eB$$ " Cׅh<&݅ۅ߅,`߅߅ h%<$=ЅLLLLFȄB@ i%Ki>CBCC` K 9LH)HJJh)JJLI)hLJDL!H`Ԣ KȱL?HĢLL}LLF KH?@DE >L!I LL}Li0 ԢLL}L81Hȱ81Hȥ 8$Ʌ<ȥ 8$(=ȱ8"(>ȱ8#>LrH?ȱ81@ȱ Dȱ Eȱ81C`C FC`C FIiC`` LcG0`LAGLGG0`L[GLaG GJFG8ȹGe8ИLG`LGø{{ttlnghab\\WWRRMNIIEEAA=>::673401..+,))&'$%"# !C` F0 C`{CCC80 ``ChhhhzC{CL2CLM cFLLCCCCM `#! "`#6C7 X ?FCCC  TWRPCCC{C``` F0E䍃C$% W `F F ` FIiC` F C}C1E~C2EC0E yD|C1E}C2E~C0E0E` LDޅhhL-D$(`LCC XCLF+**++8 $%` $%%#"%L"$$!LE` F0EC`*U FCHCmCChHCmCChLM cF` FzCCC獀CC筇C`zC{C{CzC`C䭀CyCxCzC`6C zCzCɡ`hhL2Chh7CnD8CoD L2CzC FE8   ` e vCȱ e wCCC|C}C~C vCwCC ΁C }C~C`67 ( cFTQLX DhhL2C C FEhhL/CCC C H C`LCLGL'GLH nF C AD C sD E %D`DnFDNEKE3EEED9EEEEFFFFFFFG%|C Cm|C|Ci|C$~C}C~CCm}C}C~CL"i}C~CL"xCyC0 i          $$$--u6??/u)-u??6--6??---??5666&666v-- $$$466v $$46666 $$$$v# 4v66$$ 4---.--=6666---$$$,--r---6666???LI$$$----=R) -$66$?$ 6666$ -6? -u?6-eI 6666$?$ - -??7)-u&??666-- 46666--e$$$??/---???66--??66------???66--??66)-u??666--%$?-6666$$---$$6666)-=7666>/-=II666??46666$$4- 6666---6666$$$$ 66666666$$$t&$$$4)-u666??$$$ -6666$$$$--u6??7)-u66?$$$ 6666$66?/--= --.--= --6?/-6??66---'$4666&---???66--u6??/II?.--6??$,---6&)-u6??6-- $??$ )-u6?$)--6666II I---???  --L -6$vN??$$ I66#$--=??$ 6666--e$??-- $----5????7----5????'I666M 6 $ 6666 $$$$6/-???-66=?---I6666<-- ??d--II& #7J 5' v-e dI6II66 I6666$$ LI:---I266&$?/--=R <. *--=R <.II )-u666??$$$ --I 66 `(=Vhlw"3EOdw|$4FWcn'3CT`n#*4EL[gs'2----5????7----5????7----5????7----5????7iiLMȱȱȱ`&N'N%N &N'NL%N`NNNX NNNN"N̓NԢ ML4LȑhhLKL` NL̠ҮҠɤȮΤĮ̠Ů̠ĮɥԠĮ BFFLK=$<% " C0` UUUUUUUUUUUUUUUU UU P MN 0 9NLMN%% "$`NNijNNkl8` D0 ELLLLiF?eԢ M NNL}NNN뭆Nȑ륦BC MI MNL}NFȩȩ멍 ` Ni NX NNNLK MLKB>H)hɠFȄBLKLLB<%=eB$$ " Cׅh<&݅ۅ߅,`߅߅ h%<$=ЅNNNNFȄB@ i%Mi>CBCC` M 9NH)HJJh)JJLK)hLLDL!J`Ԣ MȱL?JĢNL}NNF MH?@DE >L!K NL}Ni0 ԢNL}N81Hȱ81Hȥ 8$Ʌ<ȥ 8$(=ȱ8"(>ȱ8#>LrJ?ȱ81@ȱ Dȱ Eȱ81E`E HE`E HIiE`` LcI0`LAILGI0`L[ILaI IJFI8ȹIe8ИLI`LIø{{ttlnghab\\WWRRMNIIEEAA=>::673401..+,))&'$%"# !E` H0 E`{EEE80 ``EhhhhzE{EL2ENO cHNNEEEEO `#! "`#6E7 X ?HEEE  TWRPEEE{E``` H0G䍃E$% W `H H ` HIiE` H E}E1G~E2GE0G yF|E1G}E2G~E0G0G` LFޅhhL-F$(`LEE XELH+**++8 $%` $%%#"%L"$$!LG` H0GE`*U HEHEmEEhHEmEEhNO cH` HzEEE獀EE筇E`zE{E{EzE`E䭀EyExEzE`6E zEzEɡ`hhL2Ehh7EnF8EoF L2EzE FG8   ` e vEȱ e wEEE|E}E~E vEwEE ΁E }E~E`67 ( cHTQLX FhhL2E E FGhhL/EEEB E J E`LELIL'ILJ nH E AF E sF G %F`FnHFNGKG3GGGF9GGGGHHHHHHHI%|E Em|E|Ei|E$~E}E~EEm}E}E~EL"i}E~EL"xEyE0 i          666$ u6&6&I66?666$-  6666&$ & 6&66$, u6& -6?$666$,e$? u66$$66$, u -=?-?/ 666$$=/6ve $666 $66 $$& 6ve $66?----I9w-i-?*- &$6M?$-u?7)u6 $$L666$$$-u?)u?v-?--?66666v- $$466 $$666 4$$$vd 4v6&$ 4--.-=666--#$$-=r--666??L!$$---J u$66$>4666$ u6 -?6- I166&$ -6" ->?7--'du66& -6&$6M?-6/? I--??q - )66:?$$ 66$?-- 666H)hɠFȄBLMLNB<%=eB$$ " Cׅh<&݅ۅ߅,`߅߅ h%<$=ЅPPPPFȄB@ i%Oi>CBCC` O 9PH)HJJh)JJLM)hLNDL!L`Ԣ OȱL?LĢPL}PPF OH?@DE >L!M PL}Pi0 ԢPL}P81Hȱ81Hȥ 8$Ʌ<ȥ 8$(=ȱ8"(>ȱ8#>LrL?ȱ81@ȱ Dȱ Eȱ81G`G JG`G JIiG`` LcK0`LAKLGK0`L[KLaK KJFK8ȹKe8ИLK`LKø{{ttlnghab\\WWRRMNIIEEAA=>::673401..+,))&'$%"# !G` J0 G`{GGG80 ``GhhhhzG{GL2GPQ cJPPGGGGQ `#! "`#6G7 X ?JGGG  TWRPGGG{G``` J0I䍃G$% W `J J ` JIiG` J G}G1I~G2IG0I yH|G1I}G2I~G0I0I` LHޅhhL-H$(`LGG XGLJ+**++8 $%` $%%#"%L"$$!LI` J0IG`*U JGHGmGGhHGmGGhPQ cJ` JzGGG獀GG筇G`zG{G{GzG`G䭀GyGxGzG`6G zGzGɡ`hhL2Ghh7GnH8GoH L2GzG FI8   ` e vGȱ e wGGG|G}G~G vGwGG ΁G }G~G`67 ( cJTQLX HhhL2G G FIhhL/GGG G L G`LGLKL'KLL nJ G AH G sH I %H`HnJHNIKI3IIIH9IIIIJJJJJJJK%|G Gm|G|Gi|G$~G}G~GGm}G}G~GL"i}G~GL"xGyG0 i          `^_ij^_kl8`iiLȱȱȱ`^_klmn)^_eeLn8`ee` ̔`&&eeee` ff`8 ̔ S8` ̔ A731ee ̔80ee ̔`&&eeee`LjA L ERROR IN SORT CALL.6 VARIABLEH SORT ARRAY\ ELEMENT COUNT̢ ̢  آ  ` jj&&8  TT TT`^U_Uij^U_Ukl8`iiLUȱȱȱ`^U_Uklmn)^U_UeeLnU8`ee` T`&&eeee`T TffTTT`8 T ST8` T A731ee T80ee T`&&eeee`TSLjSAS TTTTL ERROR IN SORT CALL.6S TVARIABLEHS TSORT ARRAY\S TELEMENT COUNTTTT̢ U̢ U آ USS `U jj&&8   z#??????   ҭǭ ҭͭ ҭĭҭǭÈϠϠ" !Š"ŠˆԳԴ ҭͭ ҭĭ ŠŠ Š ŠŠŠ ŠҠàԠˠҠ Ԡ ҠϠҠدà>T DISKETTE.":20500:;|y"ERROR NUMBER ";ER:20500:10000WPò ADDRESSES AND LENGTHS}ZÃ18176,3825,17664,4162,17152,4609dÃ34304,3837,34048,4174,33536,4621VE.":20500:a,yER4ĺ"PLEASE REMOVE THE WRITE PROTECT STICKER":"FROM THE DISKETTE.":20500:6yER9ĺ"THE DISKETTE IS FULL.":"PLEASE INSERT A DIFFERENT DISKETTE.":20500:@yER10ĺNAME$;" IS ALREADY ON THE DISKETTE.":"PLEASE INSERT A DIFFERENNTINUE";0(PZC(16384):ZC141ZC16020520u2P16368,0:7:" ";:21::ZV1:ZH1:0uONERR SUBROUTINES yER(222):19:958: "yER6ĺ"PLEASE INSERT THE PROGRAMMER'S AID":"VOLUME 2 DISKETTE INTO THE DISK DRIOR:":o 9:"HGR CHARACTER GENERATION":9:"EXTENDED INPUT":9:"MUSIC GENERATION":5:"OR FRAME NUMBERING"~20500::':PSPACE-BAR ROUTINEPZH(36):ZV(37):ZZ1200:ZZP24:7:16368,0#P"PRESS ";::"SPACE BAR";::" TO COT":"PROGRAM:"A 7:" 1) SET HIMEM (SEE THE SUPPORT BOOKLET)."t 9:" 2) LOAD THE ROUTINE WITH THE STATEMENT:" Q$(34) 9:"PRINT CHR$(13);CHR$(4);":9:Q$;"BRUN ";NAME$;Q$ 14:" 3) FOLLOW THE INSTRUCTIONS IN THE":5:"SUPPORT BOOKLET F:10V"PLEASE INSERT THE DISKETTE ON WHICH YOU"::"WOULD LIKE TO SAVE ";NAME$;"."c20500: D$;"BSAVE";NAME$;",A";A$;",L";L$:10:NAME$" HAS NOW BEEN COPIED TO" :"THE NEW DISKETTE.":20500 :4:"TO USE ";NAME$;" IN AN APPLESOFI16A$(I),L$(I) I8A$A$(VS):L$L$(VS)bLOAD OR COPY THE APPROPRIATE VERSIONn31000CL$"1"2030D$;"BRUN";NAME$X$" ":S$"LG-"X$(13)6:"^";NAME$;X$;"IS NOW LOADED."::10000:D$;"BLOAD";NAME$ :" 3) LARGE (25 CHARS/LINE)"N 14:868:"WHAT IS YOUR CHOICE? ";SZ$ (SZ$)1SZ$"1"SZ$"3"ĺ:"PLEASE TYPE 1, 2, OR 3":1240 S$(1)"SM-":S$(2)"MD-":S$(3)"LG-" S$S$((SZ$)) NAME$"MASTER-"S$K$ VS(SZ$)3(K$"48")2"x jK$"48"(978)157Ģ20:"SORRY,BUT YOU MUST USE A 48K APPLE WITH":"48K DOS TO CHOOSE THAT OPTION.":20500:1106 :5:"CHOOSE ONE OF THE FOLLOWING CHARACTER":"SETS:" :" 1) SMALL (40 CHARS/LINE)" :" 2) MEDIUM (28 CHARS/LINE)"#" 1) THE BINARY SUBROUTINE WILL BE USED":6:"ONLY ON A 48K APPLE." P:" 2) THE BINARY SUBROUTINE WILL BE USED":6:"(OR MIGHT BE USED) ON A 32K APPLE." R13:958:"PLEASE TYPE 1 OR 2: ";KK$ VKK$"1"KK$"2"1106 `K$"48":KK$"2"K$"3" 2) LOAD ONE OF MASTER'S BINARY":6:"SUBROUTINES INTO THE COMPUTER."r 813:868:"PLEASE TYPE 1 OR 2: ";CL$ BCL$"1"CL$"2"1080 DCL$"1"1100 FK$"48":(978)157K$"32" H1200 L:5:"CHOOSE ONE OF THE FOLLOWING CASES:"E N:255 8192 D$(13)(4)6 D$;"NOMON I,C,O"] DETERMINE WHICH VERSION IS NEEDEDw :18:"MASTER":34,2 5:"CHOOSE ONE OF THE FOLLOWING ACTIONS:" $:" 1) COPY ONE OF MASTER'S BINARY":6:"SUBROUTINES ONTO ANOTHER DISKETTE."H .:nNAME: MASTER1sLAST UPDATE: 2/17/82 RPBrxAUTHOR: CRAIG COPLEY (APPLESOFT PORTION BY PHILIP BOUCHARD)ASSOCIATED FILES: MASTER-SM-32,MASTER-MD-32,MASTER-LG-32,MASTER-SM-48,MASTER-MD-48,MASTER-LG-48INITIALIZATION::      ΠŮ@@٠ӠРή@@ׯŠŠŮ@@ˠέƠŮ@@ԠέƠŮ@@ԭΧԠŠŮ@@ŠĠŠҮ@@٠Ũש@@ԠŮ@@Ҡή@̠ŠЬάԬ׮ŭҮ٠ĠżٯξŠج٬ҬŬ̠Ԯάج٬ìӬҮҠΠàԠ@ō@@ϭ̠РŮ@@ˠРˮ@@ŠҮ@@ĠͭŠŮ@@̯ĠӠȠҠЮԠجٺκԠجٺԠجٺҺРԠήԠƮٮԮԮҠҠخź̠ήŠϠ̮ϮƮĮŠȺŠȺŠנ̤ӳàԠȍӱǍҠŠŠנżٯξҠƠӼؠӺȺŠŠΠҼ٠ήżҠμٯξŠ   L  `  X`  `(!"#` +"` ELQɃ`L u ' @ɍ`hhL `  `  @8`L$%L"=e?BC ,` hh `Oʬ@ Uª u g筤 H )h X`ʆ ݠ`hhLdd >L hhL? q L> 8  'L ' 8        L!"#` !",P ` !LC !L] /LC /L] ~  Lx ~ ɿ Lx ` ~    Lx ~  խ   Lx% S '    ' ` E j& n "#$%&3 X D '`? U U U U խ͠ #ΡΠL    jjmmHjhJJJJ)j L L  L   `ߠ ' @ɭɫ ʠ ' @80   +   L 8# X ',Q a ' @ |` '   T '  `K '  R `S ' @80  L!  ' ` |  '` '`L #  L XB ' j ԭʥ͡@ڠ '  ' A uiȱiȥ`@ ' ' jL   ' '  ' A L l ' Yhh + XLD f ' Y 9 ' XL  ' Y  hh +L  '  g,      L,  Xo   'L= p\ q] L= ^ '  gH  )h   L Ǡ ' Y  LU 9 8 X̠ '  ' A 8 '  $K '$ '  $ ' 0 q ˭) pL] L' X g   L= )(L= !    L= 6  +      L=    'L X 'L  u孺,W,S,P X '  L$ X '  X( '  LV ϭũ6}&}}}ōč X '$ '  $ '$  '$. ' ; 'L ' j NLd X + X^ ' L Xt ' j 쭡筠 L 0L  X + X ' ' ' X '@@ $ '   ' A ' j  @#! XD 'ѠA GRAPHIC TABLET 1.0H BY:CRAIG COPLEY (C) MECC 1980 J40T2144^(2147L 9 X 'e 'LLLU PJ TuVTvP`P&Q&R&S8RTSURSP` 9L̍@x 3,Q,T X"          h(]EH^E (\Eʈ]E^E<=<ȱ<`#m]E]Em^E^E>hh,$H @h$EL(FɃ H H8`HH nDL+E  HH`Π<)> e>i$H )iH(< "`$<ɍ B @LAp < B$<($( Bȱ( BLB¢окж G`p<ɍ$8#$<($LB $ " E#(<)=% "<(LE "$թDL(FŠԠĪ  %% " EB$( B<ɬ B<ȑ($,$Ce=,$C` B$ <ɬ B(ɬޢf`pT<ɀl Bȱ( ɯ$<ɕQ(() .<%<$<($ɠ<ɯ<ɍ,ɠ $( BLB B$( Bƈ( B$к Bȱ( ɯ$==( C B CLAHE0.JJJi $HC (!"# X% " Ɉ $0$(ɛΤ$!< BA AHAH`$(< 轕AP $<($У=,MBpP=$A($AHAH`I i8`( B=ȱ( B====)=8`=)8` y@LA<ɍLBL/$< B3$$<(hhLrA oG yA oG A oG A oG !"# " XA oG% (!$ " LˮîԮˮήɯϠҪBBˬaDFEGŬuDͬFԮGGGŮGì]DˬeDάiDԮB{B@ @L / X% "@e oG% "$ @k oG =<<ȱ< GRH y@LAźͮ (!"# X HH )h H ) )и% "$fA oG kA oG      DDD>'|y"ERROR NUMBER ";ER:20500:10000ASE REMOVE THE WRITE PROTECT STICKER":"FROM THE DISKETTE.":20500:6yER9ĺ"THE DISKETTE IS FULL.":"PLEASE INSERT A DIFFERENT DISKETTE.":20500:@yER10ĺ"SORT";K$;" ALREADY EXISTS ON THIS DISKETTE.":"PLEASE INSERT A DIFFERENT DISKETTE.":20500:141ZC16020520X2P16368,0:7:" ";:21::ZV1:ZH1:s0uONERR SUBROUTINES yER(222):19:958:"yER6ĺ"PLEASE INSERT THE PROGRAMMER'S AID":"VOLUME 2 DISKETTE INTO THE DISK DRIVE.":20500:D,yER4ĺ"PLEOOKLET." 20500% 'EXIT ROUTINEG ':::(4)"PR#0":(4)"IN#0"c $':255:(4)"MAXFILES3"i * PSPACE-BAR ROUTINE PZH(36):ZV(37):ZZ1200:ZZ P24:7:16368,0 #P"PRESS ";::"SPACE BAR";::" TO CONTINUE";(PZC(16384):ZCSORT";K$;" IN AN APPLESOFT PROGRAM:"G 7:" 1) SET HIMEM TO ";A$;"."z 9:" 2) LOAD THE ROUTINE WITH THE STATEMENT:" Q$(34) 9:"PRINT CHR$(13);CHR$(4);":9:Q$;"BLOAD SORT";K$;Q$ 14:" 3) FOLLOW THE INSTRUCTIONS IN THE":5:"SUPPORT B31000 D$;"BLOAD SORT";K$( :10{ "PLEASE INSERT THE DISKETTE ON WHICH YOU"::"WOULD LIKE TO SAVE SORT";K$;"." 20500: D$;"BSAVE SORT";K$;",A";A$;",L700" :10:"SORT";K$;" IS NOW SAVED ON THE DISKETTE.":20500$ :4:"TO USE j13:958:"PLEASE TYPE 1 OR 2: ";KK$C tKK$"1"KK$"2"1130` ~K$"48":KK$"2"K$"32" K$"48"(978)157Ģ20:"SORRY, BUT YOU MUST USE A 48K APPLE WITH":"48K DOS TO CHOOSE THAT OPTION.":20500:1130 A$"21248":K$"48"A$"37632"  OF MAIN PROGRAM( :19:"SORT":34,2W L:5:"CHOOSE ONE OF THE FOLLOWING CASES:" V:" 1) THE BINARY SUBROUTINE WILL BE USED":6:"ONLY ON A 48K APPLE." `:" 2) THE BINARY SUBROUTINE WILL BE USED":6:"(OR MIGHT BE USED) ON A 32K APPLE."' ( nNAME: SORT/sLAST UPDATE: 1/12/82 RPBpxAUTHOR: CRAIG COPLEY (APPLESOFT PORTION BY PHILIP BOUCHARD)ASSOCIATED BINARY PROGRAMS: SORT32, SORT48INITIALIZATION::255D$(13)(4)D$;"NOMON I,C,O" START     A`A`AL@8Cd"Ys-{NMiMiMMMMMMMMMM M;Nm;m)*M/  6n!$M6>---???6n$l6n$4 m m/) . m/ mmm>6.$l6.$l6>--->??7--->??'@% "$  ,W,S,R@,T,P@@@$(H)@ @@ihJJJJ @$'$@i@@ȩ$@@%%%% "@i@L?@`H@@ h @AA `A.A*AmAAAmAA AAA AAAAiAAiA 9ĺ"OVERFLOW.":2009 ER11ĺ"ILLEGAL CHARACTER.":200\ ER254ĺ"ILLEGAL INPUT.":200u "*ERROR "ER"*":200I:200A0"):H19H1H17% H115H10600E 0H9H916H1::H91E9600[ :A$;" = ";H9:200 XA$" - ILLEGAL HEX NUMBER.":200 bA$" - ILLEGAL DECIMAL NUMBER.":200 lER(222):ER255ĉ:: vER16ĺ"PROGRAM ERROR.":200 ER53600 ER6"500* ,L1((A$)):H$"":(L1)A$610Z JL2L1(L116)16:L1(L116):L29L2L27| TH$(L2("0"))H$:L10330 ^A$;" = $";H$:200 H90:X2(A$):H$(A$,X,1):H1(H$)("0"):H19H1H17 H90:X2(A$):H$(A$,X,1):H1(H$)("UMBERS ONE AT A TIME,"= " EACH FOLLOWED BY A 'RETURN'."o :"2. HEX VALUES SHOULD BE PREFIXED BY '$'." "3. TO EXIT THE PROGRAM, PRESS 'RETURN'." I140:"-";: 34,12 :"NUMBER: ";A$:A$""ĉ:: (37):868 (A$,1)"$w PROGRAM: HEX/DEC-BY: CRAIG COPLEYJLAST UPDATE: 2/5/82 RPBb(APPLESOFT II BASICh2r<620d::10:"HEX/DECIMAL CONVERTER"n3:"THIS PROGRAM WILL CONVERT HEX NUMBERS"x"TO DECIMAL AND VICE VERSA." :"1. ENTER THE N     >D zN RSPACE BAR ROUTINE4 RZV:ZH:16368,0] R"^PRESS ^S^P^A^C^E ^B^A^R TO ";ZW$;n &RZC(16384) 0RZC141ZC16021030 :R16368,0:ACTER ^SET" 3:200009 ZV12:ZH2:ZW$"END":21000F '(29):` NAVAILABLE CHARACTERSl *N(23); 4NI6590:(I);: >N:(26) HNI6590:(I);: RN: \NI3364:(I);: fN(91);(92);(93);(95);(96); pNI123127:(I);::00( ZV21:ZH7:ZW$"CONTINUE ":21000B MEDIUM CHARACTER SET^ D$;"BRUN MASTER-MD-32" 5:"^MEDIUM ^CHARACTER ^SET" 6:20000 ZV16:ZH1:ZW$"CONTINUE":21000 LARGE CHARACTER SET D$;"BRUN MASTER-LG-32" 3:"^LARGE ^CHARnNAME: EXAMPLE #1=xEXAMPLE OF MASTER CHARACTER SETS{ASSOCIATED FILES: MASTER-SM-32,MASTER-MD-32,MASTER-LG-328192D$(13)(4)SMALL CHARACTER SETD$;"BRUN MASTER-SM-32"11:"^SMALL ^CHARACTER ^SET" 8:200     >;1;Z$;R21:7:16368,0H&R"^PRESS ^S^P^A^C^E ^B^A^R TO CONTINUE";Y0RZC(16384)t:RZC141ZC16021040DR16368,0:0uERASE PORTION OF SCREEN:u0DuIV1V2NuH1,IH2,IXuI::5:"^F = -^C +32";:6@ Q$;9;"O 9 O";:10:A$;9;"5";A$;0K  21000i CHANGE BACKGROUND COLORS{ S$;5;P$;5;W$ I08 B$;I;C$;I1 :" ";TEST$ J11000:: J12000: 'QUIT$: RSPACE BAR ROUTINERC$;3;S$;1;P$0( V1114:V2126:H1118:H2211:30000M V136:V252:H1126:H2219:30000p V19:V215:H164:H2110:30000{ 21000 SUBSCRIPTS AND SUPERSCRIPTS 4:8:S$;2;P$;2;"^E=MC";Q$;7;"2";Q$;0 6:8:"^H";A$;5;"2";A$;0;"^S^O";A$;5;"4";A$;0 R$;0:210004 ERASE SELECTED PORTIONS OF SCREENB 4METHOD 1d >21:34:S$;1;HH$;HH$;HH$;HH$t H2:18:TT$ R6:17:S$;2;HH$ \8:1:P$;2;TT$ f3:8:HH$ METHOD 2 V154:V278:H10:H2144:30000 V190:V2108:H10:H2100:3000 `P$;2;C$;1;TEST$;C$;2;TEST$;C$;5;TEST$;C$;6;TEST$_ j2:Z$;P$;2;S$;2;C$;1;TEST$;C$;2;TEST$z tC$;5;TEST$;C$;6;TEST$ ~3:P$;3;S$;3;C$;3;TEST$ 6:W$;C$;6;S$;2;TEST$;P$;2;TEST$ :C$;3;TEST$;R$;4;TEST$ :R$;7;TEST$;P$;1;R$;1;TEST$ $(2):C$(3):H$(8)> L$(12):P$(16):Q$(17):R$(18)f S$(19):T$(20):W$(23):Z$(26) QUIT$(29):HH$H$:TT$T$" " $I13:HH$HH$HH$:TT$TT$TT$: LFILL SCREEN WITH VARIANTS OF WORD VTEST$;P$;2;TEST$;W$;TEST$;P$;1;TEST$4nNAME: EXAMPLE #2CxEXAMPLE OF MASTER CHARACTER GENERATIONgASSOCIATED FILES: MASTER-SM-32mINITIALIZATION8192(13);(4);"BRUN MASTER-SM-32"ASSIGN CONTROL CHARACTERS TO VARIABLESTEST$"^TESTING " A$(1):B     D>:15:T$(I):#luI139:"-";::)vu.21:10:(26);"^PRESS SPACE BAR TO END";6A$G'(12);(29)M'd0uPRINT EXPLANATION|:u(12);(26);:QQ1Du15:"^QUESTION #";Q:Nu"^FIELD TYPE:":"^CURSOR:":"^FIELD LENGTH:"Xu"^VALID INPUT:"::"^ERROR SIGNAL:" bu3:I16 T$(1)"UNDERLINES":T$(2)"NONE"] T$(3)"EXACTLY 8 CHARACTERS":T$(4)"DIGITS AND HYPHEN"~ T$(5)"":T$(6)"BELL":30000 FI$"13 ++4-91" 12:"^TELEPHONE: ";: "S$(6)IN$"" SUMMARIZE RESULTS (12);W$;:6I16:10:S$(I):FI$"14 %%4AZ1"* P12:"^STATE: ";W$;:; ZS$(4)IN$""^ xT$(1)"INVISIBLE":T$(2)"NONE" T$(3)"EXACTLY 5 CHARACTERS":T$(4)"DIGITS 0-9 ONLY" T$(5)"":T$(6)"MESSAGE":30000 FI$"15 ((2 2" 12:"^ZIP CODE: ";W$;: S$(5)IN$"""TERS, COMMA, PERIOD"> T$(5)"AND SPACE":T$(6)"BELL":30000S FI$"13 7%3AZ1"l 12:"^CITY: ";W$;:} S$(3)IN$"" T$(1)"BRACKETS":T$(2)"UNDERLINE" T$(3)"EXACTLY 2 CHARACTERS":T$(4)"LETTERS ONLY" (T$(5)"":T$(6)"BELL":30000 F)"MINIMUM 2, MAXIMUM 24":T$(4)"ALL CHARACTERS EXCEPT"m `T$(5)"CONTROL CHARACTERS":T$(6)"MESSAGE":30000 ~FI$"11 ;%1 2" 12:"^ADDRESS: ";W$;: S$(2)IN$"" T$(1)"UNDERLINES":T$(2)"NONE" T$(3)"MINIMUM 2, MAXIMUM 20":T$(4)"LETQUESTION MARK":T$(2)"NONE"\ T$(3)"MINIMUM 2, MAXIMUM 20":T$(4)"LETTERS, COMMA, PERIOD" T$(5)"AND SPACE":T$(6)"BELL":30000 FI$"221$7%3AZ1" $12:"^WHAT IS YOUR NAME";W$;: .S$(1)IN$"" LT$(1)"BRACKETS":T$(2)"UNDERLINE"7 VT$(3* nNAME: EXAMPLE #3=xEXAMPLE OF MASTER EXTENDED INPUTaASSOCIATED FILES: MASTER-SM-32g{INITIALIZATION8192D$(13)(4)D$;"BRUN MASTER-SM-32"IN$""W$(23)ILLUSTRATE DIFFERENT TYPES OF INPUT T$(1)"     >DPACE-BAR ROUTINE" PZZ1200:ZZ4 (P14:16368,0a 2P"^PRESS ^S^P^A^C^E ^B^A^R TO CONTINUE"; TTTTIME F767,PITCH:9660 P767,PITCH12:9667 ZIA d1330O '(29);:f PòTIMES AND PITCHES ZÃ2,21,4,24,2,26,3,28,1,30,2,28,4,26,2,23,3,19 dÃ1,21,2,23,4,24,2,21,2,21,2,19,2,21,4,23,2,19,4,16 Ã6,0,0,0 ME,PITCH j766,TIMETEMPO+ t767,PITCHB ~TIME0Č966:1120S DOUBLE TIMEY f TEMPO20v TIME,PITCH 766,TIMETEMPO 767,PITCH TIME0Č966:1220 ADD OCTAVES  (766,5 2TIME,PITCH 7PITCH110000 <I14nNAME: EXAMPLE #5?xEXAMPLE OF MASTER MUSIC GENERATIONcASSOCIATED FILES: MASTER-SM-32i}INITIALIZATION18176(13);(4);"BRUN MASTER-SM-32"PLAY 3 VARIATIONS OF "GREENSLEEVES" LNORMAL TEMPO VTEMPO40 `TI    >CNE PZZ1200:ZZ) P21:7:16368,0V #P"^PRESS ^S^P^A^C^E ^B^A^R TO CONTINUE";~ (PZC(16384):ZC141ZC16020520 2P16368,0: 0uFRAME NUMBERING :u963:LN(0)(1)256 DuFR((LN900)100) NuVP:38(FR10) XuFR;:1 bu"INCREMENTS OF 100 IN THE LINE NUMBERS."4 20500A FRAME 4S L$:30000:8 ("^THUS, FRAME #1 BEGINS ON PROGRAM LINE" 2:"1000, FRAME #2 ON LINE 1100, FRAME #3" <:"ON LINE 1200, ETC." F20500 'L$;(29) ' PSPACE-BAR ROUTI:"AGREE ON SOME SCHEME TO RELATE LINE"L t:"NUMBERS TO FRAME NUMBERS."W ~20500d FRAME 3v L$:30000:8 "^FOR INSTANCE, IN THIS EXAMPLE, THE MAIN" :"PROGRAM BEGINS ON LINE 1000, AND" :"SUCCESSIVE FRAMES CORRESPOND TO") :IGHT CORNER, OR THE LOWER RIGHT CORNER?"[ 12:"(^PLEASE TYPE 'UPPER' OR 'LOWER'.) ";UL$ UL$(UL$,1):UL$"U"UL$"L"1030 VP1:UL$"L"VP21 $30000:20500 LFRAME 2 VL$:30000:8 `"^THE DESIGNER AND THE PROGRAMMER SHOULD") jnNAME: EXAMPLE #6>xEXAMPLE OF MASTER FRAME NUMBERINGbASSOCIATED FILES: MASTER-SM-32hr8192D$(13)(4)D$;"BRUN MASTER-SM-32"L$(12)BEGIN THE PROGRAM8:"^DO YOU WANT FRAME NUMBERS IN THE UPPER"( :"R     >DLL,TODD,CRAIG,RICHARD,PHILIP,MIKE,RUSS :"UNSORTED LIST:"5 I1N:AR$(I):" ";AR$(I):S , SET UP AND PERFORM SORTh 6L1%0:L2%0:X%N @21251,("A"):21252,("R")128 J21248  DISPLAY SORTED LIST :"SORTED LIST:" I1N:" ";AR$(I):   DATA&  7,DARRE(d NAME: EXAMPLE #7@i EXAMPLE SORT PROGRAM USING SORT32Fnyx PROGRAM READS DATA STATEMENTS AND SORTS THEM USING BINARY SORT ROUTINE 21248AR$(100)(13);(4);"BLOAD SORT32"N: NO. OF ITEMS TO SORT :  LEXOPOULOS A,85,LUNDQUIST D,80,KANDINSKY C,93X ÃBROWN T,86,SCHMIDT L,95,POPOVICH N,65o ÃBANDACEK R,73,END HDATA OUT OF STRINGB U4);(ST$(I),2);6);(ST$(I),(ST$(I))5);Y V33:(ST$(I),3,3)_ Vx PòSTUDENTS AND GRADES ZÃMCINTOSH S,83,BROWN J,68,LEE T,91 dÃNGUYEN R,78,SHINDLEDECKER O,95,PEREZ A,100 nÃO'BRIEN P,57,SMITH S,71,CANTINI M,83- xÃA': NSPACE BAR ROUTINEW *N24:" PRESS ";::"SPACE BAR";::" TO CONTINUE";{ 4N16368,0:16384,128:16368,0 >N1:868: RPRINT HEADER R:"STUDENT # NAME";15);"GRADE" R"---------";3);"----";15);"-----": &R UBREAK I L1%6:L2%30:X%N9 HM3,("S"):HM4,("T")128A HMd 4:14:"SORTED BY NAME":21000o >I1Nz H22000 RI:20000 SORTED BY GRADE L1%3:L2%5:HM :13:"SORTED BY GRADE":21000 IN11 22000 I:20000 :"UNSORTED LIST" 21000:I1, ST$(I)Q ST$(I)"END"NI1:20000:2000o GD$:GD$(I)(" "GD$,3) 6((I)));I;6);ST$(I); 33:GD$(I) $II1:1020 SORTED BY NAME I1N:I$(" "(I),2) ST$(I)I$GD$(I)ST$(I) qdNAME: EXAMPLE #8 ?iEXAMPLE SORT PROGRAM USING SORT32EnsxPROGRAM SORTS NAMES WHILE KEEPING RECORDNUMBERS AND OTHER ASSOCIATED DATAHM21248:HMST$(100),GD$(100)(4);"BLOAD SORT32"UNSORTED LIST ::14!! ! ! ! ! 141ZC1603020 16368,0:& T TO HI-RES 249,1:16384D (24:9:"PRESS SPACE BAR TO END.";N 23000X <::p  1,7,9,17,25,33,39  9,15,11,33,39,11,1,7,20,9,15,20  9,15,29,17,23,29,25,31,29,33,39,29 SPACE BAR ROUTINE 16368,0 ZC(16384) ZC11,29X $I .I815! 8I. BX1,X2,Y; LX1,X2YB VIm  PRINT MESSAGE AND WAIT FOR SPACE BAR 21:"THE ABOVE DISPLAY IS IN LOW-RESOLUTION." :"PRESS SPACE BAR FOR CONVERSION TO HIGH-" 15:"RESOLUTION."; 3000  CONVER( NAME: EXAMPLE #9 A EXAMPLE PROGRAM USING 'GR TO HGR'Gt PROGRAM CREATES A LO-RES DISPLAY, THEN( CONVERTS IT TO HI-RES2n(13);(4);"BLOAD GR TO HGR"x DRAW PICTURE IN LO-RESI17IX "" " "