#!/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 "$@" ô stripresfork2ˆ`¬¬¬¬¬¬¬¬¬¬¬¬w}äStrip Resource ForkU helvetica ULucida Grande U helvetica U helveticaê Pon preOpenStack start using "Execution Error" end preOpenStack on killFork tPath # STORE ORIG FILEPATH put tPath into tFilePath put tFilePath into tDirPath set itemDel to "/" put last item of tDirPath into tFile put empty into last item of tDirPath put directory into dTemp set directory to tDirPath put urlDecode(the detailed files) into tList put line lineOffset(tFile,tList) of tList into tData set itemDel to "," set the fileType to last item of tData put tFile into tFileName if char -4 of tFileName = "." then put "_2" before char -4 of tFileName if there is a file (tDirPath & tFileName) then repeat until there is not a file (tDirPath & tFileName) add 1 to char -5 of tFileName end repeat end if end if # answer tFileName # exit killFork put url ("binfile:" & tDirPath & tFile) into url ("binfile:" & tDirPath & tFileName) if the result is not empty then answer the result exit to metacard end if # RENAME ORIG FILE put tFilePath into temp put "_orig" before char -4 of temp rename file tFilePath to temp # RENAME NEW FILE (USING ORIG FILE NAME) put (tDirPath & tFileName) into temp delete char -5 of temp delete char -5 of temp rename file (tDirPath & tFileName) to temp end killFork ffffffäñëðòôóëA FileàE«pwon mouseUp answer file "Locate file:" if it is empty then exit mouseUp killFork it answer "Done!" end mouseUp —U ð A FolderàE«p™on mouseUp answer folder "Select folder:" if it is empty then exit mouseUp put it into tPath put "/" after tPath set the directory to tPath put the files into tFiles if ".ds_store" is in line 1 of tFiles then delete line 1 of tFiles repeat with L = 1 to number of lines of tFiles put tPath before line L of tFiles killFork (line L of tFiles) end repeat answer "Done!" end mouseUp —U òÿÿÿÿÿÿWhite ïy ê #This utility will binary copy a selected Macintosh file with a resource fork, or folder of files, into a completely new file, thereby stripping the resource fork of the new file (the original file name will be appended with "_orig" for backup purposes). Nested subfolders are not supported.  ó  ÿÿÿÿÿÿWhite Éï ê .Strip Resource Fork written by Tactile Media.  ñKÿÿÿÿÿÿ†ã>‡‡ÃñÃñ‡F‡ ôÿÿÿÿÿÿWhite|/ ê Strip:   Moved Icons@@€€ ÿÿÿÿë @€€Hí @€€Iï @€€Jñ @€€Kó @€€àõ @€€á÷ @€€âù @€€ãû @€€äý @€€åÿ @€€æ @€€çHi328 Dÿÿÿÿÿÿffffff00 S•à‚8‚`ƒÀƒ€‚€‚%‚B" ƒ„€0‚à¡_™à‚ü‚8‚p‚p‚ø‚ÜŽ€‡€ƒ€Á€€á€€q€€9‚À‚à‚p‚x‚?ø‚à™W¡à‚ ‚€ƒ€ €p@H@D@B@A@@€@‚@À‚ À‚€‚ƒƒ‚‚ð•c•à‚?ø‚ü‚ÿþ‚6üø€ø€þ€ÿÀσÀÇÃÀÃãÀÁóÀÀûÀÀÀÀ?Àà€ð?‚ÿ‚?þ‚ü‚ð•Ii329 Dÿÿÿÿÿÿffffff00 Q‘à‚ƒƒƒƒð‚‹ƒƒƒƒƒƒƒƒ‚ƒ’a•à‚à‚à‚à‚à’à‚à‚à‚à‚à‚à‚à‚à‚à‚à‚à‚à‚ø‚ø‘Ušƒƒƒ‚àƒ‚ƒƒƒƒƒƒƒƒƒƒƒ‚üu‘à‚à‚ð‚ð‚ð‚ð‚àŠð‚ð‚ð‚ð‚ð‚ð‚ð‚ð‚ð‚ð‚ð‚ð‚ø‚ü‚ü‚üJi330 Dÿÿÿÿÿÿffffff00 b‘ð‚ ƒƒƒ0ƒ ƒ ƒ ƒƒƒƒ`ƒ`‚€‚ƒƒƒƒ‡€‚ƒƒ’b•ð‚ø‚ø‚‚‚‚ ‚ƒƒƒƒƒƒx‚ð‚à‚€‚ƒ‹€‚€‚€‘\ž‚â‚‚‚‚‚ƒƒƒƒƒƒ ƒƒpƒÀƒ€‚€‡@ƒ@ƒ@‚À{‘ð‚ð‚ø‚ü‚?þ‚>‚<‚<‚ƒƒƒƒ~‚þ‚ü‚ø‚ð‚À‚€‚€‚€‚À‚À‚À‚ÀKi331 Dÿÿÿÿÿÿffffff00 `‘€‚ƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒ‡€‚ƒƒ’k•€‚€‚€‚€‚€‚€‚€‚€‚€‚€‚€‚€‚€‚€‚€‚€‚€‚€Š€‚€‚€‘`–@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@‚À‡@ƒ@ƒ@‚À‘€‚À‚À‚À‚À‚À‚À‚À‚À‚À‚À‚À‚À‚À‚À‚À‚À‚À‚À‚À‚€‚À‚À‚À‚Àà DØØøø``ÈȘ˜``øøøøÈÈÈȘ˜``øøÈȘ˜0000``00 „‚ÿ €ÿ€‚ÿ6À üÿàüÿð7äŸøoäŸüßäŸü¿$Ÿü¿$Ÿü¿$Ÿü¿$Ÿü¿$Ÿü¿ |¿|¿|¿‚ü¿‚"ü¿ü¿ü¿ü¿ü¿€ü€øÀðàà‚ÿÀ‚ÿ€‚ÿ‚€†_…þ‚€‚ƒƒƒƒƒ ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@ƒ@£‚‡€ƒ@ƒ ƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒ ‚‚‚ ‚@‚€ÿ‚€‚‘‡@Š€“@‚ƒ½o‘ƒƒ ‚ ‚ ‚I ‚I ‚I ‚I ‚I ‚I!‚@"€‚5€‚ƒƒƒ‚€‚€ ƒ‚@‚ 0‚à•i•ƒƒ@‚@‚@‚’@‚’@‚’@‚’@‚”‚€¯À‚ÿÀ‚ÿæ‚ÿü‚ÿü‚ÿø‚ø‚ð‚ð‚?à‚À™ ッƒƒ ƒ@ƒ€ÿ‘‚ÿ‚ÿ€‚ÿÀ‚ÿà‚ÿð‚ÿø?‚ÿü‚ÿþƒÿþƒÿþƒÿþƒÿþƒÿþƒÿþƒÿþƒÿþƒÿþƒÿþƒÿþƒÿþƒÿþƒÿþƒÿþƒÿþ‚ÿþ?‚ÿü‚ÿø‚ÿð‚ÿà‚ÿÀ‚ÿ€‚ÿá D øøøøøøøøÈȘ˜@@@@@@ÈȘ˜``````ÈÈÈÈÈÈøø˜˜˜˜øø0000``00 Žƒ2Š3ƒ"ŠPƒ"ŠPƒ"ŠPB$"ƒ`‚w‡™‚PB"‚`‚ qˆ PB"‚vƒw ‡–PB"`q„w h P""p…w‡Pƒ"q†w–Pƒ"q†whPƒ" WUWUWUwhPƒ"‡whPƒ"‡whPƒ"WUWU‚WwhPƒ"‡whPƒ"‡whPƒ"WU‚WU‚w hP"BD‡whP"ƒ‡whP‚"‚ WUuUuUwhP‚"‚†w‡˜P‚"‚†wˆP‚"`…w ‡h P"Dv‡…ˆh–P"‚`‡f™ P‚"‹P‚"‹P‚"‹P ‚D‹‚PUÿÿÿâ D øøøøøøøøÈȘ˜@@@@@@ÈȘ˜``````ÈÈÈÈÈÈøø˜˜˜˜øø0000``00 «ƒ2Š3ƒ"ŠPƒ"ŠPƒ"ŠPB$"ƒ`‚w‡™‚PB"‚`‚ qˆ PB"‚vƒw ‡–PB"`q„w h P""p…w‡Pƒ"q†w–Pƒ"qw‚Uu‚whPƒ"wWuwU‚whPƒ"wWuwU‚whPƒ"„wU‚whPƒ"ƒwWu‚whPƒ"ƒwUƒwhPƒ"‚wWuƒwhPƒ"‚wWuƒw hP"BD‡whP"ƒ‚wWuƒwhP‚"‚‚wWuƒwhP‚"‚†w‡˜P‚"‚†wˆP‚"`…w ‡h P"Dv‡…ˆh–P"‚`‡f™ P‚"‹P‚"‹P‚"‹P ‚D‹‚PUÿÿÿã DˆˆˆˆˆˆøøøøøøøøøøÈȘ˜``@@@@@@PPPPPP00 •€‚À‚@‚`‚ ‚ 0‚‚‚‚‚0 ‚ ‚a†‚C‚‚ ƒÁƒÁ€À€‚‚À À@€`€ ‚0‚‚€0À À`€@‚À‚À‚‚ÿþX‰€†@† ††H† †@†€…‚€„‚‚@„‚ „@„‚@ ‚Œ|ƒƒ€‚À‚À‚à‚ à‚0‚0‚8‚,8‚,<‚\<‚\>‚¼>‚¼?|?|?€þ€‚ÿÀ‚ÿÀü?à ü?à ü?ðü?ð‚ÿøŒjŽ€ƒ€‚ƒƒƒƒƒƒƒƒƒƒ ƒ ƒ@ƒ@ƒ€ƒ€‚ƒƒƒƒƒƒƒ:–@‡ ‡‡‡‡‡ˆ€‡@‡ ‡‡„?‚ÿüˆ©€‚@ž@†€© ø?‚ÿü„˜€‚À‚À‚à‚à‚ð‚ð‚ø‚ø‚?ü‚?ü‚þ‚þ‚‚ÿ‚‚ÿ‚ÿ€‚ÿ€‚ÿÀ‚ÿÀ‚ÿà‚ÿà‚ÿð‚ÿð‚ÿø‚ÿø?‚ÿü?‚ÿü‚ÿþ‚ÿþˆÿ‚ÿþä Dxxøøxx||xxøøüüøø00 ‘à‚ à€‚@‚ ‚‚ ‚@‚@‚@‚€‚€‚€‚€‚€‚€‚€‚€‚@‚@‚@‚ ‚‚‚ ‚ ‚@€‚à‚à‰|…à‚ÿüÿþ‚ÿ€‚ÿÀ‚ÿBÀ¿÷à?ãð>Áð?ƒðƒøÀøàøð?øð?øàøÀøƒø?ƒð>Áð?ãð¿÷à‚ÿÀ‚ÿÀ‚ÿ€ÿþ‚ÿü‚àe›ƒ‡ƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒ8ƒxðà`€?ÿ‚øP@‚àð>‚ø|‚|ø‚?ð‚à‚À‚À‚à‚?ð‚|ø‚ø|ð>‚à‚@¥~à‚ÿüÿþ‚ÿ€‚ÿÀ‚ÿà‚ÿð?‚ÿø‚ÿø‚ÿü‚ÿþƒÿþƒÿþ˜ÿƒÿƒÿ‚ÿþ?‚ÿþ‚ÿþ‚ÿü‚ÿø‚ÿø‚ÿð‚ÿàÿ€?ÿ‚øå Dxx||xx¸¸¼¼¸¸øøüüøøøø00 à‚à‚€ƒƒ ƒ@ƒ@‚€‚€‚€‚€‚€‚€‚€‚@‚@‚ ‚ƒƒ<ƒxƒ ðààÀ<‚ƒƒƒƒ8ƒH… ‚€‚@‰ @„@‚”@‚„ ‚Œ‚€‚ ‚ž}…À‚øÿþð?€ð?Àð?àð?à?‚ÿð?‚ÿ&ðà?øø?øø?øø?øø?ø?ø?ð?ø?ðø?ààà‚ÿÀ‚ÿ€ÿþ‚ø‚À‚À‚À‚ÀƒÀƒ@C‘€‚À‚À‚€ŠÀ‚À‚À‚À‚À‚À‚À‚À‚ðµp“@ƒ ƒƒƒƒƒƒƒƒƒƒƒƒƒ‚‚ ‚@‚€‚à‚ ‚ ‚ ‚ ƒ ƒ`‰à‚ÿü‚ÿ‚ÿ€‚ÿÀ‚ÿà?‚ÿð‚ÿø‚ÿüƒÿþƒÿþ”ÿƒÿƒÿ?‚ÿþ‚ÿþ‚ÿü‚ÿø‚ÿð‚ÿà‚ÿÀ?ÿ‚ø‚øƒøƒxƒ8ƒæ Dxx||xx¸¸¼¼¸¸øøüüøøøø00 à‚à‚€ƒƒ ƒ@ƒ@‚€‚€‚€‚€‚€‚€‚€‚@‚@‚ ‚ƒƒ<ƒxƒ ðààÀ<‚ƒƒƒƒ8ƒ[… ‚€† ‚( ‚„@$ƒˆ€…@‚€ ‚…€…‚€‚ ‚ž|…À‚øÿþ‚ÿ*€àÀÆàÏà?Ãð?ÂðÂøü?øüøüøüÿø?‚ÿð?øðøàøàøÀ‚ÿ€ÿþ‚ø‚À‚À‚À‚ÀƒÀƒ@p“@ƒ ƒƒƒƒƒƒƒƒƒƒƒƒƒ‚‚ ‚@‚€‚à‚ ‚ ‚ ‚ ƒ ƒ`‰D•À‚à‚0ð‚<ð‚<ð‚à‚À‚€‚ƒ‡ƒ€‚€‚²à‚ÿü‚ÿ‚ÿ€‚ÿÀ‚ÿà?‚ÿð‚ÿø‚ÿüƒÿþƒÿþ”ÿƒÿƒÿ?‚ÿþ‚ÿþ‚ÿü‚ÿø‚ÿð‚ÿà‚ÿÀ?ÿ‚ø‚øƒøƒxƒ8ƒç Dxx||øøüü¸¸¼¼¸¸xx||xx00 zƒƒƒƒ ƒ ƒ@ƒ@ƒ€ƒ€‚ƒƒƒƒƒ€ƒƒ‚ƒ ƒ ƒ@ƒ@ƒ€ƒ€ƒ€ƒ€ƒ@ƒ ‹…ƒƒ€‚€‚À‚?À‚?à‚à‚‚p‚ðp‚(ðxðxð|ð|ð~ð~øÿøÿøÿ€ýÿ€‚ÿÀ?øÀ?øàøàøð‚ÿð‚ÿà?‚ÿÀŒK…„€‡@‡ ‡‚€ƒ‡‡†ˆ€…@…€ ‡€ˆƒ Œ€†€ƒ@ƒ@ƒ ƒ ƒƒƒ‚‚„‚„‚‚‚‚‚‚‚€€@@ ƒ €€ƒƒƒ‚ÿàˆ|Š ƒ0ƒƒƒ ƒ ƒƒƒƒƒ€‚€ƒÀƒÀƒ`ƒ`ƒ0ƒ0ƒƒƒ ƒ ƒƒƒƒƒƒ‚ÿþ‚ÿü”ƒ€‚à‚ð‚?ø‚?ø‚ü‚ü‚ÿþ‚ÿþ‚ÿ‚ÿ‚ÿ€‚ÿ€‚ÿÀ‚ÿÀ‚ÿà‚ÿà‚ÿð‚ÿð?‚ÿø?‚ÿø‚ÿü‚ÿüƒÿþƒÿþˆÿƒÿ?ƒÿ‚ÿþ‚ÿüa Ask Dialogron openCard end openCard on preOpenCard end preOpenCard on closeCard end closeCard on openStack end openStack ôb@„ ÿÿÿÿU Helveticaê P on doresize local twidth, iwidth put the width of this stack into twidth set the width of field 1 to twidth - 64 set the left of field 1 to 48 set the width of field 2 to twidth - 64 set the left of field 2 to 48 set the top of field 2 to the bottom of field 1 set the top of button 1 to the height of field 1 div 2 - 8 put (twidth - 120 ) div 3 into iwidth put iwidth into twidth set the default of button 2 to false repeat with i = 2 to the number of buttons set the left of button i to twidth set the bottom of button i to the height of this stack - 12 add the width of button i + iwidth to twidth end repeat set the default of button 2 to true end doresize on star local tstring put empty into tstring repeat with i = 1 to the number of characters in field 3 put "*" after tstring end repeat put tstring into field 2 end star on preOpenStack local twidth set the itemDelimiter to numToChar(0) set the fieldmode of me to word 2 of item 1 of the dialogData if item 2 of the dialogData is empty then set the title of this stack to space else set the title of this stack to item 2 of the dialogData put item 3 of the dialogData into field 1 put max(the formattedWidth of field 1 + 64,\ the formattedWidth of field 2 + 64, 320) into twidth set the width of this stack to twidth set the height of field 1 to the formattedHeight of field 1 set the top of field 1 to 8 set the height of this stack to (the height of field 1) + 100 doresize if the fieldmode of me is not "plain" then put item 4 of the dialogData into field 3 star else put item 4 of the dialogData into field 2 set the dialogData to numToChar(0) set the itemDelimiter to comma set the icon of button 1 to item itemOffset(the lookAndFeel,"Motif,Macintosh,Appearance Manager,Windows 95") of "330,994,994,998" end preOpenStack on keyDown which local tpos if the name of the target contains "field" and the fieldmode of me is not "plain" then put the selectedChunk into tpos put which into character (word 2 of tpos) to (word 4 of tpos) of field 3 star select after character (word 2 of tpos) of field 2 else pass keyDown end keyDown on deleteKey if the fieldmode of me is not "plain" then deleteone else pass deleteKey end deleteKey on backspaceKey if the fieldmode of me is not "plain" then deleteone else pass backspaceKey end backspaceKey on deleteone local tpos put word 2 of the selectedChunk into tpos put empty into character (tpos - 1) of field 3 star select before character (tpos - 1) of field 2 end deleteone on commandKeyDown which if the fieldmode of me is not "plain" then local tpos switch which case "D" put word 2 of the selectedChunk into tpos put empty into character tpos of field 3 star select before character tpos of field 1 break case "H" deleteone break default pass commandKeyDown end switch else pass commandKeyDown end commandKeyDown on openField select the text of the target end openField on resizeStack doresize end resizeStack on returnInField click at the loc of button "OK" end returnInField on closeStack put empty into field 1 put empty into field 2 put empty into field 3 end closeStack €@„ fieldmodeplainaî_\]` î‰0  \OKàL«pon mouseUp switch the fieldmode of this card case "plain" get field 2 break case "clear" get field 3 break case "password" get mcencrypt(field 3) break end switch set the dialogData to it close this stack end mouseUp B\4 ê]CancelàD«p+on mouseUp close this stack end mouseUp ¸\< ê _é`0( ` !`b8| ê a New ButtonÂB @$(J êëAnswer Dialogˆ’on resizeStack end resizeStack on openStack end openStack on preOpenCard end preOpenCard on openCard end openCard on closeCard end closeCard €ôÌp`macintoshIcons992,993,994,995 motifIcons328,329,330,331windows95Icons996,997,998,999 U HelveticaU helveticaê P qon preOpenStack local dtype, foffset, oldwidth, bwidth, twidth, iwidth, theight, curx, nchoices set the itemDelimiter to numToChar(0) if word 2 of item 1 of the dialogData is "plain" then hide button 1 put 0 into foffset else show button 1 switch the lookAndFeel case "Motif" get the motifIcons of this stack break case "Macintosh" case "Appearance Manager" get the macintoshIcons of this stack break default get the windows95Icons of this stack end switch put word 2 of item 1 of the dialogData into dtype set the itemDelimiter to comma set the icon of button "icon" to item itemOffset(dtype, "error,information,question,warning") of it set the itemDelimiter to numToChar(0) put 40 into foffset end if if item 2 of the dialogData is empty then set the title of this stack to space else set the title of this stack to item 2 of the dialogData put item 3 of dialogData into field 1 get item 4 of dialogData if it is empty then get "OK" put the number of lines in it into nchoices put 32 into bwidth if nchoices > the number of buttons - 1 then put the number of buttons - 1 into nchoices repeat with i = 2 to nchoices + 1 show button i set the name of button i to line nchoices + 2 - i of it set the width of button i to the formattedWidth of button i + 24 add the width of button i + 32 to bwidth end repeat set the dontWrap of field 1 to true put max(the formattedWidth of field 1 + foffset + 16, bwidth) into twidth if twidth > 600 then put 600 into twidth set the dontWrap of field 1 to false end if put the width of this stack into oldwidth set the width of this stack to twidth set the width of field 1 to twidth - foffset - 16 put the formattedHeight of field 1 + 68 into theight if theight > 400 then set the vScrollbar of field 1 to true put 400 into theight else set the vScrollbar of field 1 to false set the height of this stack to theight set the height of field 1 to theight - 68 set the top of button 1 to the height of field 1 div 2 - 12 set the topLeft of field 1 to foffset + 8, 8 put (twidth - bwidth) div (nchoices + 1) + 32 into iwidth put iwidth into curx if the lookAndFeel is "Macintosh" or the lookAndFeel is "Appearance Manager" then repeat with i = nchoices + 1 down to 2 set the left of button i to round(curx) add the width of button i + iwidth to curx set the bottom of button i to the height of this stack - 16 end repeat else repeat with i = 2 to nchoices + 1 set the left of button i to round(curx) add the width of button i + iwidth to curx set the bottom of button i to the height of this stack - 16 end repeat end if set the default of button 2 to true set the dialogData to empty end preOpenStack on closeStack repeat with i = 3 to the number of buttons hide button i end repeat set the default of button 2 to false end closeStack on mouseUp if the name of the target contains "button" then set the dialogData to the short name of the target close this stack end if end mouseUp p`zîØÙÚÝÞßà î‰@` Done!ziconÂBPon mouseUp end mouseUp ,(ä êØOKàD«` 20 êÙyàD£`g6' êÚYesàD£`ô69 êÝzàD£`÷4' êÞyàD£`°4' êßxàD£`i4' êàwàD£` 4) ê Execution ErrorÌon errorDialog which put which set the executionerror of card 1 of stack "Execution Error" to which modeless "Execution Error" send "refresh" to card 1 of stack "Execution Error" end errorDialog €4_¨ U HelveticaU helveticaU helveticaU helveticaU helveticaU helveticaU helveticaU helveticaU helveticaeExecution Error Card p çlocal ee, ec, er, eo, ei, et on returnInField send "mouseUp" to button "Ignore" end returnInField on returnKey send "mouseUp" to button "Ignore" end returnKey on closeCard set the errorobject of me to empty set the executionerror of me to empty put empty into ee put empty into field "Error Message" put empty into field "Object" put empty into field "Bad Token" put 0 into field "Line" put 0 into field "Column" end closeCard on preOpenCard set the loc of this stack to the screenLoc end preOpenCard on refresh local lc, em, tei, teo, ter, tec put empty into ei put empty into eo put empty into er put empty into ec put empty into et put empty into field "Error Message" put the executionerror of me & cr after ee put the number of lines in ee into lc if lc > 100 then delete line 100 to lc of ee if lc < 2 or the number of items in ee < 6 then hide button "Script..." hide button "Set Breakpoint..." put "thrown error" into field "Error Message" end if repeat with i = the number of lines in ee down to 1 get item 1 of line i of ee put line it of field "Messages" into em if em is "Object Name:" then put item 4 of line i of ee into tei put the long name of tei into teo else put em & cr before field "Error Message" if item 2 of line i of ee is not 0 then put item 2 of line i of ee into ter put item 3 of line i of ee into tec end if put tei & cr before ei put teo & cr before eo put ter & cr before er put tec & cr before ec put item 4 of line i of ee & cr before et end if end repeat delete last char of field "Error Message" seterror 1 set the hilitedLines of field 1 to 1 end refresh on openCard set the hilitedLines of field 1 to 1 end openCard on openStack end openStack on preOpenStack end preOpenStack on openBackground end openBackground on preOpenBackground end preOpenBackground on seterror which if line which of eo contains quote & "Message Field" & quote\ or "mctools.mc" is not in the frontscripts \ or word 1 of the mainStacks is not "Home" then hide button "Script..." hide button "Set Breakpoint..." else show button "Script..." show button "Set Breakpoint..." end if put line which of eo into field "Object" put line which of er into field "Line" put line which of ec into field "Column" put line which of et into field "Bad Token" set the errorobject of me to line which of ei end seterror €¨ errorobjectexecutionerror     Messages@ |´ e /Handler: Running low on memory, script aborted (recursionLimit: Recursion limit reached abs: error in source expression accept: bad expression &aclip: playLoudness is not an integer !acos: error in source expression acos: domain error add: error in matrix operation -add: destination has a bad format (numeric?) add: error in source expression add: can't set destination add: can't add array to scalar )aliasReference: error in file expression %Operators and: error in left operand &Operators and: error in right operand (Operators bitAnd: error in left operand )Operators bitAnd: error in right operand $annuity: error in period expression "annuity: error in rate expression %answer: error in question expression %answer: error in response expression "answer: error in title expression split: error in expression (arrowKey: error in direction expression arrowKey: not a direction !asin: error in source expression asin: domain error "ask: error in question expression ask: error in reply expression ask: error in title expression !atan2: error in first expression "atan2: error in second expression atan2: domain error !atan: error in source expression atan: domain error $average: error in source expression )base64Decode: error in source expression )base64Encode: error in source expression "baseConvert: bad destination base (baseConvert: error in source expression baseConvert: bad source base 'baseConvert: can't convert this number (baseConvert: destination is not base 10 beep: error in expression ,binaryDecode: destination is not a variable )binaryDecode: invalid data for parameter $binaryDecode: not enough parameters )binaryDecode: error in source expression )binaryEncode: invalid data for parameter $binaryEncode: not enough parameters )binaryEncode: error in source expression !Button: bad accelerator modifier !Button: family is not an integer %Button: menuButton is not an integer &Button: menuHistory is not an integer $Button: menuLines is not an integer #Button: mnemonic is not an integer %cancel: message id is not an integer &charToNum: error in source expression choose: error in expression choose: not a tool &Chunk: error in background expression Chunk: error in card expression Chunk: error in character range *Chunk: container is not a button or field !Chunk: error in chunk expression Chunk: error in item range Chunk: error in line range "Chunk: error in object expression %Chunk: error in range end expression 'Chunk: error in range start expression !Chunk: error in stack expression Chunk: error in text string Chunk: can't separate tokens Chunk: can't separate words Chunk: can't delete object Chunk: can't find object #Chunk: can't get object attributes 0Chunk: can't get value of destination container Chunk: can't get number Chunk: can't get source string Chunk: can't get substring Chunk: can't find substring Chunk: can't set attributes ,Chunk: can't store to destination container Chunk: can't set as a number Chunk: can't find background Chunk: can't find card Chunk: no such object Chunk: can't set property Chunk: can't find stack Chunk: no target found +Chunk: can't select object that isn't open !Chunk: source is not a container 'Chunk: can't find object to store into 'Chunk: can't get source from container &Chunk: destination is not a container click: script aborted )click: expression is not a button number !click: error in point expression !click: expression is not a point click: stack is not open clone: error in name expression clone: can't clone this object clone: stack is locked "clone: can't find object to clone close: error in name expression close: can't find stack #color: error setting selectedColor "compact: can't find stack to save compact: object is not a stack &compound: error in periods expression #compound: error in rate expression %compress: error in source expression ,compress: error occurred during compression $Operators &&: error in left operand %Operators &&: error in right operand #Operators &: error in left operand $Operators &: error in right operand *Operators contains: error in left operand +Operators contains: error in right operand #convert: can't read from container convert: can't set container !copy: invalid destination object $copy: can't find destination object copy: can't copy source object copy: can't find source object "copy: stack is password protected cos: error in source expression cos: domain error 5create: error in bad parent or background expression !create: error in name expression &create: error in file name expression %create: stack is locked (cantModify) crop: error in image expression crop: object is not an image $crop: error in rectangle expression $crop: expression is not a rectangle cut: can't find or copy object 'decompress: error in source expression *decompress: string is not compressed data 'decompress: error during decompression -delete: error in file or url name expression delete: can't find object disable: can't find object ,Stack: stack has not been given a file name "divide: error in matrix operation 0divide: destination has a bad format (numeric?) #divide: error in source expression divide: can't set destination %divide: can't divide scalar by array divide: range error (overflow) divide: divide by zero )Operators div: error in matrix operation %Operators div: error in left operand &Operators div: error in right operand -Operators div: can't divide scalar by matrix &Operators div: range error (overflow) Operators div: divide by zero do: aborted do: error in source expression do: error in statement do: error in expression !do: error in language expression 0do: unexpected end of line in source expression do: can't find command do: not a command do: license limit exceeded doMenu: error in expression "doMenu: don't know this menu item drag: script aborted drag: bad "button" number drag: bad end point expression drag: end point is not a point !drag: bad start point expression !drag: start point is not a point &driverNames: error in type expression !drives: error in type expression edit: can't find object $encrypt: error in source expression Operators =: error in operand "exp10: error in source expression exp10: domain error !exp1: error in source expression exp1: domain error !exp2: error in source expression exp2: domain error 5export: error in file (or mask file) name expression 'export: can't open file (or mask file) 5export: can't write to file, mask file, or container -export: no image selected, or image not open (export: selected object is not an image $Expression: error in numeric factor #Expression: error in string factor exp: error in source expression exp: domain error &extents: error in variable expression Factor: error in left operand Factor: error in right operand Field: bad text attributes %Field: hilitedLine is not an integer (Field: scrollbarWidth is not an integer Field: shift is not an integer *Field: tabstops is not a positive integer 2files: no permission to list files or directories filter: bad source string filter: bad pattern string filter: can't set destination find: bad source string flip: can't find image flip: object is not an image flushEvents: bad event type focus: not a valid control fontSizes: bad font name fontStyles: bad font name fontStyles: bad font size 0format: bad format string or parameter mismatch $Function: error in function handler %Function: error in source expression !Function: source is not a number Function: is not a number get: error in expression get: can't set destination %globalLoc: coordinate is not a point #go: error in background expression go: error in card expression go: error in stack expression go: error in window expression *go: can't attach menu to this object type go: can't find destination grab: can't find object graphic: not an integer Operators >=: error in operands Operators >: error in operands Group: backSize is not a point 'Group: hilitedButton is not an integer Group: bad object type %Operators (): error in right operand Handler: aborted Handler: error in statement 'Handler: error in parameter expression %Handler: not a valid parameter index !hasMemory: bad amount expression (hide: error in visual effect expression hide: can't find object (hostAddress: error in socket expression /hostAddressToName: error in address expression #hostName: error in name expression ,hostNameToAddress: error in name expression if-then: aborted 'if-then: error in condition expression if-then: error in statement Image: bad pixmap id !Image: hotspot is not an integer Image: id is not an integer .Image: id is already in use by another object $Image: image must be open to set id #Image: hotSpot x is not an integer #Image: hotSpot y is not an integer import: error in expression .import: can't open file, mask file or display .import: can't read file, mask file or display 1import: destination stack is locked (cantModify) insert: can't find object insert: license limit exceeded intersect: two objects required $Operators is: error in left operand %Operators is: error in right operand %Operators is: can't compare operands 6Operators is: left operand of 'within' is not a point ;Operators is: right operand of 'within' is not a rectangle %isNumber: error in source expression "isoToMac: error source expression #Operators ,: error in left operand $Operators ,: error in right operand "keys: parameter is not a variable kill: no such process kill: bad number (launch: error in application expression #length: error in source expression Operators <=: error in operands Operators <: error in operands ln1: error in source expression ln1: domain error ln: error in source expression ln: domain error load: error in url expression "load: error in message expression $localLoc: coordinate is not a point "log10: error in source expression log10: domain error !log2: error in source expression log2: domain error 'longFilePath: error in file expression "macToIso: error source expression mark: bad card expression mark: error in find expression +matchChunk: can't set destination variable %matchChunk: bad or missing parameter (matchChunk: error in pattern expression 'matchChunk: error in source expression (matrix: range error in matrix operation +matrixMultiply: error in source expression ,matrixMultiply: can't multiply these arrays max: error in source expression *MCISendString: error in source expression &MD5digest: error in source expression #median: error in source expression "merge: error in source expression .Operators -: can't subtract array from scalar #Operators -: error in left operand $Operators -: error in right operand 7Operators -: range error (overflow) in array operation $Operators -: range error (overflow) min: error in source expression )Operators mod: error in matrix operation %Operators mod: error in left operand &Operators mod: error in right operand -Operators mod: can't divide scalar by matrix &Operators mod: range error (overflow) Operators mod: divide by zero "mouse: error in source expression move: script aborted move: can't find object move: bad end point expression move: bad duration expression move: duration is not a number move: end point is not a point !move: bad start point expression !move: start point is not a point $multiply: error in matrix operation 2multiply: destination has a bad format (numeric?) %multiply: error in source expression multiply: can't set destination )multiply: can't multiply scalar by array !multiply: range error (overflow) Operators <>: error in operands &Operators not: error in right operand )Operators bitNot: error in right operand &numToChar: error in source expression !Object: bad textAlign expression Object: unknown color Object: error in colors =Object: can't set layer (card not open, or control in group) Object: not a textStyle 6Object: stack locked, or object's script is executing +Object: object does not have this property !Object: height is not an integer Object: layer is not an integer !Object: margin is not an integer /Object: value is not a boolean (true or false) Object Name: #Object: property is not an integer "Object: coordinate is not a point )Object: rectangle does not have 4 points Object: no Home stack &Object: pixel value is not an integer !Object: pixmap is not an integer /Object: can't set script while it is executing Object: can't set this property %Object: textheight is not an integer #Object: textsize is not an integer )offset: error in start offset expression !offset: error in part expression "offset: error in whole expression "open: error in message expression open: error in name expression /open: no permission to open files or processes $Operators or: error in left operand %Operators or: error in right operand 'Operators bitOr: error in left operand (Operators bitOr: error in right operand 'Operators /: error in matrix operation #Operators /: error in left operand $Operators /: error in right operand +Operators /: can't divide scalar by matrix $Operators /: range error (overflow) Operators /: divide by zero param: error in expression param: bad parameter index "param: error in source expression param: is not a number $paste: stack is locked (cantModify) (peerAddress: error in socket expression =place: group is not in this stack or is already on this card place: can't find group place: can't find card place: source is not a group !place: destination is not a card $play: can't get sound or movie name play: bad movie location play: bad movie options #Operators +: error in left operand $Operators +: error in right operand $Operators +: range error (overflow) pop: can't set destination post: can't get source post: can't get destination pow: error in left operand pow: error in right operand pow: range error (overflow) ,print: can't get 'from' or 'to' coordinates !print: can't get number of cards print: can't get rectangle print: error printing 'print: error writing file (disk full?) print: coordinate not a point %print: expression is not a rectangle print: not a card .print: card or stack must be open to print it print: no card specified arcAngle: not an integer blinkRate: not a number penColor: bad color "colormap: bad color name or value )Object: error counting objects as number 'Object: error counting objects as text dragSpeed: not a number effectRate: not a number extendKey: not a number Property: bad array expression gridSize: not an integer idleRate: not a number lineSize: not an integer moveSpeed: not a number multiSpace: not a number polySides: not an integer repeatDelay: not a number repeatRate: not a number !doubleClickDelta: not an integer doubleClickTime: not a number roundRadius: not an integer slices: not an integer startAngle: not an integer traceDelay: not a number traceStack: not a stack name print: bad property value syncRate: not a number tooltipDelay: not a number typeRate: not a number userLevel: not an integer beep: not an integer brush: not an integer brush: can't find image #brushPattern: not a valid image id brushPattern: can't find image "Object: no object to set property "Object: can't set object property cursor: not an integer cursor: can't find image 5Property: value is not a boolean ("true" or "false") Property: value is not a number defaultStack: can't find stack !defaultMenuBar: can't find group $Object: does not have this property #Object: property is not an integer !penPattern: not a valid image id penPattern: can't find image 'randomSeed: property is not an integer socketTimeout: not a number "umask: property is not an integer push: object is not a card push: can't find card put: error in expression put: can't set destination put: can't put into destination *queryRegistry: error in source expression #random: error in source expression read: aborted read: error in 'at' expression $read: error in condition expression read: error in count expression read: error reading read: count is not an integer "read: error in 'until' expression read: file is not open read: error in 'for' expression read: process is not open !record: error in file expression -recordCompression: type must be 4 characters 'recordInput: type must be 4 characters remove: can't find object remove: object is not a group remove: object is not a card #rename: error in source expression (rename: error in destination expression repeat: aborted ,repeat: error in 'for' condition expression repeat: error in statement .repeat: error in 'until' condition expression .repeat: error in 'while' condition expression 1repeat: error in 'with' end condition expression 3repeat: error in 'with' start condition expression 2repeat: error in 'with' step condition expression &repeat: error setting 'with' variable replace: can't set container %replace: error in pattern expression )replace: error in replacement expression 'replace: error in container expression replaceText: bad parameter replaceText: bad source string #reply: error in keyword expression #reply: error in message expression %request: error in keyword expression %request: error in message expression %request: error in program expression 'request: no permission to request that "getResources: error in expression (getResources: no permission to get that return: error in expression revert: can't revert Home stack #rotate: error in object expression rotate: object is not an image "rotate: error in angle expression +round: error in source or digit expression $save: error in file name expression save: saving disabled save: can't find stack to save save: object is not a stack $seek: error in file name expression !seek: error in offset expression seek: file is not open select: can't select target 3selectedChunk: error in button or field expression &selectedButton: bad family expression -selectedButton: bad parent object expression )send: error in message handler execution "send: error in message expression send: error in 'in' expression "send: error in program expression send: bad target expression !send: no permission to send that set: error in source expression set: can't set property 2setRegistry: no permission to get or set registry (setRegistry: error in source expression shell: aborted shell: can't run shell command "shell: error in source expression %shell: no permission to run commands (shortFilePath: error in file expression (show: error in visual effect expression #show: error in location expression *show: error in number of cards expression )show: location is not in proper x,y form show: can't find object sin: error in source expression sin: domain error sort: can't find object to sort sort: error sorting sort: can't find field ,specialFolderPath: error in type expression !sqrt: error in source expression sqrt: domain error Stack: bad decoration 4Stack: invalid id (must be greater than current id) Stack: invalid key Stack: bad substack name ,Stack: can't set mainStack (has substacks?) "Stack: deskIcon is not an integer #Stack: userLevel is not an integer Stack: size is not an integer #Stack: stack is password protected Stack: can't find mainStack Stack: stack is not a mainStack *Stack: error in external function handler start: can't find object start: stack is locked !start: expression is not a group start: license limit exceeded $Handler: error in source expression Handler: can't find handler stdDev: error in expression stop: error in expression stop: target is not a group $subtract: error in matrix operation 2subtract: destination has a bad format (numeric?) %subtract: error in source expression subtract: can't set destination +subtract: can't subtract array from scalar subwindow: error in expression &subwindow: can't find stack or button sum: error in source expression &switch: error in condition expression !switch: error in case expression switch: error in statement !textHeightSum: can't find object tan: error in source expression tan: domain error "there: error in source expression "throw: error in source expression 'Operators *: error in matrix operation #Operators *: error in left operand $Operators *: error in right operand $Operators *: range error (overflow) $toLower: error in source expression %topStack: error in source expression $toUpper: error in source expression $transpose: source is not a variable &transpose: can't transpose this array "trunc: error in source expression try: error in statement type: script aborted type: bad string expression ungroup: can't find group ungroup: target is not a group &uniDecode: error in source expression &uniEncode: error in source expression unload: error in url expression *unlock: expression is not a visual effect &urlDecode: error in source expression &urlEncode: error in source expression #urlStatus: error in url expression "value: error in source expression "value: error executing expression value: can't find object Array: bad index expression Chunk: source is not a number visual: bad effect expression wait: aborted wait: error in expression !wait: expression is not a number within: can't find control within: not a point write: error in expression (Operators bitXor: error in left operand )Operators bitXor: error in right operand  IgnoreÀ «pIon mouseUp # set executionError to empty close this stack end mouseUp ,|D e Perror Field ÿÿÿÿÿÿ0H   8< e Object: Script...À£pQon mouseUp editScript the long id of the errorobject of this card end mouseUp ˜|O e Object @8Ô$ e HelpÀ«pon mouseUp help end mouseUp ´|D eSet Breakpoint...À£p5on mouseUp modeless "Script Debugger" end mouseUp  |ˆ e Error Message·)píon mouseDoubleUp which if which is 3 and there is a file "eetext" then set the cursor to watch open file "eetext" read from file "eetext" until eof put it into field "Messages" close file "eetext" beep 1 else local term put item 1 of the clickText into term if there is a card term of stack "MetaTalk Reference" then go to card term of stack "MetaTalk Reference" end if end mouseDoubleUp on mouseUp seterror the hilitedlines of me end mouseUp (  `ÿ &  Bad Token N\Æ e  Ç\‡ e Processing Token:  `\@ e Column: Line 0\0 e 0  \, e Line: Column  \' e 0