#!/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 "$@" Email converter04= revstackfalse Menubar 1 @4= theTEXT)`L4 cREVGeneral revUniqueID 1010777643746  `@#M Menubar 1Id cREVGeneral bookmarks handlerListscriptSelection char 1 to 0 prevHandler tempScriptscriptFileŋU--The following menuPick handler was generated by the Menu Manager. on menuPick pWhich switch pWhich case "Quit" quit break end switch end menuPick &Quit/Q cREVGeneralscriptChecksumE!j dž64n bookmarks handlerListmenuPickscriptSelectionchar 122 to 121 prevHandlermenuPick tempScriptscript

--The following menuPick handler was generated by the Menu Manager.

on menuPick pWhich

switch pWhich

case "Quit"

quit

break

end switch

end menuPick

EditŋU--The following menuPick handler was generated by the Menu Manager. on menuPick pWhich switch pWhich case "Cut" cut --Insert script for Cut menu item here break case "Copy" copy --Insert script for Copy menu item here break case "Paste" --Insert script for Paste menu item here if the clipboard is "text" then paste break case "Clear" --Insert script for Clear menu item here delete the selectedChunk break case "Select All" --Insert script for Clear menu item here if the focusedobject contains "field" then select text of the focusedobject end if break end switch end menuPick /Cu&t/X &Copy/C &Paste/V Clea&r - Select &All/A cREVGeneralscriptChecksum:_0ݠ(> bookmarks handlerListmenuPickscriptSelectionchar 618 to 617 prevHandlermenuPick tempScriptscript

--The following menuPick handler was generated by the Menu Manager.

on menuPick pWhich

switch pWhich

case "Cut"

cut

--Insert script for Cut menu item here

break

case "Copy"

copy

--Insert script for Copy menu item here

break

case "Paste"

--Insert script for Paste menu item here

if the clipboard is "text" then paste

break

case "Clear"

--Insert script for Clear menu item here

delete the selectedChunk

break

case "Select All"

--Insert script for Clear menu item here

if the focusedobject contains "field" then

select text of the focusedobject

end if

break

end switch

end menuPick

HelpŋU--The following menuPick handler was generated by the Menu Manager. on menuPick pWhich switch pWhich case "Help" put "Paste text to convert into the field." & return \ & "Press the Add Comments button to add '>' characters to each line." & return \ & "Press No Comments button to remove '>' characters from each line" & return & return \ & "When finished, press the 'Copy to Clipboard' button" & return \ & "and paste into your Email client" into themsg Answer information themsg titled "Help" break case "About" Answer information "Created for Chick Walters and Dave Thelen" &\ return & "by Chipp Walters" titled "About" break end switch end menuPick ;"&Help - About cREVGeneralscriptChecksum-Kjjc=G bookmarks handlerListmenuPickscriptSelectionchar 467 to 466 prevHandlermenuPick tempScriptscriptv

--The following menuPick handler was generated by the Menu Manager.

on menuPick pWhich

switch pWhich

case "Help"

put "Paste text to convert into the field." & return \

& "Press the Add Comments button to add '>' characters to each line." & return \

& "Press No Comments button to remove '>' characters from each line" & return & return \

& "When finished, press the 'Copy to Clipboard' button" & return \

& "and paste into your Email client" into themsg

Answer information themsg titled "Help"

break

case "About"

Answer information "Created for Chick Walters and Dave Thelen" &\

return & "by Chipp Walters" titled "About"

break

end switch

end menuPick

addcomment.gif@ GIF89a SSSppp \\\)))===333|||GGGfff!, I8ͻ` Q 3CK&!$ B hRHC5 :kכRU< jt13DE z0YE@Q6 HV;!; cREVGeneral revUniqueID 1011157623310nocomment.gif@ IGIF89a 0SS))pp \\e||33ppp333 GG\\\=====)))|||SSSwyiifffffGGGQQ VVJ::]MMKKgVVbb!0, @pH,Ȥrl `AA +&pDa=pp `$%ďAX R,K|J[R "IwFR/!H_bDQ FQ EB 0dR}CR C)*0nD RFDxC흆+"B_=(HE[2 B/b&d:f ׄ #lH8. ,"ni'/GCN(fJ0l"[|L" W`S0.k…!Ѫ5rb+EH;HDR̘ns8ˀ@\hLe#A; cREVGeneral revUniqueID 1011157627175 nocommentgphon mouseUp replace ">" with "" in fld "theTEXT" replace " " with " " in fld "theTEXT" end mouseUp R4 revScriptfalseRemove Comments No Comments cREVGeneralscriptChecksum\IC"%9s bookmarks revUniqueID 1011157662908 handlerListmouseUpscriptSelection char 1 to 0 prevHandler mouseEnter tempScriptscript

on mouseUp

replace ">" with "" in fld "theTEXT"

replace " " with " " in fld "theTEXT"

end mouseUp

 addcommentgpO--on mouseEnter -- set the showborder of me to true --end mouseEnter -- --on mouseLeave -- set the showborder of me to false --end mouseLeave on mouseUp put fld 1 into ttext repeat for each line L in ttext put ">" & L & return after ntext end repeat put ntext into fld 1 replace " " with " " in fld 1 end mouseUp VR4 Add Comments Add Comments cREVGeneralscriptChecksump$i"m bookmarks revUniqueID 1011157662908 handlerListmouseUpscriptSelectionchar 227 to 226 prevHandler mouseEnter tempScriptscript^

--on mouseEnter

-- set the showborder of me to true

--end mouseEnter

--

--on mouseLeave

-- set the showborder of me to false

--end mouseLeave

on mouseUp

put fld 1 into ttext

repeat for each line L in ttext

put ">" & L & return after ntext

end repeat

put ntext into fld 1

replace " " with " " in fld 1

end mouseUp

clipboard.gif@d nGIF89a ---RRRuuuDDD888 !!!eee!,  $dihl름(Ļ*@h6#p @ /`u.m x,QcԀIPcE,  -JB}(8Y `'oY'CY% XM %j( N%  $]jLM:'M ) pM|)  _ + 钕.DjFlR@H; cREVGeneral revUniqueID 1011159652517Copygp:on mouseUp select the text in fld 1 copy end mouseUp e4 Add CommentsCopy to Clipboard cREVGeneralscriptChecksumvw'|xɢ bookmarks revUniqueID 1011157662908 handlerListmouseUpscriptSelection char 57 to 56 prevHandler mouseEnter tempScriptscript

on mouseUp

select the text in fld 1

copy

end mouseUp