REVO2700Time Line.WitnessH[Eon mouseUp go to stack "Time Line.Tangible" end mouseUp 4PWitness History# U helvetica U helvetica Ucourier W helvetica U helvetica Utimes Ucourier U Segoe UIUPalatino LinotypeU helvetica W helvetica U.P[P.X2-7 UTimes New RomanUTimes New RomanUTimes New RomanUTimes New RomanU Segoe UI U W UTimes New Roman U8514oemU8514oemU Segoe UI @U Segoe UI W Segoe UIW Segoe UIUSegoe UI SemiboldUShonar BanglaUVerdanaU@BatangU @BatangCheU@Dotum U@DotumU8514oem W8514oemcREVGeometryCachestackID6687 cREVGeneralscripteditorvscroll0breakpointconditionsscripteditorselection0 breakpointsbreakpointstatesAlreadyHiddenfalsecRevStandaloneSettings !Title Page:Real Evidence History P'on openCard pass openCard end openCardcREVGeometryCacheIDs1250100510197665412415825217926649125010037005966501250100483243665212501004705456651125010049858766531206088756889207912060887568906598cREVGeometryCachetotal8order  card id 6597 @cREVGeometryCacheIDs12014792651746666124311365691066561201479080154666512501010136436676120174393668266081201744688586468412500135965366677120147942374266681201479423743666912501009570466659120147933618366671201479423744667012014794237456672125010094503366551250101035899667812014836888936675120147883717166571201478837172665812014798871856673120147883717466601250013528894667912014788371776661120147883717866631201480276300667412014788371796664cREVGeometrycachetotal25order L @cREVGeometryCacheIDs12014792651746666120147908015466651243113656910665612501010136436676120174468858646841201743936682660812014794237426668125001359653666771201479423743666912014794237446670120147933618366671250100957046665912501009450336655120147942374566721250101035899667812014836888936675120147883717166571201478837172665812014788371746660120147988718566731201478837177666112500135288946679120147883717866631201478837179666412014802763006674cREVGeometrycachetotal25orderL card id 6687 @cREVGeometryCacheIDs12014792651746666120147908015466651243113656910665612501010136436676120174468858646841201743936682660812014794237426668125001359653666771201479423743666912014794237446670120147933618366671250100957046665912501009450336655120147942374566721250101035899667812014836888936675120147883717166571201478837172665812014788371746660120147988718566731201478837177666112500135288946679120147883717866631201478837179666412014802763006674cREVGeometrycachetotal25orderL @cREVGeometryCacheIDs12014792651746666124311365691066561201479080154666512501010136436676120174393668266081201744688586468412500135965366677120147942374266681201479423743666912501009570466659120147933618366671201479423744667012014794237456672125010094503366551250101035899667812014836888936675120147883717166571201478837172665812014798871856673120147883717466601250013528894667912014788371776661120147883717866631201480276300667412014788371796664cREVGeometrycacheordertotal25L @cREVGeometryCacheIDs12014792651746666124311365691066561201479080154666512501010136436676120174393668266081201744688586468412500135965366677120147942374266681201479423743666912501009570466659120147933618366671201479423744667012014794237456672125010094503366551250101035899667812014836888936675120147883717166571201478837172665812014798871856673120147883717466601250013528894667912014788371776661120147883717866631201480276300667412014788371796664cREVGeometrycacheordertotal25L @cREVGeometryCacheIDs12014792651746666124311365691066561201479080154666512501010136436676120174393668266081201744688586468412500135965366677120147942374266681201479423743666912501009570466659120147933618366671201479423744667012014794237456672125010094503366551250101035899667812014836888936675120147883717166571201478837172665812014798871856673120147883717466601250013528894667912014788371776661120147883717866631201480276300667412014788371796664cREVGeometrycacheordertotal25L @cREVGeometryCacheIDs12014792651746666124311365691066561201479080154666512501010136436676120174393668266081201744688586468412500135965366677120147942374266681201479423743666912501009570466659120147933618366671201479423744667012014794237456672125010094503366551250101035899667812014836888936675120147883717166571201478837172665812014798871856673120147883717466601250013528894667912014788371776661120147883717866631201480276300667412014788371796664cREVGeometrycacheordertotal25L @cREVGeometryCacheIDs12014792651746666124311365691066561201479080154666512501010136436676120174393668266081201744688586468412500135965366677120147942374266681201479423743666912501009570466659120147933618366671201479423744667012014794237456672125010094503366551250101035899667812014836888936675120147883717166571201478837172665812014798871856673120147883717466601250013528894667912014788371776661120147883717866631201480276300667412014788371796664cREVGeometrycacheordertotal25L @cREVGeometryCacheIDs12014792651746666124311365691066561201479080154666512501010136436676120174393668266081201744688586468412500135965366677120147942374266681201479423743666912501009570466659120147933618366671201479423744667012014794237456672125010094503366551250101035899667812014836888936675120147883717166571201478837172665812014798871856673120147883717466601250013528894667912014788371776661120147883717866631201480276300667412014788371796664cREVGeometrycacheordertotal25LNetwork ManagerG hO Ton mouseUp go to card 2 of stack "Network" end mouseUp  <7Q cREVGeneralscripteditorvscroll0 revUniqueID 1206088756890 Pion openCard if there is a bkgnd field id 5 then put "Card" && the number of this card && "of" && \ the number of cards into bkgnd field id 5 pass openCard end openCard2 D`6@ s ?1~f`1ς̃11`f3`c1ã <11`<33ـ1̃ <11`<303ـ1x%f?1|03yx f<1`<3y1a0 61`<391a0 31`fc c91a0$11~f3 10s ?1~f`1ς̃11`f3`c1ã <11`<33ـ1̃ <11`<303ـ1x%f?1|03yx f<1`<3y1a0 61`<391a0 31`fc c91a0$11~f3 10 Table of Contents xon mouseDown if the shiftKey is down then sort lines of me else if the optionKey is down then createCardNameList -- rebuild list exit mouseDown else -- go to the card associated with the click currentLine put the ticks into theTicks repeat until the mouse is up if the mouseloc is within the rect of target then currentLine put the ticks into theTicks else select empty end repeat if (the ticks - theTicks) < 10 then get the value of the selectedLine if it is empty then exit mouseDown visual effect iris open if the style of me is "Scrolling" then set scroll of me to 0 go cd it end if end if select empty end mouseDown on currentLine put (((the mouseV - top of the target) - 4) + scroll of the target)\ div (textHeight of the target) + 1 into theLine select char 1 to ((number of chars in (line theLine of target)) + 1)\ of line theLine to (theLine + 1) of target end currentLine on createCardNameList -- create the list of card names set the dontWrap of me to true set the lockText of me to true if the style of me is "Scrolling" then set scroll of me to 0 if "bkgnd" is in the target then set the sharedText of target to true put empty into me repeat with curCard = 1 to number of cards set cursor to busy get the short name of card curCard put it into line curCard of me if the length of me > 30000 then answer "Sorry, but this field's 30000" &&\ "character limit has been reached." -- exit to HyperCard end if end repeat end createCardNameList on newField -- auto builds a new list when this field is pasted createCardNameList end newFieldgT4 !Title Page:Real Evidence History Card Index card id 6597 card id 6393 card id 5692 `@UNextC  (on mouseUp go to next card end mouseUp A PrevC  ,on mouseUp go to previous card end mouseUp @  HCCdNmbrOfHC  function cardData -- this handler stores the card data specified by the -- user. DO NOT MOVE THE POSITION OF THIS HANDLER! return "bkgnd" end cardData on newfield -- create a new openCard handler when pasted put word 1 of the long name of me into fieldType if fieldType is "Bkgnd" then set sharedText of me to true addStackScript fieldType updateCardData fieldType end newfield on deleteField removeScript end deleteField on removeScript -- removes the openCard handler added on newField put cardData() into fieldType get script of fieldType if line 1 of scriptBody(fieldType) is in it then put offset(line 1 of scriptBody(fieldType),it) into startBlock put startBlock + number of chars in scriptBody(fieldType) + \ the number of lines in scriptBody(fieldType) + 1 into endBlock delete char startBlock to endBlock of it set script of fieldType to it end if end removeScript on mouseUp -- rebuilds the openCard handler in the stack script if necessary addStackScript cardData() end mouseUp on addStackScript fieldType get script of fieldType if "openCard" is in it then if (fieldType && "field id" && id of me) is not in it then put scriptBody(fieldType) & return after char \ (offSet("openCard",it) + 8) of it set script of fieldType to it end if else if it <> empty then if last char of it = return then put return after it else put return & return after it end if -- write the full handler put "on openCard" & return & scriptBody(fieldType) & return & \ "pass openCard" & return & "end openCard" after it set script of fieldType to it end if end addStackScript function scriptBody fieldType -- returns the body of the openCard handler return "if there is a" && fieldType && "field id" && id of me & return & \ "then put" && quote & "Card" & quote && "&& the number of this card && " & \ quote & "of" & quote && "&& \" & return & "the number of cards into" && \ fieldType && "field id" && id of me end scriptBody on updateCardData fieldType -- write range back to the data handler in this script -- doesn't take effect until idle get script of me put quote & fieldType & quote into newData put newData into char offset(quote,it) to (offSet("end",it) - 2) of it set script of me to it end updateCardDatag Card 2 of 5Network ManagerG  Aon mouseUp go to card 2 of stack "NETWORK MANAGER" end mouseUp Z1Q  DZ cREVGeneral revUniqueID 1206088756889LReal Evidenceion openCard if there is a bkgnd field id 1 then put "Card" && the number of this card && "of" && \ the number of cards into bkgnd field id 1 pass openCard end openCard 0 cREVGeneral revUniqueID 1201744688586  HCCdNmbrOfHC 8function cardData -- this handler stores the card data specified by the -- user. DO NOT MOVE THE POSITION OF THIS HANDLER! return "bkgnd" end cardData on newfield -- create a new openCard handler when pasted put word 1 of the long name of me into fieldType if fieldType is "Bkgnd" then set sharedText of me to true addStackScript fieldType updateCardData fieldType end newfield on deleteField removeScript end deleteField on removeScript -- removes the openCard handler added on newField put cardData() into fieldType get script of fieldType if line 1 of scriptBody(fieldType) is in it then put offset(line 1 of scriptBody(fieldType),it) into startBlock put startBlock + number of chars in scriptBody(fieldType) + \ the number of lines in scriptBody(fieldType) + 1 into endBlock delete char startBlock to endBlock of it set script of fieldType to it end if end removeScript on mouseUp -- rebuilds the openCard handler in the stack script if necessary addStackScript cardData() end mouseUp on addStackScript fieldType get script of fieldType if "openCard" is in it then if (fieldType && "field id" && id of me) is not in it then put scriptBody(fieldType) & return after char \ (offSet("openCard",it) + 8) of it set script of fieldType to it end if else if it <> empty then if last char of it = return then put return after it else put return & return after it end if -- write the full handler put "on openCard" & return & scriptBody(fieldType) & return & \ "pass openCard" & return & "end openCard" after it set script of fieldType to it end if end addStackScript function scriptBody fieldType -- returns the body of the openCard handler return "if there is a" && fieldType && "field id" && id of me & return & \ "then put" && quote & "Card" & quote && "&& the number of this card && " & \ quote & "of" & quote && "&& \" & return & "the number of cards into" && \ fieldType && "field id" && id of me end scriptBody on updateCardData fieldType -- write range back to the data handler in this script -- doesn't take effect until idle get script of me put quote & fieldType & quote into newData put newData into char offset(quote,it) to (offSet("end",it) - 2) of it set script of me to it end updateCardData$( cREVGeneral revUniqueID 1201743936682 Card 2 of 10 Peter Tillers+H@@l1# cREVTable currentviewPeter Tillers - 2010 cREVGeneral revUniqueID 1241582521792  Peter Tillers - 2010What is this stack for?e`0/)on mouseUp speakAlert "Welcome. This is a time line stack -- or, in fancy language, an event chronology stack. This stack orders events that are related to witnesses. Use this stack to put possible interesting events about possible witnesses in their possible chronological order. But note this important point: in both event chronologies and scenarios events are arranged in temporal order. But there is an important difference between scenarios and event chronologies. In scenarios the causal connections between events in time are described or conjectured. An event chronology, by contrast, is a slap-dash thing: in an event chronology -- that is, in a time line -- nothing is said, asserted, or conjectured about the connections between events in time. Well, no more explanations. Now it is time for you to get to work. As always, I wish you the best of luck." end mouseUp on speakAlert theText if theText is empty then exit speakAlert -- skip the rest try -- in case revSpeak isn't installed revSpeak theText catch theError -- if the "revSpeak" command fails put return & "(Cannot speak text on this system.)" \ after theText beep -- make a sound to get the user's attention end try answer theText end speakAlert  <7=What is this stack for? cREVGeneral revUniqueID 1250100370059scripteditorvscroll0scripteditorselection468  D6sx9?Î* R H )F2abRL )Mۂײڋ RT: )KhPTVRV )K8PTQtƬR[ MPTѬ BR] F0PWXRU CPP`؋PRV )NhPW`PRS+: )KhPUPRQ- )MPP R Q )F0PahPsp9p?8p3xqp|96s<xx8Nj6~ll6m6ٰfͶ̓m8mfٙͶ6ql6ٛl l mlmcm6fl<m6ٳfͳ́͛0fͰa86yl l m8>|co5fll6m6ٰfͶ̀m0f 6a 6٘l l m l0cl6fll6m6ٰfͶ̓m0mfͶ6al6ٛl l mlmcm5f<<l6qcͳ́0qp`8x< ll83g ``Ƅ0Ƅ `09qǞ͟q>yqqc98x8ǹ8p=x889fcf͛`ٶٶ8`ٶͶ`c`fll6mmml6`mmm9fcf͛`yٶ0`Ͷc`f34ٶͶ`ml 6f6ll66f6ٌml`clg ٳ8 6̌4Ͷml 6g>l<66g>qm<`clf y0̌4Ͷ`ml 6f 0ll66f 0ml`clf ٳ0 ̌4ٶͶ`ml 6f6ll66f6ٌml`clf ٳ0 ̌4q͞qm<6clf<63pl87<l l͘616+l`f1ٰllٶٰf0`فml0 l l͘616+l`f1ٰllٶٰf6`فmm l l͘616,qp|96s<xx8Nj6~ll6m6ٰfͶ̓m8mfٙͶ6ql6ٛl l mlmcm6fl<m6ٳfͳ́͛0fͰa86yl l m8>|co5fll6m6ٰfͶ̀m0f 6a 6٘l l m l0cl6fll6m6ٰfͶ̓m0mfͶ6al6ٛl l mlmcm5f<<l6qcͳ́0qp`8x< ll83g ``Ƅ0Ƅ `09qǞ͟q>yqqc98x8ǹ8p=x889fcf͛`ٶٶ8`ٶͶ`c`fll6mmml6`mmm9fcf͛`yٶ0`Ͷc`f34ٶͶ`ml 6f6ll66f6ٌml`clg ٳ8 6̌4Ͷml 6g>l<66g>qm<`clf y0̌4Ͷ`ml 6f 0ll66f 0ml`clf ٳ0 ̌4ٶͶ`ml 6f6ll66f6ٌml`clf ٳ0 ̌4q͞qm<6clf<63pl87<l l͘616+l`f1ٰllٶٰf0`فml0 l l͘616+l`f1ٰllٶٰf6`فmm l l͘616,'1qon mouseUp visual effect shrink to center go to stack "Recrords.Log" end mouseUp  <G#Time Lines for Records & Documents cREVGeneral revUniqueID 1250100483243scripteditorvscroll0scripteditorselection71 Time Line.Tangibleel Az'1won mouseUp visual effect shrink to center go to stack "Time Line.Tangible" end mouseUp  <G*Time Lines for Real ("Tangible") Evidence cREVGeneralscripteditorvscroll0 revUniqueID 1250100498587scripteditorselection77  Next CardF itLhon mouseUp visual effect scroll left slowly go to next card end mouseUp  <G;A cREVGeneral revUniqueID 1250100510197  Witness Time Line Datai q cREVGeneral revUniqueID 1250100945033Network ManagerE!v)Cnon mouseUp visual effect scroll down slowly go to stack "Network" end mouseUp  <1^ cREVGeneral revUniqueID 1243113656910 Persons.WitnessesBe i 0 Uon mouseUp go to stack "Persons.Witnesses" end mouseUp  <- Evidence from & about Witnesses cREVGeneralscripteditorvscroll0 revUniqueID 1201478837171scripteditorselection0  Next cardG  svIhon mouseUp visual effect scroll left slowly go to next card end mouseUp  <!^A cREVGeneralscripteditorvscroll0 revUniqueID 1201478837172scripteditorselection38 Make New CardEh"@@@@5Eon mouseUp doMenu "New Card" end mouseUp  <-\ cREVGeneral revUniqueID 1250100957046 Time Line.Casee hk, \on mouseUp go to card 1 of stack "Time Line.Case" end mouseUp  <1ZCase Time Line cREVGeneral revUniqueID 1201478837174  Initial Time)`!ScCurrentObjectstack "Witness.Time Line" cREVGeneral revUniqueID 1201478837177           `@Q  Initial Time)``KcCurrentObjectfield id 1018 of group id 1050 of card id 1054 of stack "K:/MarshalAll/Aussie-Scot MarshalPlan/MarshalNet08/Network/Evidence History/Time Line.Witness.rev" cREVGeneral revUniqueID 1201478837178          Name of Witness)`L cCurrentObjectistack "K:/MarshalAll/Aussie-Scot MarshalPlan/MarshalNet08/Network/Evidence History/Time Line.Witness.rev" cREVGeneral revUniqueID 1201478837179           Name of Witness q cREVTable currentviewName of Witness: cREVGeneral revUniqueID 1201479080154 Name of Witness:  Initial Condition gx cREVTable currentview

Initial Date & Time:

 cREVGeneral revUniqueID 1201479265174 Initial Date & Time:  Label Field  cREVTable currentview3

Initial Location & Condition of Witness:

 cREVGeneral revUniqueID 1201479336183 )Initial Location & Condition of Witness:  New Time Mx cREVTable currentview

New Date & Time:

 cREVGeneral revUniqueID 1201479423742 New Date & Time:  Label Field - New Date & Time)hFK cREVGeneral revUniqueID 1201479423743          New Condition)`^ cREVGeneral revUniqueID 1201479423744           `@\ Name of New Condition x cREVTable currentview/

New Location & Condition of Witness:

 cREVGeneral revUniqueID 1201479423745 %New Location & Condition of Witness:  Label Field - Associated Events  'rK cREVTablecurrentvscroll0 viewablerows2currentxmouseloc620currenthscroll0currentymouseloc40scrollbarwidth20 cellyspacing16viewablecolumns2rightfieldloc624numbertabstops1 cellxspacing75 leftfieldloc524 topfieldloc28 currentviewTime Line of Associated Events:bottomfieldloc49 cREVGeneral revUniqueID 1201479887185 Time Line of Associated Events: RectangleK@ cREVGeneral revUniqueID 1201480276300Previous CardG Kon mouseUp visual effect scroll right go to previous card end mouseUp /qI^ cREVGeneral revUniqueID 1201483688893 i cREVGeneral revUniqueID 1250101013643 RectangleK@ cREVGeneral revUniqueID 1250013596536i@ cREVGeneral revUniqueID 1250101035899 RectangleK@D cREVGeneral revUniqueID 1250013528894