DOS  BASIC - CF $- LIBDOC '  LIBRARY 1 PROGFILE@ CLIPPER Y# CLIPDOC l  5 ð))'))×"F$#å#b&y"q"U*1c >2 >!"c 5 ['yg> gy?O  2&{2& ͮ!{¥ : >!! ~Y(!(!*&~}OG<=͗!:5 0"!@{!: ! >wG#7wG# ! >!Wr!0O>!/!×!:{!:>! ::!:Ù!͗!:!0:&!͙!!: y2 :&_͙! ͗!:@!>!@{!: "!!+"G#+"G# " #!>!::3":;"::&R":I~_G#~_G# T"X*& >?1&&1c :&+"6& RE-BOOT">T1&01&&>D1&y?01&&>S1&%v"", V$, >2&!&+6 "T]t&7 ",7 , #7w#t&"A&t& 7:/ !&O:&o&'>" , {@#×!:+ ;#:&2&> >"d##Gy@O:&c 2&x2&6#:&҄#=S#*&:&!&h&)T]))o|g:& !9"&#/$#_#y?##x##7#!$!$g} W /2&h"&"&M\N#*&*&|E.#} W\MN#yW:4 6$>FD"&2&~ ""د2&>2/ !"&~$:& h$7*&y2&* !%" !/ :&O:&o&'>" "  :/ $!':&%$# $~ $,&N#F !&̈́&$"&¸$<"  :/ 2/ Ã$~ $:&Q%:&Q%=N%%6& , 8%&:3 =2&F&# Q%,&%&,&~r%)%&Sʃ%D&o&%~£%&#,&%& $, PRESS RETURN TO CONTINUE"0%%%0%%%/"U*%*U*x&:&G& :&  & &s#r#^#V#G "1&6&t&]& A&0, , , Oy2&S&}2&:3 2&>W$*&~ ʂ&#"&#z+{"O,&,&~怱O~#, {,&z*ڸ&-Ҹ&2&" *&> W*TEST NORTH STAR DOS 5.1DQ "COPYRIGHT NORTH STAR COMPUTERS, INC., 1979>!)c ['2&>! 6Y#=u'͗!>=„':'z2& :0 +'6&y")>0x>07>@!|;)gN)~w,;)$N)|;)0)>A>>>7>7>0>`>ʀ)xʊ)> xxx!U*  *@*!*@&v"__4*4*@*&v"+*wG&  &#*q"GO BASIC t& u*!͖*, ))))ot& €*0:ҡ*0AG?7t&7 ʫ*!:, 0, T])))_t& ,ø*ͫ*, |, }t&D+ *S+, t&, !"" !q""- 2&+&*!W*"&*U*!H+ ̈́&##?+##.+q",&( CR*,DEt+GO&JGO BASIC +IN,LI,TY+LF+SF+"++6 |+ u**&> "*, G~怰w·+u*#'&+ +":&O,&,&z, ~怱O{u*+" , +ͫ*,  ,,, A&u***xO}%,<+"V$, "V$, ͫ*, *&~Aܫ**x2&f,#|g}o:&O/$DM+ , , '&q#p#:&w#q&+w, A&*xOx/G!'6 #6 #¯,/$!> '" ,  =¿,*&~# ,#>,~#"&oA&b&-7!_!-PY-__^1][>2[#"["[>2[!yY"YX>2Y>2yY2Yң-*[~ʀ-h-*U![eHP-*[:[u-*[6 2%0."[:[ʝ-*[#PE*[eH.. 2-!-6-2!YzY:-6# »-HͧHD> 2YX:[*[62yYXQXgM>2Y!o>SHlM*Y!"["[2[:YP.*YZ͘K> !ZNH*Y*Y5"YZ IͮMOYKS.KlM:Z 5 .0x.:~Z5tT7 .5 2ͅ.-!Z"Y#H>!77#H !Y././././././.*["[6/././.*[+"Y.0.0:Y/*["Y*[KE 2[&/:Y&/:[SH:Y-*[DM^!YeHF/ o g{/!>SHZ͘K> !ZNH-3J*[ͪG:[o&3J*[ͪG2[*Y*Y"[*[###"Y6ARG"DIMENSION"FUNCTION DEF"OUT OF BOUNDS"TYPE"FORMAT"LINE NUMBER"FILE"HARD DISK"DIVIDE ZERO"SYNTAX"CONTINUE"TOO LARGE OR NO PROGRAM"DOUBLE DEF"CONTROL STACK"MISSING NEXT"READ"INTERNAL STACK OV"INPUT"MEMORY FULL"ARG MISMATCH"ILLEGAL DIRECT"LENGTH"NUMERIC OV"STOP" BLOCKS"!Z"YLK"Z*YZʹ1~]06);06,:06\?G 1#1>110~ ʫ1 #"0~ ʫ1 #"0,1x ,1,1,1,1{1{1{1{1{1{10ʹ1"YLK>D}*Y0  x ʹ1,0# {1> !~Zq+ # ~ ʷ1#mH͘K##~11 1!?#1~1#11#mH͘K1*[6"[*[6+"[*[#"Y!4G2YLKک.~4wʩ.![eHڻ." -7-͙MIJ|».}һ. ڻ.ͮM}*[w*[~~2I*["[>Â2*[2[>2[#H> ک.OPE##~.~怱O#~.*[62| 2" .73-#H> ҩ.5o&*Y#"Y~ 3 2LKک.>2[-3:[O:[*[" "YÝ3!/ 2[A3xGyO! a3.W_:4 X3.z!< .KE"[KE:[!/ w  ,  w#Ç352H[#H> ک.OPEPE~怱O~.#z:H[3 3=һ.w 3*[" .#H .́K.#H .Y1-g4> . HIJ9H>D4IJz»..2[!H[-3g4> .+6 ]4 ! "[!H[7 E> ! "["[LKڡ4"[9H¡4LKک.|ʻ."[#H ©.I*[~4###"Y+H ʲ4oKھ4Iھ4¾4*[*Y++KEþ4*[DM*[*[~#KE*U 4͙MLK>5}!:"- *yY% ͙M:-2[#H *[*[O5́K9HO5#H *[O5́K#"H[#H ©.lM~:yY‰5:[ʉ5=†5!u>SHKlM:-=2[Z1#NHvMlM!H[eH_5! "Y"YLK5"Y9H5LKک.|ʩ."Y H>2Y-2Y5o&Z͘K> NH!0SH*[*[ I#} 6$|LKک.)J HLKک.)J"[ H![eHҩ.*[~*U*[ I#DM U-:Y0.2Y2Y"["Y6!yY"ÝK.lM 2*[~20.+"Y"Y6 2Y2Y2[DXF6ʵ.HFG=0.!GHKEFè6###"YHͧHvM!9"Y*["Y7~F6:> 2Y2Y#H"Y/7.>+Ho&mHwEH> Ë́=êGIwE.Ḧ́=ͪGḦ́=>;Hz7!B͕G}7̈́=͸G*Y~F=r+s+r+s+6"Y"[GFV0*[.ʤ7¥77I2H[*[#~=#ͶF7}EeH=N#F:H[N~mH 8DM,A8"[mH~F"Y6HT8̈́=ͧGH:Yʻ8>2YoKE97*[RD+H..c>#mH###*[RDxʛ8zʶ8~++ ʃ8á8zʡ87!8!Y6A>"[88<á8#H"8+H#H ."8+H8 \oKһ8+Hʺ8»8»8>2YK8I*[#~="[oK.I)J### 8IJz».HoK. E9 H39I)Jq9I͸GoK.)J~FDMp+q+6###%8I*[#~=ʕ9ʦ9~9#^#V"[~ 8:#~Gy_>YWw#³9"[#~9RD~F9*[U"[+#̈́=~F9͕G#^#V"Y#~"[#^#V"[ͪG*[9I %:\oK#H ȸ+H%:>:F]:Gү.HIJʯ.H=E9H;:y OGү.H!GIJ!GKE9Hڕ:IJKw:HeEV:I~F:>2Y*Y*[!9"Y2yYgM!0SH#;HVIG9H:FGd0.wEG;H:ͪG;>" EG9H:oK*[)J+"YʹH͙M@;ͨFlMͨF,<%ʝ;Hx;̈́=ͧG*[0R;MGͮMlMSH9H@;lM*[RD"[zo;ͮMG;MlMFDM+Ä;H+HLK;D;![Z;@C; ;$;#<~wà;ʹHà;|.}!.2[+HI1;H͙M>";H<?DMK2[lMZwEʟ<2Sڸ<9Hڰ E"Y Æ2[i< INPUT ERROR-RETYPE " IF: IH0.IJ9HIJz».{>!=H[!H[wz».#s#6IJ9HIJsIͨF>o=oK.)J"[ HwE."[ HwE."[>2[ɯ2[QX*[g4Î2!@!9i0.2Y:Y=ͶFگ=}E.͕G==H='I=#HAʪAAYBʋB!@U>#H=H>:Y.*Y->>>.+HÖ=> c>+H͇=~ͅG?>"[ DM!=#mH+H*Y-.c>Ḧ́=H/>O!@ READY"PRESS RETURN TO CONTINUE" ERROR" IN LINE "o65%225~2R6d2{423( 3655/7J71;7,8:L<:9O9w9;:::";6:<<1;%9=0=8VYWIU.s=D2P44==LETFORPRINTNEXTIFREADINPUTDATAGOTOGOSUBRETURNDIMSTOPENDRESTOREREMFNDEF!ONOUTFILLEXITOPENCLOSEWRITECHAINLINEDESTROYCREATEERRSETRUNLISTMEMSETSCRAUTOLOADCONTAPPENDRENNSAVESAVEBYEEDITDELPSIZECATSTEPTOTHENTABELSECHR$ASCVALSTR$NOENDMARKINCHAR$FILE([*+-/ANDOR>=<=<>=>=<<=>NOT^INTLENCALLRNDSGNSINSQRTATNFREEINPEXAMABSCOSLOGEXPTYPA XC MNBNA O AA&^qA}AC&AAA_AAA A AAB0BQBA^1][B.Aw.Aw>Aw.Aw.Aw.Aw.Aw>?A ?APYDMg dAdA! dA# YA$wG> PYwG xAxABKxAwG!>zGHIJ9HºAIJ!A3JH=HwE.ÿAHHAwE.zʻ.n&ÿAABGx&BO&B$ "BB$ B%BK>NLJ>!=H[o&3JͧG*Y*[ I3JLJn ҢB!>͕GA~o&ÿALJͯX.W!3J#3J3J#3J0BP@ACBH@.@B)D>y[zGy[t[Oy[t[NBy[Mt[y[N=C!t[zGwTB@TBA hCPY!BzGJ CBC,AڠC͕GLJt[zGt[MÑC͕G1]!YͪGM[CCͅGBK(DMLJ+"n[C:-W0!G#C"n[ͧG*n[}-D?|g}oC"n[#3JͅGBK(DO!"n[eS`E"[zGM*["[N=4DŷH҆D.#HʻDDD>'IҨDwE.zʨD*[DM IG"[*[~ #zD¹D>;HYDHIJ͸GsHèDHIJ{ _D:-ʮ:DḦ́=HͧGʹH*[0RX"[ÆD*[SD*["[!9eH)EKE*[z~+2E! GKEs#r#^#V#!G## KEKKE##GͶF.FE#H>;HʝEGE!GE> OGUE##IJeHһ.##N#FxEK+ HðEH#HHG =EPE"[PE"["[>;H?SF_F![eHF».*[+"[9H>F_F![eH:F»."[H*[ I.#"["[7*[*[>=*[*[*[IJʻ."["["[+H\ ʘF!Y.:~F~?ڤF###"Y#H \!Y[GGhG?OͶF.>$;HyOFy@O:~F+H 7ȸȹF#H G+HFF/.ʵ.HxA*[#*UT]mH|=G~#*G##!G"["[KEq###>2Y7#HA[?rG#H0:?#"Y!B~+ |G*[ T]ͅGBK͸GzG<2Y!Y*[ "[zG*[G"[*Y*Y"Y"Y*YG"YvH!YeHG![eH0*[+"[.,H+HH)+H.+H+"Y*Y~# .H"Y>,+H+"Y7 HH UH"~G .DM#UH#z+{~#fop#zvH#H+H[GڔHhG+H"Y"$*["[*["[*["[*["[!#"[#H!Y2S"Y!YÕGH>""H;H*Y"[G~#I .H"Y*[:Y =:Y0.}o|gW>;HIF.Gڵ.PEH͸G6IwEIʋI͕G͸Gr+s+6̈́=ͪG+H,“II9HIUI> EwI).I>);HI͸Gr+s+w!9͸GxYS w +¾Ir+61yY>;H6w9I0."Y"Y*Y"Y*Y*Y*["[*[Ny7#"[eH+?*[*[ڻ."[ JI..\[͘K> !Y2SÕG̈́=ͅGAͧG~.O #~Jڻ. J~Jڻ. hJz̈́=ͅGBK(D,AҟJLJ{Z*[ͅG͕GJOͅGAͅG͕GLJͅGBKJMͅG DMNͧGLJ{%`C"[bk)))*[_zWYzGA,Ax5Kz».{Y:KX:K|».}gû.By K!T)FK @K#H"[.T?Jڻ..TZK*[+"Y>;H7#^#V#"Y#H *[LKک.I.ɯͽKͽKͽKͽKͽK>0"[ K*[BѰ>0:yY G KK:-x*Y"Y~MY!Z6 ;MOͮMO2Y2YK )L6 !ZY~# L!LʠLʩLLLL_LLʶL MM@M L:Y{L {Lw#6 GDM ͮMOZ!Yw# L6 0. LsL͠L sLìLK LDMºLsLGL L%DML:-G:YL+6 :YDM DMDM:Y<2YDM>DM!ZY#~ "M@DMlM:[K*[SHK:yY \M ;M*[4;M*[6;M DM DM:- 2Y:Y½::02[:[&/é:>#;H>ڪMIJ9H{2yY!zY:yY*U"[~!YòM M![>6+=M![cN>![ NON>w MN[ON N+=M[͇N[ͲNG~@ZNTN>ZN0.G怰[zGO+wgN+w!~ʝNP+>æN>'w+ >¦N !T]bNշ'w+N![w+ N[ Oo`iN/< OzGV[+~ O![1OO+ *O=O#T]cN~P+ԖNF+O7>'+ UOOx'w+ ?qOT]#w…O#~žO O¦O xwO6¼OcN+|G'+OO|G>~͝NxNNpbN. ! "[![w+P6![cN![w+(P w+0P6[![͕PG![͕P*[w#"[ ?P͇NͲNgoAʓPP>PNNW{怲 7>'+ŸPژPNy"[G!i[6":[P+60.=P+6."["["[P+6 P"[+6!*[~cQAQ0Q QH RQQARQ#Q+~.-Q,-Q"JQ1Q!h[:[#uQ:[Q~0Q6 +uQ:[#Q#6"+~"[.®Q+~ ʩQ!®Q##60îQ>0Q*[~>-Q*[/G"Q>0QQ:[@Q![5Q6>,Q*[+W~!."[r*[#W~"R"[rz5cQ-Q>W>0x=_*[~+R0>2[>2[:[IʻR#ʋRER:[ͺP:[ dR~>+Q>$Q*[:[#~R#~ vR+T]"ÂR!"[~ʻRIRG+~®R~ʠRxARJMRJ.2[:[<ͺP>"2h[SR~2[RAw:[ͺP*[~.R#6E#:[+ SA S-/"SR2[2[2[>2[+[S[SVS-\S>2["[>+6=aS"["[.TڛS.€S.TډS7![5.TʂSSESS.TʘSکS.ʆSÔSDT![4.TکS.SES![@S![*[w*[:[G.TSDTSESS.TT+ T T- T€S2[.TҀS_.T!TJ.T:[{S/%;HgU͆JaX H>;H>&;HUHʵU͑Ẍ́=ͧG!Y~•U6~͘W#—U9HjU͑X>nWRD|##U͑X>͘W|͘WU͑X>͘W}͘W*["[zʤU~͘W+U͑XIJ».{͘WäUIJͯX.>%;H)V͆JaX H>&;HҩVwE^VW.ͺWw#JV9H,VWV*[ͺW{V.VͺWWͺW_*[+ IG*[zʥVͺWw+ÓVEwE.ͺWo&3JͪGWV#HIJͯX.~V: !V)G6#KE>%;H>VIJ{ Hg4> .2H[PE###KEPE~.~!H[w4W)KEKEr:H[w9H3JwE.êG#HIJͯX?X~w/X*[~ wWw~#PE NW++~G nW q*[~怰?X PEKEW͛W/X*[W~~O#PEPEPEeHڻ.ʻ.PE!X" yWzW{_>" !." .!." .6 #6 #=$X*[~@~@wW~@~G~p WͯX?XTX*[~ eHʄXx„X{_eH?XKEw*[ ##F#~#N+ W\eHһ.z».{». KY~"[ͯX6X!."- !." COPYRIGHT NORTH STAR COMPUTERS, INC., 1978!! !GGZY= ZZ(.7.@@@@@@@@ yYyY߂Z_Z`B@BYE 11534,80 4) Z 11534,80 THEN GOTO 60 RINT1" TO MENU " UBTOTALS " .." ,X F2,M1BYE 11534,80 4) u! 64""Ya``##BYYZh[h[Y Y__!BzG],A!BzG],Aڻ.͕G͏G]M͏GBNͅGAͅG͕GͅGt[zGy[zGy[Ay[Nt[ ]My[t[Ny[N͏G]MͅGNͧGt[zGt[Mt[y[!!]>)Dt[~[!0]>)Dy[M~[N~[OBNBOͅG~wLJ{\/<{\]OM\<wPbCseQA)%FI=1b'vA$8C 2BDCA<]BOʻ..>@BK],A\]=ʻ.4t[zGBNBNt[BNt[Ot[zGt[M>y[!^)D>~[!^)Dy[M~[O]Nt[Mo&3J͏G]NͅGNçGdB1b'v@@)h1cIAg5`iBABK^N2[͕G͏G^O͏GBNͅGAͅG͕GLJ{d^:[2[ͅGt[zGy[zGy[Ay[Nt[^My[t[Ny[N͏G_MͅGNͧG͕G͏GM͏Gt[!_>)DͅGt[Mt[Mt[NͧG:[wpycA1AY&A1AAY&SX=ffW3Q>t&0;A@_!Bt[zGt[O!t[zGt[zGt[M> t[y[!_)Dy[Mz_y[ t_^N!y[_~ʉ_wzG@333#@'YE@w&g?D5u3"'C?q@IT>  R11534)  R  `dB),C$20),G$20),Q$20) 2 CLEAR EEN < R10592)\R10592) A 10639,00 F #0\ #1 P MENU FOLLOWS 5Z "* * * * * * * Game Site Info * * * * * * *" d +n "Select (1) - Normal Maintenance" +x " "j2120//> ڣ0Oͻ/"2ͻ/"2ͻ/"2}Ć0:->22ͻ/"2*2*2a-͆0ʻ0͌0һ0/ n- a-0//> -22͆0-0/0:2Dʣ-S¯0:222"2ͻ/"2ͻ/"2:2-)*2:2-)zک0-{ک0Ö.1/0ã-2/0U."222!0:2 0"2*j2~ 5.,5. 5.#"j2.͆0-)1/0:2DU.S¯0:222*2:2g.):2Ov.#|g}o"2*2Җ.#ڵ0͆0ʵ0͌0ҵ0*2*2Ͷ/*2Ͷ/*2}G:2怰oͶ/*2Ͷ/ *2*2DM*2.1/r0( "2"2! > .y:2O2* "2!u/" *2" *2" :2O:2J/yJ/<J/=!2=>/6 #C/*22" O*2 O*2 }O|G.*2"  *2/}<:2/!2=ʪ/â/6 #zª//s#r#^#V#*j2~ /#"j2*j2~"j2 #/"G~0/*j2~ /0!2"j2}o|g!2͂00@0&0@~0.__9090E0~00+ 0wG~0  ~0# 00*j2~#"j2 Z0000ɯ ~0 ~0  : yW:4 “0>FDT10k101010?20101r0/.[20 FROM FILE: "TO FILE: "EXISTING FILE. WRITE IN SINGLE(S) OR DOUBLE(D) DENSITY? "NEW FILE. SINGLE(S) OR DOUBLE(D) DENSITY? "SOURCE FILE NOT FOUND."DESTINATION FILE TOO SMALL."ILLEGAL DENSITY SPECIFICATION."NEW FILE WILL NOT FIT."ERROR OCCURRED."FILE DIRECTORY FULL."COPY COMPLETED."EXISTING FILE. PRESS RETURN TO CONTINUE."NEW FILE. PRESS RETURN TO CONTINUE."DOUBLE SIDED DRIVE REQUIRED"CONTROL-C STOP"' LIBRARY PROGRAM DOCUMENTATI  $ KATHY RAZZO 408) 255 7389 +( 1054 HYDE AVENUE, SAN JOSE, CA 95129 2 < Z12\ II CLEAR EEN "F Z$Z)\Z$\ CLEAR EEN CODE #P P1$18)\P2$20)\ ER ROL -Z 15),"LIBRARY PROGRAM DOCUMENTATION"\ &d "PAPER COPY? (Y/N) ",P$\ .\ ;n"THIS PROGRAM IS DESIGNED TO AID IN LOCATING PROGRAMS" ?x"STORED IN YOUR DISC LIBRARY - MUCH AS A CARD FILE IN THE" ="PUBLIC LIBRARY. ADDITIONALLY 'BACKUP' COPIES OF A LOST" D"PROGRAM CAN BE FOUND - AS WELL AS CONFIRMING BACKUP COPIES."\ D"THE PROGRAM REQUIRES 7.5K OF FREE MEMORY OR 29 BLOCKS OF TYPE" "2 DISC FILE SPACE."\  8\ B\ .\Z$, G"NORTH STAR BASIC V.6 IS USED. PROGRAM IS DESIGNED FOR A 16 LINE," %"64 CHARACTER FIELD TERMINAL."\ >"A TYPE 3 DATA FILE IS REQUIRED FOR INFORMATION STORAGE." >"145 BYTES (OR 0.57 BLOCKS) IS USED FOR EACH DATA ENTRY." 5"A 100 BLOCK DATA FILE WILL HOLD 176 ENTRIES."\ ="CREATE THE FILE ON THE DISC. USE 'PROGFILE', SHORT FOR" A"'PROGRAM FILE', AS THE DATA FILE. USE THE 'INITIALIZATION'" 9"MODULE BEFORE CONTINUING THE USE OF THE PROGRAM."\  8\ B\ .\Z$, !"DESCRIPTION OF COMMANDS:"\ "FIND -" =""REQUESTS A FILE OR PROGRAM NAME. ALL ENTRIES WITH THAT" @,"NAME WILL BE FOUND AND DISPLAYED IN A SHORTENED OR 'SKIM'" ;6"FORM. HELPFUL IN FINDING BACKUPS OF LOST PROGRAMS."\ @"LIST -" =J"WILL LIST ALL ENTRIES IN THE FILE IN BOTH DETAILED AND" T"A SKIM DISPLAY."\ ^ 8\ B\ .\Z$, h"SORT-" 7r"THIS COMMAND WILL SELECT FILES BY DISC NUMBER OR" 7|"LANGUAGE TYPE. PRINTOUT WILL BE IN SKIM DISPLAY." $"HARD COPY MAY BE REQUESTED."\  8\ B\ .\Z$, "ADD-" 7"REQUESTS THE INFORMATION FOR STORAGE IN THE DATA" 9"FILE AND UPDATES THE FILE SIZE/INDEX NUMBER AT THE" ""'0' LOCATION ON THE FILE."\ :"IF A TYPING ERROR IS MADE, TYPE A '^' (OR UP ARROW)" :"AT THE INXT INPUT REQUEST. YOU MAY CONTINUE TO JUMP" :"LINES UNTIL THE LINE YOU WISH TO CORRECT IS REACHED" 8"FOR RETYPING. A RETURN MAY BE MADE TO THE CURRENT" 8"INPUT LINE BY PRESSING 'RETURN', WITHOUT ALTERING" )"PREVIOUSLY ENTERED CORRECT DATA."\  8\ B\ .\Z$, "MODIFY -" 8"WILL EDIT A FILE ENTRY. A DETAILED DISPLAY OF THE" ;"REQUESTED ENTRY WILL BE CALLED UP FIRST TO MAKE SURE" :&"THE CORRECT ENTRY WILL BE EDITED. AGAIN, A 'RETURN'" <0"WILL NOT MODIFY THE EXISTING DATA. BACK-STEPPING WILL" ;:"OCCUR WITH A '^' OR UP-ARROW. AFTER THE MODIFICATION" >D"HAS BEEN MADE, THE CORRECTED ENTRY WILL BE DISPLAYED."\ N 8\ B\ .\Z$, X"ALPHABETICAL SEARCH -" 6b"WILL SKIM DISPLAY ALL FILES THAT BEGIN WITH THE" l"REQUESTED LETTER."\ v"EXAMINE -" :"ALLOWS EXAMINATION OF A DATA ENTRY CALLED UP BY THE" 2"INDEX NUMBER AND USES A DETAILED DISPLAY."\  8\ B\ .\Z$, "DELETE -" 7"DELETES AN ENTRY FROM THE FILE. THE INDEX NUMBER" 6"MUST BE USED. THE REQUESTED DATA WILL APPEAR IN" 7"A DETAILED DISPLAY BEFORE THE PROGRAM IS ALLOWED" 8"TO REMOVE AN ENTRY FROM THE FILE. THERE WILL BE A" 6"TIME DELAY AS THE PROGRAM READJUSTS THE FILE TO" "REMOVE EMPTY SPACE."\  8\ B\ .\Z$, "ALPHABETIZE -" ="WILL ALPHABETIZE THE FILE ENTRIES. HELPFUL ON HARDCOPY" A"SEARCH FOR A FILE ENTRY. TAKES TIME FOR THE SORT TO OCCUR." 2 "PROGRAM NOTIFIES YOU WHEN IT IS FINISHED."\ "INITIALIZE -" 5 "READIES THE FILE TO RECEIVE DATA. MUST BE USED" 4*"BEFORE USING THE PROGRAM. MAY ALSO BE USED TO" 84"'RESTART' THE FILE. *** CAUTION *** YOU WILL LOSE" %>"THE FILE IF IMPROPERLY USED."\ H 8\ B\ .\Z$, R"ANALYZE -" 2\"DISPLAYS THE TOTAL NUMBER OF ENTRIES IN THE" .f"PROGRAM FILE AND INDICATES THE PER/CENT" $p"OF FILE SPACE ALREADY USED."\ z"EXIT -" 3"ALWAYS USE THIS COMMAND TO LEAVE THE PROGRAM" 4"TO INSURE THAT ALL NEW DATA WILL BE STORED ON" "THE DISC."\  8\ B\ .\Z$, "FINAL NOTES -"\ 7"THE FIRST NUMBER ON THE SKIM DISPLAY IS THE FILE" 8"ENTRY NUMBER - NECESSARY FOR SOME COMMANDS IN THE" "PROGRAM."\ 4"A 'RETURN' MAY BE TYPED FOR ANY '(Y/N)' INPUT" 5"REQUEST WITHOUT INTERRUPTION OF THE PROGRAM."\ 9"BE SURE TO USE THE EXIT MODE ON THE SELECT ROUTINE" "TO CLOSE THE FILE."\ > "LIBRARY AND LIBDOC MUST BE ON DRIVE #1 FOR CHAINING."\  8 9 "PRESS RETURN TO RETURN TO THE LIBRARY PROGRAM",R$  "LIBRARY" $ . P$"Y" P1$,\ 8 P$"Y" P2$,\ 'B "PRESS RETURN TO CONTINUE ",R$\ "LIBRARY" 8 B P$"Y" P1$,\ L P$"Y" P2$,\ 'V "PRESS RETURN TO CONTINUE ",R$\ g h  (h  N ,11),"DISC-",E$10,11),24),"TYPE-",E$9,9)," ", 6 33),E$1"REQUESTED ENTRY WILL BE CALLED UP FIRST TO MAKE SURE" :&"THE CORRECT ENTRY WILL BE EDITED. AGAIN, A 'RETURN'" <0"WILL NOT MODIFY THE EXISTING DATA. BACK-STEPPING WILL" ;:"OCCUR WITH A '^' OR UP-ARROW. AFTER THE MODIFICATION" >D"HAS BEEN MADE, THE ( CLIPPER LIBRARY  . MIKE ERS 42884 12167938034 ;( 4150 PEMBROOK PLACE,Suite 218, AUSTOWN,OH 44515 2 <  FF INDIVIDUAL VARIABLES WITHIN FILE ENTRY,ESLISH ENTRY SIZE 'S' 8P F$8),T$1),N$2),L$1),B$3),M$8),S$60),D$60) +Z S81213860602\ '2' IS MARK d X$60)\ ENTRY ER Fn X$" " ;x E$S),E1$S),W$S)\ STRING USED HOLD ENTIRE ENTRY 6 Q$"PROGFILE"\ E 3 FILE USED INMAN SRAGE 20),"CLIPPER LIBRARY"\ 3 "DO YOU WANT INSTRUCTIONS? (Y/N) ",A$\\  ( A$"Y" "LIBDOC"\ INSTRUCTIS  #0,Q$\ #0,N 1"#1....FIND #7....EXAMINE" 0"#2....LIST #8....DELETE" 5"#3....SORT #9....ALPHABETIZE" 4"#4....ADD #10...INITIALIZE" 1"#5....MODIFY #11...ANALYZE" 0"#6....ALPHABETICAL SEARCH #12...EXIT"\  "SELECT >",C  C1 C12  C1 |  C2   C3 & " C4  , C5 f 6 C6 . @ C7  J C8  T C9  ^ C10 h h C11  r C12 #0\ |  \"* * * FIND * * *"\ , "FIND WHICH FILE NAME? ",F$\\F$F$X$  X0 N1\ #0%XS5,E$ ( E$1,8)F$ D\ SKIM DISPLAY  X\\\ :\    \"* * * LIST * * *"\  "PAPER COPY? (Y/N) ",P$\ % "START LISTING AT FILE # ",I\ , "SKIM OR DETAILED DISPLAY? (S/D) ",H$      XI N1\ #0%XS5,E$  H$"S" D  H$"D"   X\ \  :\ 4&  \"* * * SORT BY CATAGORY OR FILE # * * *" 20 "SORT BY CATAGORY OR FILE # ? (F/C) ",S1$\ : "PAPER COPY? (Y/N) ",P$ D  N S1$"C"  X ST b "FILE # ",V$\ l X0 N1 v   J$E$10,11)  J$)V$) D  X\\   :   AGY ST ! "CATAGORY (a letter) : ",V$  X0 N1    E$12,12)V$1,1) D  X\\   :    \"* * * ADD * * *"\ %  INITIALIZE E$ BLANKS TING  E$X$X$X$   COLLECT ENTRY *  4 #0%NS5,E$, > NN1\ !H "ANOTHER ENTRY? (Y/N) ",A$ R A$"Y"  \ #0%0,N,\ f  \"* * * EDIT * * *"\ +p "MODIFY WHICH ENTRY (BY NUMBER) ",E\ z E0 EN p  X0 N1    XE   X  \ ' "MODIFY THIS ENTRY? (Y/N) ",A$\  A$"Y"  . "MODIFY A DIFFERENT ENTRY? (Y/N) ",A$\  A$"Y" p     2 "THIS IS THE ENTRY THAT HAS BEEN MODIFIED"\  \  #0%XS5,E$, % "ANOTHER TO MODIFY? (Y/N) ",A$  A$"Y" f $ /.  \"* * * ALPHABETICAL SEARCH * * *"\ 18 "FIND ALL PROGRAMS BEGINNING WITH > ",U$\ B "PAPER COPY? (Y/N) ",P$\ L  V X0 N1 `  j E$1,1)U$1,1) D t X\\  /~ "ANOTHER ALPHABETICAL SEARCH? (Y/N) ",A$  A$"Y" .  #  \"* * * EXAMINE * * *"\  "EXAMINE ENTRY #",X\  B0 BN     \ ) "EXAMINE ANOTHER ENTRY? (Y/N) ",A$  A$"Y"   "  \"* * * DELETE * * *"\ ! "DELETE WHICH ENTRY? ",X\  X0 XN      ' "DELETE THIS ENTRY? (Y/N) ",A$\ ( A$"Y" F .2 "DELETE A DIFFERENT ENTRY? (Y/N) ",A$\ < A$"Y"  &F "PRESS 'RETURN' TO DELETE",R$\ P #0%N1)S5,E1$ Z JN2) X 1 d #0%JS5,E$ n #0%JS5,E1$, x E1$E$   NN1  N0 N0  #0%0,N, ' "DELETE ANOTHER ENTRY? (Y/N) ",A$  A$"Y"   )  \"* * * ALPHABETIZING * * *"\ 4 "PRESS 'RETURN' TO BEGIN ALPHABETIZING ",R$\  X0 N1\  ! YX1 N1\ #0%YS5,E1$  E$1,8)E1$1,8) 6  SWITCH HERE  W$E$  E$E1$  E1$W$ " #0%XS5,E$, , #0%YS5,E1$, 6 Y @ X #J\\"FILE IS ALPHABETIZED"\\ T : ^ +h  \"* * * INITIALAIZATION * * *"\ :r "ARE YOU SURE YOU WANT TO INITIALIAZE? (Y/N) ",A$\ | A$"Y" & "ARE YOU POSITIVE? (Y/N) ",A$\  A$"Y" * "PRESS 'I' TO INITIALIZE ",R$\\\  R$1,1)"I" , "DATA FILE IS BEING INITIALIZED"\\\  N0\ #0%0,N, " "DATA FILE IS INITIALIZED"\  :\ #  \"* * * ANALYZE * * *"\  X1 4\\   3 \12),N," ENTRIES ON DISK FILE- '",Q$,"'"\  \\17), 1 N176100),"% OF FILE SPACE USED"\\   X1 4\\  : & +0 OF PROGRAM BODY SUBRINES FOLLOW ): "PRESS 'RETURN' TO CONTINUE ",R$\ D SKIM DISPLAY N  QX %4I,X,\" ",E$1,8)," ",11),"DISC-",E$10,11),24),"TYPE-",E$9,9)," ", 6b 33),E$13,15),"BLOCKS ",45),I$," LANGUAGE"\ l LANGUAGE ID !v E$12,12)"B" I$"BASIC" # E$12,12)"M" I$"MACHINE" & E$12,12)"A" I$"ASSEMBLY"\  DETAIL DISPLAY    "ENTRY #",X 5 "FILE # : ",E$10,11)," FILE NAME : ",E$1,8) 8 "CLIPPER DATE : ",E$16,23),31),"CATAGORY : ",I$ " "ALSO REFER TO : ",E$24,83) ! "DESCRIPTION : ",E$84,143) # SUBRINE COLLECT ENTRY $Z$\"FILE NAME: ",F$\F$F$X$\  F$1,1)" " F$E$1,8)  "FILE # ",N$\\N$N$X$  N$1,1)"^"  !  N$1,1)" " N$E$10,11) + "CATAGORY (a letter) ",L$\\L$L$X$   L$1,1)"^"  !* L$1,1)" " L$E$12,12) 4 T$" "\T$T$X$ > T$1,1)" " T$E$9,9) H B$" "\B$B$X$ !R B$1,1)" " B$E$13,15) &\ "CLIPPER DATE : ",M$\\M$M$X$ f M$1,1)"^" H !p M$1,1)" " M$E$16,23) z "ALSO REFER TO : "  ">",S$\\S$S$X$ ! S$1,1)" " S$E$24,83)  S$1,1)"^" H  "DESCRIPTION : "  ">",D$\\D$D$X$  D$1,1)"^" z " D$1,1)" " D$E$84,143) ! E$F$T$N$L$B$M$S$D$\ ) P$"Y" 8206,128 8206,176\ ) P$"N" 8206,176 8206,128\  #0%XS5,E$\\ COMM E"--------------------------------------------------------------"   M10535)\ # E$12,12)"A" I$"ANIMALS" ----------------------" j -----------------------------------" j ------------" j ----------------------------------------------" j -----------------" j ---" j  =oB  _o  s  STARLANE ls----" ~ r1ppq p)p;p porJppKrpooB  o     t    p<< 3,15),"BLOCKS ",45),I$," LANGUAGE"\  LANGUAGE ID ! E$12,12)"B" I$"BASIC" # E$12,12)"M" I$"MACHINE" & E$12,12)"A" I$"ASSEMBLY"\  DETAIL DISPLAY    "ENTRY #",X A "FILE NAME......",E$1,8),31),"DISCpABUTCH 6 M JAN,78 STRENGTH (j): NAMES (p): IMAGES (i): BOYS (B):TORSO (T) MASCULINE DESCRIPTION DIRT 2 d APRIL,83MUD,COLORS,HUES,TONES (K) DRY VERSION OF MUD MUD 1 d APRIL,83COLORS,HUES,TONES (K) VISCOUS MASS MADE OF SOIL... ORCA 4 f JUNE,80 STRENGTH (j):CARTOON (c):SHAPE (S) LARGE SEA MAMMAL, AS MOBY DICK ROSE 5 F JULY,81 GIRL (G),COLOR (K),SCENERY (O) A MANY PETALLED FLOWER ON THORNY STEM SAL 3 G MAY,79 CLEF,MUSIC (J):NUDES (N):IDEAS (I) SONG CALLED "A GAL NAMED SAL..." ZEKE 7 c APRIL,84MEN (M): IDEAS (I): NAMES (p) A CHARACTER DEVELOPED BY CHARLIE... ( CLIPPER LIBRARY  . MIKE ERS 42884 12167938034 ;( 4150 PEMBROOK PLACE,Suite 218, AUSTOWN,OH 44515 2 <  FF INDIVIDUAL VARIABLES WITHIN FILE ENTRY,ESLISH ENTRY SIZE 'S' 8P F$8),T$1),N$2),L$1),B$3),M$8),S$60),D$60) +Z S81213860602\ '2' IS MARK d X$60)\ ENTRY ER Fn X$" " s I$20) ;x E$S),E1$S),W$S)\ STRING USED HOLD ENTIRE ENTRY 6 Q$"PROGFILE"\ E 3 FILE USED INMAN SRAGE 20),"CLIPPER LIBRARY"\ 3 "DO YOU WANT INSTRUCTIONS? (Y/N) ",A$\\   A$"Y" "CLIPDOC"  #0,Q$\ #0,N  8206,176  , 15)," * * CLIPPER LIBRARY * *"\\\ 1"#1....FIND #7....EXAMINE" 0"#2....LIST #8....DELETE" 5"#3....SORT #9....ALPHABETIZE" 4"#4....ADD #10...INITIALIZE" 1"#5....MODIFY #11...ANALYZE" 0"#6....ALPHABETICAL SEARCH #12...EXIT"\  "SELECT >",C  C1 C12  C1 |  C2   C3 & " C4  , C5 f 6 C6 . @ C7  J C8  T C9  ^ C10 h h C11  r C12 #0\ |  \"* * * FIND * * *"\ , "FIND WHICH FILE NAME? ",F$\\F$F$X$  X0 N1\ #0%XS5,E$ ( E$1,8)F$ D\ SKIM DISPLAY  X\\\ :\    \"* * * LIST * * *"\  "PAPER COPY? (Y/N) ",P$\ % "START LISTING AT FILE # ",I\ , "SKIM OR DETAILED DISPLAY? (S/D) ",H$      XI N1\ #0%XS5,E$  H$"S" D  H$"D"   X\ \  :\ 4&  \"* * * SORT BY CATAGORY OR FILE # * * *" 20 "SORT BY CATAGORY OR FILE # ? (F/C) ",S1$\ : "PAPER COPY? (Y/N) ",P$ D  N S1$"C"  X ST b "FILE # ",V$\ l X0 N1 v   J$E$10,11)  J$)V$) D  X\\   :   AGY ST  ! "CATAGORY (a letter) : ",V$    X0 N1    E$12,12)V$1,1) D  X\\   :    \"* * * ADD * * *"\ %  INITIALIZE E$ BLANKS TING  E$X$X$X$   COLLECT ENTRY *  4 #0%NS5,E$, > NN1\ !H "ANOTHER ENTRY? (Y/N) ",A$ R A$"Y"  \ #0%0,N,\ f  \"* * * EDIT * * *"\ +p "MODIFY WHICH ENTRY (BY NUMBER) ",E\ z E0 EN p  X0 N1    XE   X  \ ' "MODIFY THIS ENTRY? (Y/N) ",A$\  A$"Y"  . "MODIFY A DIFFERENT ENTRY? (Y/N) ",A$\  A$"Y" p     2 "THIS IS THE ENTRY THAT HAS BEEN MODIFIED"\  \  #0%XS5,E$, % "ANOTHER TO MODIFY? (Y/N) ",A$  A$"Y" f $ /.  \"* * * ALPHABETICAL SEARCH * * *"\ 18 "FIND ALL PROGRAMS BEGINNING WITH > ",U$\ B "PAPER COPY? (Y/N) ",P$\ L  V X0 N1 `  j E$1,1)U$1,1) D t X\\  /~ "ANOTHER ALPHABETICAL SEARCH? (Y/N) ",A$  A$"Y" .  #  \"* * * EXAMINE * * *"\  "EXAMINE ENTRY #",X\  B0 BN     \ ) "EXAMINE ANOTHER ENTRY? (Y/N) ",A$  A$"Y"   "  \"* * * DELETE * * *"\ ! "DELETE WHICH ENTRY? ",X\  X0 XN      ' "DELETE THIS ENTRY? (Y/N) ",A$\ ( A$"Y" F .2 "DELETE A DIFFERENT ENTRY? (Y/N) ",A$\ < A$"Y"  &F "PRESS 'RETURN' TO DELETE",R$\ P #0%N1)S5,E1$ Z JN2) X 1 d #0%JS5,E$ n #0%JS5,E1$, x E1$E$   NN1  N0 N0  #0%0,N, ' "DELETE ANOTHER ENTRY? (Y/N) ",A$  A$"Y"   )  \"* * * ALPHABETIZING * * *"\ 4 "PRESS 'RETURN' TO BEGIN ALPHABETIZING ",R$\  X0 N1\  ! YX1 N1\ #0%YS5,E1$  E$1,8)E1$1,8) 6  SWITCH HERE  W$E$  E$E1$  E1$W$ " #0%XS5,E$, , #0%YS5,E1$, 6 Y @ X #J\\"FILE IS ALPHABETIZED"\\ T : ^ +h  \"* * * INITIALAIZATION * * *"\ :r "ARE YOU SURE YOU WANT TO INITIALIAZE? (Y/N) ",A$\ | A$"Y" & "ARE YOU POSITIVE? (Y/N) ",A$\  A$"Y" * "PRESS 'I' TO INITIALIZE ",R$\\\  R$1,1)"I" , "DATA FILE IS BEING INITIALIZED"\\\  N0\ #0%0,N, " "DATA FILE IS INITIALIZED"\  :\ #  \"* * * ANALYZE * * *"\  X1 4\\   3 \12),N," ENTRIES ON DISK FILE- '",Q$,"'"\  \\17), 1 N176100),"% OF FILE SPACE USED"\\   X1 4\\  : & +0 OF PROGRAM BODY SUBRINES FOLLOW ): "PRESS 'RETURN' TO CONTINUE ",R$\ D SKIM DISPLAY N  >X %4I,X,\" ",E$1,8)," ",11),"FILE #",E$10,11),28), b E$16,23),45),I$\  DETAIL DISPLAY    "ENTRY #",X 5 "FILE # : ",E$10,11)," FILE NAME : ",E$1,8) 8 "CLIPPER DATE : ",E$16,23),31),"CATAGORY : ",I$ " "ALSO REFER TO : ",E$24,83) ! "DESCRIPTION : ",E$84,143)  \ # SUBRINE COLLECT ENTRY $Z$\"FILE NAME: ",F$\F$F$X$\  F$1,1)" " F$E$1,8)  "FILE # ",N$\\N$N$X$  N$1,1)"^"  !  N$1,1)" " N$E$10,11) + "CATAGORY (a letter) ",L$\\L$L$X$   L$1,1)"^"  !* L$1,1)" " L$E$12,12) 4 T$" "\T$T$X$ > T$1,1)" " T$E$9,9) H B$" "\B$B$X$ !R B$1,1)" " B$E$13,15) &\ "CLIPPER DATE : ",M$\\M$M$X$ f M$1,1)"^" H !p M$1,1)" " M$E$16,23) z "ALSO REFER TO : "  ">",S$\\S$S$X$ ! S$1,1)" " S$E$24,83)  S$1,1)"^" H  "DESCRIPTION : "  ">",D$\\D$D$X$  D$1,1)"^" z " D$1,1)" " D$E$84,143) ! E$F$T$N$L$B$M$S$D$\ ) P$"Y" 8206,128 8206,176\  8206,176\  #0%XS5,E$\\ COMM E"--------------------------------------------------------------"   M10535)\ # E$12,12)"A" I$"ANIMALS" % E$12,12)"B" I$"BOYS,LADS" *$ E$12,12)"C" I$"CLOTHING,DRESS" . E$12,12)"D" I$"DECO" "8 E$12,12)"E" I$"MODERN" 0B E$12,12)"F" I$"FLOWERS,PLANTS,TREES" (L E$12,12)"G" I$"GIRLS,LASSES" +V E$12,12)"H" I$"HANDS,FEET,TOES" +` E$12,12)"I" I$"IDEAS,MINDS,EGO" &j E$12,12)"J" I$"CLEF,MUSIC" -t E$12,12)"K" I$"COLORS,HUES,TONES" .~ E$12,12)"L" I$"PHOTOS,LITHS,STATS"  E$12,12)"M" I$"MEN" / E$12,12)"N" I$"NUDES,VACANT SHAPES" . E$12,12)"O" I$"BACKGROUND,SCENERY" & E$12,12)"P" I$"PRINT,TYPE" , E$12,12)"Q" I$"BUILDINGS,HOUSES" + E$12,12)"R" I$"RELIGION,PRAYER" & E$12,12)"S" I$"SHAPE,FORM" & E$12,12)"T" I$"TORSO,BODY" 0 E$12,12)"U" I$"ROADS,STREETS,HIWAYS" . E$12,12)"V" I$"VEHICLES,CARS,CABS" ! E$12,12)"W" I$"WOMEN" , E$12,12)"X" I$"CLASSICAL,1890's" % E$12,12)"Y" I$"TECHNICAL" ) E$12,12)"Z" I$"MISCELLANEOUS" + E$12,12)"a" I$"AURA,SKY,CLOUDS" & E$12,12)"b" I$"FOOD,MEALS" +( E$12,12)"c" I$"CARTOON FIGURES" (2 E$12,12)"d" I$"SOIL,FARMING" &< E$12,12)"e" I$"ELVES,IMPS" 'F E$12,12)"f" I$"FISH,WHALES" ,P E$12,12)"g" I$"TABLES,FURNITURE" )Z E$12,12)"h" I$"BOOKS,READING" (d E$12,12)"i" I$"IMAGES,ICONS" *n E$12,12)"j" I$"STRENGTH,POWER" "x E$12,12)"k" I$"EASTER" * E$12,12)"l" I$"LAMPS,LIGHTING" + E$12,12)"m" I$"MACHINERY,TOOLS" % E$12,12)"n" I$"CHRISTMAS" + E$12,12)"o" I$"OCEAN,SEA,WATER" ! E$12,12)"p" I$"NAMES"  A "A=animals B=boys,lads C=clothing,dress" D "D=Deco E=Modern F=flwrs,plants,tree" B "G=girls,lasses H=hands,feet,toes I=ideas,minds,ego" E "J=clef,music K=colors,hues,tones L=photos,liths,stats" E "M=men N=nudes,vacant shape O=background,scenery" B "P=print,type Q=buildings,houses R=religion,prayer" D "S=form,shape T=torso,body U=road,street,hiway" C "V=vehicles,cars,cabs W=women X=classical,1890's" B "Y=technical Z=miscellaneous a=aura,sky,clouds" ? "b=food,meals c=cartoon figures d=soil,farming" C "e=elves,imps f=fish,whales g=tables,furniture" A" "h=books,reading i=images,icons j=strength,power" B, "k=Easter l=lamps,lighting m=machinery,tools" 86 "n=Christmas o=ocean,sea,water p=names" @     << << _PC<< F SOIL,FARMINGTS,TREESZEKE 7 c APRIL,84MEN (M): IDEAS (I): NAMES (p) A CHARACTER DEVELOPED BY CHARLIE... ' CLIPPER PROGRAM DOCUMENTATI   4 15),"* * CLIPPER PROGRAM DOCUMENTATION * * " 4(\"DO YOU NEED A PAPER COPY? (Y/N) ",P$\ p\ 82"THIS PROGRAM IS DESIGNED TO AID IN LOCATING CLIPS" 7<"OF REFERENCE ART --- MUCH AS A CARD FILE IN THE " F"PUBLIC LIBRARY..." 8P"NORTH STAR BASIC V.6 IS USED. PROGRAM IS DESIGNED" 4Z"FOR A 16 LINE, 64 CHARACTER FIELD TERMINAL."\ =d"CREATE THE FILE ON THE DISC. USE 'PROGFILE', SHORT FOR" An"'PROGRAM FILE', AS THE DATA FILE. USE THE 'INITIALIZATION'" 9x"MODULE BEFORE CONTINUING THE USE OF THE PROGRAM."\  \  !"DESCRIPTION OF COMMANDS:"\ "FIND -" 3"REQUESTS A FILE NAME...ALL ENTRIES WITH THAT" @"NAME WILL BE FOUND AND DISPLAYED IN A SHORTENED OR 'SKIM'" "FORM."\ "LIST -" ="WILL LIST ALL ENTRIES IN THE FILE IN BOTH DETAILED AND" "A SKIM DISPLAY."\  \  "SORT-" 5"THIS COMMAND WILL SELECT ART BY FILE NUMBER OR" 3"CATAGORY...PRINTOUT WILL BE IN SKIM DISPLAY." $"HARD COPY MAY BE REQUESTED."\ "ADD-" 7"REQUESTS THE INFORMATION FOR STORAGE IN THE DATA" &""FILE AND UPDATES THE FILE SIZE." :,"IF A TYPING ERROR IS MADE, TYPE A '^' (OR UP ARROW)" :6"AT THE NEXT INPUT REQUEST. YOU MAY CONTINUE TO JUMP" :@"LINES UNTIL THE LINE YOU WISH TO CORRECT IS REACHED" 8J"FOR RETYPING. A RETURN MAY BE MADE TO THE CURRENT" 8T"INPUT LINE BY PRESSING 'RETURN', WITHOUT ALTERING" )^"PREVIOUSLY ENTERED CORRECT DATA."\ h \  r"MODIFY -" 8|"WILL EDIT A FILE ENTRY. A DETAILED DISPLAY OF THE" ;"REQUESTED ENTRY WILL BE CALLED UP FIRST TO MAKE SURE" :"THE CORRECT ENTRY WILL BE EDITED. AGAIN, A 'RETURN'" <"WILL NOT MODIFY THE EXISTING DATA. BACK-STEPPING WILL" ;"OCCUR WITH A '^' OR UP-ARROW. AFTER THE MODIFICATION" >"HAS BEEN MADE, THE CORRECTED ENTRY WILL BE DISPLAYED."\ "ALPHABETICAL SEARCH -" 6"WILL SKIM DISPLAY ALL FILES THAT BEGIN WITH THE" "REQUESTED LETTER."\  \  "EXAMINE -" :"ALLOWS EXAMINATION OF A DATA ENTRY CALLED UP BY THE" 2"INDEX NUMBER AND USES A DETAILED DISPLAY."\ "DELETE -" 6"DELETES AN ENTRY FROM THE FILE. THE FILE NUMBER" 6"MUST BE USED. THE REQUESTED DATA WILL APPEAR IN" 7"A DETAILED DISPLAY BEFORE THE PROGRAM IS ALLOWED" 8&"TO REMOVE AN ENTRY FROM THE FILE. THERE WILL BE A" 60"TIME DELAY AS THE PROGRAM READJUSTS THE FILE TO" :"REMOVE EMPTY SPACE."\ D \  N"ALPHABETIZE -" =X"WILL ALPHABETIZE THE FILE ENTRIES. HELPFUL ON HARDCOPY" Ab"SEARCH FOR A FILE ENTRY. TAKES TIME FOR THE SORT TO OCCUR." 2l"PROGRAM NOTIFIES YOU WHEN IT IS FINISHED."\ v"INITIALIZE -" 5"READIES THE FILE TO RECEIVE DATA. MUST BE USED" 4"BEFORE USING THE PROGRAM. MAY ALSO BE USED TO" 8"'RESTART' THE FILE. *** CAUTION *** YOU WILL LOSE" %"THE FILE IF IMPROPERLY USED."\  \  "ANALYZE -" 2"DISPLAYS THE TOTAL NUMBER OF ENTRIES IN THE" ."PROGRAM FILE AND INDICATES THE PER/CENT" $"OF FILE SPACE ALREADY USED."\ "EXIT -" 3"ALWAYS USE THIS COMMAND TO LEAVE THE PROGRAM" 4"TO INSURE THAT ALL NEW DATA WILL BE STORED ON" "THE DISC."\  \   "FINAL NOTES -"\ 7"THE FIRST NUMBER ON THE SKIM DISPLAY IS THE FILE" 8 "ENTRY NUMBER - NECESSARY FOR SOME COMMANDS IN THE" *"PROGRAM."\ 44"A 'RETURN' MAY BE TYPED FOR ANY '(Y/N)' INPUT" 5>"REQUEST WITHOUT INTERRUPTION OF THE PROGRAM."\ H 8206,176 8R "PRESS 'RETURN' TO GO BACK TO CLIPPER PROGRAM",R$ \ "CLIPPER" f 'p P$"Y" 8206,128 8206,176 z 27),"M",\  "Hit CR...",R$\  M10535)\ %0,N, ' "DELETE ANOTHER ENTRY? (Y/N) ",A$  A$"Y"   )  \"* * * ALPHABETIZING * * *"\ 4 "PRESS 'RETURN' TO BEGIN ALPHABETIZING ",R$\  X0 N1\  ! YX1 N1\ #0%YS5,E1$  E$1,8)E1$1,8) 6  SWITCH HERE  W$E$  E$E1$  E1$W$ " #0%XS5,E$, , #0%YS5,E1$, 6 Y @ X #J\\"FILE IS ALPHABETIZED"\\ T : ^ +h  \"* * * INITIAL 8 P$"Y" P2$,\ 'B "PRESS RETURN TO CONTINUE ",R$\ UE ",R$\ RETURN TO CONTINUE ",R$\ $,\ 8 P$"Y" P2$,\ 'B "PRESS RETURN TO CONTINUE ",R$\ $,\ 8 P$"Y" P2$,\ 'B "PRESS RETURN TO CONTINUE ",R$\  "PRESS RETURN TO CONTINUE ",R$\  RETURN TO CONTINUE ",R$\ R$\ \ 'B "PRESS RETURN TO CONTINUE ",R$\  "PRESS RETURN TO CONTINUE ",R$\ R$\