#!/bin/sh # MetaCard 2.4 stack # The following is not ASCII text, # so now would be a good time to q out of more exec mc $0 "$@" R ClockArrayVaTabsfalse@ ULucida GrandeULucida GrandeULucida Grande Pglobal gClockNumber on openStack put the number of groups of group "clockArray" into gClockNumber end openStack on resizeStack put the rect of group "clockArray" into tRect put the width of me into item 3 of tRect set the rect of group "clockArray" to tRect end resizeStack a cREVGeneralscriptChecksumqͱӲu3#_ bookmarks handlerListopenStack resizeStack tempScript prevHandler resizeStackscriptSelectionchar 101 to 100script`

global gClockNumber

on openStack

put the number of groups of group "clockArray" into gClockNumber

end openStack

on resizeStack

put the rect of group "clockArray" into tRect

put the width of me into item 3 of tRect

set the rect of group "clockArray" to tRect

end resizeStack

!"AddEpglobal gClockNumber on mouseUp if gClockNumber is empty then put 2 into gClockNumber put the loc of group ("clock" & gClockNumber) into tLoc add the width of group ("clock" & gClockNumber) to item 1 of tLoc copy group ("clock" & gClockNumber) to group "clockarray" put it into tID add 1 to gClockNumber set the name of tID to ("clock" & gClockNumber) set the loc of tID to tLoc end mouseUp ^hT cREVGeneralscriptChecksum}e8rXG4-B revUniqueID 1042070156055 bookmarks handlerListmouseUp tempScript prevHandlermouseUpscriptSelection char 20 to 19script

global gClockNumber

on mouseUp

if gClockNumber is empty then put 2 into gClockNumber

put the loc of group ("clock" & gClockNumber) into tLoc

add the width of group ("clock" & gClockNumber) to item 1 of tLoc

copy group ("clock" & gClockNumber) to group "clockarray"

put it into tID

add 1 to gClockNumber

set the name of tID to ("clock" & gClockNumber)

set the loc of tID to tLoc

end mouseUp

RemoveEpglobal gClockNumber on mouseUp if gClockNumber < 3 then exit mouseUp delete group ("clock" & gClockNumber) subtract 1 from gClockNumber end mouseUp hT cREVGeneralscriptChecksumل.1!{ bookmarks revUniqueID 1042070863054 handlerListmouseUpscriptSelectionchar 142 to 141 prevHandlermouseUp tempScriptscript

global gClockNumber

on mouseUp

if gClockNumber < 3 then exit mouseUp

delete group ("clock" & gClockNumber)

subtract 1 from gClockNumber

end mouseUp

 LocationList)pon closeField set the itemDelimiter to tab put empty into tLocationList repeat for each line L in me put item 1 of L & cr after tLocationList end repeat sort lines of tLocationList repeat with i = 1 to the number of buttons of group "clockArray" put the menuHistory of button i of group "clockArray" into tHistory put tLocationList into button i of group "clockArray" set the menuHistory of button i of group "clockArray" to tHistory end repeat end closeField  Tabsfalse cREVGeneralscriptChecksumepчe revUniqueID 1042071390756 bookmarks handlerList closeField tempScript prevHandler closeFieldscriptSelectionchar 462 to 461scriptH

on closeField

set the itemDelimiter to tab

put empty into tLocationList

repeat for each line L in me

put item 1 of L & cr after tLocationList

end repeat

sort lines of tLocationList

repeat with i = 1 to the number of buttons of group "clockArray"

put the menuHistory of button i of group "clockArray" into tHistory

put tLocationList into button i of group "clockArray"

set the menuHistory of button i of group "clockArray" to tHistory

end repeat

end closeField

 Los Angeles 0 San Francisco 0 New York 3 Edinburgh 8 Paris 9 Minneapolis 2 Someplace Else 7 Hong Kong 18 Huntsville 2 Adelaide 16.5 `!StartEp?on mouseUp send "setTime" to group "clockArray" end mouseUp hf cREVGeneralscriptChecksumn,kϟBQ revUniqueID 1042072678352 bookmarks handlerListmouseUp tempScript prevHandlermouseUpscriptSelection char 50 to 49scriptR

on mouseUp

send "setTime" to group "clockArray"

end mouseUp

"StopEpHglobal gSetTimeMessage on mouseUp cancel gSetTimeMessage end mouseUp 4hd cREVGeneralscriptChecksumU[Vm9~ revUniqueID 1042072754195 bookmarks handlerListmouseUp tempScript prevHandlermouseUpscriptSelection char 59 to 58scriptb

global gSetTimeMessage

on mouseUp

cancel gSetTimeMessage

end mouseUp

 clockarray @iMglobal gSetTimeMessage on menuPick pWhich put fld "locationList" into tData split tData using cr and tab set the timeOffset of fld "time" of the owner of the target to 3600 * tData[pWhich] end menuPick on setTime put the seconds into tMainTime repeat with i = 1 to the number of groups of me put tMainTime into tTempTime add the timeOffset of fld "time" of group i of me to tTempTime convert tTempTime to long time put tTempTime into fld "time" of group i of me end repeat send setTime to me in .9 seconds put the result into gSetTimeMessage end setTime adTabsfalse cREVGeneralscriptChecksumR&;v|UY revUniqueID 1042069760818 bookmarks handlerListmenuPick setTime tempScript prevHandlermenuPickscriptSelectionchar 588 to 587script

global gSetTimeMessage

on menuPick pWhich

put fld "locationList" into tData

split tData using cr and tab

set the timeOffset of fld "time" of the owner of the target to 3600 * tData[pWhich]

end menuPick

on setTime

put the seconds into tMainTime

repeat with i = 1 to the number of groups of me

put tMainTime into tTempTime

add the timeOffset of fld "time" of group i of me to tTempTime

convert tTempTime to long time

put tTempTime into fld "time" of group i of me

end repeat

send setTime to me in .9 seconds

put the result into gSetTimeMessage

end setTime

aTaclock1iH cREVGeneral revUniqueID 1042069903957 time * timeOffset59400 cREVGeneral revUniqueID 1042069611472 bookmarks handlerList tempScript prevHandlerscriptSelection char 1 to 0script 9:08:12 AM location e 4 AdelaidemAdelaide Edinburgh Hong Kong Huntsville Los Angeles Minneapolis New York Paris San Francisco Someplace Else  cREVGeneral revUniqueID 1042069638469 clock2iH cREVGeneral revUniqueID 1042069747435 time * timeOffset0 cREVGeneral revUniqueID 1042069611472 4:38:12 PM location e4Tabsfalse Los AngelesmAdelaide Edinburgh Hong Kong Huntsville Los Angeles Minneapolis New York Paris San Francisco Someplace Else  cREVGeneral revUniqueID 1042069638469 bookmarks handlerList tempScript prevHandlerscriptSelection char 1 to 0script