ときどきの雑記帖 RE* (新南口)

水色の雨

3199

「ヤマトよ永遠に」ベースだと 2クール(劇場公開で7章)分にするのは 大変そうと思っていたら IIIからも持ってくるらしい?

まあ2205でボラー連邦出てきたしねえ。

ノイエ銀英伝

TV放送が第三章に(次回からだけど)。

ふと気になったのだけど、第5章は「また」 クリフハンガーで、いいところで切ってしまうんじゃないだろうか?

第一章と第三章を見るとねえ…

「銀英伝 Die Neue These」7月2日からサードシーズン「激突」突入　ラインハルトが友の死に涙するPV公開 : ニュース - アニメハック

ガンダム＠玉

今週は「再会、母よ…」 やっぱり劇場版とはだいぶ印象が違う。 あと、この回で「空中換装」が初登場。

Words you can spell with a calculator

7セグメントの数字で表すことのできる英単語

  % grep -i '^[izehsglbo]*\([izehsglb]\|[izehsglb]o\)$' /usr/share/dict/words

最終回

長谷川哲也「ナポレオン」22年の連載に幕　ナポレオンの栄光と挫折を描いた大河ロマン - コミックナタリー

前回で皇帝の棺がパリに帰還するまで描いていたので 最終回はどう〆るのか気になっていたのだけど、 なるほどそう来たかという最終回だった

新刊近刊

もっと調べる技術

Amazon.co.jp: もっと調べる技術: 国会図書館秘伝のレファレンス・チップス2 : 小林 昌樹: 本

調べる技術 の続編が出ていた。

MIFES

Amazon.co.jp: MIFES革命1985: エディタはワープロを超えた・文章とソースを書いた20世紀の個人史 eBook : 川俣 晶: Kindleストア

川俣さんの新刊。見出しのこの辺が気になる

Turbo Pascalのエディタ

sed・自動化されたテキスト編集

GNU sedのソースを書き換えて使う

決め手となるawk来る

書式整形はxtrで

Perlという名の災厄

LL(軽量言語)ブームの憂鬱

awk

勝手にレビューシリーズ(謎)

awkコマンドで99.0タイルを取得 #Linux - Qiita

cat ファイル名 | sort -n | awk 'BEGIN{c=0} length($0){a[c]=$0;c++]END{pt=(c/100*(100-99)); pt=pt%1?int(pt-0.5)+1:pt; print a[c-pt-1]}'

最初は違う数字が入っていたのかもしれないけど c/100*(100-99)はc/100でいいんじゃなかろうか?

length($0){ にちょっと悩んだけど、これレコードが空かどうか(=長さが0でないか)を見てるのか。 確かにそれで判定できるけど、 実はlengthは引数(とカッコ対)を省略することができて その場合は暗黙に$0が対象になるのでlength{でも同じ結果が得られる。 まあお行儀はよろしくないけど。

The GNU Awk User’s Guide

あるいはNF{とか。 いずれにしても横着しないで NF>0{のようにした方が未来の自分に親切かもしれない (が、onelinerにそこまで配慮が必要か問題)

それとこの例だとBEGIN節は丸ごといらない(変数は0で初期化されるから)けど その辺はまあお好みで

もうひとつ二つあるけど省略😄

FORTRAN Compiler on IBM 704

4ワードを一つの単位にして コンパイルしているってのは見当がつくんだけど、 そこ止まりでよくわからん

ES0440 TSX CIT00,C           COMPILE FLOATING INSTRUCTIONS, WHEN        4F15678 
       HTR L(0)              RESULT ON RIGHT IS IN ACC                  4F15679 
       HTR L(LRS)                                                       4F15680 
       HTR L(0)                                                         4F15681 
       HTR DEC18                                                        4F15682 
       TSX CIT00,C                                                      4F15683 
       HTR L(0)                                                         4F15684 
       HTR L(ORA)                                                       4F15685 
       HTR O(                                                           4F15686 
       HTR L(0)                                                         4F15687 
       TSX CIT00,C                                                      4F15688 
       HTR L(0)                                                         4F15689 
       HTR L(FAD)                                                       4F15690 
       HTR O(                                                           4F15691 
       HTR L(0)                                                         4F15692 

COMP   TSX CIT00,C                                                      4F15758 
       HTR CW                                                           4F15759 
       HTR CW+1                                                         4F15760 
       HTR CW+2                                                         4F15761 
       HTR CW+3                                                         4F15762 
       TRA 1,B                                                          4F15763 

CP6000 TSX FLTR00,4          COMPILE FLOW TRACE INFORMATION AND THEN    4F158512
           CW                COMPILE LXD 7(TYPE =,4                     4F158513
           CW+1                                                         4F158514
           CW+2                                                         4F158515
           CW+3                                                         4F158516
       TRA ES0000                                                       4F158517

Hugo メモ

今使っているのとだいぶ離れたなあ… そろそろどうにかしないといかんか。

switch

メモ。 もっと関連している投稿あるんだろうけど まあそこは(ごにょごにょ

int 21h

adddrvじゃなくadddev? と思ったがこれのことかな?

まあadddrvだとソースコード公開されてないよねえ

ソースコードの問題の個所はこの辺か

adddev/adddev.asm at main · lpproj/adddev

IF 1
	mov	ax, word ptr ds:[2ch]		;Env       Seg	; lpproj
	dec	ax				;Env  MCB  Seg	; lpproj
	push	ax				;Env  MCB  Seg	; S_HAY ; lpproj
	mov	es, ax				;Env  MCB  Seg	; S_HAY ; lpproj
	cli					;(to be safe for MCB manipulation)	; lpproj
	mov	word ptr es:[0001h], 0		;free Env Seg w/o func 49h		; lpproj
	mov	word ptr ds:[2ch], 0		;remove Env from current PSP		; lpproj
ELSE
	mov	es, word ptr ds:[2ch]		;Env       Seg	; S_HAY
	mov	ah, 49h						; S_HAY
	msdos							; S_HAY
	push	ax				;Env  MCB  Seg	; S_HAY
	mov	es, ax				;Env  MCB  Seg	; S_HAY
	cli					;(to be safe for MCB manipulation)	; lpproj
	; NOTE by lpproj:
	; On genuine PC/MS-DOS, NTVDM, OS/2 MVDM and DR DOS,
	; when func 49h (free memory block) is successful, it will return
	; released MCB address to AX. It may be "undocumented" feature.
ENDIF
Ringworld ≪ prev
next ≫ 大きな玉ねぎの下で