.#ýü! 6& searchþ ' require,*ü" 10 $ cbuf+ ' whatbuf°$ cbuf*ü" 11 ! n+ + buffer_list°! n*ü" 12 # buf $ file % flags+*ü" 13 # pat # rep+ýü" 15( Replace: + Null_String + Null_Stringþ ) read_mini°# patýü" 16 # patþ & strlen.w/býü" 17- Replace with: + Null
_String + Null_Stringþ ) read_mini°# repü" 19 ) push_spotü" 21 5 REPLACE_PRESERVE_CASE°> REPLACE_PRESERVE_CASE_INTERNALýü" 22 # repþ & strlený # patþ & strlenAýý # repþ & strlowý # patþ & strlowþ & strcmpNC.ü" 23! 0°> REPLACE_PRESERVE_CASE_INTERNAL/cü" 2
5" -1ý" -1þ / prefix_argumentB.ü" 26 > REPLACE_PRESERVE_CASE_INTERNALN°> REPLACE_PRESERVE_CASE_INTERNAL/c./..ü" 28 ! n/.ü" 30°# buf¹! nýü" 33! 0 # buf!" 42Aý! 0 # buf!" 32AD.u/cýü" 35 # bufþ & sw2bufü" 37 + getbuf_info°% flagsPP°$ fileýü" 40 $ fileþ
 & strlen % flags! 8FD.u/bü" 44 - push_spot_bob.ü" 47 ( pop_spot/nýü" 50}6 search_search_function # pat # rep! 1ü" 51}2 replace_do_replaceþü" 50 2 replace_with_queryü" 52 ( pop_spot/f/.ýü" 56 $ cbufþ & sw2bufü" 57 ( pop_spotýü" 58 ! nþ & _pop_nü" 59! 
0°> REPLACE_PRESERVE_CASE_INTERNAL/‡ýü" 62% Done.þ ' messageü! 8y; replace_across_buffer_files