2013年12月30日(月) 旧暦 [n年日記] [更新:"2014/01/19 15:53:54"]
#1 [無線] Stew Perry TopBand Distance Challenge (TBDC)
を使うと、交信した
Grid Square の地図
が出来るN1MM から File -> Export -> Export ADIF to file -> Export ADIF to file by date
ここで開始の日時を聞くので、コンテスト開始より前の日時情報を入力して OK
(間違えると Nothing to Export と言われる)
2012 の日記
ここ三年間の時刻別、大陸別交信数 (時刻は UTC)
(2011) LP (70W)
(1.8) 17 18
15 16 17 18 19 20 7 8 9 TOT
------------------ --- --
AS 3 1 1 5
EU 2 1 2 3 2 3 13
JA 1 2 3
NA 2 2
sub 7 2 2 4 2 3 1 2 23
accm 0 0 0 0 0 0 0 0
0 0 1 1 1 2 2 2
7 9 1 5 7 0 1 3
(2012) HP (1kW)
(1.8) 29 30
15 16 17 18 21 22 10 11 12 13 TOT
------------ ------ ------------
AS 3 1 2 1 1 2 1 11
EU 8 2 1 3 2 16
JA 3 3
NA 5 4 1 7 7 1 25
OC 1 1 1 1 4
sub 17 8 5 2 4 2 4 7 8 2 59
accm 0 0 0 0 0 0 0 0 0 0
1 2 3 3 3 3 4 4 5 5
7 5 0 2 6 8 2 9 7 9
(2013) HP (1kW)
(1.8) 28 29
15 16 17 18 19 20 8 9 10 11 12 13 14 TOT
------------------ ---------------------
AS 2 1 1 4
EU 2 8 6 1 17
JA 5 1 1 1 1 1 2 12
NA 9 1 1 1 5 4 10 6 3 40
OC 1 1 1 3
sub 17 3 3 8 6 1 1 1 6 6 12 9 3 76
accm 0 0 0 0 0 0 0 0 0 0 0 0 0
1 2 2 3 3 3 3 4 4 5 6 7 7
7 0 3 1 7 8 9 0 6 2 4 3 6
TS-590 (AGC off, NR2 enabled, Filter 50/80/100) Alpha 87A (1kW) Inverted Vee N1MM Logger K1EL WinUSB keyer Windows XPBEST DX: N4OGW (MS)
HD2RAE: 何か居るな、でも分らない、D2R までは確認したのだけれど
1600 現着 1900-2330 寝ようとしたが、良く眠れず (?) 0000-0530 くらい QRV (直前に KG7H と QSO) 0600-0700 食事 0730-1100 寝た 1100-1330 草取 1330-1430 食事 1630-2300 QRV 0100-0700 寝た 0840 出発 0905 君津駅 1000 みんなみの里 1200 帰着
＠ 中間結果 (2014/01/19 追記):
m08@makoto 15:28:57/140119(..contest/stew-perry)%
(grep ^'CALL C' STEWSCR-2013.TXT | head -1 ;egrep '^(J|7J)' STEWSCR-2013.TXT | sort -nr -k 5)
(grep ^'CALL C' STEWSCR-2013.TXT | head -1 ;egrep '^(J|7J)' STEWSCR-2013.TXT | sort -nr -k 5)
CALL. .C P GRID RAW DUPE BUST QSO PTS GRD -BEST DX- KM MAXP QRP LOW TIME OVER BEST JA3YBK M H PM84 176 4 6 166 2967 123 HD2RAE 14648 80 4 16 767 0 42 JH4UYB S H PM64 138 0 7 131 2111 106 N4OGW 11304 42 2 9 600 0 22 JH2FXK S H PM84 92 1 7 84 1658 70 N4OGW 11088 80 2 16 311 0 22 JA1XMS S H PM95 76 0 5 71 1054 60 N4OGW 10888 80 3 5 508 0 12 JH1QDB S H PM94 56 0 1 55 821 50 N4OGW 10975 38 1 2 308 0 15 JE1BMJ S H QM05 24 1 8 15 255 14 N4OGW 10773 40 0 1 185 0 6 JO7KMB C H QM09 23 0 1 22 227 19 N4OGW 10432 2 0 1 90 0 9 JE1SPY S L PM95 22 0 1 21 181 16 WD5R 10600 12 1 0 168 0 8 JA9FHB S H PM86 19 0 1 18 303 17 N0TT 10056 0 0 0 156 0 9 JA5BZL S H PM63 13 0 2 11 182 11 N0TT 10541 0 0 0 89 0 6 JA4CUU S Q PM64 9 0 0 9 141 8 OH2BO 7631 12 0 1 69 0 3 JE1TSD S Q PM95 8 0 0 8 69 7 KH6LC 6639 0 0 0 54 0 8 JR0ELG S L PM96 5 0 1 4 32 4 N9RV 8352 0 0 0 21 0 2 JG1EIQ S L PM74 1 0 0 1 23 1 KH6LC 7012 0 0 0 10 0 1 JR6HMJ S Q PM51 1 0 0 1 6 1 JA3YBK 652 0 0 0 10 0 1
( つっこみ )
2013年12月26日(木) 旧暦 [n年日記] [更新:"2014/10/18 12:02:11"]
#1 [無線][N1MM] Call history lookup for Stew Perry Top Band Distance Challenge
N1MM Logger には Call history Lookup という機能がある。
Call+History+Lookup (N1MM)
しかし僕は今まで使っていなかった。
今週末の日曜日 (JST で 00:00-23:59) に Stew Perry Top Band Distance Challenge (TBDC) がある。このコンテストは番号 (Exchange) にグリッド
(Grid Square Locator、 calcualtor 、 オノウエ版 ) の最初の四文字、
を送る。 この番号はあまり覚えていられるようなものではないので、 信号が弱かったりすると聞き取るのが大変。
そこで、予め局名とグリッド名との一覧を作っておいて何かの助けにしたいな、 と思ったら、最初に書いた Call History Lookup に辿りついた。
- 文字形式で番号データ
を作っておく(コンテスト毎に必要とされる仕様は少しづつ違う)
(改行文字は CR+LF のこと、作成の時には JH1EAQ の助けを借りました) - N1MM の操作方法の中の、いくつかある方法の中から、そのデータを読む (import)
- File -> Import -> Import Call History...
- File -> Open Log in Database ... -> Associated Files -> Call History Filename
- Config Menu の中の Enable Call History Lookup を選んで、 有効にしておく (右上の図。 N1MM+ の時 には Enable という字が増えている これは選んだ後にもう一度見た時なので、既にチェック印が付いている) クリックで 大きく なります
ちなみに、Import を使って一度読んだ Call History は、データべース毎に記憶されるので、 次に別のものを読むまでずっと覚えています (良くもあり悪くもあります)。
(の画面の下の方)
それで上記の一番目のデータとして、 僕が 2007-2012 の 最近 6 年分の Stew Perry の (Big Stew の) 結果から 作ったもの があります。
37710 Dec 26 13:00 stew-perry-call-history-2095-callsign.txt 37710 Dec 26 13:00 stew-perry-call-history-2095.txt 14831 Dec 26 11:10 stew-perry-call-history-821.txt 37710 Dec 26 13:00 stew-perry-call-history.txtこれらは上から順に
2095 局のデータ、局名順
2095 局のデータ、グリッド順
821 局分 (グリッド順、2012 の参加局からだけで作ったもの)
2095 局のデータ、グリッド順
多分通常は最後のものを使うのが良いと思う (二番目と同じ)。
ちなみに作成方法として、もし後の年で変更があった場合には、新しい方を採用している。
＠ 2014-10-18 追記 保存場所:
N1MM+ (そうでなくても同じかも知れないが)の時に、
実は UserText を表示(保存)する方法(位置)が分っていません。
Call, Name, Loc1, Loc2, Sect, State, CK, BirthDate, Exch1, Misc, UserText
とあります。 何とか 年度を表示するようにしたもの を用意しました。
File -> Import -> Import Call History...とすると、(設定にも依るかも知れないが)
マイドキュメント -> N1MM Logger+ -> CallHistoryFilesのフォルダをまず見に行くので、保存するのは、そこにしておくのが良いと思う。
* 47160 Oct 18 10:42 stew-perry-call-history-2007-2013.txt 37710 Dec 26 2013 stew-perry-call-history-2095-callsign.txt 37710 Dec 26 2013 stew-perry-call-history-2095.txt 14831 Dec 26 2013 stew-perry-call-history-821.txt * 47160 Oct 18 10:42 stew-perry-call-history.txt* 印のついたものは、2007-2013 の記録から、 グリッド順、同じグリッド内ではコールサイン順 に並べたものです。2358 局数分です。2012 から 360 くらい増えています。
実は UserText を表示(保存)する方法(位置)が分っていません。
を見ると
Call, Name, Loc1, Loc2, Sect, State, CK, BirthDate, Exch1, Misc, UserText
とあります。 何とか 年度を表示するようにしたもの を用意しました。
104890 Oct 18 11:39 stew-perry-2007-2013-w-years.txt 47160 Oct 18 10:42 stew-perry-call-history-2007-2013.txt 37710 Dec 26 2013 stew-perry-call-history-2095-callsign.txt 37710 Dec 26 2013 stew-perry-call-history-2095.txt 14831 Dec 26 2013 stew-perry-call-history-821.txt 47160 Oct 18 10:42 stew-perry-call-history.txtこの一番上のものです。 (実は、年度によって情報が異なる時には、それも表示します)
( つっこみ )
2013年12月23日(月) 旧暦 [n年日記] [更新:"2013/12/23 14:38:55"]
#1 [pkgsrc] Peer certificate for tqsl-2.0
Couldn't upload the file: CURL returned "Peer certificate cannot be authenticated with given CA certificates" (SSL certificate problem: self signed certificate in certificate chain)Recent tqsl needs following management:
modena@makoto 11:17:30/131223(~)% pkg_info -D mozilla-rootcerts
Information for mozilla-rootcerts-1.0.20121229nb1:
Install notice:
===========================================================================
$NetBSD: MESSAGE,v 1.4 2013/03/15 16:14:55 bsiegert Exp $
Execute this command to extract and rehash all CA root certificates
distributed by the Mozilla Project, so that they can be used by third
party applications using OpenSSL. It also creates a single file
certificate bundle in PEM format which can be used by applications using
GnuTLS.
# mozilla-rootcerts install
To mark these certificates as trusted for users of gnupg2, do
the following (assuming default PKG_SYSCONFBASE and a Bourne shell):
# mkdir /usr/pkg/etc/gnupg
# cd /usr/pkg/etc/gnupg
# for c in /etc/openssl/certs/*.pem; do
> openssl x509 -in $c -noout -fingerprint|sed 's|^.*=\(.*\)|\1 S|'
> done > trustlist.txt
===========================================================================
modena@makoto 11:17:39/131223(~)% sudo mozilla-rootcerts install Password: mozilla-rootcert-0.pem WARNING: can't open config file: /etc/openssl/openssl.cnf .... (omit too many lines) .... mozilla-rootcert-99.pem => 5620c4aa.0 modena@makoto 11:18:30/131223(~)%
＠ making wip/tc-git:
>> /export/WRKOBJDIR/wip/tc-git/work/tc/doc/-I does not exist! Memory exhausted--use C-x s then exit and restart Emacs Makefile:317: recipe for target 'tc.info' failed
Operand stack:
6.65972 Ryumin-Light-EUC-H
Execution stack:
%interp_exit .runexec2 --nostringval-- --nostringval--
--nostringval-- 2 %stopped_push --nostringval--
--nostringval-- --nostringval-- false 1 %stopped_push 1894
1 3 %oparray_pop 1893 1 3 %oparray_pop --nostringval--
1877 1 3 %oparray_pop 1771 1 3 %oparray_pop
--nostringval-- %errorexec_pop .runexec2 --nostringval--
--nostringval-- --nostringval-- 2 %stopped_push
--nostringval-- 1852 2 4 %oparray_pop
Dictionary stack:
--dict:1170/1684(ro)(G)-- --dict:0/20(G)-- --dict:82/200(L)-- --dict:84/84(L)--
Current allocation mode is local
Last OS error: No such file or directory
Current file position is 8631
GPL Ghostscript 9.06: Unrecoverable error, exit code 1
** WARNING ** Filtering file via command -->/usr/pkg/bin/rungs
-q -dNOPAUSE -dBATCH -dEPSCrop -sDEVICE=pdfwrite
-dCompatibilityLevel=1.5 -dAutoFilterGrayImages=false
-dGrayImageFilter=/FlateEncode
-dAutoFilterColorImages=false
-dColorImageFilter=/FlateEncode
-sOutputFile='/tmp/dvipdfmx.18a7b03800b78fd97a216cb3f38686c6'
'../tgif/fig-1-5.eps' -c quit<-- failed.
** WARNING ** Image format conversion for "../tgif/fig-1-5.eps" failed...
** ERROR ** pdf_ref_obj(): passed invalid object.
Output file removed.
*** Error code 1
Above is ghostscript-cidfonts-ryumin problem. It did not behavior in parallel to the version
of ghostscript.patch is here
( つっこみ )
2013年12月21日(土) 旧暦 [n年日記] [更新:"2013/12/21 16:54:09"]
#1 [pkgsrc] databases/shared-mime-info
t-105@makoto 16:51:52/131221(..databases/shared-mime-info)% \ sudo ktrace -t n /usr/pkg/bin/update-mime-database /usr/pkg/share/mime Bad file descriptorPR pkg/48300 related ?
( つっこみ )
2013年12月18日(水) 旧暦 [n年日記] [更新:"2013/12/18 23:44:56"]
#1 [無線] CQ WW WPX 2013 CW SOSB/40 Log Checking report
Category: Single Op 7 MHz High Power
************************** Summary ***************************
520 Claimed QSO before checking (does not include duplicates)
494 Final QSO after checking reductions
2393 Claimed QSO points
2213 Final QSO points
348 Claimed mults
333 Final mults
832764 Claimed score
736929 Final score
-11.5% Score reduction
3 (0.6%) duplicates (without penalty)
13 (2.5%) calls copied incorrectly
12 (2.3%) exchanges copied incorrectly
1 (0.2%) not in log
2 (0.4%) calls unique to this log only (not removed)
********************** Results By Band ***********************
Band QSO QPts Mult
Claimed 40M 520 2393
Final 40M 494 2213
Claimed All 520 2393 348 Score 832764
Final All 494 2213 333 Score 736929
************************* Not In Log *************************
7038 CW 2013-05-25 1346 JA1XMS 174 BD2SHV 0011
*********************** Incorrect call ***********************
7038 CW 2013-05-25 1213 JA1XMS 96 WB7SX 0645 incorrect call
7038 CW 2013-05-25 1300 JA1XMS 136 KW6YQV 0024 correct KJ6YQV
7018 CW 2013-05-25 1535 JA1XMS 203 RW3WAR 0267 correct RW3WA
7008 CW 2013-05-25 1539 JA1XMS 206 UW4W 1016 correct UA4W
7020 CW 2013-05-26 0927 JA1XMS 229 K1XTR 0244 correct K0XTR
7028 CW 2013-05-26 1034 JA1XMS 256 NR2NI 0844 incorrect call
7029 CW 2013-05-26 1313 JA1XMS 329 JA3MIN 0188 correct JA3MIB
7012 CW 2013-05-26 1344 JA1XMS 342 BU1AW 1165 correct BU2AW
7025 CW 2013-05-26 1637 JA1XMS 380 RM3U 1649 correct RM2U
7029 CW 2013-05-26 1717 JA1XMS 402 SO0X 0907 correct SJ0X
7029 CW 2013-05-26 1752 JA1XMS 433 LW4CR 0410 correct RW4CR
7029 CW 2013-05-26 1839 JA1XMS 466 OM3RR 0311 correct OM3RP
7029 CW 2013-05-26 2020 JA1XMS 520 RS9CM 1029 correct RN9CM
*************** Incorrect Exchange Information ***************
7026 CW 2013-05-25 1003 JA1XMS 7 N5TIT 0188 correct 18
7026 CW 2013-05-25 1005 JA1XMS 10 JR2SCJ 0050 correct 59
7026 CW 2013-05-25 1020 JA1XMS 28 NY5B 0153 correct 143
7038 CW 2013-05-25 1339 JA1XMS 170 K6NR 0265 correct 365
7002 CW 2013-05-25 1541 JA1XMS 208 UX4U 0100 correct 1000
7029 CW 2013-05-26 1141 JA1XMS 283 BY5CD 0418 correct 428
7029 CW 2013-05-26 1716 JA1XMS 401 UY0IX 0244 correct 242
7029 CW 2013-05-26 1802 JA1XMS 439 RM3G 0075 correct 85
7029 CW 2013-05-26 1824 JA1XMS 453 JA1IKA 0016 correct 168
7029 CW 2013-05-26 1859 JA1XMS 480 YO4BEW 0469 correct 489
7029 CW 2013-05-26 1907 JA1XMS 486 S53F 2783 correct 2683
7029 CW 2013-05-26 1927 JA1XMS 501 OM7PY 0150 correct 158
************* Unique Calls Worked (not removed) **************
7029 CW 2013-05-26 1817 JA1XMS 449 OM3CAQ 0747
7029 CW 2013-05-26 1923 JA1XMS 500 9A2AHW 0329
********************** Lost Multipliers **********************
7026 CW 2013-05-25 1020 JA1XMS 28 NY5B 0153 correct 143
7038 CW 2013-05-25 1300 JA1XMS 136 KW6YQV 0024 correct KJ6YQV
7038 CW 2013-05-25 1346 JA1XMS 174 BD2SHV 0011 Not in log
7018 CW 2013-05-25 1535 JA1XMS 203 RW3WAR 0267 correct RW3WA
7008 CW 2013-05-25 1539 JA1XMS 206 UW4W 1016 correct UA4W
7002 CW 2013-05-25 1541 JA1XMS 208 UX4U 0100 correct 1000
7020 CW 2013-05-26 0927 JA1XMS 229 K1XTR 0244 correct K0XTR
7028 CW 2013-05-26 1034 JA1XMS 256 NR2NI 0844 copy error
7029 CW 2013-05-26 1141 JA1XMS 283 BY5CD 0418 correct 428
7012 CW 2013-05-26 1344 JA1XMS 342 BU1AW 1165 correct BU2AW
7029 CW 2013-05-26 1717 JA1XMS 402 SO0X 0907 correct SJ0X
7029 CW 2013-05-26 1752 JA1XMS 433 LW4CR 0410 correct RW4CR
7029 CW 2013-05-26 1859 JA1XMS 480 YO4BEW 0469 correct 489
7029 CW 2013-05-26 1907 JA1XMS 486 S53F 2783 correct 2683
7029 CW 2013-05-26 2020 JA1XMS 520 RS9CM 1029 correct RN9CM
( つっこみ )
2013年12月17日(火) 旧暦 [n年日記] [更新:"2013/12/17 22:39:25"]
#1 [NetBSD][cvs] cvs co にこんなに時間がかかることもある
genova@makoto 14:22:22/131217(/export/netbsd-6-1-2-RELEASE)% \ time cvs -Q -d :pserver:anoncvs@anoncvs.jp.netbsd.org:/cvs/cvsroot \ co -r netbsd-6-1-2-RELEASE src load: 0.43 cmd: cvs 26484 [select] 7.04u 22.06s 12% 7032k load: 0.89 cmd: cvs 26484 [select] 37.18u 43.43s 10% 6548k load: 0.80 cmd: cvs 26484 [select] 43.21u 55.90s 0% 6564k load: 0.69 cmd: cvs 26484 [select] 58.05u 84.89s 2% 6572k load: 0.69 cmd: cvs 26484 [select] 58.06u 84.90s 2% 6572k 59.86s 96.49s 31:54.58 8% 0+0k 826+85864io 0pf+0w genova@makoto 14:54:47/131217(/export/netbsd-6-1-2-RELEASE)%
( つっこみ )
#2 [Linux][compat] rpm --install
genova@makoto 18:35:23/131217(..misc/rpm)% \
(cd /export; ktrace -t n rpm --install cuda-repo-opensuse122-5.5-0.x86_64.rpm)
error: Macro %_host_vendor has empty body
error: Macro %_host_vendor has empty body
error: Failed dependencies:
/bin/sh is needed by cuda-repo-opensuse122-5.5-0.x86_64
--nodeps
genova@makoto 20:47:31/131217(/export)% \
sudo ktrace -t n rpm --nodeps --install cuda-repo-opensuse122-5.5-0.x86_64.rpm
Password:
error: Macro %_host_vendor has empty body
error: Macro %_host_vendor has empty body
package cuda-repo-opensuse122-5.5-0.x86_64 is intended for a different operating system
--ignoreos
genova@makoto 20:48:12/131217(/export)% \ sudo ktrace -t n rpm --ignoreos --nodeps --install cuda-repo-opensuse122-5.5-0.x86_64.rpm error: Macro %_host_vendor has empty body error: Macro %_host_vendor has empty body--query
genova@makoto 20:51:33/131217(/export)% rpm --query cuda-repo-opensuse122-5.5-0.x86_64.rpm error: Macro %_host_vendor has empty body error: Macro %_host_vendor has empty body package cuda-repo-opensuse122-5.5-0.x86_64.rpm is not installed
genova@makoto 20:55:33/131217(/export)% \
sudo ktrace -t n rpm --ignoreos --nodeps --install cuda-repo-opensuse122-5.5-0.x86_64.rpm
package cuda-repo-opensuse122-5.5-0.x86_64 is already installed
( つっこみ )
2013年12月15日(日) 旧暦 [n年日記] [更新:"2013/12/17 22:42:55"]
#1 [Emacs][Wanderlust] Reading Google mail (by imap)
返事を書こうとすると
byte-code: require: not variableeelll を開始しようとすると
call-interactively: Symbol's value as variable is void: last-command-charこっちは *Backtrace* が有
Debugger entered--Lisp error: (void-variable last-command-char) tcode-electric-space(1) call-interactively(tcode-electric-space nil nil) command-execute(tcode-electric-space) tcode-eval-action(tcode-electric-space)多分これでしょう。
$NetBSD$
Replace obsolete variable
--- lisp/eelll.el.orig 2013-12-15 14:34:57.000000000 +0900
+++ lisp/eelll.el 2013-12-15 14:33:32.000000000 +0900
@@ -1000,7 +1000,7 @@ (defun eelll-key)
(interactive)
(save-excursion
(set-buffer " *eelll: strokes*")
- (insert (char-to-string last-command-char)))
+ (insert (char-to-string last-command-event)))
(if eelll-move-cursor
(insert " ")))
＠ M-x eelll (うなぎぎで練習):
(話は変って)
まだ、マイナスの文字が小さすぎるようだ。 次の変更で一応(僕の環境では)見られるようになった
いち(一)でなくて
(全角の)マイナスを使って見たが、このスクリーンショットでは違いが分らない
でも少し間隔が空くかも知れない
これは次のメールの話に関係していると思う
まだ、マイナスの文字が小さすぎるようだ。 次の変更で一応(僕の環境では)見られるようになった
$NetBSD$ Replace obsolete variable --- lisp/eelll.el.orig 2013-12-15 14:31:48.000000000 +0900 +++ lisp/eelll.el 2013-12-15 14:51:43.000000000 +0900 @@ -361,7 +361,7 @@ Tコードで入力できなければnilを返す。" (setq j (1+ j) k 0) (while (< k 5) (setq k (1+ k)) - (insert "‐‐‐‐‐ ") + (insert "一一一一一 ") (if (= k c) (insert " "))) (delete-horizontal-space) (insert "\n"))
いち(一)でなくて
(全角の)マイナスを使って見たが、このスクリーンショットでは違いが分らないでも少し間隔が空くかも知れない
--- lisp/eelll.el.orig 2013-12-15 14:31:48.000000000 +0900 +++ lisp/eelll.el 2013-12-15 15:06:25.000000000 +0900 @@ -361,7 +361,7 @@ (setq j (1+ j) k 0) (while (< k 5) (setq k (1+ k)) - (insert "‐‐‐‐‐ ") + (insert "一一一一一 ") (if (= k c) (insert " "))) (delete-horizontal-space) (insert "\n"))
これは次のメールの話に関係していると思う
To: mule-ja-2010 m17n org
Subject: [mule-ja-2009:09748] Re: 「かける」の記号が半角だったり全角だったり
From: NAKAJI Hiroyuki <nakaji kankyo-u ac jp>
Date: Tue, 08 Jun 2010 20:32:45 +0900
(中略)
はい。ヒントがありましたので、~/.emacs に
(set-face-font
'default
"-sony-fixed-medium-r-normal--16-*-*-*-*-*-iso8859-1")
(set-fontset-font
(face-attribute 'default :fontset)
'japanese-jisx0208
"-jis-fixed-medium-r-normal--16-*-*-*-*-*-jisx0208.1983-0")
(set-fontset-font
(face-attribute 'default :fontset)
'katakana-jisx0201
"-sony-fixed-medium-r-normal--16-*-*-*-*-*-jisx0201.1976-0")
と書いたところ、(string-width "×") は１ですが、表示は全角になりました。
このままで Emacs-21 でもいいのかな。
Emacs-20 (20.7) -> Symbol's function definition is void: coding-system-from-name Emacs-21 (21.4) -> Symbol's function definition is void: coding-system-from-name Emacs-22 (22.3) -> Symbol's function definition is void: coding-system-from-name Emacs-23 (23.4) ->
;; For Emacs-23.0-Versions before 2009-01-27.
;; CVSWeb URLs:
;; http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/international/mule-cmds.el?cvsroot=emacs&r1=1.355&r2=1.356
(when (not (and (fboundp 'canonicalize-coding-system-name)
(fboundp 'coding-system-from-name)))
;; Canonicalize the coding system name NAME by removing some prefixes
;; and delimiter characters. Support function of
;; coding-system-from-name.
(defun canonicalize-coding-system-name (name)
(if (string-match "^iso[-_ ]?[0-9]" name)
;; "iso-8859-1" -> "8859-1", "iso-2022-jp" ->"2022-jp"
(setq name (substring name (1- (match-end 0)))))
(let ((idx (string-match "[-_ /]" name)))
;; Delete "-", "_", " ", "/" but do distinguish "16-be" and "16be".
(while idx
(if (and (>= idx 2)
(eq (string-match "16-[lb]e$" name (- idx 2))
(- idx 2)))
(setq idx (string-match "[-_ /]" name (match-end 0)))
(setq name (concat (substring name 0 idx) (substring name (1+ idx)))
idx (string-match "[-_ /]" name idx))))
name))
(defun coding-system-from-name (name)
"Return a coding system whose name matches with NAME (string or symbol)."
(let (sym)
(if (stringp name) (setq sym (intern name))
(setq sym name name (symbol-name name)))
(if (coding-system-p sym)
sym
(let ((eol-type
(if (string-match "-\\(unix\\|dos\\|mac\\)$" name)
(prog1 (intern (match-string 1 name))
(setq name (substring name 0 (match-beginning 0)))))))
(setq name (canonicalize-coding-system-name (downcase name)))
(catch 'tag
(dolist (elt (coding-system-list))
(if (string= (canonicalize-coding-system-name (symbol-name elt))
name)
(throw 'tag (if eol-type (coding-system-change-eol-conversion
elt eol-type)
elt))))))))))
When building emacs-23.4, I've got
/usr/pkg/lib/libXext.so.6: undefined reference to `_XGetRequest' *** Error code 1 Stop. make: stopped in /export/WRKOBJDIR/devel/m17n-lib/work/m17n-lib-1.6.4/example
/usr/pkg/lib/libX11.so 00035be0 T _XGetRequest
( つっこみ )
2013年12月11日(水) 旧暦 [n年日記] [更新:"2013/12/11 14:17:45"]
#1 [Input][Method] 橋田表(下書)
t-code の運指 (stroke) を漢字の音読みの順に並べた
「橋田表」
というものがある。
これはもともとは、
当時電総研にいらっしゃった
橋田浩一
さんが LaTeX で作ったものである。
これを僕が Perl と PostScript で表から生成するようにしたものがある。 一応 で配っている。これに関連する話をいくつか紹介する。 NetBSD の package system の Work In Progress では
Help は、その wip から入れた場合には、
これを僕が Perl と PostScript で表から生成するようにしたものがある。 一応 で配っている。これに関連する話をいくつか紹介する。 NetBSD の package system の Work In Progress では
wip/tc-hasida-tableで make package-install すると、.pdf と .ps 形式も生成する
Help は、その wip から入れた場合には、
(cd /usr/pkg/share/hasida-table; perl hasida-table -h )で表示されるが、その日本語版は
(cd /usr/pkg/share/hasida-table; perl hasida-table -j )とすると表示され、その内容は次の通り
hasida-table:
Synonyms:
hasida-table [指定] [aiueo_file]
Where:
( N ) は未実装を示す。[指定]は次のものをどのような
順で指定しても良い。-cv -bo などと出来る。-f -n など
はその直後に引数を一つ必要とする。
[指定]
-c 調べるだけ ( N )
-b 「RL の時太字にする」を無効とする ( bold )
-d 動作の確認用 debug mode
-f frame_list
frame_list で指定された譜に書いてある文字に枠を付ける
その文字が negative で出力されないようになっていてしかもそ
の字が aiueo_file にあれば、その後に出て来る最初の字に付ける
この -f の指定がない時は、aiueo_file の行頭の字に枠を付ける
何も枠を付けたくない時は -f /dev/null とすれば良い。
-g 格子点の大きさを pt ( 1/72 inch ) で指定する。(無指定時 0.3 )
-h 使い方(英語)
-H 見なれた元祖橋田表を印刷する。classic mode とも言う。次のものと
等価 -b -r -o -f /dev/null aiueo-1215.jis
-j 使い方(日本語)
-n negative
印刷しない文字が書いてある譜の指定。決して使わない字や、覚えてし
まった字を書いておくとそれを表に出さない。
-o RR,LL の場合、使わない側の格子を印刷する(無指定では印刷しない)
-r 反転形式。○→● ( 無指定時 ●→○)
-v おしゃべり形式 ( -c と供に指定の時だけ有効) (N)
-s 名前
打鍵表の指定 tc-mule.el が読む tcode.st を指定する
( Unix path の形式で指定 ) 無指定時: ./tcode.st
[aiueo_file]
印刷したい漢字の一覧が書いてある譜を指定する。
無指定時: 標準入力から読む
Note:
ここで用いる漢字の譜は全ていわゆる JIScode ( ISO-1022-JP )であること。
aiueo_file はその中に書いてある順に印刷する。また当然 tcode.st もその
順序が重要であるが、-n, -f で指定する、省略文字と枠を付ける文字の指定
は順序は構わない。
(ただし信じられないことにこの Perl 手続きは *euc-japan* で保存のこと。)
Examle:
tcode で普通に打てる 1351 全てを印刷する。(三頁になる)
hasida-table -f frame.jis aiueo-full-1351.jis | lpr
negative という名前の譜の中に印刷しない(省略する)字を書いておく
hasida-table -f frame.jis -n negative-sample aiueo-full-1351.jis | lpr
もともとの橋田表と同じ字種だけを印刷し、しかも○→●という順序を使う。
hasida-table -r aiueo-hasida-1215.jis | lpr
version: Id: hasida-table,v 1.3 1996/04/26 22:46:00 makoto Exp
ちなみに、一番最近使用した hasida-negative は 806
文字書いてあるもので、
genova@makoto 14:02:23/131211(~)% ls -l ~/mule/lisp/lisp/hasida-negative -rw-r--r-- 1 makoto operator 2229 Feb 5 2001 /home/makoto/mule/lisp/lisp/hasida-negativeこれを使うと、次のようになる。
genova@makoto 14:00:36/131211(~)% (cd /usr/pkg/share/hasida-table/; \ perl hasida-table -f frame.jis -n ~/mule/lisp/lisp/hasida-negative aiueo-full-1351.jis) \ >! /tmp/ps 806 char omitted 545 char printedしかし、いくら何でも 11 年も経っているので、覚えている字も少しは変化している。
( つっこみ )
2013年12月09日(月) 旧暦 [n年日記] [更新:"2013/12/11 14:24:04"]
#1 [無線] 2013 ARRL 160m CW
The result of this year was disastrous.
QSO: 29 Pts 58 Sec 17, Score 986Also QSB was too fast. Propagation was not normal.
genova@makoto 22:21:11/131209(..ham-radio/contest)% \
perl ~/perl/ham-radio/cabrillo2-time-table -a 2013-arrl-160m.log
0
(1.8) 7 | 8 |
8 9 10 11 12 13 14 | 8 | 12 13 TOT
--------------------- |--- |------
AK 1 2 | | 3
NTX 1 3 | | 4
PAC 1 2 | | 3
SF | | 1 1
STX 1 1 1 | | 3
WWA 1 | | 1
-----
AR 1 | | 1
LA 1 | | 1
MS 1 | | 1
NM 1 1 1 | | 3
-----
ID 1 1 | | 2
MT 1 | | 1
NV | | 1 1
OR | 1 | 1 2
-----
CO 1 | | 1 2
IA | | 1 1
-----
BC 1 | | 1
sub 1 4 4 4 9 2 1 | 1 | 3 2 31
accm 0 0 0 0 0 0 0 | 0 | 0 0
0 0 0 1 2 2 2 | 2 | 2 3
1 5 9 3 2 4 5 | 6 | 9 1
The station heard but not QSO'ed
K9CT IL N7GP AZ W7RN NV WA7LT EWA W8MJ MI 1824.5 1047 08 DecK9CT was on 1813.5kHz at second day, but 'mm mm mm' continuous signal on the exact same frequency and I was not confident to get his call back. So I did not call him at that period.
TS-590 AGC: off, NR2: on, Filter width: 80/100/150 Hz Alpha 87a 0.8-1kW Winkey USB K1EL N1MM Logger Inverted Vee
＠ Received 2012 ARRL 160m Award:
But I've got the Award for the last year (Shown above).
non-W/VE non assisted High
Diary for that day
non-W/VE non assisted High
Diary for that day
( つっこみ )
2013年12月06日(金) 旧暦 [n年日記] [更新:"2013/12/06 11:06:56"]
#1 [NetBSD] Control T
tstile clurd htdmux
( つっこみ )
2013年12月04日(水) 旧暦 [n年日記] [更新:"2013/12/04 13:43:37"]
#1 [DragonFly] DragonFly-i386-20131203-DEV-v3.7.1.154.gf2ccc3.img
ここの gf2ccc3 というのは git の commit tag だ。
genova@makoto 12:43:06/131204(/export)% \ time sudo dd if=DragonFly-i386-20131203-DEV-v3.7.1.154.gf2ccc3.img of=/dev/rsd0d bs=2m 1247805440 bytes transferred in 193.173 secs (6459523 bytes/sec) 953+0 records in 953+0 records out 1998585856 bytes transferred in 309.654 secs (6454254 bytes/sec) 0.02s 3.55s 5:11.90 1% 0+0k 0+3io 6pf+0w genova@makoto 12:49:39/131204(/export)%
( つっこみ )
2013年12月03日(火) 旧暦 [n年日記] [更新:"2013/12/03 12:53:43"]
#1 [DragonFly] boot img for x86_64
genova@makoto 12:44:19/131203(/export)% \ time sudo dd if=dfly-x86_64-3.6.0_REL.img of=/dev/rsd0d bs=2m 953+0 records in 953+0 records out 1998585856 bytes transferred in 333.909 secs (5985420 bytes/sec) 0.00s 4.05s 5:36.45 1% 0+0k 61+3io 6pf+0w genova@makoto 12:50:54/131203(/export)%
( つっこみ )
2013年12月02日(月) 旧暦 [n年日記] [更新:"2013/12/03 12:50:09"]
#1 [DragonFly] My first make buildworld on DragonFly BSD
43 2013-12-02 09:25 time make buildworld
===> etc/sendmail rm -f dragonfly.cf m4 -D_CF_DIR_=/usr/src/etc/sendmail/../../contrib/sendmail-8.14/cf/ /usr/src/etc/sendmail/../../contrib/sendmail-8.14/cf/m4/cf.m4 /usr/src/etc/sendmail/dragonfly.mc > dragonfly.cf chmod 444 dragonfly.cf rm -f dragonfly.submit.cf m4 -D_CF_DIR_=/usr/src/etc/sendmail/../../contrib/sendmail-8.14/cf/ /usr/src/etc/sendmail/../../contrib/sendmail-8.14/cf/m4/cf.m4 /usr/src/etc/sendmail/dragonfly.submit.mc > dragonfly.submit.cf chmod 444 dragonfly.submit.cf make buildworld 9470.80s user 2982.90s system 61% cpu 5:39:24.41 total dfly36@root 15:05:01/131202(/usr/src)%
DL320/G3 CPU: Intel(R) Celeron(R) CPU 2.53GHz (2527.01-MHz 686-class CPU)
47 2013-12-02 15:21 time make buildkernel KERNCONF=MYKERNEL dfly36 ... >>> Kernel build for MYKERNEL completed on Mon Dec 2 16:33:39 JST 2013 -------------------------------------------------------------- make buildkernel KERNCONF=MYKERNEL 1827.07s user 469.78s system 53% cpu 1:12:03.26 total dfly36@root 16:33:39/131202(/usr/src)%
( つっこみ )
2013年12月01日(日) 旧暦 [n年日記] [更新:"2013/12/01 22:44:03"]
#1 [perl][無線] cabrillo2-time-table
cabrillo2-time-table
だけれども、Date::Manip が必要ないような方法も用意した。
-2 を指定した場合に、現在は 二日分を UTC で表示する。この時には日付/時刻の計算は不要
なので、その時には Date::Manip を必要としない。
二行目に次のような行がある版である。
例えば、次のような表示になる。accum が正しくないが、とりあえずは、これで。
# $Id: cabrillo2-time-table,v 1.106 2013/12/01 11:44:06 makoto Exp $次のような使い方をする。
perl ~/perl/ham-radio/cabrillo2-time-table -a -2 -s 05 -e 23 2013-cq-ww-cw-160m.LOG
-a ARRL 形式 (ちょっと意味は違うが、これを選ぶ) -2 二日分を別々の日として表示する -s 05 05 UTC から開始 -e 23 23 UTC まで-s や -e はなくても良いが、 もし無駄な前後がある時には、これを使うと表示行が短かくて済む。
例えば、次のような表示になる。accum が正しくないが、とりあえずは、これで。
genova@makoto 20:46:30/131201(..ham-radio/contest)%
perl ~/perl/ham-radio/cabrillo2-time-table -a -2 -s 07 -e 23 2013-cq-ww-cw-160m.LOG
2013-11-23
1 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23
--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+
01 0
03 0
04 0
05 0
14 0
15 1 1 2 2 6
16 1 1 3 1 2 8
17 2 1 3
18 0
19 1 1 2
20 2 2
23 1 1
24 1 1 1 3
25 1 1 2
26 1 1
27 1 1
31 0
--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+
sub 1 7 4 7 3 6 1 29
accm 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 1 1 2 2 2 2 2 2
0 0 0 0 0 0 0 1 8 2 9 2 8 8 9 9 9
2013-11-24
1 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23
--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+
01 1 1 1
03 1 2 1 10 7 6 27 27
04 1 17 4 22 22
05 1 1 1
14 4 2 6 6
15 1 1 3 5 11
16 1 2 1 4 12
17 0 3
18 1 1 1 1 4 4
19 1 1 3
20 1 1 3
23 0 1
24 1 1 2 1 1 6 9
25 1 2 1 4 6
26 0 1
27 1 1 2
31 1 1 1
--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+
sub 2 4 3 34 14 11 3 1 10 2 84 113
accm 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 4 5 6 7 7 7 7 8 8 8 8 8
0 2 2 6 9 3 7 8 1 1 1 2 2 4 4 4 4
1.8 0 1.8
accm 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
genova@makoto 20:52:35/131201(..ham-radio/contest)%
( つっこみ )
最近の日記
2024年03月10日
・停電 (瞬電)
2024年03月03日
・the second try on bare-metal
・useradd
2024年02月29日
・opendkim and senmail
2024年01月24日
・chat/iam 0.0.8
2024年01月21日
・uselocale vs setlocale (textproc/R-readxl)