/* zamieï_wyrazy.atxt
 * Autor: Maciaîek Grzegorz
 * $VER: zamieï_wyrazy 1.0 (10.05.96)
 * Skrypt przeznaczony do edytora AmiTekst.
 * Zmienia wyraz na którym stoi kursor z poprzednim.
 */

OPTIONS RESULTS
ADDRESS "AmiTekst_port"

STATUS markblockmode		/* wyîâcz blok jeûeli jest */
IF RESULT~=0 THEN MARKBLOCK

BEGOFWORD
MARKBLOCK			/* zaznacz blok */
ENDOFWORD
RIGHT

CUTBLOCK			/* wytnij wyraz */
PREVWORD			/* na poczâtek poprzedniego */
PASTEBLOCK			/* wstaw wyciëty (drugi) wyraz */

EXIT 0