//DESCRIPTION: Set or find a quickmark 
//Peter Kahrel 
 
if( 'Text|Character|Word|Paragraph|InsertionPoint'.indexOf(  
    app.selection[0].constructor.name ) < 0 ) 
    exit(); 
 
doc = app.activeDocument; 
dlg = app.dialogs.add( { name:'Quickmark' } ); 
with( dlg ) 
    with( dialogColumns.add() ) 
        qm = textEditboxes.add( { editContents : 'f' } ); 
if( !dlg.show() ) 
    { dlg.destroy(); exit(); } 
response = qm.editContents.toLowerCase(); 
dlg.destroy(); 
switch( response ) 
    { 
    case 's' : case 'q' : quickmarkSet(); break; 
    case 'f' : quickmarkFind(); 
    } 
 
function quickmarkSet() 
{ 
if( doc.bookmarks.item('quickmark') != null ) 
    { 
    doc.bookmarks.item( 'quickmark' ).remove(); 
    doc.hyperlinkTextDestinations.item( 'quickmark' ).remove(); 
    } 
doc.bookmarks.add(  
    doc.hyperlinkTextDestinations.add( app.selection[0], { name: 'quickmark' } ), 
    { name : 'quickmark' } ); 
} 
 
function quickmarkFind() 
{ 
if( doc.bookmarks.item('quickmark') != null ) 
    app.activeDocument.bookmarks.item( 'quickmark' ).showBookmark() 
else 
    alert( 'No quickmarks here' ); 
}