記事閲覧

− 野ざらし言 −

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!
PSを汚さないイミディエットサーチ。シフトで下方を、ノーマルで上方を検索。
2個目、3個目の検索コマンド。セカンド#F、サード#F。
いつでも#eします。違う文字列で検索するなら#xするか、★行をコメントアウト。
自前ヒストリーをPSとすりかえ、イミサーチにしてるだけ。
#endif

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

*


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

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

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


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

処理 記事No. 暗証キー