#!/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 "$@"  Docs Patch2 j,Revolution Documentation Patch ULucida Grande ULucida Grande WLucida Grande Pon preOpenStack set the loc of this stack to the screenloc set the style of this stack to modeless end preOpenStack --------------------------------- on openStack if there is no stack revDocsPath() then -- answer error "Could not find Revolution Documentation." with "Sorry" as sheet disable btn "Apply Patch" exit openStack end if ----- switch case revAppVersion() <> 2.5 answer error "This patch is for Rev 2.5 only." with "Sorry" as sheet disable btn "Apply Patch" break case the script of card id 1002 of stack "revDocs" = the script of btn "NewScript" answer info "This patch has been already applied." as sheet disable btn "Apply Patch" break default enable btn "Apply Patch" end switch end openStack --------------------------------- function revDocsPath local tPath ----- set the itemDel to slash put the filename of stack "revmenubar" into tPath put "help/revdocumentation.rev" into item -2 to -1 of tPath return tPath end revDocsPath , cREVGeneralscriptChecksumGOUy bookmarks handlerList"preOpenStack openStack revDocsPathscriptSelectionchar 103 to 102 prevHandler openStack tempScriptscript d

on preOpenStack

set the loc of this stack to the screenloc

set the style of this stack to modeless

end preOpenStack

---------------------------------

on openStack

if there is no stack revDocsPath() then -- 

answer error "Could not find Revolution Documentation." with "Sorry" as sheet

disable btn "Apply Patch"

exit openStack

end if

-----

switch

case revAppVersion() <> 2.5

answer error "This patch is for Rev 2.5 only." with "Sorry" as sheet

disable btn "Apply Patch"

break

case the script of card id 1002 of stack "revDocs" = the script of btn "NewScript"

answer info "This patch has been already applied." as sheet

disable btn "Apply Patch"

break

default

enable btn "Apply Patch"

end switch

end openStack

---------------------------------

function revDocsPath

local tPath

-----

set the itemDel to slash

put the filename of stack "revmenubar" into tPath

put "help/revdocumentation.rev" into item -2 to -1 of tPath

return tPath

end revDocsPath

 NewScriptEp ;on preOpenStack local tFolder if the cRevDocsRect of stack "revPreferences" <> "" then set the rect of this stack to the cRevDocsRect of stack "revPreferences" end if put "" into fld "status" if the platform = "MacOS" and char 1 of the systemVersion = "1" then set the decorations of this stack to "metal,title,minimize,maximize,close" else set the decorations of this stack to "default" end if repeat with X=1 to the number of btns of group "toolbar" if the platform = "MacOS" then set the style of btn X of group "toolbar" to "rectangle" else set the style of btn X of group "toolbar" to "standard" end if set the textAlign of btn X of group "toolbar" to "center" set the showBorder of btn X of group "toolbar" to false end repeat set the uBackList of this stack to the cRevDocs["uBackList"] of stack "revPreferences" set the uForwardList of this stack to the cRevDocs["uForwardList"] of stack "revPreferences" set the enabled of btn "back" to the uBackList of this stack <> empty set the enabled of btn "forward" to the uForwardList of this stack <> empty set the itemDel to "," repeat for each item tBtn in "Dictionary,Objects,FAQ,Topics,Bookmarks" if the textStyle of btn tBtn is "bold" then goIndex tBtn end repeat if the enabled of btn "Back" and the textStyle of btn "Dictionary" is "bold" then send "mouseUp" to btn "Back" end preOpenStack ------------------------------------- on arrowKey pDirection switch pDirection case "up" case "down" if the short name of the target = "List" then send "mouseUp" to fld "List" in 1 tick pass arrowKey end if break case "left" click at the loc of btn "Back" break case "right" click at the loc of btn "Forward" break end switch end arrowKey ------------------------------------- on openStack global gRevHelpHiliteColor put the cRevHelpHiliteColor of stack "revPreferences" into gRevHelpHiliteColor pass openStack end openStack on closeStack set the cRevDocsRect of stack "revPreferences" to the rect of this stack set the cRevDocs["uBackList"] of stack "revPreferences" to line 1 to 10 of the uBackList of this stack set the cRevDocs["uForwardList"] of stack "revPreferences" to line 1 to 10 the uForwardList of this stack put "" into fld "find" end closeStack ^R cREVGeneralscriptChecksumjȱp bookmarks revUniqueID 1109925894429 handlerList*preOpenStack arrowKey openStack closeStackscriptSelectionchar 1827 to 1826 prevHandler tempScriptscript#

on preOpenStack

local tFolder

if the cRevDocsRect of stack "revPreferences" <> "" then

set the rect of this stack to the cRevDocsRect of stack "revPreferences"

end if

put "" into fld "status"

if the platform = "MacOS" and char 1 of the systemVersion = "1" then

set the decorations of this stack to "metal,title,minimize,maximize,close"

else

set the decorations of this stack to "default"

end if

repeat with X=1 to the number of btns of group "toolbar"

if the platform = "MacOS" then

set the style of btn X of group "toolbar" to "rectangle"

else

set the style of btn X of group "toolbar" to "standard"

end if

set the textAlign of btn X of group "toolbar" to "center"

set the showBorder of btn X of group "toolbar" to false

end repeat

set the uBackList of this stack to the cRevDocs["uBackList"] of stack "revPreferences"

set the uForwardList of this stack to the cRevDocs["uForwardList"] of stack "revPreferences"

set the enabled of btn "back" to the uBackList of this stack <> empty

set the enabled of btn "forward" to the uForwardList of this stack <> empty

set the itemDel to ","

repeat for each item tBtn in "Dictionary,Objects,FAQ,Topics,Bookmarks"

if the textStyle of btn tBtn is "bold" then goIndex tBtn

end repeat

if the enabled of btn "Back" and the textStyle of btn "Dictionary" is "bold" then send "mouseUp" to btn "Back"

end preOpenStack

-------------------------------------

on arrowKey pDirection

switch pDirection

case "up"

case "down"

if the short name of the target = "List" then

send "mouseUp" to fld "List" in 1 tick

pass arrowKey

end if

break

case "left"

click at the loc of btn "Back"

break

case "right"

click at the loc of btn "Forward"

break

end switch

end arrowKey

-------------------------------------

on openStack

global gRevHelpHiliteColor

put the cRevHelpHiliteColor of stack "revPreferences" into gRevHelpHiliteColor

pass openStack

end openStack

on closeStack

set the cRevDocsRect of stack "revPreferences" to the rect of this stack

set the cRevDocs["uBackList"] of stack "revPreferences" to line 1 to 10 of the uBackList of this stack

set the cRevDocs["uForwardList"] of stack "revPreferences" to line 1 to 10 the uForwardList of this stack

put "" into fld "find"

end closeStack

 Apply PatchEpon mouseUp local tCurPath,tSavePath,tFileType ----- put revDocsPath() into tCurPath -- C put tCurPath into tSavePath set the itemDel to slash put "revdocumentation old.rev" into item -1 of tSavePath ----- if the platform = "MacOS" then put the fileType into tFileType set the fileType to "revoRSTK" end if put url("binfile:" & tCurPath) into url("binfile:" & tSavePath) if the platform = "MacOS" then set the fileType to tFileType ------ set the script of cd ID 1002 of stack tCurPath to the script of btn "NewScript" save stack tCurPath disable me answer info "The patch has been applied." & cr & "A copy of your previous Revolution Documentation was saved as" & cr & tSavePath end mouseUp d cREVGeneralscriptChecksum5j 'A@s{ revUniqueID 1109926194716 bookmarks handlerListmouseUp tempScript prevHandlerarrowKeyscriptSelectionchar 593 to 592script 0

on mouseUp

local tCurPath,tSavePath,tFileType

-----

put revDocsPath() into tCurPath -- C

put tCurPath into tSavePath

set the itemDel to slash

put "revdocumentation old.rev" into item -1 of tSavePath

-----

if the platform = "MacOS" then

put the fileType into tFileType

set the fileType to "revoRSTK"

end if

put url("binfile:" & tCurPath) into url("binfile:" & tSavePath)

if the platform = "MacOS" then set the fileType to tFileType

------

set the script of cd ID 1002 of stack tCurPath to the script of btn "NewScript"

save stack tCurPath

disable me

answer info "The patch has been applied." & cr & "A copy of your previous Revolution Documentation was saved as" & cr & tSavePath

end mouseUp

Info ` (| cREVGeneral bookmarks revUniqueID 1109926471772 handlerList prevHandler tempScriptscript  $This patch is for version 2.5 only. # This patch modifies the Revolution Documentation stack in order to remember the last 10 visited topics (even between 2 sessions) and allows the docs to display the last visited topic when opening again. C C$ g  1  Note that all cosmetic updates are not done (as selecting the right line in the dictionary list) since it appeared not quite as simple and does not matter anyway :-) As usual, the use of this software acknowledges that you hereby release me from any liability for any damages, whether direct or indirect and bla and bla and bla But here it is :-) @ SSS.png  Hon mouseDown revGoUrl "http://www.sosmartsoftware.com" end mouseDown "-PNG  IHDR". pHYs.#.#x?v 9iCCPPhotoshop ICC profilexڝwTTϽwz0z.0. Qf Ml@DEHb!(`HPb0dFJ|yyǽgs{.$O./ 'z8WGбx0Y驾A@$/7z HeOOҬT_lN:K"N3"$F/JPrb[䥟}Qd[Sl1x{#bG\NoX3I[ql2$ 8xtrp/8 pCfq.Knjm͠{r28?.)ɩL^6g,qm"[Z[Z~Q7%" 3R`̊j[~: w!$E}kyhyRm333: }=#vʉe tqX)I)B>== <8Xȉ9yP:8p΍Lg kk Ѐ$t!0V87`ɀ2A. @JPA#h'@8 .: ``a!2D!UH 2 dA>P ECqB**Z:]B=h~L2  5pN:|ó@ QC !H,G6 H9R ]H/r Aw( Q(OTJCm@*QGQ-(j MF+ 6h/*t:].G7Зw7 Xa<1:L1s3bXyeb~19 vGĩp+5qy^ oó|= ?'Htv`Ba3BDxHxE$Չ"XAP44077&9$An0;T2421t.54ld+s;# V]=iY9FgM֚k&=%Ō:nc1gcbcfX.}lGv{c)LŖN퉛w/p+/<j$.$%&㒣OdxTԂԑ4i3|o~C:&S@L u[Uo3C3OfIgwdO|;W-wsz 17jl8c͉̈́3+{%lKWr[ $ llGmnacOkE&EEY׾2⫅;K,KhtiN=e²{^-_V^Oo§s]?TWީrjVQ=w}`嚢zԶiו8>k׍ E  [ly邟~_Y53rW򯎼^{7so}x>|쇊z>yzgAMA|Q cHRMz%u0`:o_F"IDATxbax& O?"?z$<@,X< dz,,2{H?Hk4^B˧̌<4i_rD@,hgaӊb:޾zo]ǷDr8 4y6{5ݕ]WMż#٩ƧoZQqm8$Iyon0w 3+ `8 K d+ ,?ۏҟ]xۥW/~g33+?@S_B9.3_823J{;kc :e'HfCqΈ#{x#Sxs`]Ϛ[^>Y5c+?8r2,FF zh(~(M Ѱ狻v%?d|\>}aeE,^%oΦU{ǃ_Tdگ?w>ytfo <"JYղC"%.686lq-dG &pK\j{H@FeoFWwnAςDE|Փg{Y8~#%̅~f^U8]#50Ln>n^>~f[v6&߰ d cvF>H?~ߟ郹,",Z9}WX%ëXDHĄŠ 9J02qrrﳃ_+yop6E[?;3R.QYy844>?ǛGW50s[s|DYޜs%fq-9_KLu~W=\j^n+!a&lgǯ^ӏ]m rB#ǻ? hV.n6%Lz<х ;'￿ ?g{3蟿~/,r6 ~rOmsy9<9'x9 s-RXxծ|:,>̲ܿ?R= w3< 0 C_>;%'o3_?*imcރ?"2BqN.z6UI/"N~|zʲ/Ho_8AII[9Ԟ|d/O^0Q-$*ۻ= ?:Ű̢*'c*fy_ο> ^Q0si.c``_̒NL l [{p H),x]^ F o1ٍ-w}R0XxkqF_bh6^ . f6F Y. M;S.!IΞz+ *rO3߿z:;;El9%5<{{ˣa!0F6q!qNq M ߿,Oمye-d~82ċsɫ }?R\]WɫJEYDMI\XBV^]$L\ҺJj\6_d x }#ǩB__=r{ 73昳ps0+hڙ7}T~˻oya!!#v</^#.+YXUGN?FSHERTYQHXVDWߞ\RP&-<*e|o:ԹDZO\C7VUAqc㗶ɔ2SRS^!ѕ򊼡r2\vont@W޳2.>eͩ\Pvw׾zY-NݛoM7+Iq+Z( V2{sW/~PvKꙟ(wnZ_V!_xDľTbƯ@I]u &vnn:aAJJ}0-{aQf_>\~A>/x a|x]=҆'?X=ۜ\VqIe̩>[g$\be4 KkabEXOH9 ϟqɍO^-V`ʇ{<~y1I 2sps2 }g,,j2 UWUgWĿ630~}go |mĦ#".$"oϸd⃥>_v>AFN~A&HFLOhpIY PW&У O7., ٲ;|e  ,(|w(㷕 ~ մ6岛6mcC  ŋ"Ogw^z`)PK(B ]SLhُn gyf quc|xw铦-Wfh9Ӌn?zzȅ<U6t5J{ʜ&'O;/?_SģNZƯƐ1D#Ey8rD9*{2hl8zi{᧖UqP$(M[QWc 'Ӆn@ȏ>ov7V9:V Ɇ12 QWB`"EkyщYeWާӝwZ\i+7M4+' 6 7J7tAcV3! abF$Lup!5ӭ4ՠn es=>zZ$g?./}<9YS8RGJRpVܩ-M/)=PXT<_1CWMr!lqy[KIE 1A fzY-3W‘W]d7ۑRVͿ h(Tb 69|yfʖ V&%a&'Jt^c N@JXJԎ0yof6>0S'_!à-c0_cFˮ ¶ 2.5 XjS%-X%ԑ0ꀣÝz]m?^8%g*@̶2)x+[V,$p59'>qdI@%˟x/Ⱥ)e9RJ)sRCbN+$ %\w7[:·mwhMNl'bIг܂:m֐kuF]i.w/_ߞo]e3 p ؂_.b,&kWLZSϯ_nlvӓ~K@LTKT]PRV }xuc&G%+v6FQIUVPqyV<<>~z';;0v..Vf&fv6VfV`A痏RQJEME&X@w2(9XW.wLrjɲ&(A[հxUe||RZ*)b< D.N`Q+,'ۤ ԳQxɗ<~}i]`b'lg54`g|}ƉOOE.FB XKl ɻuVGDTT`}yBXvRbgW1P燔vx4v  _vM{Dun` `C73\&vU+_R^;LJן_]>[DLk~5+RigvYJQˏ[̎ZN32;?߿???ٝ;?>|sbҒڞR?>~x!*h/|&xwoJDX̎[cƒ+_ X'*fZ+k”WCּs Ý _=l>$ٹ#WTOGOGp[`0W'=?Ǡw\"zi+'Z{7Μ r7/_ZAˋfeTxoW@Ps&on?MM(WT ֥y E 6!ßon7?ҿ?>zr[ Ƿ7?y򆘦<^\۽bꅅ Wuov>ZBݩ>SV'_]:2@W_?6Zd~|t󯰲S_:w5w~O_7;GL7H^츹kfamo>xtv!޳+O=`F`]7^\9xɉ-o8ee~¯oo iWԿ=4!MU3A~1?@KOa}`~H/7737?>o(2A_?{u'>7 `==Wpi}dϧ'v.Ⱦ2Y^<ӇXyy~~{'6~u+h ë >q^!eV w2{*wξ ?pf/+po?>+a%,-G!xs{ UziN:Lȉj?bFbFZ`X!C_5 lfUHv#H{ y*ϊa-Xc \|(:mJ[}pwwK\ӻ^7#`@jE f{&0HaOeR^b:"8r G#Rτ%P>-Z[XhWCC VAGL[X _DGY36ؘs`AX@z?6e_4B+LI=88hY X"=G1"978H3X˄ ۦ { nfh !l8t~C)yyޞoՙoo-Hu,k-Te5ʈfFK\{Hpehu?" GDÆGZK'h?D⡕B>,,7ug'H= `ı} /Q@60,lk1'!l"F?M!H \2nha?h"?͈+#Ă'?[BX?Z'$V} e@)ii@:TZVJ@, \͌o'zM[{@D}3<bhT``4Ӥ(IENDB` cREVGeneralscriptChecksum`}^.e revUniqueID 1109927011060 bookmarks handlerList mouseDown tempScript prevHandler mouseDownscriptSelection char 71 to 70script

on mouseDown

revGoUrl "http://www.sosmartsoftware.com"

end mouseDown