你可能想給一個字符串變量複製到另一個。有一個特殊的詞，命名“CMOVE”。
它以兩個字符串並複製字符的給定數目從源到目的地。讓我們
看看這個例子：
: place over over >r >r char+ swap chars cmove r> r> c! ;
create one 16 chars allot \ define the first string
create two 16 chars allot \ define the second string
s" Greetings!" one place \ initialize string one
one dup \ save the real address
count \ get the length of string one
1+ \ account for the count byte
swap drop \ get the real address
two swap \ get the order right
cmove \ copy the string
two count type cr \ print string two
最困難的部分，了解可能是為什麼，以及如何建立數據“CMOVE”。
好吧，“CMOVE”希望看到在堆棧中的值： source destination #chars
用表達：
one count
我們得到的堆棧這些數據：source+1 length
但數字節尚未占到至今。
這就是為什麼我們地址：
1+
所以，現在這個參數的正確值。
現在我們要恢復的字符串的地址，而且告訴“CMOVE”在哪裡串1的內容複製到。
最初，我們得到了正確的地址。
這就是為什麼我們救了它使用：Dup
現在，我們擺脫了“損壞”的地址發出：swap drop
這就是我們得到了現在：source #chars
如果我們簡單地添加：two
該數據還沒有出現在正確的順序：source #chars destination
所以，我們為了得到它的權利添加額外的“交換”。
當然，你可以定義一個詞，照顧所有的：
: place over over >r >r char+ swap chars cmove r> r> c! ;
: copy$ swap dup count 1+ swap drop rot swap cmove ;
create one 32 chars allot
create two 32 chars allot
s" Greetings!" one place
one two copy$