This AppleWorks script makes a new database document containing all words in the active text document marked for inclusion, along with page numbers.



This is one of 40 scripts in the Enhancement Pack for AppleWorks.


The “Index” item is in the Word Processing sub-menu of AppleWorks Scripts Menu.

To use the script:
    1. With your word processing document open, select the Index script in the Scripts: Word Processing menu.
    2. A new Inclusions list will open. Add the words that you want to include in the index.
    3. When all the inclusions are entered, activate the word processing document and run the Index script again.
    4. When the indexing has finished, Switch to the Summary Sorted report to view or the Edit report to edit the records.

Operates on the text body of the front word processing document.

This script works with AppleWorks 6. A limited AppleWorks 5 version might be developed if there is a lot of demand (page numbers and database records are very difficult or impossible to script).

Only registered users are permitted to use the supplied files after 14 days or edit them.

This script is included in the Enhancement Pack for AppleWorks, not supplied separately.

This script is read only. Here’s an extract of some important statements:

set inclusionsList to value of field "Word" in every record in database of inclusionsDoc

     if wordText is in inclusionsList then
       set pageN to page index of thisWord
       make new record at end in database of indexDoc with data {|word|:wordText, page:pageN}
     end if

Please email us any queries about this page.