在AppleScript中，可以使用字符串的替换函数来替换文本中的字符。以下是一个示例代码：

set myString to "Hello, World!"
set myCharacter to "o"
set myReplacement to "a"

set modifiedString to my replaceText(myString, myCharacter, myReplacement)

on replaceText(theText, oldString, newString)
    set AppleScript's text item delimiters to oldString
    set theTextItems to every text item of theText
    set AppleScript's text item delimiters to newString
    set theModifiedText to theTextItems as string
    set AppleScript's text item delimiters to ""
    return theModifiedText
end replaceText

在上面的示例中，我们定义了一个自定义的replaceText函数，它接受三个参数：theText（要替换的文本），oldString（要替换的字符）和newString（替换后的字符）。

该函数首先将AppleScript的文本项目分隔符设置为oldString，然后使用text item delimiters和every text item of来将文本拆分为多个项目。接下来，将newString用作新的文本项目分隔符，然后将所有项目合并为一个字符串。最后，将AppleScript的文本项目分隔符重置为空字符串，以确保不影响其他代码。

使用上述示例代码，您可以使用replaceText函数来替换文本中的字符。例如，下面的代码将替换字符串"Hello, World!"中的字母o为字母a：

set myString to "Hello, World!"
set myCharacter to "o"
set myReplacement to "a"

set modifiedString to my replaceText(myString, myCharacter, myReplacement)

执行上述代码后，modifiedString将包含替换后的字符串"HellA, WArld!"。