p CHANGE
start   ny
        pnd
        ppr 
        ppr
        ppr         CHANGE AN ADDRESS
        ppr         -----------------
        ppr  Enter name of addressee and Return.
        ppr               then
        ppr edit the file using the standard keys.
        ppr When you have finished making changes
        ppr    type: CONTROL-P   done   Return
        ppr         -----------------
        ppr
        ppr
enter   ny
        pin Enter name of addressee: =$a
        laddresses
        f/$a/
        ?
        pqt
notfnd  ny
        ppr Name not found  - Check spelling?
        ppr Did you capitalize name?
again   ppr
        pin Try name again (y or n)?:  =$d
        pcs/$d/y/
        pgo enter
        pcs/$d/Y/
        pgo enter
        pcs/$d/N/
        pgo quit
        pcs/$d/n/
        pgo quit
        ppr 
        pgo notfnd
quit    ny
        pdo write