記事閲覧

− 野ざらし言 −

4459 Re^3: 第二の置換

文太 2018/08/12(Sun) 01:13 [4458]へのコメント
　グローバルまたぎをしてみて、反省しました。いけません、汚いです。
　ほとんど進歩していませんが、これで保存します。あーん、これ、すてき、
めざらさんにヒントをもらったんだ、と思い出すことでしょう。


=== CleanPS.def (ver 2) by B ===; Search with clean PS, shift heavy.
#if 0
inspiration from mezala!
ＰＳを汚さないイミディエットサーチ。シフトで下方を、ノーマルで上方を検索。
２個目、３個目の検索コマンド。セカンド＃Ｆ、サード＃Ｆ。
いつでも＃ｅします。違う文字列で検索するなら＃ｘするか、★行をコメントアウト。
自前ヒストリーをＰＳとすりかえ、イミサーチにしてるだけ。
#endif

* M
10 ^D "2nd #F" ?.
        k=ks&1,
        &00 
	ps[=a,
        	#F
        	#e			;★コメントアウトあり
        	(k)? {&m("　Search　↓↓　＾ｒ／＾ｃ不可")} 
        	   ? {&m("　Search　↑↑　＾ｒ／＾ｃ不可")}
        	&Cr (r<0)? >z
		(k)? #c ? #r
;		(k)? #r ? #c		;★下方サーチが多いならこっち
		(r)?? &m("%s",a)	;　上のメッセージも反転せよ
:z	ps], .
00:     a=5+$,."$(50,0)$[80]"

20 ^S "3rd #F" ?.
        k=ks&1,
        &01
	ps[=b,
        	#F
        	#e			;★コメントアウトあり
        	(k)? {&m("　Search　↓↓　＾ｒ／＾ｃ不可")} 
        	   ? {&m("　Search　↑↑　＾ｒ／＾ｃ不可")}
        	&Cr (r<0)? >z
		(k)? #c ? #r
;		(k)? #r ? #c		;★下方サーチが多いならこっち
		(r)?? &m("%s",b)	;　上のメッセージも反転せよ
:z	ps], .
01:     b=5+$,."$(50,0)$[80]"

*

関連記事一覧ツリー （▼ を押すとツリー全体を一括表示します）

▼ - 4456.第二の置換 - めざら 18/08/10-00:36

返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

おなまえ　：
Ｅメール　：
タイトル　：
メッセージ： 通常モード(推奨)　 整形モード(非推奨)　 preモード(空白再現)
※ プログラムコード等を含まない場合は，できるだけ通常モードをご利用ください。

参照先　：
暗証キー： (英数字で8文字以内) プレビューなし

- 以下のフォームから自分の投稿記事を修正・削除することができます -

処理 記事No. 暗証キー