Note: This story was dynamically reformatted for online reading convenience.
 
 аЯ'рЁ+/-с>ўџ
$&ўџџџ#|џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ"ЅСM
ё'П
bjbj = =
""-W-W
џџ
џџ
џџ
lддддддд"
"
"
"
'Х
>n
"
"
"
"
"
"
"
"
(TM)
ƒ$ ' )"'@д"
"
"
"
"
@6
дд"
"
U6
6
6
"
 д"
д"
(TM)
6
"
(TM) 6
ž6
дM дд(TM) "
б --CЗ>С

"
,
e (TM) k0>m ,н",
 н"(TM)
6
ш'њддддй

'

'§§


'ўћ



Аа/ Ар=!А"А# $ %А"ЅСM
ђ'П'
'bjbj = =
""-W-W
џџџџџџlн"'н"'`````"ЅЅ+/-''ХЅ:n
нннннннн
нпппппп" Шп`нннннп"

i4@ёџ4Normal"_H
mH nHsH tH0

0 Heading
1
$
@&>*
<A@ђџЁ<Default Paragraph Font
џџџџ

џџ
 z(TM)
~0--џџ"Thom Foreman>C:\WINDOWS\Application
Data\Microsoft\Word\STARTUP\Retitle.dotThom Foreman;C:\WINDOWS\Application
Data\Microsoft\Templates\Retitle.dotTitmouse;C:\WINDOWS\Application
Data\Microsoft\Templates\Retitle.dotThom Foreman;C:\WINDOWS\Application
Data\Microsoft\Templates\Retitle.dotThom Foreman;C:\WINDOWS\Application
Data\Microsoft\Templates\Retitle.dotThom Foreman;C:\WINDOWS\Application
Data\Microsoft\Templates\Retitle.dotThom Foreman;C:\WINDOWS\Application
Data\Microsoft\Templates\Retitle.dotThom ForemanKC:\WINDOWS\Application
Data\Microsoft\Word\AutoRecovery save of Retitle.asdThom
Foreman>C:\WINDOWS\Application Data\Microsoft\Word\STARTUP\Retitle.dotThom
ForemanC:\My Documents\Retitle.dot

^~''Ќ"џџџџџџџџџ
h
,а',~ўЦ
а^,а`,~ўOJ
QJ
o(
З№
h
,
 ',~ўЦ
 ^, `,~ўOJQJo(
o
h
,p',~ўЦ
p^,p`,~ўOJQJo(
Ї№

h
,@',~ўЦ
@^,@`,~ўOJ
QJ
o(
З№
h
,',~ўЦ
^,`,~ўOJQJo
(
o
h
,р',~ўЦ
р^,р`,~ўOJQJo(
Ї№
h
,А"',~ўЦ
А"^,А"`,~ўO
J
QJ
o(
З№
h
,-',~ўЦ
-^,-`,~ўOJQJo(
o
h
,P',~ўЦ
P^,P
`,~ўOJQJo(
Ї№
 ^~џџџџџџ
џџ
'
   
   
  
џ
V'џџV"џџV"џџVџџVџџVџџV
џџV
џџVџџVџџVџџVџџVџџџџProject.Title
.GetAlias
Project.Title.GetAuthor
Project.Title.GetCodes
Project.Title.G
etLink
Project.Title.GetOther
"Project.Title.GetRef
Project.Title.GetSour
ce
Project.Title.GetTitle
Project.Title.Redisplay
Project.Title.ResetFin
d
Project.Title.SaveStory
Project.Title.UpdateTitle
Project.Title.MakeTi
tleToolbar
''"PROJECT.TITLE.GETREF"PROJECT.TITLE.GETLINK"PROJECT.TITLE.GE
TALIASPROJECT.TITLE.GETCODESPROJECT.TITLE.GETOTHERPROJECT.TITLE.GETTI
TLEPROJECT.TITLE.GETAUTHORPROJECT.TITLE.GETSOURCEPROJECT.TITLE.REDISP
LAYPROJECT.TITLE.RESETFINDPROJECT.TITLE.SAVESTORYPROJECT.TITLE.UPDATE
TITLEPROJECT.TITLE.MAKETITLETOOLBAR@-
L%



P@џџ
Unknownџџ
џџ
џџџџ
џџџџG
‡:џTimes New
Roman5


-Symbol3&
‡:џArial;
†






SimSu
n<[SO?5
 ‡:џCourier
New;
-Wingdings"ёŒ№аh
...[a-"caЦ





$№ЅР''-'0'dC­>Тy
2ƒQ№пџџ'-Here's how I assume you will use this toolbarThom
ForemanThom Foreman"

iD@ёџDNormal$CJ'OJўPJўQJў_H
aJ'mH sH tH

<A@ђџЁ<Default Paragraph Font
"џџџџџџџџ


'
'
'џ@
P$@џџ
Unўџ

р...ŸђљOh<<`+'Гй0Є
'
~амє

 
 8
'D

`
l
x
,
Œ
"
"œ
ф.Here's how I assume you will use this
toolbar.0
ereThom Foremanass
hom
homRetitle.dotThom
Foremanass12m"Microsoft Word 9.0 @"@N7"šС
@ N"З>С

ўџ

'Э'œ."--+,љ(R)0"

hp|,'Œ"œЄ"Ќ'Міф
s

'

.Here's how I assume you will use this toolbarTitle

‡
''Š"ўџџџ
!"ўџџџ§џџџ%*i()+1,-./0bh3A56789:;<=>?@2BCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`aўџџџ
cdefglyўџџџkўџџџmxoўџџџqrstuvwjz{...Œ§џџџ~-Root Entry
џџџџџџџџ
РFрТCЗ>С
'Р(1Table
џџџџџџџџџџџџШWordDocument
џџџџџџџџ""SummaryInf
ormation(
џџџџ"DocumentSummaryInformation8
џџџџџџџџџџџџMacros

@
ўDCЗ>С
рXwCЗ>С
VBA

џџџџ@ўDCЗ>С
fCЗ>С
ThisDocumentџџџџџџџџџџџџŽ

 ''ўџџџ"ўџџџўџџџ
!"#$%&'()*+,-./01234ўџџџ6789:;<=>?@ўџџџBCўџџџEFGHIJKLMNOPQRSTUVWXYZ[\]^_`ab
cdefghijklmўџџџopqrstuvwўџџџyz{|}~-


Dфr-д
,љ^љџџ#
^Жџџ

џџџџџџ<џ
џЩ:Ђж'œР№VшE
РF
Щ:Ђж'œР№VшEџџџџџџџџ

џџџџxЩ:Ђж'œР№VшEЩ:Ђж'œР№VшEџџMEџ
џџџџџџџџџ

пџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџ
џџ
Sџџџџ
S"џџџџ6"џџџџџџ


N0{00020906-0000-0000-C000-000000000046}џџџџ

"
-ўџџџџџџџ(
џџџџџџџџџџ%џџџџHџџџџ0ƒўџџџџџџџhџџџџџџџџџџџџџџ%, 'џџџџўџ
џџ~џџўџџџџџџџџџџџ%џџџџ8
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџp@@
""џџџџџџџџџџџџџџџџџџџџџџ
85†=g
$*\Rffff*023d8635afп
џџџџ4ўЪ
џџџџ

џџџџ
xџџџџ
ААAttribute VB_Name = "ThisDocument"

ŒBas
Œ0{00020P906-0C"'
$0046}|Global
аSpac
'FalsedCreatablPred
eclaId+/-TruBExpose"TemplateDeriv''BustomizD2rU---
0


љ!!"I"џџџџс4q"б
(TM)"џџџџџџџџџџџџџџџџџџџџџџџџџџџџє`rU---
џџџџџџџџ@n__SRP_6
џџџџџџџџџџџџ"А__SRP_7
џџџџBfrmGetStoryInfo
џџџџџџџџџџџџ__SRP_4
џџџџџџџџџџџџ5о


pф,žај
,љšљџџ
^Жџџ

џџџ

џџџHџџ Щ:Ђж'œР№VшEЩ:Ђж'œР№VшEљШ:Ђж'œР№VшE

Щ:Ђж'œР№VшEџџџџџџџџ

џџџџx Щ:Ђж'œР№VшE

Щ:Ђж'œР№VшEџџMEџџџџџџџџџџ

пџџ"џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџPSPџџџџ
Sџџџџ
S"џџџџS"џџџџ6"џџџџ<џџ<џџ<џџџџџџ

š0{E346
446F-0766-11D6-9C06-00C0F056E845}{E3464460-0766-11D6-9C06-00C0F056E845}џџџ
џ

`
-ўџ0џџ(
џџџџџџџџџџ%ўџџџџџџџџџX
џџ0џџџџџџџџ%' `џџџџџџџџџџџ
џ

   џџџџџџџџœ
"
' џџџџ
`џџџџџџџџџџџџ
џџџџџџџџ 

"
џџџџ` џџџџџџџџƒўџџџџџџџ

џџџџџџџџџџџџџџ%, џџџџўџџџP
џџўџџџџџџџџџџџ%џџџџp`џџџџџџџџџџџџџџџџ 
џџџџџџџџ0џџџџџџџџџџџџ(
јLЄ
œ
џџџџџџџџџџџџџџџџџџџџџџш5†=g
$*\Rffff*013d8
635a3п"4б8"<џџџџ@ўЪ
- џџџџ- џџџџ- џџџџ" - џџџџ"
( 8Hџџџџ

X-` џџA@r

icatiooџџ`-  $!d
'"itle
џџA@r

otoџџ0џџџџ(џџџџ
"+/-Attribute VB_Name = "frmGetStory-Info"

   ~Bas~0{E346446F-0766-11D6-9C06-00C0F056E8h45}J0JdG
lobal
`Spac
oFalse
ŠCreatablPredec$laIdкTruBExpose
'0Templa-teDeri
v-'Customizi<D P Sub cmdCancel_Click() 
Unload
bMMEnd"ONKЯktx‡ж.Text--+rU---


Ё'Щ'ё''џџџџy'4A'q
i'"""
"§џџ
`I
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџ8
"`
)"бббџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџ<A'q
Q""""
"§џџ`

џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@q"+/-
(TM)"џџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџ`
W
0ќЦ`0ќЦ "<"
4PrU---
џџџџџџџџL$

`œ
џџџџџџџџ$A

` 
џџџџџџџџnrU----~| !щ бi A
` ' с 1'Ii' 1Y(C)й)QЁб90/0__SRP_5

џџџџAŒTitle'"џџџџ4"___SRP_3
џџџџDv
__SRP_2џџџџџџџџџџџџn]-H-P-X- џџџџ`hp"x
А.,ш№ ј


"
0
.@
"p
^
"
"
6,
"№
"
(.8"h-"^ .А"рј6(`
x"X^6~аш"p№68P"-
~(""аш№- џџџџ-
џџџџ"-"-0-8- џџџџ'@*P""` ^
~!",'=Р7иј0 .S@
p-^ 
.SА

№МдШџџџџ_WN
,љ~љџџЖџџ

џџџџџџ(џџџџџџџџџџ

џџџџxџџMEџџџџ
џџџџџџ

пџџLџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@

<џџК6
џџџџ<hџџ<џџ<џџ<џџ<"џџ<џџ<џџ<
џџ<$џџ<(џџ<,џџ<0џџ<4џџ<8џџ<<џџ<@џџ<Dџџ<HџџџџџџџџџџLџџџџLџџџџ
"џџџџџџџџ<lџџ<pџџ<tџџ<xџџ<|џџ<џџџџџџ


0

hЊ-0№џџ`@џџџџџџџџ%

lџџџџџFor 
'
 H`,кџџџџџџџџџџ
'2X
`џџџџџџџџџџџџШўJРџџџџ??Œ
Yƒ4џџџџџџ
џџџџџџ-
џџ`,<џџџџџџџџџџ'
K`,>џџџџџџџџџџџџџџџџџџџџџџџџ`,6џџџџџџџџџџ`,8џџџџџџџџџџ 'F
`џ
џџџџџџџџџџџєўJџџџџџџџџџџ
ggI,`,6џџџџzџџџџџ`,8џџџџxџџџџџ`,<~
vџџџџџ`
,:џџџџtџџџџџа`,>џџџџpџџџџџ]
ђ'bh`џџџџџџџџџџџџHџJџџџџџџџџџџЗ,`,6џџџџzџџџџџр'j"`џџџџџџџџџџ
џџ

   џџџџџџџџџџУ,'l0`џџџџџџџџџџџџ џџџџџџџџџџ""Ц,`,6џџџџџџџџџџ
8`,8џџџџџџџџџџЌ
`,:џџџџџџџџџџЗ''n,`џџџџџџџџџџџџ
џџџџџџџџџџк,`,6џџџџџџџџџџШ-`,8џџџџџџџџџџЖ
`,:џџџџџџџџџџ

   b'p@`џџџџџџџџџџџџ џџџџџџџџџџ""ѓ,`,6џџџџџџџџџџЌ
`,8џџџџџџџџџџ
<`,:џџџџџџџџџџЌ
'rШ`џџџџџџџџџџџџ

   џџџџџџџџџџ""
,`,6џџџџџџџџџџЖ
`,8џџџџџџџџџџ
b`,:џџџџџџџџџџм'tP`џџџџ0џџџџ
џџџџџџџџџџ""
,`,6џџџџџџџџџџ

<`,8џџџџџџџџџџЌ
`,:џџџџџџџџџџ$'vи `џџџџџџџџџџџџ џџџџџџџџџџ
-
,`,6џџџџџџџџџџ 4`,8џџџџџџџџџџ'`,:џџџџџџџџџџ' 'x`
`џџџџџџџџџџџџ џџџџџџџџџџ
""=
,`,6џџџџџџџџџџџџџџ`,8џџџџџџџџџџ0`,:џџџџџџџџџџ'z"`џџџџџџџџџџџ
џ
џџџџџџџџџџQ
,0@` №X
џџџџџџџџ-h",PиР
џџџџ"џџџџШШџџџџџџџџџџџџџџџџџџџџџџџџPhџџџ џџ tAli
Project.Title.GetAliasџџџџџџ PXџџџџџ џџџџ@ўџHџџџџџ @ўџ8џџџџџ
џџџџџџџџ'ВР `џџџџџџџџџџџџј§Jџџџџџџџџџџ77a
,`,'џџџџxџџџџџ
`,Жџџџџtџџџџџњ`,"rџџџџџ$X`,6pџџџџџ >`,>џџџџlџџџџџЌ

,,џџџџhџџџx'%`,МџџџџdџџџџџЌ
џџџџ`ъ-,Шџџџџ@џџџџџџџџъ-.џџџџ

@џџ

џџџџџџъ-"џџџџ$џџџџ@џџџџџџџџ x(џџџџџ -` $џџџ џџ џџџџ@ўџ џџџџџ` ,
0џџџџџ h@ўџџџџџџ џџџџ,
ƒ*џџџџџџ(џџџџџџџџџџџџџџ'иџџџџ`џџџџџџџџџџџџџHџџџџџџџџџџ11œ
,,
~џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh~`,:џ
џџџџџџџџџџџџџџџџџ 

   џџџџџџџџџџџџџџ^
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџ џџџџџ @ўџџџџџџ џџџџа
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџј
џџџџџџџџџџџџџџџџр
џџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџX
HJDT2џџџџ@lџџџ џџ @ўџhџџџџџ 0 Xџџџџџ @ўџHџџџџџ @8џџџџџ
H4џџџџџ @ўџ$џџџџџ @ўџ"џџџџџ 0џџџџџ (њZ^\`bџџџџPєўџџџџ
џџџџ8џџџџРџџџџшџџџџџџџџџџџџџџџџ@
џџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџшpџџџџ~
lџџџ
џџ8H^џџџџџ `p\џџџџ HXамBDX,Lџџџџџ @ўџ<џџџџџ
@,џџџџџ @ўџџџџџџ џџџџџџџџџ @ўџџџџџџ p(јўџџџџ @ўџшўџџџџ
џџџџ"џџџџ(иўџџџџ џџџџШўџџџџ
P~џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(X
џџџџшfhxџџџџџ -vџџџџ Ра(pџџџџџ @ўџlџџџџџ
џџџџџџџџ@\џџџџџ џџџџ(Lџџџџџ џџџџHџџџ џџ
0~џџџџџџџџџџџџ`џџџџџџџџџџџџџџџџHџџџџшџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ-"'џџџџ 
О.њмТЄ('@`џџџ џџ џџџџ\џџџџџ @ўџZџџџџџ @'P'Xџџ/џџ
А'Р'XHџџџџџ @ўџ8џџџџџ и'((џџџџџ @ўџџџџџџ 8"H"pџџџџџ
"јўџџџџ @ўџшўџџџџ ~"иўџџџџ @ўџжўџџџџ `"-"дўџ/џџ
p"(
ФШдАж(x
аўџџ џџ @ўџ'ўџџџџ џџџџ0
Мўџџџџ @ўџЌўџџџџ
("œўџџџџ @ўџŒўџџџџ X"|ўџџџџ @ўџlўџџџџ ^"\ўџџџџ @ўџLўџџџџ
,"<ўџџџџ @ўџ,ўџџџџ ш"ўџџџџ @ўџўџџџџ џџџџќ§џџџџ @ўџњ§џџџџ
@,џџџџј§џџџ P,џџџџ.џџџџ-џџџџ џџџџџџџџџџџџР
џџџџ№џџџџџџџџџџџџџџџџџџџџ~
,џџџџџџџџџџџџџџџџџџџџџџџџџџџџ 5†=g
$*\Rffff*1?3d86eae9
*\R3*#34
*\R3*
#30
*\R3*#4d
*\R1*#c1
'*\R1*#17b
*\R3*#2dпўЪ
П
---,-(-
џџџџB0-8 !р №  .S0 !`
p-"^  '-А !Ш 4Yи 
(@ '-P !h 4Yx АРШр '-№
! 4d P`h^ .S~ Шир 
.S  @ P X p  .S-  А Р Ш р  .S№
  0 8 P  .S`     " Р  (Pа ј
" (P( "Php- џџџџ'+x-
џџџџ2"",CР№,C8.CP'-~-
џџџџ" -"А'Р'"и (4№ 20'&Ph-
џџџџ"p'x- џџџџ"~- -А- џџџџ,Шиј
(0@`p<x,Ша-
џџџџ"и-р-№- џџџџј 8
HXhp- "А Ш6ш  
(8<@-~- џџџџ" -"-,-
џџџџРа$р'
'('0'@'`'p'"x'' '"'-
џџџџ"А'-,'-Ш'- џџџџа'р'№''
'0'@'H'X'x'^'' '"'-
џџџџ"А'-,'-Ш'- џџџџа'р',№' "
0"@"P"X"h"^"~" "А"Р"Ш"-
џџџџ"а"-и"-ш"- џџџџ№"" "
"("8"X"h"p"-"^"- џџџџ""-~"-""-
џџџџА"Р"а"№" 
(8Xhx-~-
џџџџ" ",Р
Шиш№ј (-
џџџџ"0-8-H-P-X-`-h'p'-+А
"'Ш р№'"*3
PX'`p+"'" Ра
/р'
"0)H'X'hx^'~(^"
-ар'№ (*70` px
-^~ > РШа- џџџџ"р-ш(№
('0'H @^' ',"`№'' 
а`'x'"8Ш'р'ј"0'H'`
~'А'Ш x''0
рp'^' "H^'р'ј",(08
- џџџџџџџџ

,Эџџx] ђ ] ђШ] ЮЌђAc] ђ№--]ђ(
ђ@
s]ђ 
]ђр]ђјЌ
'8_џџЗ':џ 6ў 8 4'ј 4 6Ќ
$њ$@
Ќ œЗ': 4 6Ќ
$м 4
6Ќ
$њ' 4 6'8yџџkџџ^џ 6ўШ-10 :КЌ
 4Ж
....'<4D <Ќ
b2. 4 <Ќ
$м 4 <Ќ
$њ' 4M < 4Ж
....'<ro'џџј
Ќ


4Ж
:...'<џџџџ <Ќ b 4 <Ќ
$мЖ - 4 <Ќ
$њ' 4 <
4Ж
:...'<'џџx
Ќ
 4Ж
?...'< <Ќ bа 4 <Ќ
$м 4 <Ќ
$њ' 4 <
4Ж
?...'<'џџ
Ќ
 4Ж
/...'< <Ќ b 4 <Ќ
$м 4 <Ќ
$њ' 4џџ <
4Ж
/...'<џџџџ'џџ^Ќ
 4Ќ"$B
...'< <Ќ b" 4 <Ќ
$мЖ
' 4 <Ќ
$њ'
4‡ < 4Ќ"$B
...'<'џџЌ
 4Ж ...'< <Ќ b 4 <$м 4 <Ќ$њ' 4 <
4Ж ...'<'џџ~ 4$D
' 4 4'2iџџx-"X
]ђ~
ђА
ђШ
]ђр
]ђј
Ќ
$0
'"
H!l
 JœЖEnter document title: (L " !$(d
 B@N "$D
'"dџџШ
H!d
$D
'" TбRЌ
бV HB@P "$2
'" "$X
'>Ќ
 >ЖTXT...'< <Ќ œ
" <Ќ
$м " <Ќ$њ'" "$X
'>kџџЌ
 >Ж{ASSM}...'< <Ќ œ "
<Ќ
$м " <Ќ$њ'" "$D
'" "$X
'>kџџ-
Ќ
 >Ж{ASS}...'< <Ќ œ
" <Ќ
$м " <Ќ$њ'" "$D
'" "$X
'>kџџ
Ќ
 >ЖRP...'< <Ќ
œ
"Ќ$њ'" "$Z
'" "Ќ
$ мЖ
->G "Ќ$њ$Z
'"j "$X
'>kџџ`Ќ

>ЖREPOST...'< <Ќ
œ "Ќ$њ'" "$Z
'" "Ќ
$ мЖ
->G "Ќ$њ$Z
'"j
"$X
'>kџџРЌ
 >ЖSTORY...'< <Ќ
œ "Ќ$њ'"K "$Z
'" "Ќ
$мЖ
->G
"Ќ$њ$Z
'"j "$X
'>kџџ-Ќ
 >Ж CHAPTER...'<Ќ3K <Ќ œ " <Ќ
$м "
<Ќ$њ'" "$X
'>kџџЌ
 >Ж CHAPT ...'< <Ќ œ " <Ќ
$м "
<Ќ$њ'" "$X
'>kџџЌ
 >Ж CHAP ...'< <Ќ œ " <Ќ
$м "
<Ќ$њ'" "$X
'>kџџ Ќ
 >Ж CH ...'< <Ќ œ " <Ќ
$м "
<Ќ$њ'" "$X
'>kџџАЌ
 >Ж PART ...'< <Ќ œ " <Ќ
$м "
<Ќ$њ'" "$X
'>kџџ@Ќ
 >Ж PT...'< <Ќ œ " <$м "
<Ќ$њ'"kџџшЌ
 "Ж ...'< <Ќ b " <$м " <Ќ$њ'" < "Ж
...'<'џџxkџџp " ^$\'" "Ќ$м$`
'>Ќ
 >Жa ...'6 6Ќ
>G
"Ќ$њЖ, A'"jЌ
 >Жan ...'6 6Ќ
>G "Ќ$њЖ, An'"jЌ
 >Жthe
...'6K 6Ќ
>G "Ќ$њЖ, The'"j "Ќ
+0
A@boџџH-"]ђPЖЌ+0
џ
6ўЌ
Ќ'K 6$0
ЖœЌ$0
 6$0
Ж
 Ќ+0
kџџШ
џ 6ўШKЌ$0
$d
Ќ+0
Ќ$0

f(hoџџx
-"hЌ$0
 f(hoџџP
-""]ђшђK]ђЌ$0
'" H!l
 JœЖ'Enter
author info: (L " !$(d
 B@N "$D
'"dџџ, H!d
'" TбRЌ
бV
HB@P,9K "$2
'"kџџp-  "Ќ
$мЖ
{>GЖ
{ "Ж
}'"jм9K
"Ќ+0
A@boџџ-"0]ђpђ^]ђ Ќ$0
'" H!l
 JœЖ"Enter story coding:
(L " !$(d
 B@N "$D
'"dџџx H!d
'" TбRЌ
бV HB@P
"$2
'"џ 6ўЌ
 "' " 6Ќ
$њЖ
;œ " 6Ќ
$мЖ
, " 6Ќ
$њ'"kџџРџ
6ўШkџџ"-  "Ќ
$мЖ
(>GЖ
( "Ж
)'"j
"Ќ+0
A@boџџH-",]ђјђ]ђ(Ќ$0
'" H!l
 JœЖEnter archive or
source: (L " !$(d
 B@Ndџџ, H!d
'" TбRЌ
бV HB@P
"$2
'"kџџp "$X
$D
'" "Ќ+0
A@boџџ8-"@]ђ-ђ~]ђАЌ$0
'"
H!l
 JœЖEnter reference: (L " !$(d
 B@N "$D
'"dџџ 
H!d
'" TбRЌ
бV HB@P "$2
'"kџџX "Ќ+0
A@boџџ8-"Ш]ђђ
]ђ8Ќ$0
'" H!l
 JœЖ Enter alias or 8-char file name: (L "
!$(d
 B@N "$D
'"dџџ H!d
'" TбRЌ
бV HB@P
"$2
'"kџџHЖ- "'" "Ќ+0
A@boџџ-"P]ђђ"]ђРЌ$0
'" H!l

JœЖ
@'"dџџ
H!d
'" TбRЌ
бV HB@P "$2
'"kџџ, "Ќ+0
A@boџџ~
-"и]ђђ0]ђHЌ$0
'" H!l
 JœЖ'Enter other info: (L " !$(d

B@N "$D
'"dџџ H!d
'" TбRЌ
бV HB@P "$2
'" "$D
'"kџџ"
"Ќ+0
A@boџџ^-"`

 H!|ѕC@~Ж9d
5-B@~Ж5-(d
З9,З9,З9†З9^З9Š
Ž9ŒЗ9qџџoџџј-""]ђшђ]ђ]ђ0]ђH]ђ`]ђ-Ќ$0
', О!Р'.џ

6ў .Ќ
Ќ
* . 6Ќ
$њ'> >Ж
\>Gyjџ 6ўШ 6Ќ
 œ . 6$м'ЖdџџиЖ'No \
in Full Name ТЖERROR!A@Єgџџ kџџ~ О!
'.џ 6ў .Ќ
Ќ
* .
6Ќ
$њ'> >Ж
.>Gyjџ 6ўШ 6Ќ
 œ . .
6Ќ
$(R)''dџџ№Ж.txt''kџџи Ж .'. Ж , '',' Ц$Ф
., ,
,(
 Ш ,(Ќ ,!Ъ'" "Ќ
œ ,!
'М- МбЮ ШбаЗб" ОB@' ОB@B
.A@д
џ 6ўЌЌ'Ж 6+0
џ 6ўШdџџШЖSkip? АЖFile Not Saved$Є'"
"Ќœgџџ- "Ќ
e ОB@BdџџXЖMsgCk = "$ж
A@Є
kџџ0kџџ(oџџ џџџџ-"Р
]ђh'ЖRetitleб
  бр м%о.кЗ к(ф

 кѕ шбl
5цB@о

"Ќ
7ц
(ъЖTitle.GetAuthorЌ7ц
("ЖTitleЌ
7ц
(L шбl
5цB@о

"Ќ7ц
(ъЖTitle.GetCodesЌ7ц
("ЖAuthorЌ7ц
(L шбl
5цB@о

"Ќ7ц
(ъЖTitle.GetSourceЌ7ц
("ЖCodesЌ7ц
(L шбl
5цB@о

"Ќ7ц
(ъЖTitle.GetRefЌ7ц
("
ЖSourceЌ7ц
(L шбl
5цB@о

"Ќ7ц
(ъЖTitle.GetAliasЌ7ц
("ЖRefЌ7ц
(L шбl
5цB@о

"Ќ7ц
(ъЖTitle.GetLinkЌ7ц
("ЖAliasЌ7ц
(L шбl
5цB@о

"Ќ7ц
(ъЖTitle.GetOtherЌ7ц
("ЖLinkЌ7ц
(L шбl
5цB@о

"Ќ7ц
(ъЖTitle.RedisplayЌ 7ц
("ЖOtherЌ7ц
(L шбl
5цB@о
 "Ќ
7ц
(ъЖTitle.SaveStoryЌ 7ц
("" шбl
5цB@о
 "Ќ 7ц
(ъЖSAVEЌ
7ц
(LЗ9№qџџаoџџШЖTitle.GetTitleЌ
7ц
("џџџџшџџџџ%Ќ

4Ж
>...'<'< <Ќ b 4 <Ќ
$мЖ
[ 4 <Ќ
$њ' 4 <
4Ќ"$B
...'<'џџР <Ќ b 4 <Ќ
$мЖ
] 4 <Ќ
$њ' 4 <
4Ќ"$B
...'<'џџ@Ќ
 4Ж
<...'<џџџџ8џџџџ џџџџј!Ж| ShowЌ
7ц
(Lџџџџј!џџџџ`џџџџ
"'Attribute VB_Name = "Title" Option Explicit Pu,b$
NewFЌAs S~ng4Old4ЊArr@ay(8) tStoryInfoУ
XFunc
ppNonFileChars(Ra@w$) Dim i
?Int-eger,
j
#NoContr-olFound
'-Boolean' CkPos'Teќmp-B
F~=
'jЂ1,$oƒŒ9=
True†(For-\=-WTo0 Len0/0j, If-8c(Mid
,, i, 1)) < 32
T<he,]8Fa<ls‡8"AOР+Le$ftХ - +і ^@1ФXФ-
С9iF0ФExit
K@3ЩEРXIfFNext Loop Until ‡Ы+CCa= In-Z(1, +, ",."E|o Wh-, C >
0†O6УћN7ƒ+=ЦƒХB_ЯС.C<‡):П)"ј -"ЪbУf+† _+О?П /ЫEу'Ÿ*
D4ї"*fп"/п"п"...hП)с-f?fо"Chr(~34)пTмT"'п?oB*ђ*<<+<+}+"о[уj>
>]Рд -- ы?5)'2dLАЃY3lЇ*dOTrimТ_"ГСmšvp?
&

   ё\y 6zSu b Get,~(Ѓћy y,$AР-{'Aп'kz'ox ?Ї,PvСŒc‡"l-tSe,le
,.Typ1$wd&
IPкtfrЦm0.CaS`p'E@†r docu@ment t`:p"`
txtWzT!p=а"4bO.№ShowЕ
жp'ћ
ГEи}П №‡MoveRightаxit:=Dwdб
*actQ"Cw`'0
D w n"(| `Е=
UCa|seМat$3TќXT%3RC.~]IђŒ
...&XjО
+ 3wf'// [<<7
{ ASSM}? ?Oš?!(C)?foѕ+ќ
696#E%ŸŸпŸ+/-EFžs+$яГС‡5+/-УaЕРL-Y_(д7F/sg "ЦЇ7)RPя
1п/)$Р
с'v
,л&v
}pLЯ=P" K+/-'$ї71Р0"@Ђ1Рћ#,Нl2%0/0/'/'d Чх"_.Уа`:REPOоSŸ:
"o'
Жо=RЦh'ў7o'
io'o'wџѓo'/1-џJr"/1/1ƒ-Q`'STORYЯ"? _'_'U/o='ђ= ?Я"ѓ
PT'П","x'ryInfo = LTrim(M@id(Sto",- 2))
-TempStrА`UCase HE nd IfdCkHPosZInj(1, -, " CHAPTER"'tIf /> 0р
Thenx`L0Left Ђ4- `1) + О+\ 8eЪNХ cb6џYbџ0Dobџ0-"0b0'3a= 'ФPARЖTџ0
05џ0tT_aџ0/0ўyxy0œ†С(+Do WhileoD%Р?@Є,у8"2OЩ*CХ$Ђ
, U'Lјoop,H

Р^!`"ConviŸvbРProperЁ+/--[BЧ>L,''Ѕ4DКiн3ia%%р+/-A1b+/-' ŒЌ3A"",
AЖ" ѕ n4bn:the_L5Dр'cTitle@Array(Щ=чbUpdate b

   a4Sub

   PubliTc  
 H(у@D-im i As }`teger" ш0Š)`)"УFor`Ф=  -o 8"рd@0шi) <>
œ""уM ы
+ ш
=@+`яcШMNeАxt i?  0
R'#j"Appрation.Stat№usBaбЊ""-RedisplwЯЯ'0пбGetAuthorcПВ,
jсNo5trolFou<АBoole~aГ‡Т8x'>Selec"Typ'eр'wd&
IPЪfrm-
.Cap0"EnteHr a2
iрF:ЃF]txt'Ta‡'*MShowђ?А
ж-Ђ
"ElќseП@--PV
MoveRight
Unit:=wdCharacoРS0
1бrРipNonFPY!ўs7N" gЅM;1№{"
_'ёЃ7<
'а
+
`0}"JЦВŸ?ž?  CodќesЏ'Џ'C@Џ'С)Џ'Ÿu,P X pЏ'= Џ''§
(R)'sС
coАdingП'С.П'ябд
ПВХ.П'№-1џ
ЧП'П'АX6П'рGП'їП'П'tП'єГ'3ёкYLen')  
\fi,QЩ= ";ŸN[№-P--i t'"","oЭi 
1ж џ x\а"\^
р 3'en(3" "а
Œ3)Ž3 -}
33etSрourceŸ3Ÿ3Ÿ3ОlO[РB((C)~343"ш$O[O[- Е8O[a-rchive |ўs я3ф"я3Ж
я3п"3Ys4П1p W
П1
,1`ЕCount:=1 StoryInfo = StripNonFileChar"s(t)МEnd
If" nTri-m(UCase`
bTitleArРray(4)ФnDUpdate# 
\Sub Public
GetRef(MDim i As InteРger, jR

"NoContr(olF"d
!Boрolean! _‡Q5ƒ3If
Selection.Type-\wd РIP Theƒ&Ђfrm-R†(.Ca&p
-"E-Sr reference:">txtс
Text-№Show...,ЧУiElse`Ш9@FF?MoveRight
Uni0/0ŽwdA†actA_?""H0/05u0/0Ali$asС0/0At-+/-buteСŽB.VB_ProcData
СInvok
e_PFunc@K"-jѕРz.B!.-rƒjœЏ{BU hGœ6œoOœa
C or 8-'cђ f@є
naўm K]?PA<?P$m?P?Pп(TM)-$'"(TM)"- ,"
+ ЁI*HT6_TУA--(TM)Link?(TM)рšїF?(TM)љJ7C?(TM))(TM)iTќ"@#`‡С*B'@]Ч0/0o‡
ПаОа"27П2Г2Optherп2п2'yМ(8п2`Ю''oAм i[?'
9.fАџ
­lџ=0f""Гџf+/-"f№}fџ=яŠўoSpZWaŠ
#,$8П$ЏŠ(R)ŠRes@etFindФ$Wp
ith
w`
e2.Cр^rForma`ttingv
,"Г7.ReplaРcement_=MatchA@llWord!sщFaј-
.'ё>Ÿ
...+/-Sa"sLikqёŸhWhа*бясWildcard!Wrap0wdЃ+/-'1>inuVŠ.А
цw`Trd
сaУпЂ"ЂSave'ј<,FEа"0ЃS`ng,, -
kLocaЁ#
ТбVMsgCkq
фЅ†
9ЇF
Temp
QAsDlg+/-
DialoC1Subjp`eСlNewFN№yСEЧ0C*OldХ
ArveDocu!№FullaB
№'а+/-@= Len(%) To 1Аlep -FПЅ= MidЖ, i, 1#P% cw"\"2ЏР Exit '2N{
iЂаi ž> љdЅ1 ft0/0S)CРBox "PNo \ L Ё 
+/-", vbOKOnly, "EрRROR!ц1!
?!"Щп'''Ÿ'Ÿ'StyŸ'tr`Ÿ'Ÿ'q"".Ÿ' Ÿ'1:ФB*\=
'Жx'<<-р+ч'"д".`ФЃ'џѓ+/-;ѕ+ E'Т"Ш'F
+ с,Set Ш-=
Г-s(wdп"`XУ/Г'†0.Ё@"џE"Р:b2`>-P№
@?2QAL2#9 щЖDiКsQy"
@'-ћ"Пf6(C)і
а-Œ4"

   
0/0Q:=, _ЂŸ  ё
Р/Р :=' , AddToRŒec`ZAs:=ŠR'"CloчиKilМl FV%p
<0!<і8GxjiqjЗbH&œ5`MА>sgBoЗВx("Skip?", vbOKCancel, "File Not Saved") If
MsgCk = 2` Then0:E,ndElseT1TActiveDocumentР.Close ;ƒUnBox "v" +
Str(Ч-z If5 

Sub

   -Public MakeTitleToolbar(!Dim myBar As -VariantBSet,= Co
mmand"s.Add(NameР:="Ret
)-ЁPosition
:=mso"FlРoating,2,0.Enabled'ЁTru{With3ƒ:| .Co ntrol,5 Typ-5+,
ButtoП†(1).ШSty-п= B,"8CapK.On)
don-$"BG.Gєet"TФ"б

;H"-2<<--'-Au№thor"--Ш- ,.3+.-'.Cod|es"-@Ш-ж
Ќ-4<<-Р"Sourcўeђ@шРaч[j5
‡g(Р'RќefВр"'_J6_IРRAli~aSD
^іпЪ7пЩР"LinkПR-"'ŸŠ8Ÿ‡0/0Р'Othe"^п
"іпЪ9пЩРЯRedisp8layВ-@ш| р
ShowŸџfRhЃџfдi(10Џn"яcsђП†StorПp2ШSAVТE(TM)Visi0uрh''u
-au
"-+/-љ!q(TM)i#1(TM)#(C)0ќЦ-0ќЦX
0ќЦ0ќЦh0ќЦ"
0ќЦ00ќЦ,0ќЦ@0ќЦШ0ќЦP0ќЦи0ќЦ`0ќЦ"№Ќ
<$џ'(џ%'8џ%ўСHџ%:Xџ%hџ
$Œhџ,Q$џќќlџhџcXџ%lџџClџq џ#ўСXџ
%l
џџ=џ§Ÿў-
5џ#ўС8џ%(Xџ
%l џџ>џ
џC 5џ :8џ
%(Xџ
%l џџ>џ
џC5џ :8џ%(Xџ
%l џџ>џ
џC5џ#ўСXџ
%l
џџ=џ§Ÿў-
5џ#ўС8џ%(Xџ%l џџ>џ
џC 5џ :8џ%(Xџ%l џџ>џ
џC5џ
:8џ%(Xџ%l џџ>џ
џC5џ#ўСXџ
%l џџ=џ§Ÿў-
5џ#ўС8џ%(Xџ%l џџ>џ
џC 5џ
:8џ%(Xџ%l џџ>џ
џC5џ :8џ'%(Xџ%l џџ>џ
џC5џ#ўСXџ
%l
џџ=џ§Ÿў-
5џ#ўС8џ%(Xџ%l џџ>џ
џC 5џ :8џ'%(Xџ%l џџ>џ
џC5џ
:8џ"%(Xџ%l џџ>џ
џC5џ#ўСXџ
%l џџ=џ§Ÿў-
5џ#ўС8џ%(Xџ%l џџ>џ
џC 5џ
:8џ"%(Xџ%l џџ>џ
џC5џ :8џ%(Xџ%l џџ>џ
џC5џ#ўСXџ
%l
џџ=џ§Ÿў-
5џ#ўС8џ%(Xџ%l џџ>џ
џC 5џ :8џ%(Xџ%l џџ>џ
џC5џ
:8џ%(Xџ%l џџ>џ
џC5џ#ўСXџ
%l џџ=џ§Ÿў-
5џ#ўС8џ%(Xџ%l џџ>џ
џC 5џ
:8џ%(Xџ%l џџ>џ
џC5џ :8џ%(Xџ%l џџ>џ
џC5џ#ўСXџ
%l
џџ=џ§Ÿў-
5џ#ўС8џ%(Xџ%l џџ>џ
џC 5џ :8џ%(Xџ%l џџ>џ
џC5џ
:8џ%(Xџ%l џџ>џ
џC5џ#ўСXџ
%l џџ=џ§Ÿў-
5џ#ўС8џ%(Xџ %l џџ>џ
џC 5џ
:8џ%(Xџ %l џџ>џ
џC5џ :8џ%(Xџ %l џџ>џ
џC5џ#ўСXџ
%l
џџ=џ§Ÿў-
5џ#ўС8џ%(Xџ

   %l џџ>џ
џC 5џ :8џ%(Xџ %l џџ>џ
џC5џ :8џ%(Xџ %l џџ>џ
џC5џcXџ%l
џџC ѕq џ"|Ќ(b
lџhџ$џџџ''
'''''''' '
'''*rU---
џџџџџџџџ,(`§џџџџџџџџџџџa
0$(C)
`§џџџџџџџџџџџ$б`§џџџџџџџџџџџ$љ`§џ
џџџџџџџџџџ$!
`§џџџџџџџџџџџ$I
`§џџџџџџџџџџџ$q
`§џџџџџџџџџџџ$(TM)
`§џ
џџџџџџџџџџ$С
`§џџџџџџџё
$щ
 `§џџџџџџџџџџџ$'
`§џџџџџџџџџџџ$9`§џџџџџџџџџџџ$a`§џџџџџџџџџџџ$0/0`§џџџџџџџџџџџn_VBA
_PROJECT

џџџџp*"dir
џџџџџџџџџџџџx__SRP_0џџџџџџџџџџџџ}o'__SRP_1
'џџџџ...џ,ƒ
,ўџџџ†‡^ўџџџŠŽŒўџџџўџџџ`ўџџџ""*-ўџџџ~ўџџџš>œžŸ ўџџџЂўџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџocument"\FullName
аžvbOKOnlyѕВDialogsŠЪ'wdDialogFileSaveAsЁNwdFormatTextМDisplay'
SaveAsf;FileNamejУ
FileFormatŸжAddToRecentFiles+/-VKill'Str--'Ќ(
MakeTitleToolbarщ
myBar"c-џ
CommandBars
Addїr-џ
Positionн-џmsoBarFloating"ђ-џ
EnabledлЊ-џControls
'K-џmsoControlButtonnѕ-џ
StyleХp-џmsoButtonCaption"+/--џOnAc
tion, -џ
VisibleЖ"UserFormNcmdOK'
cmdCancelЭ-џClickŠу_B_var_TrimmT_B_var_UCaseaЮ_B_var_LeftQс
_B_var_Mid'p_B_var_LTrimс&_B_str_LeftVƒ_B_var_StrConv{_B_var_LCase
'­ _B_var_Chr\;_B_var_RTrimr'_B_var_Right9йItemзz
_B_var_Str"'џџ

l
џџџџџџџџџџџџџџџџџџ
џџџџ&џџ+џџџџџџџџџџџџџџџџџџ
џџџџџџ"џџџџџџџџџџџџџџџџџџџџ'
6

D-@
!b'@-

Г-

0*
p"H,dфProjectQ(@""=­ l
"' '-5†=gJ'<

rstdole>stdolePf%\*\G{00020А430-C

'0046}#2.0#0#C:\WINDOWS\SYSTEM\
c2.tlb#OLE
Automрation^ƒD Offic,DO-> fic,D-'...-
D2DF8D04C-5BFA-101B-BDЄE5-DAA-B4-
2^D---gram Files\Microsoft 6\MSO9.DLL# 9.0 Ob
'
Li`brary-C

,ЦMSForms>
MSF-žrms'3-,D452EE1-E08"FXA-8-02608C4D0BB4зNFM20Œ&Т
[L&/;§-!1Р,Уe0/0lA^l 00}#0,l#РЃ-50-
rР
AC71A6A06-F073-1@1D5-9C-00C0F056E8456@,P\VBE\DO.exd^U7-с.Eр..
..`PŒM'AЭBШD"Т
,љГThisDocum@entGРTDh-"sDicDuhen-МЮ2кР'HB
1зк
<B
,Т!^љ"B"+B
Р
frmGetStor@yInfoG<<@К!FG ]t
Ht"H"yI@"f`
'j2Џ"ў †­"šЄ"(Ђ"eС<Tit leG

   TР&"tЂ,F2LяD]NЏ"~љ!(
b
rU----
~
~
~
~w џџџџџџџџџџџџ   
Raw
(C)'A'
 (C)'
"
 "q"(
џk РF\ "No \ in Full
NameERROR!.txt РF
Name
Format, РF Skip? File Not
SavedMsgCk
=1џџџџSА1џџџџkа1џџџџ'№1џџџџeЩ:Ђж'œР№VшE
РFЩ:Ђж'œР№VшEі РFDocument@'DD,



Hl

'
 `$
|
ShowSAVE'am
џ 
ф


*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRAM
FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA6\VBE6.DLL#Visual Basic For
Applications
*\G{00020905-0000-0000-C000-000000000046}#8.1#0#C:\Program
Files\Microsoft Office\Office\MSWORD9.OLB#Microsoft Word 9.0 Object
Library,*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\SYSTEM\s
tdole2.tlb#OLE Automation

*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.1#0#C:\Program
Files\Microsoft Office\Office\MSO9.DLL#Microsoft Office 9.0 Object
Libraryк*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\SYSTEM\F
M20.DLL#Microsoft Forms 2.0 Object
Library
ф*\G{C71A6A06-F073-11D5-9C06-00C0F056E845}#2.0#0#C:\WINDOWS\TEMP\VB
E\MSForms.exd#Microsoft Forms 2.0 Object
Library
с.Eр....`ŒM'




џџџџџџ5†=gџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџ

,љThisDocument"023d8635afџџ"ThisDocumentџџ^љкџџfrmGetStoryInfo"013d

8635a3џџfrmGetStoryInfoџџšљўџџ Title"1?3d86eae9џџ*
Titleџџ~љ0]Nџџџџџџ

Pџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџ<< ы>ж'œР№VшEџџџџ
' ы>ж'œР№VшEџџџџ
>
ы>ж'œР№VшEџџџџ
џџџџ0-0/0
Šџш8WordЕkVBAї
Win16С~Win32MacГВVBA6­#Project1
stdole"`Project-(R)ThisDocument<ž
-џ_EvaluateйNormalпиŒ(џOfficeu,џ
Documentj"frmGetStoryInfo
Ѓ"cmdCancel_Click\'cmdOK_Click,
Ќ(
StoryInfoџTtxtStoryInfo6%MSFormsCModule1b'Titleђ~Ќ(
New
FNameб.Ќ(
OldFName M
Ќ(
TitleArrayа"'Ќ(
StripNonFileCharsХПRawƒЭ
i`
jaNoControlFo
und;CkPosрDTempStršQAsc!uChrK~Trim@яЌ(
GetTitle-
SelectionZ(R)wdSelectionIP
+/-CaptionxShowѕ
MoveRight'шUnitŸwdCharacterЩCount0vUCase5
LTrimєbStrConvx'vbProperCaseшїLCase:щЌ(
UpdateTitleAbRTrim...Ю
ApplicationЅ* StatusBarЪœ Ќ(
Redisplay--F
Ќ(
GetAuthorv$Ќ(
GetCodes4+
Ќ(
GetSourceСJЌ(
GetRefd-Ќ(
GetAlias"аЌ(
GetLinkŠмЌ(
GetOther
є
Ќ(
ResetFindс[Findn№ClearFormattingФ)ReplacementЦ'MatchAllWordForm
sžп
MatchCase‡ЮMatchSoundsLikeџ0MatchWholeWordВXMatchWildcardsўWrapWy
wdFindContinueBPForward(C)
RegPokeTitleDirl|SaveSettingќappnameKpSectionGKeyЇ"Setting|ї
RegCheckTitleDirкГTitleSetting,=

GetSettingѕMsgBox--R'RegChangeTitleDiri:MsgCkАѓInputBoxЯprompt
mRight
vbOKCancelx? Ќ(
SaveStoryЦXFExtŒмWorkLoc<
SaveAsDlgѕ"DialogŸfSubjLine`0ActiveD
'q"8
Project.Title.GetAlias[$џџ}У
(R)Rу`Ю'уЊK,Q

DB
TahomaŒƒ
(х
-
4txtStoryInfoдЇ"

-H-,--,5

-ЅTahoma@"(-OKJ" Nu-
Tahoma@(-Cancel@Р
Nu-№Tahoma@
(ѕ
-74
'cmdOK@дЪ,ѕ

-;8'cmdCancelчIЌ"ЪfrmGetStoryInfo


џџџџџџџџfCЗ>С
РЗoCЗ>С
f
џџџџџџџџџџџџ0/0пo
џџџџ< 
CompObj'
џџџџџ
џџџa
ўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00
Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmGetStoryInfo

   Caption = "Enter information:"

   ClientHeight = 1695

   ClientLeft = 45

   ClientTop = 330

   ClientWidth = 4755

   StartUpPosition = 1 'CenterOwner

   TypeInfoVer = 8 End
ThisDocumentThisDocumentfrmGetStoryInfofrmGeVBFrame'џџџџџџџџџџџџ'2
PROJEC
Twm"
"џџџџ--kPROJECTџџџџџџџџџџџџ(TM)щ

CompObj'
џџџџџџџџЁj,ƒ,n†ўџџџ^
0/0ўџџџ<ўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџ"K*m
џџ
џџ








rU----~
~
~
~

~
~
~~
~~
~
~~~~~~~~~~~~~~~~~~ 
!
sDFуfж'œР№VшE

 фџџџџƒŠ$ '"џџџџџџ'ƒ-a (C)"џџџџa"0/0"џџс
A й"џџџџ`џџџџ
9Yy(TM)'йё )Aa ) џџ 

'
'щThisDocumentfrmGetStoryInfoTitleProjectяРF'@C:\PROGRA
M FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA6\VBE6.DLL
VBA

   9
џџџџ a
ё
0 РF4C:\Program Files\Microsoft
Office\Office\MSWORD9.OLBWord
Yџџџџ
љ@0РFC:\WINDOWS\SYSTEM\stdole2.tlbstdoleGetRef

   iџџџџ`йPLај-њ[НхЊDоR1C:\Program Files\Microsoft
Office\Office\MSO9.DLLOffice

  
aџџџџ
0/0љ`с.Eр....`ŒM'C:\WINDOWS\SYSTEM\FM20.DLLMSForms
ii`бp

jЧs№''œР№VшEC:\WINDOWS\TEMP\VBE\MSForms.exd

   Aiiб-
'StripNonFileCharsGetTitleUpdateTitle Redisplay
GetAuthorGetCodes GetSource
GetAliasGetLinkGetOther
ResetFindRegPokeTitleDirRegCheckTitleDir'RegChangeTitleDir
SaveStoryMakeTitleToolbar'DD,


iveT
((C)E
'
 ^$
Retitle№
РF' РF A џџџџРF
Enabled
Controls
Type
Add
 Style
Title.GetTitle
OnAction? Title
Caption
Title.GetAuthorAuthor Title.GetCodes Codes
Title.GetSourceSourceTitle.GetRefRef Title.GetAlias
AliasTitle.GetLinkLink Title.GetOther Other Title.Redisplay
-Show Title.SaveStorySave
Visible №u РF*Enter document
title:Щ:Ђж'œР№VшE
Щ:Ђж'œР№VшEЩ:Ђж'œР№VшEљШ:Ђж'œР№VшE
Щ:Ђж'œР№VшEС{lЏЮ'ŸFЊWJOcmdOK!ш-ЌЂ6Я'-SЊ` њ

   'џџџџџџџџб0
'"<B"Ю'žЊ`ѓtxtStoryInfo
cmdCancelШ[qJ---eР<UserFormЩ:Ђж'œР№VшE F3Dynamic

   '"џџџџ
џџџџс"@
cmdCancel_ClickcmdOK_ClickL""<B"Ю'žЊ`ѓTXT{ASSM}
 {ASS}RP-REPOSTNEW STORY CHAPTER CHAPT  CHAP 
CH  PART  PT a , Aan , Anthe 
 ,
TheVBE6.DLL1џџџџP
1џџџџp
1џџџџi
1џџџџxА
1џџџџ
а
1џџџџh№
1џџџџЭ1џџџџ0.:/'1џџџџP1џџџџ
`p p
РF1џџџtStoryInfoTitleTitleID="{E3464474-0766-11D6-9C06-00C0F056E845}"

   Document=ThisDocument/&H00000000 BaseClass=frmGetStoryInfo Module=Title
Name="Project" HelpContextID="0" VersionCompatible32="393222000"
CMG="5A58D6BE34C234C234C234C2" DPB="B4B63818C873C973C973"
GC="0E0C82C28646E147E1471E"

   [Host Extender Info]
&H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000

   [Workspace] ThisDocument=0, 0, 0, 0, C frmGetStoryInfo=0, 0, 0, 0, C,
22, 22, 792, 517, C Title=44, 44, 814, 539, Z 
ўџ џџџџ РFMicrosoft Word
Document
MSWordDocWord.Document.8є9Вqн``ннєнннн`н`нннннннн``
<<ннб --CЗ>С
ЅЅннн 0:нШнШннЅЅ````й 1h
Аа/
Ар=!А"А# $ %Аknownџџ
џџ
џџџџџџџџG
‡:џTimes New
Roman5


-Symbol3&
‡:џArial;
†






SimSu
n<[SO?5
 ‡:џCourier
New;
-Wingdings"0^№аh

№ЅР'''0F№ObjectPool
џџџџџџџџџџ
џџрТCЗ>С
рТCЗ>С
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ