Category : Word Perfect
Archive   : WPCH60.ZIP
Filename : WPCH_BM0.TXT

 
Output of file : WPCH_BM0.TXT contained in archive : WPCH60.ZIP

ÿWPCÈl
' 0(2Z 0Dê
B. bK ˜­H>E#Y
cEœZežZUŸZ %·Z}½Zc :\  @\!`&c "`\ ‚\ ž\ º\ Ê\!`†c Ø\!`æc! Fd!0æg!j!0&l!`Vl )¶l ^Þ\"Î<^Þ\<^($¡¡¢®½î!FS„Tlxæ &4;O)7Yw~…Ž˜§´Ô,¤* o  ß #
*
Q
Œ
¸
Ê
æ
í
× x ¢ m

[mQ˜Ö"ó +E÷ s„¤µ¼˜¬µ¿Î蘭&FW^hLvA™ØXŸÔKžÈò:crQ­î9Ç[àK  · á ÿ (!F!L![!k!z!s"O#ë#$ß$ %Í%
&P&¸&'['`'«'û'N(…(£(Á(ü(():)V)e)*2*?*O*j*Â*:+À+,#,K,¼,--&-<-C-i-£-Õ- .6._.….‹.‘.d/¥/`0•0H1n1ð1;2n2À233393B3414Ô4 5¤5É536~6±67I7v7ˆ7‘7[8‡8¢8¾8×8®9ø9‡:¡:;!;6;R;k<t<Œ<==¯>?]?•?äABÿB:CD LMDMãMNwUJV©VxW^XT_?`}`a©a€b•bÝbNcÃcded—d˜eÓe'gSgŽgXhöorursçszJ{¦{ã{'|Ù|}ïƒÛ„7…w…»…m††‡t‡Å‡ˆHˆ¼‰õŠE‹É‹¯Œm”~•ï•¾–œ—]Ÿ à £¡¢³©Òª4« «_¬™¬!­T­O®k®¯+¯Y¯c¯j¯¶¯°O°€°¼°Ù°?±w±²±¸±¾±Ï±0²k²}²ƒ²‰²4³H³V³q³^´Zµ±µ¶A¶8¸x¸¶¹¿¹Ö¹ö¹mº°ºôº'»E»»o¼ýĺÅÆÔÆ©ÇíÇ@ȊÈèÈ>ɖÉûÉHʒÊÕÊËTË ËáË\Ì9ÍZÖÃ×.Ø­ØýØ3ÙÒÙªÚuãäJä‡ä&å_å–îÿï^ð¢ð>ñTñ]ñyñ§ñÉñÞñåñ´òìò‘ó:ô}ôšô>õƒõ(öaö˜ö÷!÷5÷P÷û÷1øHøøù;ùWúúÎúùúûßûý§ýèý þÿÿ8ÿPÿ"ÆÞû±l­ˆKoÇ\DKb€š¦­}¬G˜é: -





U ‘ s ûÜFå¹< !‡!:"Ð"›+ ,þ,I-ä-î- ...ê.//,/Ê0é0B1[144×4ð4›5´5b6{6€6‘6˜;±;¶;Æ;—<°<µ<Å<´=@>[email protected]ï@ÏBèBâCûCE)EñEFÉGHÙHòHÞI÷IýK"L‰M®MtNÜNÔQíQÞR÷RSUUÐUÎVØVÿÿÿÿ(3/;$©©Ý
ƒ!ÝÝ W Ý da¢a¨U®U·½î!• ] 5xæ"éíÏô 4$OX)7:ÏA Y-w~œ˜œ˜§®@Ô @î@÷ @A,
A8AW
¤A*
A5 
o A
Aš Aß
Aê B#
*
Q
T
Ï\
gŒ
¸
-æ
í
× x  ¢ m

 [˜Ö-"óœœ+2 „µ¼˜œ¿œ¿ÎÕ­&WhLvA™ ŸKžÈò :cr­î àK  · á  ÿ (!F!œL!‚k!+z!s"O#ë#$&ß$
 %
&P& ['`'N(…(£(Á(Ä(ÏÌ( gü(()‚V)+e)*K2*K:*‚O*@j* @„*@* @š*AÂ*
AÎ*Aí*
:+AÀ+
AË+
,K,A¼,
AÇ,-B<-C-i-l-Ïs- g . 6.….‹.-‘.d/ªð1ªð1Fö1œ;2n2] r2 33-B34ª36ª36F96œ~6±6] µ6 v7-‘7[8‚‡87;u ;
!;œ6;R;7Œ<ƒ ’<ÿB} C :C ãM} C:xW} pX©a 7Ýbƒ ãbSg} Zg Žg s} Zg:Ù|} $}m† 7†ƒ —†E‹} L‹ ɋ ¾–} L‹:£¡} ¢_¬ ™¬‚!­T­‚O®k®‚¯+¯] /¯ c¯j¯O°€° ¼°Ù°²±¸± ¾±0²k²}²ƒ²-‰²4³‚V³‚V³q³7ö¹ƒ ü¹mº'»E»} L» » ÔÆ} L»@ȊȍÈÏ”È g–É ûÉ’Ê Ë ËáË \Ì} L».Ør 4Ø=Øo BØ'WØr [ØýØ ÒÙ} L»:&å} qå>ñ Tñ‚]ñyñ] }ñ Þñ-åñ´ò,!÷‚5÷;ù Wú7Îúu Õú
ùú ßû ýqèý qèý ª þ ÿ‚ÿ8ÿ -Pÿ "<Æ Þ-û ±:ˆvK Ç 'D4Kbƒ fš ¦-­}7þ
ƒ  U } \  ‘  å} \ ::"} â"ä- ‚î- ..-.ê.œ/œ/-,/)Ê0 é0 B1 4 ×4 ›5 b6 ˜; —< ´= [email protected] ÏB âC E ñE ÉG ÙH ÞI ýK ‰M tN ÔQ ÞR:UÎV ØVMessagep˜¯AJ 4I 4menu1³žL K M³Ò-I³´-Eÿ-B³O 0Q äP äN 0S QuickMarkMenu³, Rÿ U îBookmarkMenu³þ
Tÿ W  V  X³<
-I³
-EÿÔ
-B³x
QuickMarks³îY³
-I³ì-Eÿ¢-B³FBookmarks³.[ *] N\ÿ_
^
Zÿ6a Èc ìbÿ®e ¨d ¨`ÿÔg žf ži 0k 0jÿm l h 0o œn œOverviewDlg³èp³H-I³*-Eÿü-B³†q³~-I³`-Eÿr-B³¾s u Àtÿðr SetQuick³w ”!v ”!FindQuick³Ì!y H$x H$SetBookmark³€$z³N'{ÿv'|³(}ÿFZ€ L1ÿŽ-~ š9‚ (5 j1ƒ (5„ š9†ÿì9‡ÿ$ZŠ 2B‰ÿ>ˆ ^JŒ &F‹ PB &FŽ ^JÿdJ‘ÿZ” ÆQ“ÿN’ îY– ¢U• äQ— ¢U˜ îY› ´Zš ´Z î\Ÿ ð[žÿÚ\¡ Ô\  Ô\œÿ°]£ ª]¢ ª]FindBookmark³À]¤³d¥ÿöx§ e¦ eª i©ÿBe¨ âx¬ ”k« i® $k° ¶j¯ÿæj­ÿ€k² hp± ²k´ Ho³ Ho¶ "tµ †p· "t¸ âx» Œyº ŒyBookMarkScreen³œy¾³ì}Á 4Àÿ€Â Ž€Ãÿ¶€¿ h…Å nÄ ZÇ X‚Æ ˜É ¼‚È ‚‚Ë :ƒÊ æ‚Í š„Ì dƒÎ š„Ï h…Ò X‡Ñ X‡½ÿ^‡¼ÿ”‡Ô ˆÓ ˆMarkDlgBox³ˆÖ ˜× ¶‹Øÿ˜Û ¼Úÿþ‹Ù ä—Ý ˜“Ü ڏÞ ˜“ß ä—Õ ˜NotFound³*˜p˜.MESSAGEã ®›âƘá μå Àœä қç Àæ äœé ¼žè äë ʤê àží è¥ì î¤ï §î ¦ñ Ö¨ð *§ó ªò ú¨õ f«ô :ª÷ Ò¬ö Š«ù Ò­ø ö¬û p¯ú ö­ý d°ü ”¯ÿ r±þ ˆ° t³ –± ¨´ ˜³ ¤µ Ì´ º· ȵ  ¼¸ Þ·  Öº
 ภ ֺ
 μ³Ø¼QMS PS 815ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿQMSPS815.PRShhhhhhhhðÿHÀK†d".…< Œ
9p`( X
sÝ
ƒ/;)ÝÝ  Ýß>€
'
°°xd>ßÐ ° ÐòòName:€C:\WP60\MACROS\WPCH_BO0.WPMà€¨Q(#àPage€Ô@

ÔÚ

Ú1Ú

ÚÔA

Ԁof€31ˆÐ À ÐÔ ƒ ÞÒÔOctober€18,€1993Ô!

Ôà€ˆ V(#àÔ"(USú:!ú &úUSú ú, ú(ÔÔ ƒ ÞÒÔ9:06€amÔ!

Ôóóÿÿ[email protected]ÿÿBLabel (menu1)ÿÿCThis is a nameÿÿBoverviewdlgÿÿBSetBookmarkÿÿChelloÿÿCtestÿÿÈ@<Ô6X9`+Courier6ä2¼
™p`SymbolU''™p`*ITC Zapf Dingbatsþ3öàp`4New Century Schoolbook<Ô6X™`#"WP BoxDrawing<ˆ 9+CourierBoldG‰?xxx°XXxÝÿþÿþÿþÿöþÿþÿþÿÿÿþÿÿÿÿÿÿÿþÿÿÿÿÿþÿÿÿÿÿÿÿþÿÿÿþÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿþÿþÿþÿÿÿÿÿr5ddd°XôdÝÿþÿþÿþÿþÿþÿþÿþÿÿÿþÿÿÿÿÿÿÿ]ÿÿÿÿþÿÿÿÿÿÿÿþÿÿÿþÿqÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿþÿþÿþÿÿÿÿÿ>n2```°Xà`Ýÿþÿþÿþÿþÿþÿþÿþÿÿÿþÿÿÿÿÿÿÿþÿÿÿÿÿþÿÿÿÿÿÿÿþÿÿÿþÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿþÿþÿþÿÿÿÿÿ
D~)Z8Z°°/ôZaþÿþÿþÿþÿþÿþÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿÿÿÿÿÿÿÿÿÿÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿìgâ{ÿÿÿÿÔp§8°X\ô(«þÿþÿþÿþÿþÿþÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿþÿÿÿÿÿÿÿÿÿÿÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿþÿþÿþÿÿÿÿÿÔ
‚%T8T°°ŸôTùÐþÿþÿþÿþÿþÿþÿþÿÿÿþÿÿÿÿÿÿÿþÿÿÿÿÿþÿÿÿÿÿÿÿÿÿÿÿþÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿþÿþÿþÿÿÿÿÿT •r5ddd°Xìôd#þÿþÿþÿþÿþÿþÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿþÿÿÿÿÿÿÿÿÿþÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿþÿþÿþÿÿÿÿÿTgs4ddd°X'ôd¼oþÿþÿþÿþÿþÿþÿþÿÿÿþÿÿÿÿÿÿÿÿÿÿÿÿÿþÿÿÿÿÿÿÿþÿÿÿþÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿþÿÿÿÿÿÿÿÿÿÿÿÿÿàà Œ
àà ¸ àà ä àà  àà < àà h à5;à ” àà À àà ì à//xpos€ÿÿÿÿPostitÐ X¨ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà ·ÒÀ„#|d5þÿ"ÿÿBDÿÿOÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿñÿƒó?ÿÿÿÿÿüÿÿÿÿÿ¿?ËüóÿÿÿÏÿÿÏÿð=ÀàK—ûûíùÀƒ'À€ þÿ"ÿÿBDÿÿOÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿñÿƒó?ÿÿÿÿÿüÿÿÿÿÿ¿?ËüóÿÿÿÏÿÿÏÿð=ÀàK—ûûíùÀƒ'À€ þÿ"ÿÿBDÿÿOÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿñÿƒó?ÿÿÿÿÿüÿÿÿÿÿ¿?ËüóÿÿÿÏÿÿÏÿð=ÀàK—ûûíùÀƒ'À€ "ÿÿÿÿÿÿ»h;¼”ÿÿÿÿÿÿÿÿÿÿÿÿ].8S‹‚88S\*\*.SSSSSSSSSS..\\\J88SP!P8MS„„”§«n~~~~Ñ\\\w.\77\\\w€www¥¥ee®C\.‰wR)Er…¥¥¥ee®€wwwwI‰€€€eenR\\\wwwrrr\SRRRRRRRR§e@@@@@@@@@@@@Öxio\eEfRfIfRxe|W87y\r\”`xWlRx\€\]\ceIfIs`Wx\…r€rxifIxe877x\s``€rigewiiiiiiiiiiiiiiiiiiiiiiIIIIIIIeeeeeeeeeeeeeeeeeeeeee777777777777\\\\\\\````````````rrrrrrrrrrrrrrrrrrrrrr‰"ÿÿÿÿÿÿÿÿ$ÿÿÿÿÿÿÿÿÿÿÿÿ$ÿÿÿÿÿÿ.þ¢ ¢£x„„„s \˜œ˜ž¢~_q~R\Z`sƒƒƒ„„„ˆ‰„Œ‰‹ˆ‹š|y}„„t€„vvruŠˆ„„vstsƒƒw„ƒ„’••ƒƒI.EAAooz[[˜octhƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒ•Œ©L}š}™›››‹’Ššš™››M“‹‹‘‘tt’’ž”¡”‹’›¢™þ¢ ¢£x„„„s \˜œ˜ž¢~_q~R\Z`sƒƒƒ„„„ˆ‰„Œ‰‹ˆ‹š|y}„„t€„vvruŠˆ„„vstsƒƒw„ƒ„’••ƒƒI.EAAooz[[˜octhƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒ•Œ©L}š}™›››‹’Ššš™››M“‹‹‘‘tt’’ž”¡”‹’›¢™þ"‚ÿÿÿÿuÿÿÅÿÿîÿÿÿÿÿÿÿÿÿÿÿÿÿÿ^.1A]]‹ˆ"88Se.8..]]]]]]]]]]..eeeJ{xxx‚xo‚‹D]‚oˆ‚o‚xioˆx¤uuf8e8eS8]]J`S8Zf51c5”fS`]JMAfZ‚ZZP8e8eñ8.88§8888888888`x]x]x]x]x]§…xJxSxSxSxSD5D5D5D5ˆf‚S‚S‚S‚SˆfˆfˆfˆfuZx]‚`‚S‚SuZ‚So`x]x]x]xJxJxJxJ‚`xSxSxSxS‚Z‚Z‚Z‚Z‚Z‚Z‹f‹fD5D5D5D5]‚co5o5o5o5o5ˆfˆfˆfˆf‚S‚S§‹xJxJxJiMiMiMiMoAoAoAˆfˆfˆfˆfˆfˆf¤‚uZfPfPfP‚`o5ˆfxJiMoAuZuZ‚`‚SˆfxSD55‚SNe.eS1JGG]]]82‹‹]8{{]‹8""AA]§++SS§ff§"A§8'eeeeCefÿÿÿÿÿÿþÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþÿ"ÿÿBDÿÿOÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿñÿƒó?ÿÿÿÿÿüÿÿÿÿÿ¿?ËüóÿÿÿÏÿÿÏÿð=ÀàK—ûûíùÀƒ'À€ Ý
ƒ!ÝÝ W ÝÔ%
€
ÔÔ€ ôÝÿôX XÝÿÔÓ
°°š,°›XÓÖ€ÿÿöCa:;Ö//*********************************************Ð ° Ð//Ì//à Ü àNAMñ.ñEñ.ññ.ñeñ.ñ:à 4 àà ` àWPCH_BM0.WPMÐ þN Ð//à Ü àPURPOSñ4ñEñ4ññ4ñeñ4ñ:€Coach€on€creating€or€finding€a€bookmark€or€quickmark€Ð ¥õ Ð//Ì//*********************************************ÌÌError(off!ñ5ñÔ%
€
Ôñ5ñ)ÌNotFound(off!)ÌGlobal(ScrnMode;MsgAdj;DefTitle;CancelMsg;Title)ÌGlobal(w;h;hbox;title;action;qkmk;bkmk;mark)//tboxÌGlobal(FakeBtns;HotElement;Savescrn)Ìselect[0]=0ÌÌDefTitle="Coach"à ¸ àÐ Ò
"  ÐTitle="Coach"à Œ
àà ¸ àà ä àà  àà < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//€Main€title€nameÐ yÉ  ÐScrnMode=?ScreenHigh„24ÌCancelMsg=0ÌUse("wpchlibr.wpm")à ä àà  àà < àà h à//€Shared€library€fileÐ n¾  ÐIf(NOT€Exists(HYPERTEXT))Ìà Ü àScreenSetup()Ìà Ü àColorScheme()ÌEndifÌÌMsgAdj=DlgMessage()ÌOnCancel€Call€(CancelCoach)ÌÐ  ¦ö Ð//*********************************************Ì//Ì//à Ü àMAIN€PROGRAM:€CoachÐ þN Ð//Ì//*********************************************ÌÔ%
€
ÔLabel€(menu1)ÌIf(Exists(hypertext))Ìà Ü àCall(SetBookmark)Ìà Ü àRETURNÌEndifÌÌVar[1]=0€Var[2]=0€ÌWindowMaximizeÌCancel(Off!)ÌMessage(&tbox;1100)Ìà Ü àDlgCreate(Result;DefTitle;DlgNoOK!+DlgNoCancel!+DlgExit!;;;w;h)Ìà Ü àà  àDlgControl€(CtrlPushButton!;;"~Quit...Esc";StyCancel!;w„14;h„2)à Ð àÐ  p
 Ðà Ü àà  àForNext(x;1;tbox[0])à < àà h àà ” à//Add€Welcome€MessageÐ Ç  Ðà Ü àà  àà 4 àDlgControl(CtrlLabel!;;tbox[x];;2;x+1;w„1;1)Ìà Ü àà  àEndforÌÌà Ü àà  àDlgControl(CtrlRadioButton!;qkmk;"Quick~Mark";;2;10;;2)Ìà Ü àà  àDlgControl(CtrlRadioButton!;bkmk;"~Bookmark";;2;13;;2)ÌÌà Ü àDlgEndÌIf€(Result=„1)Ìà Ü àà  àIf(Exists€(hypertext))Ìà Ü àà  àà 4 àRun("wpch_hy0.wpm")Ìà Ü àà  àEndifÌà Ü àRestoreStates()Ìà Ü àReturnÌEndifÌÌÐ  7‡! Ð//***********************************************************Ì//à Ü àà  àQuickMark?Ð W§ Ð//***********************************************************ÌÌà Ü àà  àIf(qkmk)à Œ
àà ¸ àà ä àà  àà < àà h àà ” à//QuickMarksÐ Lœ Ðà Ü àà  àà 4 àGo(QuickMarkMenu)Ìà Ü àà  àElseÌÌ//*************************************************************Ì//à Ü àBookmark?Ð 
ß  Ð//*************************************************************̐à Ü àà  àIf(bkmk)à Œ
àà ¸ àà ä àà  àà < àà h àà ” à//BookmarksÐ Ý -  Ðà Ü àà  àà 4 àGo(BookmarkMenu)Ìà Ü àà  àà 4 àÌà Ü àà  àElseÌÌà Ü àtbox={à ` à"A€selection€was€not€made.";à  àà D àÐ  p
 Ðà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 àà ` à"ðð€Choose€Ô> rü Ô[Bold€On]Ô?

ÔOKÔ> ‚ü Ô[Bold€Off]Ô?

Ԁto€return";Ð n¾  Ðà Ü àà  àà 4 àà ` à"€€to€the€menu.";Ìà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 à}Ìà Ü àà  àResult=MessageBox("Coach";&tbox;2)Ìà Ü àà  àà 4 àIf€(Result=0)Ìà Ü àà  àà 4 àà ` àGo(Menu1)Ìà Ü àà  àà 4 àEndifÌà Ü àEndif€EndifÌRETURNÌÐ  P Ð//*****************************************************Ì//Ì//à Ü àSUBROUTINE:€€QuickMark€MenuÐ þN Ð//Ì//******************************************************ÌLABEL(QuickMarkMenu)ÌÌVar[1]=1€Var[2]=0€ÌWindowMaximizeÌCancel(Off!)ÌÌà Ü àsteps={à ` àà Œ
à"~Set€a€QuickMark";Ð Ý -  Ðà Ü àà  àà 4 àà ` àà Œ
à"~Find€a€QuickMark";Ìà Ü àà  à}ÌMessage(&tbox;1110)ÌCall(OverviewDlg)à ¸ àà ä àà  àà < à//€Overview€DialogÐ yÉ  Ðselect[0]=Var[0]ÌForNext(x;1;Var[0])Ìà Ü àselect[x]=Var[x]ÌEndforÌGo(QuickMarks)ÌÌÐ  
Z Ð//*******************************************************Ì//Ì//à Ü àSUBROUTINE:€Bookmark€MenuÐ þN Ð//Ì//********************************************************ÌLABEL(BookMarkMenu)ÌVar[1]=1€Var[2]=0€ÌWindowMaximizeÌCancel(Off!)ÌÌà Ü àsteps={à ` àà Œ
à"~Set€a€Bookmark";Ð 6 †
 Ðà Ü àà  àà 4 àà ` àà Œ
à"~Find€a€Bookmark";Ìà Ü àà  à}ÌMessage(&tbox;1120)ÌÌCall(OverviewDlg)à ¸ àà ä àà  àà < à//€Overview€DialogÐ yÉ  Ðselect[0]=Var[0]ÌForNext(x;1;Var[0])Ìà Ü àselect[x]=Var[x]ÌEndforÌSuccess=0ÌGo(Bookmarks)ÌÐ  
Z Ð//***********************************************************Ì//Ì//à Ü àà  àSet€a€QuickMark?Ð þN Ð//Ì//***********************************************************ÌLabel(QuickMarks)Ìà Ü àà  àIf(select[1])à ä àà  àà < àà h àà ” àà À àà ì à//Set€QuickMarkÐ šê Ðà Ü àà  àSuccess=0Ìà Ü àà  àà 4 àCall(SetQuick)Ìà Ü àà  àà 4 àÌà Ü àà  àà 4 àIf€(Success=1)Ìà Ü àà  àà 4 àà ` àMessage€(&tbox;1001)à ” àà À à//QuickMark€setÐ Ý -  Ðà Ü àà  àà 4 àà ` àResult=MessageBox("Coach";&tbox;1)Ìà Ü àà  àà 4 àELSEÌà Ü àà  àà 4 àà ` àMessage€(&tbox;1002)à ” àà À à//No€QuickMark€setÐ Ò
"  Ðà Ü àà  àà 4 àIF(MessageBox("Coach";&tbox;4)<>1)Ìà Ü àà  àà 4 àà ` àBreakÌà Ü àà  àà 4 àEndifÌà Ü àà  àà 4 àEndifÌà Ü àà  àà 4 àBreakÌà Ü àà  àElseÌà Ü àà  àà 4 àBreakÌà Ü àà  àEndifÌÌÌÌÐ  ¦ö Ð//*************************************************************Ì//Ì//à Ü àFind€a€QuickMark?Ð þN Ð//Ì//*************************************************************̐à Ü àà  àIf(select[2])à ä àà  àà < àà h àà ” àà À àà ì à//Find€QuickMarkÐ óC Ðà Ü àà  àà 4 àMark="QuickMark"Ìà Ü àà  àà 4 àSuccess=0Ìà Ü àà  àà 4 àStepNum=1Ìà Ü àà  àà 4 àCall€(FindQuick)Ìà Ü àà  àà 4 àà ` àIf€(Success=1)Ìà Ü àà  àà 4 àà ` àà Œ
àMessage€(&tbox;1003)à À àà ì à//QuickMark€foundÐ Ý -  Ðà Ü àà  àà 4 àà ` àà Œ
àResult=MessageBox("Coach";&tbox;1)Ìà Ü àà  àà 4 àà ` àELSEÌà Ü àà  àà 4 àà ` àà Œ
àMessage€(&tbox;1004)à À àà ì à//No€QuickMark€foundÐ Ò
"  Ðà Ü àà  àà 4 àà ` àIF(MessageBox("Coach";&tbox;1)<>1)Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ àBreakÌà Ü àà  àà 4 àà ` àEndifÌà Ü àà  àà 4 àà ` àEndifÌà Ü àà  àà 4 àBreakÌà Ü àà  àElseÌà Ü àà  àà 4 àBreakÌà Ü àà  àEndifÌWindowMaximizeÌRestoreStates()ÌDisplayRewriteÌQUITññÔ%
€
ÔññÌÐ  M Ð//***********************************************************Ì//Ì//à Ü àSUBROUTINE:€€BookmarksÔ%
€
ÔÐ þN Ð//Ì//***********************************************************ÌLABEL(Bookmarks)ÌÌ//***********************************************************Ì//à Ü àCreate€a€Bookmark?Ð è 8 Ð//***********************************************************ÌÌà Ü àà  àIf(select[1])à ä àà  àà < àà h àà ” àà À à//Set€BookmarkÐ Ý -  Ðà Ü àà  àà 4 àCall(SetBookmark)Ìà Ü àà  àEndifÌ//*********************************************************Ì//à Ü àFind€a€Bookmark?Ð yÉ  Ð//*********************************************************ÌÌà Ü àà  àOnNotFound(notfound)Ìà Ü àà  àIf(select[2])à ä àà  àà < àà h àà ” àà À àà ì àà  à//Find€BookmarkÐ e  Ðà Ü àà  àà 4 àà ` àMark="bookmark"Ìà Ü àà  àà 4 àà ` àCall(FindBookmark)Ìà Ü àà  àà 4 àà ` àIf(Success=1)€€€€//€and€(Mark="QuickMark"))Ìà Ü àà  àà 4 àà ` àà Œ
àMessage(&tbox;1003)Ìà Ü àà  àà 4 àà ` àà Œ
àResult=MessageBox("Coach";&tbox;1)Ìà Ü àà  àà 4 àà ` àElse€If€(Success=0)Ìà Ü àà  àà 4 àà ` àà Œ
àMessage(&tbox;2004)Ìà Ü àà  àà 4 àà ` àà Œ
àResult=MessageBox("Coach";&tbox;1)Ìà Ü àà  àà 4 àà ` àEndif€Ìà Ü àà  àà 4 àà ` àEndifÌà Ü àà  àEndifÌà Ü àà  àIf(Exists€(hypertext))Ìà Ü àà  àà 4 àRun("wpch_hy0.wpm")Ìà Ü àà  àEndifÌà Ü àRestoreStates()Ìà Ü àDisplayRewriteÌQUITÌÐ  Ó#% Ð//*********************************************Ì//Ì//à Ü àSUBROUTINE:€OverviewDlgÐ þN Ð//Ì//*********************************************ÌLabel(OverviewDlg)ÌDisplay(on!)ÌCancelDialogs()ÌDisplayRewriteÌà Ü àDlgCreate(Result;DefTitle;DlgNoOK!+DlgNoCancel!+DlgExit!;;;w;h)Ìà Ü àà  àDlgControl€(CtrlPushButton!;;"~Quit...Esc";StyCancel!;w„14;h„2)à Ð àÐ 6 †
 Ðà Ü àà  àForNext(x;1;tbox[0])à < àà h àà ” à//Add€Welcome€MessageÐ Ý -  Ðà Ü àà  àà 4 àDlgControl(CtrlLabel!;;tbox[x];;2;x;w„1;1)Ìà Ü àà  àEndforÌÌà Ü àà  àVar[0]=steps[0]Ìà Ü àà  àForNext(x;1;steps[0])à h àà ” à//Add€StepsÐ  p
 Ðà Ü àà  àà 4 àDlgControl(CtrlRadioButton!;Var[x];steps[x];;2;x+tbox[0]„1;w„1;2)Ìà Ü àà  àEndforÌVar[1]=0€Var[2]=0€Ìà Ü àDlgEndÌIf€(Result=2)Ìà Ü àà  àIf(Exists(Hypertext))Ìà Ü àà  àà 4 àCancelMenus()Ìà Ü àà  àà 4 àCancelDialogs()Ìà Ü àà  àà 4 àRun€("WPCH_HY0.WPM")Ìà Ü àà  àElseÌà Ü àà  àà 4 àCancelCoach()Ìà Ü àà  àEndifÌEndifÌReturnÌÌÌÐ  7‡! Ð//******************************************************Ì//Ì//à Ü àSUBROUTINE:€€Set€QuickMarkÐ þN Ð//Ì//******************************************************ÌLabel(SetQuick)Ìà Ü àà  àÌà Ü àà  àMessage(&tbox;1200)à < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//€Press€Ctrl+QÐ A ‘ Ðà Ü àà  àFakeIt(DefTitle;&tbox;8;1;0)Ìà Ü àà  àkeypress={„8052;}à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//€Ctrl+QÐ 
ß  Ðà Ü àà  àchkcode={„1;}Ìà Ü àà  àKey=DoEdit(1;&chkcode;&keypress)à ì àà  àà D à//Wait€for€Ctrl+QÐ Ý -  Ðà Ü àà  àType€(ntoc(„8052))à < àÐ „ Ô  Ðà Ü àà  àWindowMaximizeÌà Ü àà  àà 4 àIf€(?LeftCode=„11227)Ìà Ü àà  àà 4 àà ` àà Œ
àSuccess=1Ìà Ü àà  àà 4 àà ` àà Œ
àVar[1]=0Ìà Ü àà  àà 4 àEndifÌVar[1]=0ÌRETURNÌÌ//*********************************************************Ì//Ì//à Ü àSUBROUTINE:€€Find€QuickMarkÐ ± Ð//Ì//**********************************************************ÌLabel€(FindQuick)Ìà Ü àà  àMessage(&tbox;1205)à < àà h àà ” àà À àà ì àà  àà D à//€Press€Ctrl+FÐ M Ðà Ü àà  àFakeIt(DefTitle;&tbox;8;1;0)Ìà Ü àà  àkeypress={„8063;}à  àà < àà h àà ” àà À àà ì àà  à//€Ctrl+FÐ ›ë Ðà Ü àà  àchkcode={1;}Ìà Ü àà  àKey=DoEdit(1;&chkcode;&keypress)à ì à//Wait€for€Ctrl+FÐ é9 Ðà Ü àà  àType€(ntoc(„8063))à < àÐ à  Ðà Ü àà  àWindowMaximizeÌà Ü àà  àà 4 àIf€(?LeftCode=„11227)Ìà Ü àà  àà 4 àà ` àà Œ
àSuccess=1Ìà Ü àà  àà 4 àà ` àà Œ
àvar[2]=0Ìà Ü àà  àà 4 àEndifÌà Ü àVar[2]=0ÌRETURNÌÐ  È( ÐÔ%
€
Ô//*********************************************Ì//Ì//à Ü àSUBROUTINE:€Set€BookmarkÐ þN Ð//Ì//*********************************************ÌLabel(Ô%
€
ÔSetBookmark)Ìà Ü àDisplayrewriteÌà Ü àCancelDialogs()Ìà Ü àAction="set"Ìà Ü àtbox={à ` à"ðð€Place€the€cursor€where€you€want€to€set€your€bookmark.";Ð 
ß  Ðà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 àà ` à}Ìà Ü àFakeIt(DefTitle;&tbox;3;1;0)à ” àÐ  à  ÐÌà Ü àkeypress={„8154;}à ä àà  àà < àà h àà ” àà À àà ì à//€F7€keyÐ Þ
.  Ðà Ü àchkcode={„1;}Ìà Ü àKey=DoEdit(1;&chkcode;&keypress)à À à//Wait€for€user€to€F7Ð ,|
 Ðà Ü àWhile(?MouseLeft)Ìà Ü àEndWhileÌà Ü àWindowMaximizeÌÌà Ü àCall(BookmarkScreen)ÌÌ//******************************************************Ì//Ì//à Ü àIn€the€Bookmark€Dlg€Box€#232Ð  [ Ð//à Ü àà  àCreate€a€BookmarkÐ ² Ð//Ì//******************************************************Ìà Ü àResult=0€Savescrn=0ÌÌà Ü àWhile(?Dialog€=€232)à  àà < àà h àà ” à//Bookmark€DialogÐ õE Ðà Ü àMessage(&tbox;2200)à  àà < àà h àà ” àà À à//Choose€CreateÐ œì  Ðà Ü àx1={à 4 à58;€6;€5;54;à  àà < àà h àà ” à//Create,€Bookmark,€€Ð C“! Ðà Ü àà  à}à 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h àà ” à//List,€Scroll€BarÐ ê:" Ðà Ü àx2={à 4 à70;17;52;54;Ð ‘á# Ðà Ü àà  à}Ìà Ü ày1={à 4 à€8;€5;€6;€6;Ð ß/% Ðà Ü àà  à}Ìà Ü ày2={€€8;€5;16;16;Ìà Ü àà  à}Ìà Ü àhotkey={à ` à99;à ¸ àà ä àà  àà < à//c€createÐ {Ë) Ðà Ü àà  àà 4 àà ` à98;à ¸ àà ä àà  àà < à//b€bookmarkÐ " r* Ðà Ü àà  àà 4 àà ` à„768;à ¸ àà ä àà  àà < à//List€€€Ntoc(key)Ð É + Ðà Ü àà  àà 4 àà ` à„768;à ¸ àà ä àà  àà < à//Scroll€barà  àNtoc(key)Ð p!À, Ðà Ü àà  àà 4 àà ` à}Ìà Ü àHotpnt={1;0;0;0}Ìà Ü àhelpmsg={à Œ
à"ðð€Choose€Ô> rü Ô[Bold€On]Ô?

ÔCreate.";Ð e#µ/ Ðà Ü àà  àà 4 àà ` àà Œ
à"€€€€€€€€€€€€€€€€€€€€";Ìà Ü àà  àà 4 à}ÌÌà Ü àà  àà 4 àSwitch(?DialogControl)Ìà Ü àà  àà 4 àCaseOf€0:à ä àà  àà < àà h àà ” àà À àà ì àà  àà D àà p àà œ àà È à//OKÐ ´&"4 Ðà Ü àà  àà 4 àà ` àinfo={à ä à0;à  àà < àà h àà ” àà À àà ì àà  à//Control€IDÐ ['«"5 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à232;à < àà h àà ” àà À àà ì àà  à//Dialog€IDÐ (R#6 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  à//don't€allow€arrowsÐ ©(ù#7 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì àà  à//TitleÐ P) $8 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à31;à < àà h àà ” àà À àà ì àà  à//xpos€for€PostitÐ ÷)G%9 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à8;à  àà < àà h àà ” àà À àà ì àà  à//ypos€for€PostitÐ ž*î%: Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  à//Hint€buttonÐ E+•&; Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì àà  à//Help€titleÐ ì+<'< Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à1;à  àà < àà h àà ” àà À àà ì àà  à//Restore€ScreenÐ ° Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  à//ReservedÐ W§ Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaccel={à ä à49;98;à h àà ” àà À àà ì àà  àà D à//1€or€b€for€BookmarkÐ ¥õ Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaclpnt={1;1;}ÌÌà Ü àà  àà 4 àà0 ` àResult=ButtonControl(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;€&hotpnt;Ï&accel;€&aclpnt;€&tbox;€&helpmsg)Ð
` (#` (# ÐÌà Ü àà  àà 4 àCaseOf€2183:à  àà < àà h àà ” àà À à//Empty€List„„Create€ActiveÐ 6 †
 Ðà Ü àà  àà 4 àinfo={à ¸ à2183;à  àà < àà h àà ” à//Control€IDÐ Ý -  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à232;à < àà h àà ” àà À à//Dialog€IDÐ „ Ô  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À à//don't€allow€arrowsÐ +
{
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À à//titleÐ Ò
"  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à31;à < àà h àà ” àà À à//xpos€for€PostitÐ yÉ  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à8;à  àà < àà h àà ” àà À à//ypos€for€PostitÐ  p
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À à//Hint€button€Ð Ç  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À à//Help€TitleÐ n¾  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à1;à  àà < àà h àà ” àà À à//Restore€ScreenÐ e  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À à//ReservedÐ ¼
 Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaccel={à ä à51;99;à h àà ” àà À à//3€or€c€for€createÐ 
Z Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaclpnt={à ä à1;1;}Ð X¨ ÐÌà Ü àà  àà 4 àà0 ` àResult=ButtonControl(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;€&hotpnt;Ï&accel;€&aclpnt;€&tbox;€&helpmsg)Ð
` (#` (# Ðà Ü àà  àà 4 àà ` àÌà Ü àà  àà 4 àDEFAULT:à ¸ àà ä àà  àà < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//DefaultÐ ›ë Ðà Ü àà  àà 4 àà ` àinfo={à ä à?DialogControl;à ì à//Control€ID€Ð B’ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à232;à < àà h àà ” àà À àà ì à//Dialog€IDÐ é9 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À à//don't€allow€arrowsÐ à  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À à//titleÐ 7‡! Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à31;à < àà h àà ” àà À àà ì à//xpos€for€PostitÐ Þ." Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à8;à  àà < àà h àà ” àà À à//ypos€for€PostitÐ …Õ# Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À à//Hint€ButtonÐ ,|$ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À à//Help€TitleÐ Ó#% Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à1;à  àà < àà h àà ” àà À à//Restore€ScreenÐ zÊ& Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À à//ReservedÐ !q' Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaccel={à ä à51;99;à h àà ” àà À àà ì à//3€or€c€for€createÐ o¿) Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ à}Ìà Ü àà  àà 4 àà ` àaclpnt={1;1;}Ìà Ü àà  àà 4 àà ` àallow={€0;€2183;€2187;Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ à}Ìà Ü àà  àà 4 àà0 ` àResult=InvalidControl(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;€&hotpnt;Ï&accel;€&aclpnt;€&tbox;€&helpmsg;&allow)Ð
` (#` (# ÐÌà Ü àà  àENDSwitchÌÌÌÌ//******************************************************Ì//Ì//à Ü àIn€the€Create€Bookmark€Dlg€Box€#423Ð ‘(á#7 Ð//Ì//******************************************************Ìà Ü àResult=0€à Œ
àSaveScreen=0Ô%
€
ÔÔ%
€
ÔÐ †*Ö%: ÐÌà Ü àWhile(?Dialog€=€423)à  àà < àà h à//Create€Bookmark€DialogÐ Ô+$'< Ðà Ü àx1={à 4 à48;12;à ¸ àà ä à//OK,€WindowÐ ° Ðà Ü àà  à}Ìà Ü àx2={à 4 à56;65;Ð þN Ðà Ü àà  à}Ìà Ü ày1={à 4 à12;10;Ð Lœ Ðà Ü àà  à}Ìà Ü ày2={€12;10;Ìà Ü àà  à}Ìà Ü àhotkey={à ` à„8182;à ä à//EnterÐ è 8 Ðà Ü àà  àà 4 àà ` àà Œ
à110;à ä àà  à//n€NameÐ 
ß  Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àHotpnt={à ` à1;1;}Ð Ý -  ÐÌà Ü àhelpmsg={à Œ
à"ðð€Type€the€name€for€your€bookmark,";Ð +
{
 Ðà Ü àà  àà 4 àà ` àà Œ
à"€€then€choose€Ô> rü Ô[Bold€On]Ô?

ÔOKÔ> ‚ü Ô[Bold€Off]Ô?

Ô.";Ìà Ü àà  àà 4 àà ` àà Œ
à"";Ìà Ü àà  àà 4 à}Ìà Ü àMessage(&tbox;2205)Ìà Ü àà  àSwitch(?DialogControl)Ìà Ü àà  àà 4 àCaseOf€0:à ä àà  àà < àà h àà ” àà À àà ì àà  àà D àà p à//OKÐ !q  Ðà Ü àà  àà 4 àà ` àinfo={à ä à0;à  àà < àà h àà ” àà À àà ì à//Control€IDà È àÐ È
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à423;à < àà h àà ” àà À àà ì àà  à//Dialog€IDÐ o¿
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì à//don't€allow€arrowsÐ f Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì à//TitleÐ ½
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à5;à  àà < àà h àà ” àà À àà ì à//xpos€for€PostitÐ d´ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à16;à < àà h àà ” àà À àà ì àà  à//ypos€for€PostitÐ  [ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì à//Hint€button€€Ð ² Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì à//Help€TitleÐ Y© Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à1;à  àà < àà h àà ” àà À àà ì à//Restore€ScreenÐ P Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì à//ReservedÐ §÷ Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaccel={à ä à110;à < àà h àà ” àà À à//n€for€Bookmark€NameÐ õE Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à„8182;à h àà ” àà À à//EnterÐ œì  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à„8154;à h àà ” àà À à//ExitÐ C“! Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ à}Ìà Ü àà  àà 4 àà ` àaclpnt={à ä à0;1;1;}Ð ‘á# ÐÌà Ü àà  àà 4 àà0 ` àResult=ButtonControl(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;€&hotpnt;Ï&accel;€&aclpnt;€&tbox;€&helpmsg)Ð
` (#` (# ÐÌà Ü àà  àà 4 àCaseOf€3927:à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//Enter€bookmark€nameÐ Ô$( ÐÌà Ü àà  àà 4 àà ` àinfo={à ä à3927;à < àà h àà ” à//Control€IDÐ " r* Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à423;à < àà h àà ” àà À à//Dialog€IDÐ É + Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” à//don't€allow€arrowsÐ p!À, Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” à//titleÐ "g- Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à5;à  àà < àà h àà ” à//xpos€for€PostitÐ ¾". Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à16;à < àà h àà ” àà À à//ypos€for€PostitÐ e#µ/ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” à//Hint€button€Ð  $\0 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” à//help€TitleÐ ³$ 1 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à1;à  àà < àà h àà ” à//Restore€ScreenÐ Z%ª 2 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” à//ReservedÐ &Q!3 Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaccel={à ä à„1;à < àà h àà ” àà À à//Ð O'Ÿ"5 Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaclpnt={à ä à0;}Ð (í#7 Ðà Ü àà  àà 4 àà ` àHotElement=2Ìà Ü àà  àà 4 àà ` àMessage(&tbox;2205)Ìà Ü àà  àà 4 àà0 ` àResult=WinEdControl(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;€&hotpnt;Ï&accel;€&aclpnt;€&tbox;€&helpmsg)Ð
` (#` (# ÐÐ à+0'< Ðà Ü àà  àà 4 àDEFAULT:Ìà Ü àà  àà 4 àà ` àinfo={à ä à?DialogControl;à ì à//Control€IDÐ W§ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ à423;à  àà < àà h àà ” àà À à//Dialog€IDÐ þN Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À à//don't€allow€arrowsÐ ¥õ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À à//TitleÐ Lœ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à5;à  àà < àà h àà ” àà À à//xpos€for€PostitÐ óC Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à16;à < àà h àà ” àà À à//ypos€for€PostitÐ šê Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À à//Hint€ButtonÐ A ‘ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À à//Help€TitleÐ è 8 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à1;à  àà < àà h àà ” àà À à//Restore€ScreenÐ 
ß  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À à//ReservedÐ 6 †
 Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaccel={à ä à110;à < àà h àà ” àà À à//€n€for€Bookmark€NameÐ „ Ô  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ à}Ìà Ü àà  àà 4 àà ` àaclpnt={à ä à0;}Ð Ò
"  Ðà Ü àà  àà 4 àà ` àallow={0;€3927}Ìà Ü àà  àà 4 àà ` àMessage(&tbox;2205)Ìà Ü àà  àà 4 àà0 ` àResult=InvalidContññÔ%
€
Ôññrol(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;€&hotpnt;Ï&accel;€&aclpnt;€&tbox;€&helpmsg;&allow)Ð
` (#` (# ÐÌà Ü àà  àENDSwitchÌÌà Ü àà  àWhile€(?Dialog=0)à  àà < àà h à//Yes/No€Dlg„„If€name€in€useÐ 
Z Ðà Ü àx1={à 4 à30;41;à ¸ àà ä à//Yes,€NoÐ ± Ðà Ü àà  à}Ìà Ü àx2={à 4 à39;49;Ð ÿO Ðà Ü àà  à}Ìà Ü ày1={à 4 à13;13;Ð M Ðà Ü àà  à}Ìà Ü ày2={€13;13;Ìà Ü àà  à}Ìà Ü àhotkey={à ` à„8182;à ä à//EnterÐ é9 Ðà Ü àà  àà 4 àà ` àà Œ
à121;à ä àà  à//y€YesÐ à  Ðà Ü àà  àà 4 àà ` àà Œ
à110;à ä àà  à//n€NoÐ 7‡! Ðà Ü àà  àà 4 àà ` àà Œ
à}ÌÌà Ü àhelpmsg={à Œ
à"ðð€Choose€Ô> rü Ô[Bold€On]Ô?

ÔYesÔ> ‚ü Ô[Bold€Off]Ô?

Ԁor€Ô> rü Ô[Bold€On]Ô?

ÔNo.";Ð ,|$ Ðà Ü àà  àà 4 àà ` àà Œ
à"€€€€€€€€€€€€€€€€€€€€€€€€";Ìà Ü àà  àà 4 à}ÌÌÌà Ü àà  àMessage(&tbox;2210)Ìà Ü àà  àà 4 àà ` àà Œ
àSwitch(?DialogControl)Ìà Ü àà  àà 4 àÌà Ü àà  àà 4 àà ` àà Œ
àà ¸ àCaseOf€2:à h àà ” àà À àà ì àà  àà D àà p àà œ àà È à//On€No€Ð p!À, Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àinfo={à h à2;à ” àà À àà ì à//Control€IDÐ "g- Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à0;à ” àà À àà ì à//Dialog€IDÐ ¾". Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à0;à ” àà À àà ì à//don't€allow€arrowsÐ e#µ/ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à"Coach";à ì à//TitleÐ  $\0 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à5;à ” àà À àà ì à//xpos€for€PostitÐ ³$ 1 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à2;à ” àà À àà ì à//ypos€for€PostitÐ Z%ª 2 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à0;à ” àà À àà ì à//Help€button€Ð &Q!3 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à"Coach";à ì à//Help€TitleÐ ¨&ø!4 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à1;à ” àà À àà ì à//Restore€ScreenÐ O'Ÿ"5 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à0;à ” àà À àà ì à//ReservedÐ ö'F#6 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < à}Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àaccel={à h à110;121;à ì à//yes€or€noÐ D)”$8 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  à}Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àaclpnt={1;1}Ìà Ü àà  àà 4 àà ` àà0 Œ
àà0¸ Œ
(#Œ
(#àà0ä ¸ (#¸ (#àResult=ButtonControl(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;Ï&hotpnt;€&accel;€&aclpnt;€&tbox;€&helpmsg)Ðà+0'<ä (#ä (# Ðà Ü àÌà Ü àà  àà 4 àà ` àà Œ
àà ¸ àCaseOf€4368:à ” àà À àà ì àà  àà D àà p àà œ àà È à//On€YES€Ð W§ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àinfo={à h à4368;à À àà ì à//control€IDÐ þN Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à0;à ” àà À àà ì à//Dialog€IDÐ ¥õ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à0;à ” àà À àà ì à//don't€allow€arrowsÐ Lœ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à"Coach";à ì à//titleà p àÐ óC Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à5;à ” àà À àà ì à//xpos€for€PostitÐ šê Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à2;à ” àà À àà ì à//ypos€for€PostitÐ A ‘ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à0;à ” àà À àà ì à//Help€button€Ð è 8 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à"Coach";à ì à//Help€titleÐ 
ß  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à1;à ” àà À àà ì à//Restore€ScreenÐ 6 †
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à0;à ” àà À àà ì à//ReservedÐ Ý -  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < à}Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àaccel={à h à110;121;à ì àà  àà D àà p à//yes€or€no€Ð +
{
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  à}Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àaclpnt={1;1}Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà0 ä àResult=ButtonControl(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;Ï&hotpnt;€&accel;€&aclpnt;€&tbox;€&helpmsg)Ð
ä (#ä (# ÐÌà Ü àà  àà 4 àà ` àà Œ
àà ¸ àDEFAULT:Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àinfo={à h à?DialogControl;à p àà œ à//Control€IDÐ ¼
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à0;à ” àà À àà ì à//Dialog€IDÐ c³
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à0;à ” àà À àà ì à//don't€allow€arrowsÐ 
Z Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à"Coach";à ì à//TitleÐ ± Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à5;à ” àà À àà ì à//xpos€for€PostitÐ X¨ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à2;à ” àà À àà ì à//ypos€for€PostitÐ ÿO Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à0;à ” àà À àà ì à//Help€button€Ð ¦ö Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à"Coach";à ì à//Help€TitleÐ M Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à1;à ” àà À àà ì à//Restore€ScreenÐ ôD Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < àà h à0;à ” àà À àà ì à//ReservedÐ ›ë Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  à}Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àaccel={à h à110;121à ì àà  àà D à//n€or€yesÐ é9 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  àà < à}Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àaclpnt={1;1;}Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àallow={2;4368;}Ìà Ü àà  àà 4 àà ` àà Œ
àà0 ¸ àà0ä ¸ (#¸ (#àResult=InvalidControl(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;Ï&hotpnt;€&accel;€&aclpnt;€&tbox;€&helpmsg;€&allow)Ð
ä (#ä (# Ðà Ü àà  àà 4 àà ` àà Œ
àENDSwitchÌà Ü àà  àà 4 àà ` àEndWhileà ä àà  àà < àà h à//end€Dlg€0,€Yes/No€DlgÐ zÊ& Ðà Ü àà  àà 4 àDisplayReWriteÌà Ü àà  àà 4 àEndWhileà ¸ àà ä àà  àà < àà h à//end€dlg€423,€Create€Bookmark€Dlgà x àà ¤ àà Ð àà ü! àÐ È( ÐññÐ ½
+ Ðññà Ü àà  àÌà Ü àà  àDisplayReWriteÌÌà Ü àEndWhileà ` àà Œ
àà ¸ àà ä àà  àà < àà h à//end€Dlg€232,€Bookmark€DlgÐ d!´, Ðà Ü àà  àà 4 àDisplayReWriteÌÌIf€(?LeftCode=„11227)Ìà Ü àà  àSuccess=1ÌEndifÌÌIf€(Success=1)Ì//à Ü àDisplayRewriteÐ œ&ì!4 Ðà Ü àMessage(&tbox;2001)à  àà < à//Bookmark€createdÐ C'“"5 Ðà Ü àResult=MessageBox("Coach";&tbox;3)Ìà Ü àà  àIf(Result=1)Ìà Ü àà  àà 4 àGo(SetBookmark)Ìà Ü àà  àElseÌà Ü àà  àIf(Result=2)Ì//à Ü àà  àReturnÐ -+}&; Ðà Ü àà  àà 4 àMessage(&tbox;2011)Ð Ô+$'< Ðà Ü àà  àà 4 àResult=MessageBox("Coach";&tbox;1)Ìà Ü àà  àEndif€EndifÌELSEÌà Ü àMessage(&tbox;2002)à  àà < à//No€Bookmark€CreatedÐ ¥õ Ðà Ü àIF(MessageBox("Coach";&tbox;4)<>1)Ìà Ü àà  àBreakÌà Ü àEndifÌEndifÌRETURNÌÌÌ//*********************************************Ì//Ì//à Ü àSUBROUTINE:€Find€BookmarkÐ +
{
 Ð//Ì//*********************************************ÌLabel(FindBookmark)ÌAction="find"ÌDisplayRewriteÌà Ü àCall(BookmarkScreen)ÌÐ  ¼
 Ð//******************************************************Ì//Ì//à Ü àIn€the€Bookmark€Dlg€Box€#232Ð þN Ð//Ì//******************************************************Ìà Ü àx1={à 4 à58;€5;58;€6;à  àà < à//Find,€List,€Ð óC Ðà Ü àà  à}à 4 àà ` àà Œ
àà ¸ àà ä àà  àà < à//Name€Search,€BookmarkÐ šê Ðà Ü àx2={à 4 à65;54;72;17;Ð A ‘ Ðà Ü àà  à}Ìà Ü ày1={à 4 à€6;€6;12;€5;Ð 
ß  Ðà Ü àà  à}Ìà Ü ày2={€€€6;16;12;€5;Ìà Ü àà  à}Ìà Ü àhotkey={à ` à49;à ¸ àà ä àà  à//1€FindÐ +
{
 Ðà Ü àà  àà 4 àà ` à„1;à ¸ àà ä àà  à//1€BookmarkÐ Ò
"  Ðà Ü àà  àà 4 àà ` à110;à ¸ àà ä àà  à//N€Name€searchÐ yÉ  Ðà Ü àà  àà 4 àà ` à49;à ¸ àà ä àà  à//1€bookmarkÐ  p
 Ðà Ü àà  àà 4 à}ÌÌà Ü àHotPnt={à ` à0;0;0;0;0;}Ð e  Ðà Ü àhelpmsg={à Œ
à"Highlight€bookmark€to€find,";Ð ¼
 Ðà Ü àà  àà 4 àà ` àà Œ
à"then€select€Ô> rü Ô[Bold€On]Ô?

ÔFindÔ> ‚ü Ô[Bold€Off]Ô?

Ô.";Ìà Ü àà  àà 4 àà ` à"";Ìà Ü àà  àà 4 à}Ìà Ü àResult=0€SaveScnr=0Ìà Ü àMessage(&tbox;2215)Ìà Ü àWhile(?Dialog€=€232)à  àà < àà h à//Bookmark€Dlg€BoxÐ ¦ö Ðà Ü àà  àIf€(Result="Hint")Ìà Ü àà  àà 4 àà ` àMessage(&hbox;6015)Ìà Ü àà  àà 4 àà ` àHint=Hint(&hbox;„99;„99;4)Ìà Ü àà  àEndifÌà Ü àà  àSwitch(?DialogControl)ÌÌà Ü àà  àà 4 àCaseOf€0:à ä àà  àà < àà h àà ” àà À àà ì àà  àà D àà p àà œ àà È àà ô à//OKÐ 7‡! Ðà Ü àà  àà 4 àà ` àinfo={à ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//Control€IDÐ Þ." Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à232;à < àà h àà ” àà À àà ì àà  àà D àà p à//Dialog€IDÐ …Õ# Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D à//don't€allow€arrowsÐ ,|$ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";€à ” àà À àà ì àà  àà D àà p à//titleÐ Ó#% Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à5;à  àà < àà h àà ” àà À àà ì àà  àà D à//xpos€for€PostitÐ zÊ& Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à16;à < àà h àà ” àà À àà ì àà  àà D àà p à//ypos€for€PostitÐ !q' Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D à//Hint€button€Ð È( Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì àà  àà D à//Help€TitleÐ o¿) Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à1;à  àà < àà h àà ” àà À àà ì àà  àà D à//Restore€ScreenÐ  f* Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D à//ReservedÐ ½
+ Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaccel={à ä à49;98;à h à//1€or€B€for€BookmarkÐ  "[- Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaclpnt={1;1;}Ìà Ü àà  àà 4 àà ` àà0 Œ
àResult=ButtonControl(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;Ï&hotpnt;€&accel;€&actpnt;€&tbox;€&helpmsg)Ð

(#Œ
(# Ðà Ü àà  àà 4 àà ` àÌÌà Ü àà  àà 4 àCaseOf€2183:à  àà < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//Empty€ListÐ œ&ì!4 Ðà Ü àà  àà 4 àà ` àMessage(&tbox;2004)Ìà Ü àà  àà 4 àà ` àResult=MessageBox("Coach";&tbox;2)Ìà Ü àà  àà 4 àà ` àIf(Result=„1)Ìà Ü àà  àà 4 àà ` àà Œ
àIf(Exists(Hypertext))Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ àCancelMenus()Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ àCancelDialogs()Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ àRun€("WPCH_HY0.WPM")Ìà Ü àà  àà 4 àà ` àà Œ
àElseÐ Ô+$'< Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àCancelCoach()Ìà Ü àà  àà 4 àà ` àà Œ
àEndifÌÌà Ü àà  àà 4 àà ` àà Œ
àCancelCoach()Ìà Ü àà  àà 4 àà ` àElseÌà Ü àà  àà 4 àà ` àà Œ
àCancelDialogs()Ìà Ü àà  àà 4 àà ` àà Œ
àGo(BookMarkMenu)Ìà Ü àà  àà 4 àà ` àEndifà ¸ àà ä àà  àà < àà h àÐ A ‘ ÐÌà Ü àà  àà 4 àCaseOf€2181:à  àà < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//in€list€on€an€itemÐ 
ß  Ðà Ü àà  àà 4 àà ` àinfo={à ä à2181;à < àà h àà ” àà À àà ì àà  àà D àà p à//Control€IDÐ 6 †
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à232;à < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//Dialog€IDÐ Ý -  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//don't€allow€arrowsÐ „ Ô  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";€à ” àà À àà ì àà  àà D àà p àà œ à//Titleà  àà L àà x àà ¤ àÐ +
{
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à5;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//xpos€for€PostitÐ Ò
"  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à16;à < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//ypos€for€PostitÐ yÉ  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à1;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//Hint€button€Ð  p
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì àà  àà D àà p à//Help€titleÐ Ç  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à1;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//Restore€ScreenÐ n¾  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//ReservedÐ e  Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaccel={à ä à49;102;à h à//1€or€f€for€Find,€Ð c³
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  à110;à h àà ” àà À à//N€Name€search€Ð 
Z Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaclpnt={à ä à1;1;0}Ð X¨ Ðà Ü àà  àà 4 àà ` àà Œ
àIf€(((?List=1)€AND€(?Entry="QuickMark"))€OR€(?List=0))Ìà Ü àà  àà 4 àà ` àà Œ
àà ¸ àMessage(&tbox;2405)Ìà Ü àà  àà 4 àà ` àà Œ
àEndifÌà Ü àà  àà 4 àà0 ` àResult=LstBxControl€(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;€&hotpnt;Ï&accel;€&aclpnt;€&tbox;€&helpmsg)Ð
` (#` (# ÐÌà Ü àà  àà 4 àCaseOf€2187:à  àà < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//3€Name€SearchÐ é9 Ðà Ü àà  àà 4 àà ` àinfo={à ä à2187;à < àà h àà ” àà À àà ì àà  àà D àà p à//Control€IDÐ à  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à232;à < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//Dialog€IDÐ 7‡! Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//don't€allow€arrowsÐ Þ." Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì à//TitleÐ …Õ# Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à5;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//xpos€for€PostitÐ ,|$ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à16;à < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//ypos€for€PostitÐ Ó#% Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//Hint€buttonÐ zÊ& Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì àà  àà D àà p à//Help€TitleÐ !q' Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à1;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//Restore€ScreenÐ È( Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//ReservedÐ o¿) Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaccel={à ä à„1;Ð ½
+ Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaclpnt={0;}Ìà Ü àà  àà 4 àà ` àHotElement=4Ìà Ü àà  àà 4 àà0 ` àResult=WinEdControl(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;€&hotpnt;€Ï&accel;€&aclpnt;€&tbox;€&helpmsg)Ð
` (#` (# ÐÌà Ü àà  àà 4 àDEFAULT:Ìà Ü àà  àà 4 àà ` àinfo={à ä à?DialogControl;à ì àà  àà D àà p àà œ à//Control€IDÐ õ%E!3 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à232;à < àà h àà ” àà À àà ì àà  àà D àà p àà œ àà È à//Dialog€IDÐ œ&ì!4 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//don't€allow€arrowsÐ C'“"5 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";€à ” àà À àà ì àà  à//Titleà œ àà È àà ô àÐ ê':#6 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à5;à  àà < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//xpos€for€PostitÐ ‘(á#7 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à16;à < àà h àà ” àà À àà ì àà  àà D àà p àà œ àà È à//ypos€for€PostitÐ 8)ˆ$8 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//Hint€button€Ð ß)/%9 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì àà  àà D àà p àà œ à//Help€TitleÐ †*Ö%: Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à1;à  àà < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//Restore€ScreenÐ -+}&; Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//ReservedÐ Ô+$'< Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaccel={à ä à49;102;à h à//1€or€f€for€Find,€Ð W§ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä àà  à110;à h àà ” àà À à//N€Name€search€Ð þN Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaclpnt={à ä à1;1;0}Ð Lœ Ðà Ü àà  àà 4 àà ` àallow={0;2187;2181}Ìà Ü àà  àà 4 àà0 ` àResult=InvalidControl(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;€&hotpnt;Ï&accel;€&aclpnt;€&tbox;€&helpmsg;€&allow)Ð
` (#` (# ÐÌà Ü àà  àENDSwitchÌà Ü àEndWhileÌDisplayRewriteÌÌà Ü àIf€(?LeftCode=„11227)Ìà Ü àà  àSuccess=1Ìà Ü àà  àVar[4]=0Ìà Ü àEndifÌÌRETURNÌ//***************************************************************Ì//Ì//à Ü àSUBROUTINE:€€BookMarkScreenÐ c³
 Ð//Ì//***************************************************************ÌLabel(BookMarkScreen)ÌÌ//Set€menu€variablesÌà Ü àhbox1=à ` àà Œ
à{"ðð€Choose€Ô> rü Ô[Bold€On]Ô?

ÔEdit.";Ð M Ðà Ü àà  àà 4 àà ` à}Ìà Ü àhbox2=à ` àà Œ
à{"ðð€Choose€Ô> rü Ô[Bold€On]Ô?

ÔBookmark.";Ð §÷ Ðà Ü àà  àà 4 àà ` à}Ìà Ü àhbox3=à ` àà Œ
à{„1}Ð Q Ðà Ü àEditMenu(&valid)Ìà Ü àallow=à ` àà Œ
à{à ¸ à1500;}à < àà h àà ” àà À àà ì àà  à//BookmarkÐ OŸ! Ðà Ü àexallow=à ` à{0;}à ¸ àÐ öF" Ðà Ü àaccel=à ` àà Œ
à{à ¸ àà ä àà  à107;}à h àà ” àà À àà ì à//k€BookmarkÐ í# Ðà Ü àexaccel=à ` à{0;}Ð D”$ Ðà Ü àNoSubMenu(&subval;&subacl;&exsubacl;&subs)Ìà Ü àfunkey={„8132;„7149;}à < àà h àà ” àà À à//Alt+F5€or€Shift+F12Ð ’â& Ðà Ü àpaint={0;0;}ÌÌRepeatÌÌà Ü àDisplayRewriteÌà Ü àMessage(&tbox;2225)à  àà < àà h àà ” àà À àà ì àà  àà D à//Choose€Edit,€BookmarkÐ |!Ì, Ðà Ü àResult=PostIt("Coach";&tbox;45;14;0;2;0)ÌÌà Ü àSaveScrn=0Ìà Ü àMenuActive=0à ¸ àÐ $h0 Ðà Ü àsbox=à 4 à{"ðð€Choose€Ô> rü Ô[Bold€On]Ô?

ÔBookmark.";Ð ¿$ 1 Ðà Ü àà  àà 4 à}Ìà Ü àShow=HotSpot(0;0;62;0;„544;&funkey;1)ÌÌò òSwitch(Show)à Œ
àà ¸ àà ä àà  àà < àà h à//Creating€Bookmarkó óÐ g'·"5 Ð//€*****************************************Ì//à Ü àUser€chooses€Show€MeÐ µ($7 Ð//******************************************Ìà Ü àCaseOf€1:Ìà Ü àà  àResult=Postit("Coach";&tbox;45;14;0;3;0)Ìà Ü àà  àWhile€(?MouseLeft)Ìà Ü àà  àEndwhileÐ ø+H'< Аà Ü àà  àShowMenu("Coach";&sbox;22;14;1;14;0;0)ÌÌÌ//€*****************************************Ì//à Ü àUser€chooses€Edit€Ð Lœ Ð//******************************************Ìà Ü àCaseOf€1475:à ¸ àà ä àà  àà < àà h àà ” àà À à//€User€chooses€EditÐ šê ÐÌÌ//€*****************************************Ì//à Ü àUser€presses€Alt+EÐ 6 †
 Ð//******************************************Ìà Ü àCaseOf€„544:à ¸ àà ä àà  àà < àà h àà ” àà À à//€User€pressed€Alt+EÐ „ Ô  Ðà Ü àà  àResult=Postit("Coach";&tbox;45;14;0;3;0)Ìà Ü àà  àPullDownDlgÌà Ü àà  àType("e")ÌÌ//*******************************************************Ì//à Ü àUser€Presses€Shift+F12Ð n¾  Ð//à Ü àBookmark€Dlg€BoxÐ e  Ð//*******************************************************Ìà Ü àCaseOf€„7149:Ìà Ü àDisplayRewriteÌà Ü àBookmarkDlgÌà Ü àReturnÌ//*******************************************************Ì//à Ü àUser€Presses€Alt+F5Ð ¦ö Ð//€€Mark€Dialog€BoxÌ//********************************************************Ìà Ü àCaseOf€„8132:à ¸ àà ä àà  àà < àà h àà ” àà À àà ì à//€User€pressed€Alt+F5Ð ›ë Ðà Ü àMarkTextDlgÌà Ü àCall(MarkDlgBox)Ìà Ü àRETURNÐ  à  Ð//€*****************************************Ì//à Ü àUser€presses€Alt„=Ð W§ Ð//******************************************Ìà Ü àCaseOf€„8085:à ¸ àà ä àà  àà < àà h àà ” àà À àà ì àà  à//€User€pressed€Alt+=Ð ¥õ Ðà Ü àà  àResult=PostIt("Coach";&tbox;45;14;0;3;0)Ìà Ü àà  àMenuActive=MenuBarControl€("Coach"€;&hbox1;€&sbox;€22;€14;€101;&funkey)ÌÌ//€*****************************************Ì//à Ü àNo€ChoiceÐ è 8 Ð//******************************************Ìà Ü àDEFAULT:à ` àà Œ
àà ¸ àà ä àà  àà < àà h àà ” àà À àà ì àà  à//€DefaultÐ 6 †
 Ðà Ü àà  àPosLineDownÌà Ü àà  àMenuActive=MenuBarControl€("Coach";€&hbox1;€&sbox;€22;€14;€101;&funkey)Ìà Ü àÌò òENDSwitchÐ Ò
"  Ðó óÌà Ü àà  àIf(Show<>„8132€or€Show<>„7149)Ìà Ü àà  àà 4 àà0 ` àà 4 àResult=MenuControl€(&hbox1;€&hbox2;€&hbox3;&valid;€&allow;€&exallow;Ï&accel;€&exaccel;€&subval;€&subacl;€&exsubacl;€&subs;€&funkey)Ð
` (#` (# Ðà Ü àà  àà 4 àMenuActive=ResultÌà Ü àà  àEndifÌÌUntil€(MenuActive<>„1)ÌIf€(?Dialog<>232)Ìà Ü àCancelMenus()Ìà Ü àBookmarkDlgÌEndifÌÌRETURNÌÌÌÌÐ  à  Ð//******************************************************Ì//Ì//à Ü àSUBROUTINE:€MarkDlgBoxÐ þN Ð//Ì//******************************************************ÌLabel€(MarkDlgBox)ÌIf€(Show=„8132)Ìà Ü àx1={à 4 à10;51;à ¸ àà ä àà  àà < àà h à//Bookmark,€OKÐ A ‘ Ðà Ü àà  à}Ìà Ü àx2={à 4 à21;59;Ð 
ß  Ðà Ü àà  à}Ìà Ü ày1={à 4 à16;20;Ð Ý -  Ðà Ü àà  à}Ìà Ü ày2={à 4 à16;20;Ð +
{
 Ðà Ü àà  à}Ìà Ü àHotkey={à ` à98;à ¸ àà ä à//b€Bookmarkà À àÐ yÉ  Ðà Ü àà  àà 4 àà ` à„8182;à ä à//Enter€for€OKÐ  p
 Ðà Ü àà  àà 4 à}Ìà Ü àHelpMsg={"ðð€Choose€Ô> rü Ô[Bold€On]Ô?

ÔBookmark."}Ð n¾  Ðà Ü àhbox={"€"}Ìà Ü àà  àÌà Ü àResult=0€SaveScrn=0Ìà Ü àMessage(&tbox;2230)Ìà Ü àWhile(?Dialog€=€487)à  à//Mark€DlgÐ ½
 Ðà Ü àà  àSwitch(?DialogControl)ÌÌà Ü àà  àà 4 àCaseOf€0:à ä àà  àà < àà h àà ” àà À àà ì àà  àà D àà p àà œ àà È à//OKÐ ² Ðà Ü àà  àà 4 àà ` àinfo={à ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D à//Control€IDÐ Y© Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à487;à < àà h àà ” àà À àà ì àà  àà D àà p à//Dialog€IDÐ P Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D à//don't€allow€arrowsÐ §÷ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì àà  àà D à//TitleÐ Nž Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à5;à  àà < àà h àà ” àà À àà ì àà  àà D à//xpos€for€PostitÐ õE Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à11;à < àà h àà ” àà À àà ì àà  àà D àà p à//ypos€for€PostitÐ œì  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D à//Hint€button€Ð C“! Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì àà  àà D à//titleÐ ê:" Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à1;à  àà < àà h àà ” àà À àà ì àà  àà D à//Restore€ScreenÐ ‘á# Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D à//ReservedÐ 8ˆ$ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ à}Ìà Ü àà  àà 4 àà ` àaccel={à ä à98;53;à h àà ” àà À àà ì à//B€or€5€for€BookmarkÐ †Ö& Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaclpnt={à ä à1;1;}Ð Ô$( Ðà Ü àà  àà 4 àà ` àà0 Œ
àResult=ButtonControl(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;Ï&hotpnt;€&accel;€&aclpnt;€&tbox;€&helpmsg)Ð

(#Œ
(# ÐÌà Ü àà  àà 4 àCaseOf€729:à ä àà  àà < àà h àà ” àà À àà ì àà  àà D àà p à//5€BookmarkÐ p!À, Ðà Ü àà  àà 4 àà ` àinfo={à ä à729;à < àà h àà ” àà À àà ì àà  àà D à//Control€IDÐ "g- Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à487;à < àà h àà ” àà À àà ì àà  àà D àà p à//Dialog€IDÐ ¾". Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D à//don't€allow€arrowsÐ e#µ/ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì àà  àà D à//TitleÐ  $\0 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à5;à  àà < àà h àà ” àà À àà ì àà  àà D à//xpos€for€PostitÐ ³$ 1 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à11;à < àà h àà ” àà À àà ì àà  àà D àà p à//ypos€for€PostitÐ Z%ª 2 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D à//Hint€button€Ð &Q!3 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì àà  àà D à//Help€TitleÐ ¨&ø!4 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à1;à  àà < àà h àà ” àà À àà ì àà  àà D à//Restore€ScreenÐ O'Ÿ"5 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D à//ReservedÐ ö'F#6 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ à}Ìà Ü àà  àà 4 àà ` àaccel={à ä à98;53;à h àà ” àà À àà ì à//B€or€5€for€BookmarkÐ D)”$8 Ðà Ü àà  àà 4 àà ` àà Œ
à}Ìà Ü àà  àà 4 àà ` àaclpnt={à ä à1;1;}Ð ’*â%: Ðà Ü àà  àà 4 àà ` àà0 Œ
àResult=ButtonControl(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;Ï&hotpnt;€&accel;€&aclpnt;€&tbox;€&helpmsg)Ðà+0'<Œ
(#Œ
(# Їà Ü àà  àà 4 àDEFAULT:à ¸ àà ä àà  àà < à//Any€other€items€on€menuÐ ° Ðà Ü àà  àà 4 àà ` àinfo={à ä à?DialogControl;à ì àà  àà D àà p à//Control€IDÐ W§ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à487;à < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//Dialog€IDÐ þN Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//don't€allow€arrowsÐ ¥õ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì àà  àà D à//TitleÐ Lœ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à5;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//xpos€for€PostitÐ óC Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à11;à < àà h àà ” àà À àà ì àà  àà D àà p àà œ à//ypos€for€PostitÐ šê Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//Hint€button€Ð A ‘ Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à"Coach";à h àà ” àà À àà ì àà  àà D àà p à//Help€TitleÐ è 8 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à1;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//Restore€ScreenÐ 
ß  Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ àà ä à0;à  àà < àà h àà ” àà À àà ì àà  àà D àà p à//ReservedÐ 6 †
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ à}ÌÌà Ü àà  àà 4 àà ` àaccel={à ä à98;53;à h àà ” àà À àà ì àà  àà D à//B€or€5€for€BookmarkÐ +
{
 Ðà Ü àà  àà 4 àà ` àà Œ
àà ¸ à}Ìà Ü àà  àà 4 àà ` àaclpnt={à ä à1;1;}Ð yÉ  Ðà Ü àà  àà 4 àà ` àallow={729;0;}Ìà Ü àà  àà 4 àà ` àà0 Œ
àResult=InvalidControl(&info;€&x1;€&x2;€&y1;€&y2;€&hotkey;Ï&hotpnt;€&accel;€&aclpnt;€&tbox;€&helpmsg;&allow)Ð

(#Œ
(# ÐÌà Ü àà  àENDSwitchÌDisplayRewriteÌà Ü àEndWhileÌÌEndifÌRETURNÌÌÐ  M Ð//******************************************************Ì//Ì//à Ü àSUBROUTINE:€No€Mark€FoundÐ þN Ð//Ì//******************************************************ÌLABEL€(NotFound)Ìà Ü àSuccess=0Ìà Ü àWindowMaximizeÌRETURNÌÌÐ  6 †
 Ð//******************************************************Ì//Ì//à Ü àPROCEDURE:€€MessageÐ þN Ð//à Ü àà  àà 4 àà ` àà Œ
àà ¸ àWPCH_BO0.WPMÐ ¥õ Ð//à Ü àà  àà 4 àà ` àà Œ
àà ¸ àBookmarksÐ Lœ Ð//Ì//******************************************************ÌPROCEDURE€MESSAGE€(&tbox;Msg)ÌÌSwitch(Msg)Ì//***************************************Messages€for€QuickMarksÌà Ü àCaseOf€1001:Ìà Ü àTbox={à ` à"You€have€set€a€QuickMark.€€To€find€the€QuickMark€later,";Ð „ Ô  Ðà Ü àà  àà 4 àà ` à"press€Ô> rü Ô[Bold€On]Ô?

ÔCtrl+FÔ> ‚ü Ô[Bold€Off]Ô?

Ô.";Ìà Ü àà  àà 4 àà ` àà Œ
à"€";Ìà Ü àà  àà 4 àà ` à"Your€QuickMark€may€be€moved€when€you€exit€your";Ìà Ü àà  àà 4 àà ` à"document.€€Use€a€bookmark€rather€than€a€QuickMark";Ìà Ü àà  àà 4 àà ` à"when€you€want€a€permanent€mark€in€your€document.";Ìà Ü àà  àà 4 àà ` à"€";ÌÌà Ü àà  àà 4 à}ÌÌCaseOf€1002:Ìà Ü àTbox={à ` à"Somehow€no€QuickMark€was€placed€in€your€document.€€";Ð ± Ðà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 à}ÌÌCaseOf€1003:Ìà Ü àtbox={à ` à"The€cursor€is€next€to€your€"+€mark+".";Ð ôD Ðà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 à}ÌÌCaseOf€1004:Ìà Ü àTbox={à ` à"No€QuickMark€was€found€in€your€document.";Ð 7‡! Ðà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 à}ÌÌCaseOf€1100:Ìà Ü àw=58€h=21Ìà Ü àtbox={à ` à"€€€€€€€€€€€€€Ô> rü Ô[Bold€On]Ô?

ÔSetting€and€Finding€BookmarksÔ> ‚ü Ô[Bold€Off]Ô?

Ô";Ð !q' Ðà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 àà0 ` à"You€can€place€bookmarks€in€your€document€so€that€you";Ð
` (#` (# Ðà Ü àà  àà 4 àà ` à"can€quickly€return€to€specific€places.";Ìà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 àà ` à"Choose€from€the€following€bookmark€types:";Ìà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 àà ` à"€€€€€€€€€€€€€€€€€€Use€to€rapidly€return€to€one";Ìà Ü àà  àà 4 àà ` à"€€€€€€€€€€€€€€€€€€specific€place€in€your€document.€";Ìà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 àà ` à"€€€€€€€€€€€€€€€€€€Use€to€tag€several€places€in€your€";Ìà Ü àà  àà 4 àà ` à"€€€€€€€€€€€€€€€€€€document€that€you€want€to€return€to";Ìà Ü àà  àà 4 àà ` à"€€€€€€€€€€€€€€€€€€later,€and€for€hypertext€links.";Ìà Ü àà  àà 4 àà ` à"€";Ì}ÌCaseOf€1110:Ìà Ü àw=35€h=8Ìà Ü àtbox={à ` à"Choose€a€task:";Ð ß)/%9 Ðà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  à}Ð Ô+$'< ЇCaseOf€1120:Ìà Ü àw=35€h=8Ìà Ü àtbox={à ` à€à Œ
à"Choose€a€task:";Ð þN Ðà Ü àà  àà 4 àà ` àà Œ
à"€";Ìà Ü àà  àà 4 àà ` àà Œ
à"€";Ìà Ü àà  àà 4 à}ÌÌÌCaseOf€1200:à Œ
àà ¸ àà ä àà  àà < à//Insert€Quick€BookMarkÐ è 8 Ðà Ü àà  àTbox={à Œ
à"To€set€a€QuickMark,";Ð 
ß  Ðà Ü àà  àà 4 àà ` àà Œ
à"€";Ìà Ü àà  àà 4 àà ` àà Œ
à"ðð€Place€the€cursor€where€you€want€to€set€the€QuickMark.";Ð Ý -  Ðà Ü àà  àà 4 àà ` àà Œ
à"ðð€Press€Ô> rü Ô[Bold€On]Ô?

ÔCtrl+QÔ> ‚ü Ô[Bold€Off]Ô?

Ô.";Ð  à  Ðà Ü àà  àà 4 àà ` àà Œ
à"€";Ìà Ü àà  àà 4 àà ` à}ÌÌCaseOf€1205:à Œ
àà ¸ àà ä àà  àà < à//Find€Quick€BookMarkÐ 8ˆ
 Ðà Ü àà  àtbox={à Œ
à"To€find€a€QuickMark,";Ð ß/  Ðà Ü àà  àà 4 àà ` àà Œ
à"€";Ìà Ü àà  àà 4 àà ` àà Œ
à"ðð€Press€Ô> rü Ô[Bold€On]Ô?

ÔCtrl+FÔ> ‚ü Ô[Bold€Off]Ô?

Ô.";Ð -}  Ðà Ü àà  àà 4 àà ` àà Œ
à"€";Ìà Ü àà  àà 4 àà ` à}ÌÌ//***********************************Messages€for€BookmarksÌà Ü àCaseOf€2001:Ìà Ü àTbox={à ` à"You€have€set€a€bookmark.€€Would€you€like";Ð #s Ðà Ü àà  àà 4 àà ` à"to€set€another€bookmark?";Ìà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 à}ÌÌCaseOf€2002:Ìà Ü àTbox={à ` à"Somehow€no€bookmark€was€placed€in€your€";Ð 
] Ðà Ü àà  àà 4 àà ` à"document.€€Would€you€like€to€try€again?";Ìà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 à}ÌÌÌCaseOf€2004:Ìà Ü àà  àtbox={à Œ
à"There€are€no€bookmarks€in€your€document.€€";Ð žî& Ðà Ü àà  àà 4 àà ` àà Œ
à"€";Ìà Ü àà  àà 4 àà ` à}ÌÌCaseOf€2011:Ìà Ü àà  àtbox={à Œ
à"To€find€the€bookmark€later,€choose€Ô> rü Ô[Bold€On]Ô?

ÔBookmarkÔ> ‚ü Ô[Bold€Off]Ô?

ÔÐ á 1+ Ðfrom";Ìà Ü àà  àà 4 àà ` àà Œ
à"the€Ô> rü Ô[Bold€On]Ô?

ÔEditÔ> ‚ü Ô[Bold€Off]Ô?

Ԁmenu,€and€select€the€appropriateÏbookmark.";Ìà Ü àà  àà 4 àà ` àà Œ
à"€";Ìà Ü àà  àà 4 à}ÌÌCaseOf€2200:à Œ
àÐ r% 2 Ðà Ü àtbox={à ` à"ðð€Choose€Ô> rü Ô[Bold€On]Ô?

ÔCreate.";Ð &i!3 Ðà Ü àà  àà 4 àà ` à"€€€€€€€€€€€€€€€€€€€€";Ìà Ü àà  àà 4 àà ` à}ÌÌCaseOf€2205:Ìà Ü àtbox={à ` à"ðð€Type€a€name€for€your€bookmark,";Ð h)¸$8 Ðà Ü àà  àà 4 àà ` à"€€then€choose€Ô> rü Ô[Bold€On]Ô?

ÔOK.";Ìà Ü àà  àà 4 à}ÌÌCaseOf€2210:Ð ,`'< Ðà Ü àtbox={à ` à"The€name€you€typed€is€already€used€for€a€bookmark.€€€€€€€€";Ð ° Ðà Ü àà  àà 4 àà ` à"ðð€Choose€Ô> rü Ô[Bold€On]Ô?

ÔYesÔ> ‚ü Ô[Bold€Off]Ô?

Ԁto€replace€the€old€bookmark€orÐ W§ ÐÔ> rü Ô[Bold€On]Ô?

ÔNoÔ> ‚ü Ô[Bold€Off]Ô?

Ԁto";Ìà Ü àà  àà 4 àà ` à"€€type€a€different€name.";Ìà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 à}ÌÌCaseOf€2215:Ìà Ü àà  àtbox={à Œ
à"ðð€Highlight€the€bookmark€you€want.";Ð ô D Ðà Ü àà  àà 4 àà ` àà Œ
à"ðð€Choose€Ô> rü Ô[Bold€On]Ô?

ÔFindÔ> ‚ü Ô[Bold€Off]Ô?

Ô.";Ð §
÷  Ðà Ü àà  àà 4 àà ` àà Œ
à"€";Ìà Ü àà  àà 4 àà ` à}ÌÌCaseOf€2220:Ìà Ü àà  àtbox={à Œ
à"There€are€no€bookmarks€in€this€document.";Ð ö
F  Ðà Ü àà  àà 4 àà ` àà Œ
à"€";Ìà Ü àà  àà 4 àà ` à}ÌÌCaseOf€2225:à Œ
àà ¸ àà ä à//Choose€Edit,€BookmarkÐ ’â  Ðà Ü àtbox={à ` à"To€"+action+"€a€bookmark,";Ð 9‰  Ðà Ü àà  àà 4 àà ` à"€";à ¸ àÐ à0
 Ðà Ü àà  àà 4 àà0 ` à"ðð€Choose€Ô> rü Ô[Bold€On]Ô?

ÔEditÔ> ‚ü Ô[Bold€Off]Ô?

Ô,";Ї×
` (#` (# Ðà Ü àà  àà0 4 àà ` à"€€then€Ô> rü Ô[Bold€On]Ô?

ÔBookmarkÔ> ‚ü Ô[Bold€Off]Ô?

Ô.";Ð
4(#4(# Ðà Ü àà  àà 4 àà ` à"€€„or„";Ìà Ü àà  àà 4 àà ` à"ðð€Press€Ô> rü Ô[Bold€On]Ô?

ÔShift+F12Ô> ‚ü Ô[Bold€Off]Ô?

Ô.";Ð ˆØ Ðà Ü àà  àà 4 àà ` à"";Ìà Ü àà  à}ÌÌCaseOf€2230:Ìà Ü àtbox={à ` à"ðð€Select€Ô> rü Ô[Bold€On]Ô?

ÔBookmarkÔ> ‚ü Ô[Bold€Off]Ô?

Ô.";Ð ×' Ðà Ü àà  àà 4 àà ` à"€€€€€€€€€€€€€€€€€€€€€€€€";Ìà Ü àà  àà 4 à}ÌÌCaseOf€2405:Ìà Ü àMark="QuickMark"Ìà Ü àtbox={à ` à"There€are€no€bookmarks€in€the€document,€but€there€is";Ð Í# Ðà Ü àà  àà 4 àà ` à"a€QuickMark.€€";Ìà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 àà ` à"ðð€Choose€Ô> rü Ô[Bold€On]Ô?

ÔFindÔ> ‚ü Ô[Bold€Off]Ô?

Ԁto€find€the€QuickMark.";Ð Â& Ðà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 àà ` à}ÌÌÌÌDEFAULT:Ìà Ü àTbox={à ` à"No€message€is€available€for€this€dialog.";Ð _"¯- Ðà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 à}ÌÌà Ü àhbox={à ` à"No€hint€is€available.€€What€type€of€information";Ð û$K 1 Ðà Ü àà  àà 4 àà ` à"would€be€useful€here?";Ìà Ü àà  àà 4 àà ` à"€";Ìà Ü àà  àà 4 à}ÌÌENDSwitchÌENDPROCà8 4 àÐå(5$74¤4¤ ÐÌññ