新着記事 50 |
|---|
82： ローメモリのチェック 投稿者：konno 2024/10/31(木) 18:17
ローメモリのチェック
朧厶ﾘ
;--- BIOS work --- j31
_bios segment at 0
org 0449h
vmode db ? ; 449h v mode
width dw ? ; 44Ah 桁数
; 'scrnIBM.asm'
INBLK equ 80h
dosscrn_sx equ 044Ah ;50h=80 ; ##156.123 桁数
dosscrn_sy equ 0484h ;19h=25 行数
dosscrn_chr equ 0485h ;13h=19 フォント高さ
VZのDUMP.DEF $40:$0 $40:$4a $40:$84
?? DUMP (0040h) ????????????????????????????????????????????????????????????
? 0000: 00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 ゥゥゥゥゥゥゥゥ ?
? 0010: 00 00 00 00 00 00 00 20-00 00 02 00 02 00 30 52 ゥゥゥ･ ゥゥゥ0R ?
? 0020: 0D 1C 00 51 00 51 00 51-00 51 00 51 00 51 00 51 ゥ･Q･Q･Q･Q･Q･Q･Q ?
? 0030: 1B 01 00 48 0F 18 64 20-00 48 00 48 3A 28 00 00 ゥ･Hゥd ･H･H:(ゥ ?
? 0040: 00 00 00 00 00 00 00 00-00 03 50 00 60 4A 00 00 ゥゥゥゥゥP･`Jゥ ?
$40:$4a ^^ 桁4Ah=50h=80 0:$44a
? 0050: 06 03 00 00 00 00 00 00-00 00 00 00 00 00 00 00 ゥゥゥゥゥゥゥゥ ?
? 0060: 07 26 00 D4 03 05 00 00-00 00 00 00 7B 0A 1C 00 ･&ピゥゥゥゥ{ゥ･ ?
? 0070: 00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 ゥゥゥゥゥゥゥゥ ?
? 0080: 1E 00 3E 00 18 0C 00 00-09 99 00 00 00 00 00 00 ゥ>ゥゥゥゥゥゥ･ ?
行 $40:$84 18h=24 ^^ ^^ 高さ$40:$85 0Ch=12
? 0090: 00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 ゥゥゥゥゥゥゥゥ ?
????????????????????????????????????????????????????????????????????????????
IBM: ;★ VTDOS対応の為ここで IBM 機種チェック
MOV AX,0040H
MOV DS,AX
MOV AX,WORD PTR DS:[004AH] ; 桁数
MOV AH,AL
MOV AL,BYTE PTR DS:[0084H] ; 行数
- No.82 - [リストへもどる.]
pre 81： クリップボード 投稿者：konno 2024/10/03(木) 18:43
#k1118：Re^8: ブロック再現マクロ 投稿者：Ｈ岡 2006/06/18(日) 19:18- No.81 - [リストへもどる.] soft
#k1126：Re^9: ブロック再現マクロ 投稿者：めざら 2006/06/19(月) 15:43
#k1141：Re^10: ブロック再現マクロ 投稿者：Ｈ岡 2006/06/23(金) 23:04
#k1156：Re^11: ブロック再現マクロ 投稿者：めざら 2006/06/26(月) 04:22
#k4898：Re^2: VTDOSインストチェック 投稿者：文太 2010/01/21(木) 12:26
#k4900：クリップボード送信 投稿者：文太 2010/01/21(木) 12:28
１文字欠ける？
=== Macrotmp by B ===;
#k4901：GET CLIPBOARD DATA SIZE 投稿者：文太 2010/01/21(木) 17:58
#k4909：Re^3: クリップボード送信 投稿者：10# 2010/01/22(金) 23:37
現状jenga.defはヌル文字を付けていないということでいいですか？
であればWinOldApに倣ってヌル文字補完になります。
clppstはWin32なので、今回VTDOSは無関係でした。
Ver.1.21からの対応になります。
80： Re^2: 新リンク機能、今日、テスト 投稿者：konno 2024/07/06(土) 23:39
79 番 konno さんへのコメント
- No.80 - [ｺﾒﾝﾄ元:79] [リストへもどる.] pre> 単なるテストです。この長い行を折り返すかどうか。さてどうなることやら全く分かりません。どうしたものか。> タブとスペースのテストです。>>
79： Re: 新リンク機能、今日、テスト 投稿者：konno 2024/07/06(土) 23:37
78 番 konno さんへのコメント コメント数 1
単なるテストです。この長い行を折り返すかどうか。さてどうなることやら全く分かりません。どうしたものか。
タブとスペースのテストです。
- No.79 - [ｺﾒﾝﾄ元:78] [リストへもどる.]
pre 78： 新リンク機能、今日、テスト 投稿者：konno 2024/05/29(水) 06:36
77 番 konno さんへのコメント コメント数 1
東芝のデスクトップ一体型です。うちの掲示板の過去ログで書いています。- No.78 - [ｺﾒﾝﾄ元:77] [リストへもどる.] soft> 今日#5814：TVを買ったらWin7がついてきたよ konno 2012/04/30
http://tamaneko.world.coocan.jp/bbs/wforum.cgi?mode=allread&pastlog=14&act=past&no=5814#5814
それが2018年に動かなくなったので買い替える口実にしたのでした。(^^;> 今日#7989：デスクトップPCが壊れた konno 2018/04/01
http://tamaneko.world.coocan.jp/bbs/wforum.cgi?mode=allread&fsize=&no=7989#7989
#k7989 #kyo7989
#t78 #test78
テスト#78
77： Re^2: 新リンク機能 txt= txt: 投稿者：konno 2024/04/27(土) 23:20
76 番 konno さんへのコメント コメント数 2
- No.77 - [ｺﾒﾝﾄ元:76] [リストへもどる.] pre> > 新リンク機能のテストです。> >> > #txt=hanoi_k.def> >> > #txt: hanoi_k.def> >> > #txt:aste1.zip #txt:stime2.lzh> > #txt:aste1.zip_ #TXT:stime2.lzh.>>> 表示テストです。>#TXT=LXCLND.DEF #TXT:LXCLND.DEF
76： Re: 新リンク機能テスト 投稿者：konno 2024/04/04(木) 14:18
75 番 konno さんへのコメント コメント数 1
- No.76 - [ｺﾒﾝﾄ元:75] [リストへもどる.] pre> 新リンク機能のテストです。>> #txt=hanoi_k.def>> #txt: hanoi_k.def>> #txt:aste1.zip #txt:stime2.lzh> #txt:aste1.zip_ #TXT:stime2.lzh.表示テストです。
75： 新リンク機能テスト 投稿者：konno 2024/02/22(木) 00:13
コメント数 1
新リンク機能のテストです。- No.75 - [リストへもどる.] soft
#txt=hanoi_k.def
#txt=anime.dat
#txt: hanoi_k.def
#txt:aste1.zip #txt:stime2.lzh
#txt:aste1.zip_ #TXT:stime2.lzh.
74： command.com 関連 投稿者：konno 2022/09/16(金) 22:56
#kyo4602： 手持ちの command.com 投稿者： - あじゃ - 2009/12/19(土) 11:12 参照先： http://aja.seesaa.net/ #04601 shadow さん宛というわけでもなく、 手持ちの command.com です。 65,091 94-04-15 6:30 command.com PC DOS J6.30/V (fix前) 65,106 95-06-06 6:30 command.com PC DOS J6.30C/V (fix後) 63,387 95-07-07 7:00 command.com PC DOS J7.00/V (fix前) 63,402 98-05-25 7:00 command.com PC DOS J7.00C/V (fix後) 116,802 95-10-03 0:00 command.com Windows95a (初期版) 118,164 98-06-12 20:01 command.com Windows98 (1st) 117,638 00-06-08 17:00 command.com WindowsMe あと Win95 の OSR2 があるけど、いま出すのはちょいと大変。- No.74 - [リストへもどる.] pre
73： めざらさん方式発言者ID生成関連 投稿者：konno 2020/10/25(日) 17:37
コメント数 2
BBSのログをnifty形式に変換するときにネックになるのが発言者のIDをどうするかです。- No.73 - [リストへもどる.] soft
野ざらし言：過去ログ書庫
http://mezala.la.coocan.jp/noz/index.html
めざらさんがここで仕様とマクロを公開していますが、仕組がさっぱりわかりません。
板塀にめざらさん方式発言者ID生成関連情報がありました。
板塀#813 です。
72： Tra_TAG.def 改 V04 投稿者：konno 2018/12/04(火) 23:12
66 番 konno さんへのコメント
=== Tra_TAG.def v16 ===
; V16k04 konno改
;2018-10-04 03 ディレクトリ＆LFN不具合対応
;2018-12-04 04 バッファ溢れ不具合対策 コンソールのみ
* M
;60 ^\ "TAG"
60 "TAG"
?.
;------- ファイラー移行拡張子 (%A) ---------------------------------------
a".com .exe .dic .obj .lib .lzh .jpg .gif .ico .zip .pif .lnk",
;------- start コマンド拡張子 (%B) ---------------------------------------
b".xls .ppt .mdb",
;------- メニュー選択拡張子 (%C) ---------------------------------------
; c".htm .pas",
c".htm .pas .asm .inc",
;------- m=0:wgrep, m=1:ygrep, (%D) --------------------------------------
m0, ;m1,
;-------------------------------------------------------------------------
#] #? #> #< &x(255) ;バッファ溢れ対策 行の長さ255以上？
(cd!=$d&&wn==0)?{&x(254)#m#e}#< ;コンソールなら改行挿入
#] #? (r)?. wa..19.2-, ;行を lfb に取り込む
&So(wa..18,":\") (r)??{ ;フルパスが書いてない
&Ss(pq..148+2) si=r, ;lbuf
di=pq..134+100, i-, i[, &> i], ;tmpbuf
(r!=-1)?{ r=si+1, >C } ;行頭からもＬＦＮが取得出来ないときは
r=si+1, >C ;★ＬＦＮが取得出来なくても進む
dn[-, #60 dn], ;通常の #60
&m("0 ng %s",di) ;▼
>C ;★ＬＦＮが取得出来なくても進む
; f"",(r)?>61 >B ;取得できなければ LZH 処理
}
:A si=r-1, di=pq..134+100, i3, ;フルパス部分を di へ取り出し
:C
; &m("-0 ng %s",di) ;▼
;&w(120)
di[, &> di],
f=di, ;(r==-1)?{ #> #d >E }
r=si+i, ;-->r=lbf内のフルパス末尾adr
&09 ;-->pa=拡張行番号情報
&m("09 i=%d %s",i,wa+146)
; &t &w(120)
ax$7160, cx+, si=di, di=pq..149,
; &i($21) (ax==$7100 || r)?di=si,
&i($21) (ax==$7100)?di=si,
&s
#k (w=wn)?#X mr255,#i mb+, ;起動行を console に貼り付けて
ps[=pr, #56 "$"" #m "" #m 'Y'
#56 &?("\i %s",si) #m ;ファイル名部分をSFNに置換
&?("%s ",di) #m 'Y' ps], mb-,
#60 e=r, ;TAG情報取得して
ux[+, #y ux], (w)?#X &d ;後始末
#> #d
(e)?{ ;ディレクトリ対応
&06 (r)? >E
&m("1 ng %s",pf) ;▼
; f"",(r)?>61 >B ;取得できなければ LZH 処理
.
}
:B ;- 拡張子判断 -
&Sy(pf) (r&2)?{
:a &So(a,cx) (r)?{ ;ファイラー移行拡張子
e=r, &Sn(cx)
(e.r==32 || e.r==0)?{
&03 .
} a=e+1, >a
}
:b &So(b,cx) (r)?{ ; start コマンド拡張子
e=r, &Sn(cx)
(e.r==32 || e.r==0)?{
&07 .
} b=e+1, >b
}
:c &So(c,cx) (r)?{ ;メニュー選択拡張子
e=r, &Sn(cx)
(e.r==32 || e.r==0)?{
&02 .
} c=e+1, >c
}
}
&04 ;--- テキストとしてオープン ---
&m("2 ok %s",wa+146) ;●
.
:E ;- オープン出来ない -
&m("%s オープンできません",f) &b(2)
00: ;--- ＬＦＮ対応 #60 ----
;<-- r=0:Exists, -1:non,
si[,
&Sc(di,si,i)
:A (si.i=='"')?{ si++, >A }
; &f(si.i,"$(9,d)$"(*<>?:/| =[];+,") ;
&f(si.i,"$(9,d)$"(*<>?:| =;+,") ; / ディレクトリ&LFN対応
e=r, (si.i)??e-,
(e>=0)?{ ;ファイル不可文字なら一旦存在判定
&> (r)??>Z ;存在すればr=0を返す
}
(e==255)?{ di.i-, (-1) >Z } ;存在しなければr=-1を返す
di.i=si.i, i++, >A
:Z si],
&m("00 i=%d %70s",i,wa+146)
;&w(60)
01: ;--- ファイル存在チェック ---
;<-- r=0:Exists,
; e=255:最終判定,
(e<11)?e255, ;LFN でも使えない文字なら最終判定
di.i-,
&Sn(di) r--,
(r>=254)?{&m("%d",r)&t}
(di.r=='\')?di.r=0,
ax$7143, bx-, dx=di,
:F &i($21) ;ファイル存在チェック
(ax==$7100)?{ ;LFN に対応してなければ最終判定
ax$4300, e255, >F
}
(r)
&m("01 i=%d %70s",i,wa+146)
;&w(60)
02: ;--- メニュー処理 ---
;--> pf
&m("02 %70s",wa+146)
;&w(120)
!01
(r==0)?{ ;start
&07
.
}
(r==1)?{ ;filer
&03
.
}
(r==2)?{ ;open
&04
.
}
03: ;--- ファイラーへ移行 ---
;--> pf,bx
#O bx.0[=0, &?("%s",pf) #m bx.0=0],
&Sc(pn..-38,pf) #U
04: ;--- テキストとしてオープン ---
;--> pf
r=pf, &08 (r==1)?{
:S ;- メニュー処理その２ -
&m("maybe binary : %60s",pf)
!01
(r==0)?{ ;start
&07
.
}
(r==1)?{ ;filer
&03
.
}
(r==2)?{ ;open
>O
}
.
}
:O &Sf(pf,' ') (r)?{ p=r, si=p+2, }
?{ &Sn(pf) si=p=pf+r, } &>
q=pf, pf[=pr,
p.0[=0, #O &?("%s",q) p.0=0], #m
pf],
(s)?{ &b(2) . }
(pa.0==1)?{
&m("ただいまジャンプ中 %s(->%s)",wa+146,pa+1)
; &w(60)
; #O &?("%s ->%s",wa+146,pa+1) #m
#O &?("%s ->%s",pf,pa+1) #m
&d
.
}
&m("ただいまジャンプ中 %s (%lu行)",wa+146,ax,dx)
; &w(60) &d
#^ dn[-,
:L ;- long行番号へジャンプ -
(dx)?{ dx--, &#J(-1)
(ln-0~)??{ #> #d >L } (0)
}? &#J(ax)
&m("") #? &d dn],
05: ;--- Long 値を取得 ---
&i(3+$)."$
$(33,C0,99,33,C9,BF,0A,00,8B,D8,AC,2C,30,3C,09,77)$
$(0F,8A,C8,8B,C2,F7,E7,93,F7,E7,03,C1,13,D3,EB,E8)$
$(8B,C3,C3)"
06: ;--- ディレクトリとしてオープン ---
;--> di
ax$4300, bx-, dx=di, &i($21) ;ファイル存在チェック
(r)?{ (1) . }
#O &?("%s",di) #m (0)
07: ;--- start コマンド ---
;--> pf
#E &?("Start %s",pf) #m #[
08: ;--- chk binary ---
;--> r=ファイル名
;<-- r=-1:non file, 1:binary
ax[,bx[,cx[,dx[,di[,
dx=r, ax$3d00, &i($21) (r)?{ (-1)>Z } ;open
dx=pq..149, bx=ax, cx=250,
ax$3f00, &i($21) ;read
bx[, di=dx,cx=ax,
&i("$(32,C0,F2,AE,F7,D9,C3)") (r) ;scan ZERO
bx], ax$3E00, &i($21) ;close
:Z di],dx],cx],bx],ax],
09: ;--- 拡張行番号情報 ---
;<--pa.0 db 0:normal, 1:cp, 2:env,
; .1 dd string
p[=r+1,
pa.0-,
(p..0=='>-')?{
pa.0=1, p+=1, i-,
:a i++, r=p.i, &10 ?{ pa.i=p.i, >a }
pa.i-,
}
(p..0=='-[')?pa.0=2,
p],
10: ;--- 16進？ ---
(r)>!{
1>h 2>h 3>h 4>h 5>h
6>h 7>h 8>h 9>h 0>h
A>h B>h C>h D>h E>h F>h
a>h b>h c>h d>h e>h f>h
}
(0)
.:h (1)
61 ^^ "LZH"
(s)?.
&s &#M(4) ky[,
&20 f=r, ;-->f=検索文字
(f)??{ &m("変数 m を正しく設定してください") >Z }
mp[,ps[=pr,
#F &?("%s",f) #m #r
ps],mp],
(r)?{ r-,>e }
r=pq..149, &23 ;-->r=行バッファ取得アドレス
(r==-1)?{ r+, >e }
&21 (r==-1)?{ r2, >e }
p=r, ;-->p=圧縮ファイル名
&#U(4)
r=pq..149+121, &23
(r==-1)?{ r+, >e }
&22 (r==-1)?{ r3, >e }
q=r, &Sn(q) l=q+r+1, ;-->q=ファイル名
&Ss(l) l=r, ; l=行数
#E &?("miel -l -na %s +%s -ej -j%s",p,q,l) #m #[
:Z &#U(4) ky],&d
.
:e ;- エラー表示 -
&#U(4) #> #d &#M(4)
(r)>?{
("タグ情報／書庫ファイル情報行が見つかりません")
("カーソル行が取得できません")
("書庫ファイル情報行の不備です（ ^QP でジャンプ ）")
("タグファイル情報行の不備です")
}
&m("%d %s %s",r,mg..0,p)
>Z
20: ;--- 書庫ファイル情報検索文字 ---
r-,
(m==0)?{ r"\i ------------------[", }
(m==1)?{ r"\i /* 書庫ファイル ", }
(r)
21: ;--- 書庫ファイル情報行を分析 ---
;-->r=取得バッファ
p[=r,
(m==0)?{
&SO(p," << ") (r)?p=r+4,
?{ r=-1, >Z }
&SO(p,"]") (r)?r.0-,
?{ r=-1, >Z }
}
(m==1)?{
&SO(p,"ル ") (r)?p=r+3,
?{ r=-1, >Z }
&SO(p," */") (r)?r.0-,
?{ r=-1, >Z }
}
r=p,
:Z (r)
p],
22: ;--- タグファイル行を分析 ---
;-->r=取得バッファ
p[=r,
&SO(p," ") (r)?r.0-,
?{ r=-1, >Z }
&SO(r+1,":") (r)?r.0-,
?{ r=-1, >Z }
r=p,
:Z (r)
p],
23: ;--- カーソル行の（論理）行頭から 120 文字を r へ取得 ---
;-->r=取得バッファ
;<--r=-1:Err,
p[=r,
(mr==$80)?{#? &s }?#28 ;#28 は ViewMode では使えない
(r)?{ r=-1, >Z } ;#? #28 --> r==-1:lbfが一杯などのエラー
wa..19.2-,
; &Sc(p,wa..18,120) r=p,
&Sc(p,wa..18,200) r=p,
:Z (r)
p],
* P
01 "",7,3
"Start"
"Filer"
"Open"
*
= End of Tra_TAG.def =
- No.72 - [ｺﾒﾝﾄ元:66] [リストへもどる.]
pre 71： IMASK3.DEF 投稿者：konno 2018/11/21(水) 21:14
70 番 shadow さんへのコメント
=== IMASK3.DEF === IMASK+MASKMAN2＋α+k
だんだんパスマスク by 榊原 知 ver 2.00 94/02/04
+MASKMAN2.DEF とらじ
+konno 若干改造 2018-11-20
* M
;89 \[CLR] "だんだんパスマスク"
50 ""
>?{>A >B #98 >> .} >>
:A #O
:B (cm-70 && cm-71 && cm-76)?.
#m >>
20: ;本体
;e=パスマスク書換マクロ
(s-3)?.
r=mg..2,
(r>mg+16 && r..0==r..-4)?.
&01
p..0='*', ;&Sc(p,"*")
&Sy(fl+98) (r&2)?{ ;拡張子あり？
&Sy(cx) (r&1)??{&Sw(cx) &Sc(p+1,cx,r)}
;パスマスクに拡張子設定
}
e"",&02
i-,
:A &26 ;ディレクトリMask by とらじ
&01
; &m("Mask %s",p)
am[=$e0, &m("Mask %s",p) am], ;動作中はメッセージ色変更 ★★★
&p &u(r) c=r, ;c=キー入力
(s-3)?>B
(ks&1 && (c>'0' && c<='9'))?{&s #L ss-, &o(c+16) >A}
;ドライブ切り替え
(ks&1 && (c>='A' && c<='Z'))?{r=c,rr=(pv+63)..7-3,&* >A}
;ファイラーコマンド
e-,
(c)>!{ ;機能キー処理
:>B />B ;[:][\][/]そのまま
\ (e">12")
* (e"#x'*'") ;[*]マスククリア
. (e">11") ;[.]拡張子
(#[) >Z ;[ESC]終了
(#94) (e">10") ;[BS]１字戻し
(#h) (e">10") ;[BS]１字戻し
; (' ') (c'?') ;[SPC]１字飛ばし
? (c'?') ;[?]１字飛ばし ★★★
(' ') >S ;[SPC] マーク ★★★
}
(e)??{ ;一般キー処理
(c>>8==1)?>B ;コマンドキー
e"&o(c)", ;文字キー
}
&02 >A ;パスマスク
:S #91 >A ;マーク ★★★##k
:B &o(c) (sm==3)?>A ;そのまま
:Z (s)??fg.1+, &m("")
;:Z
; (s)?? {
; fl.98-, ;[CR]&mask 解除 Takahashi
;; fl...98-, ;
; pc.375+, ;pq.-7=1, pq.6~+, ;tchdir ; touch dir flag
;; (fl.130)?&Sc(fl+34,fl+130)?fl.33-, ;[CR]&path 解除
;; f=fl..0, ;
;; (f.130)?&Sc(f+34,f+130)?f.33-, ;
; }
; &m("")
01: p=5+$,.
"$(40,0)$[64]"
02: ;パスマスク設定
;<---
;e=パスマスク加工マクロ
pf[,&01 pf=p, ;ファイルヒストリー設定
&s
#P #e ;パスマスク
:A (cd-'*')?{#s>A}
&e(e)
&d #m
pf],
10: ;[BS]１字戻す
(lx)??{#[ &d #94 #P "*" .}
ux[+,
#s
(cd=='.')?#h
#g
ux],
11: ;[.] 拡張子マスク
ux[+, #l ux],
"*.*"
12: ;[\]ディレクトリ
ux[+, #l ux],
"\" #m
#P "*"
26: ;--- ▽ファイラープール書き換え -----
; &i() 前後で、
; ▼総ファイル数が同じなら（ファイラープールの書き換えがない）
; #- のみで再表示、違うなら fv^=4, &d #V で。
; ▼ファイラーカーソル位置が 0 なら #^ でカーソル位置を補正。
ax=fl, &> &i(r)
(dx)?{ fv^=4, &d #V (0) }? #?
(bx)??#^
26: (3+$)."$
$(8B,E8,FF,76,0C,33,D2,8B,5E,02,8B,F3,E8,6A,00,A8)$
$(10,74,0D,3B,5E,06,73,08,E8,07,00,83,C3,16,EB,EA)$
$(5B,C3,8B,F3,83,C6,09,8B,FD,83,C7,62,8A,05,E8,4F)$
$(00,8A,E0,E8,43,00,E8,47,00,80,FC,00,74,16,80,FC)$
$(2A,74,11,80,FC,3F,74,09,3A,C4,74,05,E8,06,00,EB)$
$(03,47,EB,D8,C3,8B,FB,8B,F7,83,C6,16,8B,4E,06,2B)$
$(CF,1E,06,8E,46,04,8E,5E,04,F3,A4,07,1F,42,FF,4E)$
$(0E,83,6E,06,16,83,EB,16,C3,1E,8E,5E,04,AC,1F,C3)$
$(3C,61,72,06,3C,7A,77,02,2C,20,C3)"
*
=== end of IMASK
- No.71 - [ｺﾒﾝﾄ元:70] [リストへもどる.]
pre 70： maskman2 投稿者：shadow 2018/11/18(日) 13:04
コメント数 1
maskman2.lzhです。- No.70 - [リストへもどる.] soft
<<< maskman2.lzh for MS-DOS ( use ish & lha ) [ 85 lines ] >>>
�97--- 省略されました。---- [全文表示]
69： Re: testです 投稿者：konno 2018/10/23(火) 21:33
68 番 konno さんへのコメント
- No.69 - [ｺﾒﾝﾄ元:68] [リストへもどる.] soft> testです
testです
68： testです 投稿者：konno 2018/10/23(火) 21:32
コメント数 1
testです- No.68 - [リストへもどる.] soft
67： 他の板への番号リンクテストです 投稿者：konno 2018/10/06(土) 20:12
36 番 konno さんへのコメント
他の板への番号リンクテストです。 # #41 言#41 塀#41 の#41 #41 #1#41 ##41 #kyo #k3008 #kyo3008へ(今日のテーマ板) #kyo 今日のテーマ#3008へ(今日のテーマ板) #link #l0008 #link8へ (リンク板) #test #t0041 #test41へ (テスト板) #n #n3000 野ざらし言#3000 野ざらし言3000番へ #n3000 #i #i1000 板塀#1000へ 板塀1000番へ #i1000- No.67 - [ｺﾒﾝﾄ元:36] [リストへもどる.] pre
66： Tra_TAG.def 改 V02 投稿者：konno 2018/10/05(金) 01:02
65 番 konno さんへのコメント コメント数 1
=== Tra_TAG.def v16 ===
; V16k02 2018-10-04 konno
* M
;60 ^\ "TAG"
60 ^[F10] "TAG"
?.
;------- ファイラー移行拡張子 (%A) ---------------------------------------
a".com .exe .dic .obj .lib .lzh .jpg .gif .ico .zip .pif .lnk",
;------- start コマンド拡張子 (%B) ---------------------------------------
b".xls .ppt .mdb",
;------- メニュー選択拡張子 (%C) ---------------------------------------
; c".htm .pas",
c".htm .pas .asm .inc",
;------- m=0:wgrep, m=1:ygrep, (%D) --------------------------------------
m0, ;m1,
;-------------------------------------------------------------------------
#] #? (r)?. wa..19.2-, ;行を lfb に取り込む
&So(wa..18,":\") (r)??{ ;フルパスが書いてない
&Ss(pq..148+2) si=r,
di=pq..134+100, i-, i[, &> i],
(r!=-1)?{ r=si+1, >C } ;行頭からもＬＦＮが取得出来ないときは
; r=si+1, >C ;} ;★ＬＦＮが取得出来なくても進む
dn[-, #60 dn], ;通常の #60
&m("0 ng %s",di) ;▼
>C ;★ＬＦＮが取得出来なくても進む
f"",(r)?>61 >B ;取得できなければ LZH 処理
}
:A si=r-1, di=pq..134+100, i3, ;フルパス部分を di へ取り出し
:C di[, &> di],
f=di, ;(r==-1)?{ #> #d >E }
r=si+i, ;-->r=lbf内のフルパス末尾adr
&09 ;-->pa=拡張行番号情報
ax$7160, cx+, si=di, di=pq..149,
; &i($21) (ax==$7100 || r)?di=si,
&i($21) (ax==$7100)?di=si,
&s
#k (w=wn)?#X mr255,#i mb+, ;起動行を console に貼り付けて
ps[=pr, #56 "$"" #m "" #m 'Y'
#56 &?("\i %s",si) #m ;ファイル名部分をSFNに置換
&?("%s ",di) #m 'Y' ps], mb-,
#60 e=r, ;TAG情報取得して
ux[+, #y ux], (w)?#X &d ;後始末
#> #d
(e)?{ ;ディレクトリ対応
&06 (r)? >E
&m("1 ng %s",pf) ;▼
; f"",(r)?>61 >B ;取得できなければ LZH 処理
.
}
:B ;- 拡張子判断 -
&Sy(pf) (r&2)?{
:a &So(a,cx) (r)?{ ;ファイラー移行拡張子
e=r, &Sn(cx)
(e.r==32 || e.r==0)?{
&03 .
} a=e+1, >a
}
:b &So(b,cx) (r)?{ ; start コマンド拡張子
e=r, &Sn(cx)
(e.r==32 || e.r==0)?{
&07 .
} b=e+1, >b
}
:c &So(c,cx) (r)?{ ;メニュー選択拡張子
e=r, &Sn(cx)
(e.r==32 || e.r==0)?{
&02 .
} c=e+1, >c
}
}
&04 ;--- テキストとしてオープン ---
&m("2 ok %s",pf) ;●
.
:E ;- オープン出来ない -
&m("%s オープンできません",f) &b(2)
00: ;--- ＬＦＮ対応 #60 ----
;<-- r=0:Exists, -1:non,
si[,
&Sc(di,si,i)
:A (si.i=='"')?{ si++, >A }
; &f(si.i,"$(9,d)$"(*<>?:/| =[];+,")
&f(si.i,"$(9,d)$"(*<>?:| =;+,")
e=r, (si.i)??e-,
(e>=0)?{ ;ファイル不可文字なら一旦存在判定
&> (r)??>Z ;存在すればr=0を返す
}
(e==255)?{ di.i-, (-1) >Z } ;存在しなければr=-1を返す
di.i=si.i, i++, >A
:Z si],
01: ;--- ファイル存在チェック ---
;<-- r=0:Exists,
; e=255:最終判定,
(e<11)?e255, ;LFN でも使えない文字なら最終判定
di.i-,
&Sn(di) r--, (di.r=='\')?di.r=0,
ax$7143, bx-, dx=di,
:F &i($21) ;ファイル存在チェック
(ax==$7100)?{ ;LFN に対応してなければ最終判定
ax$4300, e255, >F
}
(r)
02: ;--- メニュー処理 ---
;--> pf
&m("%70s",pf)
!01
(r==0)?{ ;start
&07
.
}
(r==1)?{ ;filer
&03
.
}
(r==2)?{ ;open
&04
.
}
03: ;--- ファイラーへ移行 ---
;--> pf,bx
#O bx.0[=0, &?("%s",pf) #m bx.0=0],
&Sc(pn..-38,pf) #U
04: ;--- テキストとしてオープン ---
;--> pf
r=pf, &08 (r==1)?{
:S ;- メニュー処理その２ -
&m("maybe binary : %60s",pf)
!01
(r==0)?{ ;start
&07
.
}
(r==1)?{ ;filer
&03
.
}
(r==2)?{ ;open
>O
}
.
}
:O &Sf(pf,' ') (r)?{ p=r, si=p+2, }
?{ &Sn(pf) si=p=pf+r, } &>
q=pf, pf[=pr,
p.0[=0, #O &?("%s",q) p.0=0], #m
pf],
(s)?{ &b(2) . }
(pa.0==1)?{
&m("ただいまジャンプ中(->%s)",pa+1)
#O &?("%s ->%s",wa+146,pa+1) #m
&d
.
}
&m("ただいまジャンプ中(%lu行)",ax,dx)
#^ dn[-,
:L ;- long行番号へジャンプ -
(dx)?{ dx--, &#J(-1)
(ln-0~)??{ #> #d >L } (0)
}? &#J(ax)
&m("") #? &d dn],
05: ;--- Long 値を取得 ---
&i(3+$)."$
$(33,C0,99,33,C9,BF,0A,00,8B,D8,AC,2C,30,3C,09,77)$
$(0F,8A,C8,8B,C2,F7,E7,93,F7,E7,03,C1,13,D3,EB,E8)$
$(8B,C3,C3)"
06: ;--- ディレクトリとしてオープン ---
;--> di
ax$4300, bx-, dx=di, &i($21) ;ファイル存在チェック
(r)?{ (1) . }
#O &?("%s",di) #m (0)
07: ;--- start コマンド ---
;--> pf
#E &?("Start %s",pf) #m #[
08: ;--- chk binary ---
;--> r=ファイル名
;<-- r=-1:non file, 1:binary
ax[,bx[,cx[,dx[,di[,
dx=r, ax$3d00, &i($21) (r)?{ (-1)>Z } ;open
dx=pq..149, bx=ax, cx=250,
ax$3f00, &i($21) ;read
bx[, di=dx,cx=ax,
&i("$(32,C0,F2,AE,F7,D9,C3)") (r) ;scan ZERO
bx], ax$3E00, &i($21) ;close
:Z di],dx],cx],bx],ax],
09: ;--- 拡張行番号情報 ---
;<--pa.0 db 0:normal, 1:cp, 2:env,
; .1 dd string
p[=r+1,
pa.0-,
(p..0=='>-')?{
pa.0=1, p+=1, i-,
:a i++, r=p.i, &10 ?{ pa.i=p.i, >a }
pa.i-,
}
(p..0=='-[')?pa.0=2,
p],
10: ;--- 16進？ ---
(r)>!{
1>h 2>h 3>h 4>h 5>h
6>h 7>h 8>h 9>h 0>h
A>h B>h C>h D>h E>h F>h
a>h b>h c>h d>h e>h f>h
}
(0)
.:h (1)
61 ^^ "LZH"
(s)?.
&s &#M(4) ky[,
&20 f=r, ;-->f=検索文字
(f)??{ &m("変数 m を正しく設定してください") >Z }
mp[,ps[=pr,
#F &?("%s",f) #m #r
ps],mp],
(r)?{ r-,>e }
r=pq..149, &23 ;-->r=行バッファ取得アドレス
(r==-1)?{ r+, >e }
&21 (r==-1)?{ r2, >e }
p=r, ;-->p=圧縮ファイル名
&#U(4)
r=pq..149+121, &23
(r==-1)?{ r+, >e }
&22 (r==-1)?{ r3, >e }
q=r, &Sn(q) l=q+r+1, ;-->q=ファイル名
&Ss(l) l=r, ; l=行数
#E &?("miel -l -na %s +%s -ej -j%s",p,q,l) #m #[
:Z &#U(4) ky],&d
.
:e ;- エラー表示 -
&#U(4) #> #d &#M(4)
(r)>?{
("タグ情報／書庫ファイル情報行が見つかりません")
("カーソル行が取得できません")
("書庫ファイル情報行の不備です（ ^QP でジャンプ ）")
("タグファイル情報行の不備です")
}
&m("%d %s %s",r,mg..0,p)
>Z
20: ;--- 書庫ファイル情報検索文字 ---
r-,
(m==0)?{ r"\i ------------------[", }
(m==1)?{ r"\i /* 書庫ファイル ", }
(r)
21: ;--- 書庫ファイル情報行を分析 ---
;-->r=取得バッファ
p[=r,
(m==0)?{
&SO(p," << ") (r)?p=r+4,
?{ r=-1, >Z }
&SO(p,"]") (r)?r.0-,
?{ r=-1, >Z }
}
(m==1)?{
&SO(p,"ル ") (r)?p=r+3,
?{ r=-1, >Z }
&SO(p," */") (r)?r.0-,
?{ r=-1, >Z }
}
r=p,
:Z (r)
p],
22: ;--- タグファイル行を分析 ---
;-->r=取得バッファ
p[=r,
&SO(p," ") (r)?r.0-,
?{ r=-1, >Z }
&SO(r+1,":") (r)?r.0-,
?{ r=-1, >Z }
r=p,
:Z (r)
p],
23: ;--- カーソル行の（論理）行頭から 120 文字を r へ取得 ---
;-->r=取得バッファ
;<--r=-1:Err,
p[=r,
(mr==$80)?{#? &s }?#28 ;#28 は ViewMode では使えない
(r)?{ r=-1, >Z } ;#? #28 --> r==-1:lbfが一杯などのエラー
wa..19.2-,
; &Sc(p,wa..18,120) r=p,
&Sc(p,wa..18,200) r=p,
:Z (r)
p],
* P
01 "",7,3
"Start"
"Filer"
"Open"
*
= End of Tra_TAG.def =
- No.66 - [ｺﾒﾝﾄ元:65] [リストへもどる.]
pre 65： Tra_TAG.def 改 V1 投稿者：konno 2018/10/04(木) 21:42
コメント数 1
削除しました- No.65 - [リストへもどる.] pre
64： k7t5b 投稿者：konno 2017/09/11(月) 07:21
<<< k7t5b.lzh for MS-DOS ( use ish & LHarc ) [ 180 lines ] >>>- No.64 - [リストへもどる.] soft
�71--- 省略されました。---- [全文表示]
63： Re^9: 半角カナのテスト2 投稿者：konno 2015/10/02(金) 23:04
62 番 konno さんへのコメント
- No.63 - [ｺﾒﾝﾄ元:62] [リストへもどる.] hard> > > > > > > > > > テスト123 456> > > > > > 123> > > > > > 567> > > > > > 789> > > > > 11> > > > 22> > > 33> 0925 0928
62： Re^8: 半角カナのテスト2 投稿者：konno 2015/09/22(火) 19:25
61 番 さんへのコメント コメント数 1
- No.62 - [ｺﾒﾝﾄ元:61] [リストへもどる.] hard> > > > > > > > > テスト
> > > > > 123> > > > > 567> > > > > 789> > > > 11> > > 22> > 33> 61
62 11
0925 0928
60： Re^5: 半角カナのテスト2 投稿者：konno 2015/09/22(火) 18:09
59 番 konno さんへのコメント
- No.60 - [ｺﾒﾝﾄ元:59] [リストへもどる.] soft> > > > > > > テスト> > >> > > 123> > > 567> > > 789> > 11> 22
33
59： Re^4: 半角カナのテスト2 投稿者：konno 2015/09/22(火) 17:23
58 番 konno さんへのコメント コメント数 1
- No.59 - [ｺﾒﾝﾄ元:58] [リストへもどる.] soft> > > > > > テスト> >> > 123> > 567> > 789> 11
22
3
58： Re^3: 半角カナのテスト2 投稿者：konno 2015/09/22(火) 17:17
56 番 konno さんへのコメント コメント数 1
- No.58 - [ｺﾒﾝﾄ元:56] [リストへもどる.] soft> > > > > テスト>> 123> 567> 789
11
57： Re^3: 半角カナのテスト2 投稿者：konno 2015/09/22(火) 09:28
56 番 konno さんへのコメント
- No.57 - [ｺﾒﾝﾄ元:56] [リストへもどる.] soft> > > > > テスト>> 123
345
0927 0928
56： Re^2: 半角カナのテスト2 投稿者：konno 2015/09/20(日) 02:58
55 番 konno さんへのコメント コメント数 2
- No.56 - [ｺﾒﾝﾄ元:55] [リストへもどる.] soft> > > > テスト
123
567
789
55： Re: 半角カナのテスト2 投稿者：konno 2015/09/13(日) 23:23
46 番 konno さんへのコメント コメント数 1
- No.55 - [ｺﾒﾝﾄ元:46] [リストへもどる.] soft> > > テスト> ﾃｽﾄ> > > 半角ｶﾅのﾃｽﾄﾃﾞｽ> > > ( ﾟﾟ;)> ﾒ> >ﾙ> > ｱ> > ﾄ> > ﾞ> > 行頭に半角の「メル」とか「ド」だけで文字化けしますね。タイトルにはほぼ使用不能？> > CGIエラーになる場合もあります。> >> > 使用する場合は必ずプレビューで確認してください。書きかけの記事が消えても> > 責任はもてませんので、自己責任で。(^^;> >> >> >> >> >> >>
53： tagl.def用taglight.pat 投稿者：konno 2013/05/11(土) 19:07
コメント数 3
#デフォルト
D ■
C \^■
B \^★
A \^・
1
#C,C++コード用
:C,CP,H,
E ( )
D { }
B // \C\$
C {* *}
#パスカルコード用
:DP,PA,
E (* *)
E { }
E // \C\$
#ＨＴＭＬ用
:HT,
B < >
C !-- --
E HREF=" "
A src=" "
B name=" "
E font
#CGI用
:CG,
C < >
B !-- --
E font
A src=" "
B name=" "
#NIFTYログ用
:LO,
A \0\0\0\0\0/\0\0\0\0\0 \C\$
B \^| \C\$
B \^ | \C\$
B \^｜ \C\$
B \^> \C\$
B \^＞ \C\$
B \^》 \C\$
C http:// \C\$
E mailto: \C\$
#ＶＺマクロコード用
:DE,
C \^\0\0:
E >\0\0
C >\0\0\C
C &\0\0
C &\0\0\C
C &>
C &>\C
C >>
C >>\C
E :\A
E >\A
E >\A\C
B ; \C\$
D \^\0\0 \C\$
B \^* \C\$
# TagLight 設定ファイル
#
#【パターン】
#
# |表示色<TAB>前タグ<TAB>後タグ → 前タグと後タグも含めて間の文字を着色
# |表示色<TAB>前タグ → 前タグのみを着色
#
#【表示色】
#
# DkBlack 0 Black 8
# DkBlue 1 Blue 9
# DkGreen 2 Green A
# DkAqua 3 Aqua B
# DkRed 4 Red C
# DkPurple 5 Purple D
# DkYellow 6 Yellow E
# DkWhite 7 White F
#
#【特殊文字】
#
# \0 0～9
# \A a～z A～Z
# \C ASCII CODE $00～$1F
# \^ 前タグの先頭にある場合のみ表示行頭
# \$ 後タグの末尾にある場合のみ表示行末
# \\ \ 自身
#
# ※ \$ はANDではなくてORの働きをします。例えば後タグが \C\$ の場合、
# 「表示行末に ASCII CODE $00～$1F の文字があるところまで」ではなく
# て「表示行末かもしくは ASCII CODE $00～$1F まで」となります。
# ※ \^ と \$ は TagLight.exe の内部でフラグに置き換えられていますか
# ら、これらのみをタグに指定しても「タグ文字列が無い」と判断されます。
# 他の文字を組み合わせて使ってください。
#
#【ＶＺ用 NE 設定】
#
# 行頭の : に続けて１文字か２文字で指定。 AA,BB のように , で区切り
# 複数指定することもできます。
- No.53 - [リストへもどる.]
pre 52： blta.asm ver0.41k all DOS版 バグ修正 投稿者：konno 2012/01/08(日) 02:03
47 番 konno さんへのコメント コメント数 2
;blta.asm (Long Fullpath BLT All for all DOS ver0.41k 2012-01-08 ) INCLUDE STDIO.H CODE SEGMENT BYTE ASSUME CS:CODE, DS:CODE, ES:CODE, SS:CODE org 80h argc db ? ;引数のサイズ 0-127bytes argv db 127 dup (?) org 100h ;----------------------------------------------------------------- START: mov bx,80h ;↓引数をASCIIZにする add bl,[bx] ;引数のサイズ取得 inc bx cmp bx,83h ;★ 引数が無い時 jb normal ;★ mov [bx],byte ptr 0 ;引数終わりの0Dhをnullに mov bx, offset argv ;↓第一引数の処理 SWCHR: add bx,1 cmp byte ptr [bx],'/' je SWCHR cmp byte ptr [bx],'-' je SWCHR cmp byte ptr [bx],'D' je OP_D cmp byte ptr [bx],'d' je OP_D cmp byte ptr [bx],'P' je OP_P cmp byte ptr [bx],'p' je OP_P cmp byte ptr [bx],'F' je OP_F cmp byte ptr [bx],'f' je OP_F cmp byte ptr [bx],'?' je USAGE cmp byte ptr [bx],'H' je USAGE cmp byte ptr [bx],'h' je USAGE cmp byte ptr [bx],' ' ;スペースなら第二引数の先頭 jb OPERR ; jne USAGE ;それ以外の文字ならHELP sp2: add bx,1 cmp byte ptr [bx],' ' ; jb OPERR ; je sp2 mov FILE2,word ptr bx jmp normal OP_D: mov OPT_D,1 ; "" jmp SWCHR OP_P: mov OPT_P,1 ; full Pass jmp SWCHR OP_F: mov OPT_F,1 ; Filename opt2 jmp SWCHR OPERR: cmp OPT_F,0 ; 引数が無い je normal USAGE: print help_usage newline retms ;----------------------------------------------------------------- ;get current disk normal: mov ah,19h int 21h ;-> disk num in AL add al,'A' ;num2char mov BUFF_DP, byte ptr al ;get current directory (LFN) ---- mov dl,0 mov ax,7147h mov si,offset BUFF_FP ;BUFF_DP+3 int 21h cmp ax,7100h jne win mov ah,47h mov al,byte ptr BUFF_DP add al,1 ;AL num different! A=0 (19h) & A=1 (47h) mov dl,al mov si,offset BUFF_FP ;BUFF_DP+3 int 21h jmp dos win: mov OPT_W,1 ;check & flag set ---- dos: cmp BUFF_DP[3],0 je FIND1 mov FLAG, byte ptr 1 ;if root 0 not root 1(=add '\') ;findfirst ---- FIND1: mov ax,714eh mov dx,offset FILE1 ;'*.*' cmp OPT_F,0 je FI0 mov word ptr dx,FILE2 ;opt2 FI0: call SET ;set cx, si, di cmp OPT_W,0 jne FI1 mov ah,4eh FI1: int 21h jc BYE ;not found? mov HAND, word ptr ax ;save handle num call print_fn ;print drive+dir ;findnext ---- FINDN: mov bx,HAND mov ax,714fh call SET cmp OPT_W,0 jne FN1 mov ah,4fh FN1: int 21h jc BYEBYE call print_fn jmp FINDN ERR: print ERR_MSG1 ;not win32 retms BYE: print ERR_MSG2 ;file not found BYEBYE: mov bx,HAND ;HANDLE CLOSE mov ax,71a1h int 21h retms ; --- subroutines --- SET: mov cx,28h ;directory, volume 除く mov si,1 mov di,offset BUFF_F ret ; --- print1 subroutines --- PRI: cmp [bx],byte ptr 0 je FIN putchar [bx] inc bx jmp PRI FIN: ret ; --- print filename --- print_fn: cmp OPT_D,0 ;print drive+dir je B0 putchar '"' B0: cmp OPT_P,0 je B1 mov bx,offset BUFF_DP call PRI cmp FLAG,0 je B1 putchar '\' B1: mov bx,offset BUFF_F+2ch call PRI cmp OPT_D,0 je B2 putchar '"' B2: newline ret OPT_W db 0 ;DOS 0 win 1 OPT_P db 0 ;full Path flag OPT_F db 0 ;Filename opt2 flag OPT_D db 0 ;double quote flag FLAG db 0 ;if root 0 not root 1(=add '\') HAND dw ? ;handle FILE1 db '*.*',0 FILE2 dw 0 ;opt2 filename BUFF_DP db ?,':\' BUFF_FP db 300 dup (0) BUFF_F db 320 dup (0) ERR_MSG1 db 'Run on Windows','$' ERR_MSG2 db 'File Not Found','$' help_usage db 'BLTA.COM file lister for all DOS Ver0.41k',CR,LF db ' usage BLTA opt filename',CR,LF db ' opt D or d Double quote',CR,LF db ' opt P or p full Path',CR,LF db ' opt F or f File name opt',CR,LF db ' opt H or h or ? Help usage',CR,LF db '$' pend- No.52 - [ｺﾒﾝﾄ元:47] [リストへもどる.] pre
51： blta.com ver0.40k all DOS版のish 投稿者：konno 2012/01/04(水) 20:43
50 番 konno さんへのコメント
<<< blta.com for MS-DOS ( use ish ) [ 27 lines ] >>>- No.51 - [ｺﾒﾝﾄ元:50] [リストへもどる.] soft
�57--- 省略されました。---- [全文表示]
50： blta.asm ver0.40k all DOS版 投稿者：konno 2012/01/04(水) 20:42
47 番 konno さんへのコメント コメント数 2
blta.asm ver0.40k all DOS版です、16ビットDOSでは試してません。 ;blta.asm (Long Fullpath BLT All for all DOS ver0.40k 2012-01-04 ) INCLUDE STDIO.H CODE SEGMENT BYTE ASSUME CS:CODE, DS:CODE, SS:CODE org 80h argc db ? ;引数のサイズ 127bytes argv db 127 dup (?) org 100h ;----------------------------------------------------------------- START: mov bx,80h ;↓引数をASCIIZにする add bl,[bx] ;引数のサイズ取得 inc bx mov [bx],byte ptr 0 ;引数終わりの0Dhをnullに mov bx, offset argv ;↓第一引数の処理 SWCHR: add bx,1 cmp byte ptr [bx],'/' je SWCHR cmp byte ptr [bx],'-' je SWCHR cmp byte ptr [bx],'D' je OP_D cmp byte ptr [bx],'d' je OP_D cmp byte ptr [bx],'P' je OP_P cmp byte ptr [bx],'p' je OP_P cmp byte ptr [bx],'F' je OP_F cmp byte ptr [bx],'f' je OP_F cmp byte ptr [bx],'?' je USAGE cmp byte ptr [bx],'H' je USAGE cmp byte ptr [bx],'h' je USAGE cmp byte ptr [bx],' ' ;スペースなら第二引数の先頭 jb OPERR ; jne USAGE ;それ以外の文字ならHELP sp2: add bx,1 cmp byte ptr [bx],' ' ; jb OPERR ; je sp2 mov FILE2,word ptr bx jmp normal OP_D: mov OPT_D,1 ; "" jmp SWCHR OP_P: mov OPT_P,1 ; pass jmp SWCHR OP_F: mov OPT_F,1 ; Fname jmp SWCHR OPERR: cmp OPT_F,0 ; 引数が無い je normal USAGE: print help_usage newline retms ;----------------------------------------------------------------- ;get current disk normal: mov ah,19h int 21h ;-> disk num in AL add al,'A' ;num2char mov BUFF_DP, byte ptr al ;get current directory (LFN) mov dl,0 mov ax,7147h mov si,offset BUFF_FP ;BUFF_DP+3 int 21h cmp ax,7100h jne win mov ah,47h mov al,byte ptr BUFF_DP add al,1 ;AL num different! A=0 (19h) & A=1 (47h) mov dl,al mov si,offset BUFF_FP ;BUFF_DP+3 int 21h jmp dos win: mov OPT_W,1 ;check & flag set ---- dos: cmp BUFF_DP[3],0 je FIND1 mov FLAG, byte ptr 1 ;if root 0 not root 1(=add '\') ;findfirst ---- FIND1: mov ax,714eh mov dx,offset FILE1 ;'*.*' cmp OPT_F,0 je FI0 mov word ptr dx,FILE2 ;opt2 FI0: call SET ;set cx, si, di cmp OPT_W,0 jne FI1 mov ah,4eh FI1: int 21h jc BYE ;not found? mov HAND, word ptr ax ;save handle num call print_fn ;print drive+dir ;findnext ---- FINDN: mov bx,HAND mov ax,714fh call SET cmp OPT_W,0 jne FN1 mov ah,4fh FN1: int 21h jc BYEBYE call print_fn jmp FINDN ERR: print ERR_MSG1 ;not win32 retms BYE: print ERR_MSG2 ;file not found BYEBYE: mov bx,HAND ;HANDLE CLOSE mov ax,71a1h int 21h retms ; --- subroutines --- SET: mov cx,28h ;directory, volume 除く mov si,1 mov di,offset BUFF_F ret ; --- print1 subroutines --- PRI: cmp [bx],byte ptr 0 je FIN putchar [bx] inc bx jmp PRI FIN: ret ; --- print filename --- print_fn: cmp OPT_D,0 ;print drive+dir je B0 putchar '"' B0: cmp OPT_P,0 je B1 mov bx,offset BUFF_DP call PRI cmp FLAG,0 je B1 putchar '\' B1: mov bx,offset BUFF_F+2ch call PRI cmp OPT_D,0 je B2 putchar '"' B2: newline ret OPT_W db 0 ;DOS 0 win 1 OPT_P db 0 ;full Path flag OPT_F db 0 ;Filename opt2 flag OPT_D db 0 ;double quote flag FLAG db 0 ;if root 0 not root 1(=add '\') HAND dw ? ;handle FILE1 db '*.*',0 FILE2 dw 0 ;opt2 filename BUFF_DP db ?,':\' BUFF_FP db 300 dup (0) BUFF_F db 320 dup (0) ERR_MSG1 db 'Run on Windows','$' ERR_MSG2 db 'File Not Found','$' help_usage db 'BLTA.COM file lister for all DOS Ver0.40k',CR,LF db ' usage BLTA opt filename',CR,LF db ' opt D or d Double quote',CR,LF db ' opt P or p full Path',CR,LF db ' opt F or f File name opt',CR,LF db ' opt H or h or ? Help usage',CR,LF db '$' pend- No.50 - [ｺﾒﾝﾄ元:47] [リストへもどる.] pre
49： blta.com ver0.31k の ish 投稿者：konno 2012/01/04(水) 12:36
48 番 konno さんへのコメント
<<< blta.com for MS-DOS ( use ish ) [ 27 lines ] >>>- No.49 - [ｺﾒﾝﾄ元:48] [リストへもどる.] soft
�57--- 省略されました。---- [全文表示]
48： blta.asm ver0.31k 投稿者：konno 2012/01/04(水) 02:09
47 番 konno さんへのコメント コメント数 3
;------------------------------------------------------------------------- ;blta.asm (Long Fullpath BLT All for win32_DOS ver0.31k) INCLUDE STDIO.H CODE SEGMENT BYTE ASSUME CS:CODE, DS:CODE, SS:CODE org 80h argc db ? ;引数のサイズ 127bytes argv db 127 dup (?) org 100h ;----------------------------------------------------------------- START: mov bx,80h ;↓ファイル名をASCIIZにする add bl,[bx] ;引数のサイズ取得 inc bx mov [bx],byte ptr 0 ;引数終わりの0Dhをnullに mov bx, offset argv ;↓第一引数の処理 SWCHR: add bx,1 cmp byte ptr [bx],'/' je SWCHR cmp byte ptr [bx],'-' je SWCHR cmp byte ptr [bx],'D' je OP_D cmp byte ptr [bx],'d' je OP_D cmp byte ptr [bx],'P' je OP_P cmp byte ptr [bx],'p' je OP_P cmp byte ptr [bx],'F' je OP_F cmp byte ptr [bx],'f' je OP_F cmp byte ptr [bx],'?' je USAGE cmp byte ptr [bx],'H' je USAGE cmp byte ptr [bx],'h' je USAGE cmp byte ptr [bx],' ' ;スペースなら第二引数の先頭 jb OPERR ; jne USAGE ;それ以外の文字ならHELP sp2: add bx,1 cmp byte ptr [bx],' ' ; jb OPERR ; je sp2 mov FILE2,word ptr bx jmp normal OP_D: mov OPT_D,1 ; "" jmp SWCHR OP_P: mov OPT_P,1 ; pass jmp SWCHR OP_F: mov OPT_F,1 ; Fname jmp SWCHR OPERR: cmp OPT_F,0 ; 引数が無い je normal USAGE: print help_usage newline retms ;----------------------------------------------------------------- ;get current disk normal: mov ah,19h int 21h ;-> disk num in AL add al,'A' ;num2char mov BUFF_DP, byte ptr al ;get current directory (LFN) mov dl,0 mov ax,7147h mov si,offset BUFF_DF ;BUFF_DP+3 int 21h cmp ax,7100h je ERR ;check & flag set cmp BUFF_DP[3],0 je FIND1 mov FLAG, byte ptr 1 ;if root 0 not root 1(=add '\') ;findfirst FIND1: mov ax,714eh mov dx,offset FILE1 cmp OPT_F,0 je FI0 mov word ptr dx,FILE2 FI0: call SET ;set cx, si, di int 21h jc BYE ;not found ; cmp ax,7100h ;error check ; je BYE ;print drive+dir mov HAND, word ptr ax ;save handle num cmp OPT_D,0 je FI_2 putchar '"' FI_2: cmp OPT_P,0 je A1 mov bx,offset BUFF_DP call PRI cmp FLAG,0 je A1 putchar '\' A1: ;print filename mov bx,offset BUFF_F+2ch call PRI cmp OPT_D,0 je FI_3 putchar '"' FI_3: newline ;findnext FINDN: mov bx,HAND mov ax,714fh call SET int 21h jc BYEBYE ;print drive+dir cmp OPT_D,0 je FN_2 putchar '"' FN_2: cmp OPT_P,0 je B1 mov bx,offset BUFF_DP call PRI cmp FLAG,0 je B1 putchar '\' ;print filename B1: mov bx,offset BUFF_F+2ch call PRI cmp OPT_D,0 je B2 putchar '"' B2: newline jmp FINDN ERR: print ERR_MSG1 ;not win32 retms BYE: print ERR_MSG2 ;file not found BYEBYE: mov bx,HAND ;HANDLE CLOSE mov ax,71a1h int 21h retms ;--- subroutines --- SET: mov cx,28h ;directory, volume 除く mov si,1 mov di,offset BUFF_F ret PRI: cmp [bx],byte ptr 0 je FIN putchar [bx] inc bx jmp PRI FIN: ret OPT_P db 0 ;full Path flag OPT_F db 0 ;Filename opt2 flag OPT_D db 0 ;double quote flag FLAG db 0 ;if root 0 not root 1(=add '\') HAND dw ? ;handle FILE1 db '*.*',0 FILE2 dw 0 ;opt2 filename BUFF_DP db ?,':\' BUFF_DF db 300 dup (0) BUFF_F db 320 dup (0) ERR_MSG1 db 'Run on Windows','$' ERR_MSG2 db 'File Not Found','$' help_usage db 'BLTA.COM file lister for Win32 DOS Ver0.31k 2012-01-04',CR,LF db ' usage BLTA opt filename',CR,LF db ' opt D or d Double quote',CR,LF db ' opt P or p full Path',CR,LF db ' opt F or f File name opt',CR,LF db ' opt H or h or ? Help usage',CR,LF db '$' pend- No.48 - [ｺﾒﾝﾄ元:47] [リストへもどる.] pre
47： blta.asm (オプション付き改造版) ver0.30k 投稿者：konno 2012/01/04(水) 01:10
コメント数 4
#kyo5724 から転載 VTDOS|C:\VZ\T>BLTA.COM ? BLTA.COM file lister for Win32 DOS Ver0.30k 2012-01-02 usage BLTA opt filename opt D or d Double quote opt P or p full Path opt F or f File name opt opt H or h or ? Help usage このように、最初の引数が動作のオプションで、何もつけなければ、Bll と同じ動作 オプションは複数同時指定できます。"-" や "/" は無視します。 第一引数に "f" を指定して半角スペース1個空け第二引数にファイル名を指定できます。 VTDOS|C:\VZ\T>BLTA.COM f blt*.* BLT.000 BLT1.ASM BLT1.COM BLT1.EXE BLT1.LST BLT2.ASM blt2.com blt2.exe blt2.map BLTA.000 BLTA.ASM BLTA.COM blta.exe BLTA.MAP こんな感じになります。どうでしょうか。以下ソースです。 ;------------------------------------------------------------------------- ;blta.asm (Long Fullpath BLT All for win32_DOS) INCLUDE STDIO.H CODE SEGMENT BYTE ASSUME CS:CODE, DS:CODE, SS:CODE org 80h argc db ? argv db 127 dup (?) org 100h ;----------------------------------------------------------------- START: mov bx,80h ;↓ファイル名をASCIIZにする add bl,[bx] inc bx mov [bx],byte ptr 0 ;↑ここまで mov bx, offset argv SWCHR: add bx,1 cmp byte ptr [bx],'/' je SWCHR cmp byte ptr [bx],'-' je SWCHR cmp byte ptr [bx],'D' je OP_D cmp byte ptr [bx],'d' je OP_D cmp byte ptr [bx],'P' je OP_P cmp byte ptr [bx],'p' je OP_P cmp byte ptr [bx],'F' je OP_F cmp byte ptr [bx],'f' je OP_F cmp byte ptr [bx],'?' je USAGE cmp byte ptr [bx],'H' je USAGE cmp byte ptr [bx],'h' je USAGE cmp byte ptr [bx],' ' ;↓ファイル名の先頭を求める jne normal add bx,1 mov FILE2,word ptr bx jmp normal OP_D: mov OPT_D,1 jmp SWCHR OP_P: mov OPT_P,1 jmp SWCHR OP_F: mov OPT_F,1 jmp SWCHR USAGE: print help_usage newline retms ;----------------------------------------------------------------- ;get current disk normal: mov ah,19h int 21h ;-> disk num in AL add al,'A' ;num2char mov BUFF_DP, byte ptr al ;get current directory (LFN) mov dl,0 mov ax,7147h mov si,offset BUFF_DF ;BUFF_DP+3 int 21h cmp ax,7100h je ERR ;check & flag set cmp BUFF_DP[3],0 je FIND1 mov FLAG, byte ptr 1 ;if root 0, if not root 1 (=add '\') ;findfirst FIND1: mov ax,714eh mov dx,offset FILE1 cmp OPT_F,0 je FI0 mov word ptr dx,FILE2 FI0: call SET ;set cx, si, di int 21h cmp ax,7100h ;error check je BYE ;print drive+dir mov HAND, word ptr ax ;save handle num cmp OPT_D,0 je FI_2 putchar '"' FI_2: cmp OPT_P,0 je A1 mov bx,offset BUFF_DP call PRI cmp FLAG,0 je A1 putchar '\' A1: ;print filename mov bx,offset BUFF_F+2ch call PRI cmp OPT_D,0 je FI_3 putchar '"' FI_3: newline ;findnext FINDN: mov bx,HAND mov ax,714fh call SET int 21h jc BYEBYE ;print drive+dir cmp OPT_D,0 je FN_2 putchar '"' FN_2: cmp OPT_P,0 je B1 mov bx,offset BUFF_DP call PRI cmp FLAG,0 je B1 putchar '\' ;print filename B1: mov bx,offset BUFF_F+2ch call PRI cmp OPT_D,0 je B2 putchar '"' B2: newline jmp FINDN ERR: print ERR_MSG1 retms BYE: print ERR_MSG2 BYEBYE: mov bx,HAND ;HANDLE CLOSE mov ax,71a1h int 21h retms ;--- subroutines --- SET: mov cx,28h ;directory, volume 除く mov si,1 mov di,offset BUFF_F ret PRI: cmp [bx],byte ptr 0 je FIN putchar [bx] inc bx jmp PRI FIN: ret OPT_P db 0 ;full Path flag OPT_F db 0 ;Filename opt flag OPT_D db 0 ;double quote flag FLAG db 0 ;if root 0, if not root 1 (=add '\') HAND dw ? ;handle FILE1 db '*.*',0 FILE2 dw 0 ;opt filename BUFF_DP db ?,':\' BUFF_DF db 300 dup (0) BUFF_F db 320 dup (0) ERR_MSG1 db 'Run on Windows','$' ERR_MSG2 db 'File Not Found','$' help_usage db 'BLTA.COM file lister for Win32 DOS Ver0.30k 2012-01-02',CR,LF db ' usage BLTA opt filename',CR,LF db ' opt D or d Double quote',CR,LF db ' opt P or p full Path',CR,LF db ' opt F or f File name opt',CR,LF db ' opt H or h or ? Help usage',CR,LF db '$' pend- No.47 - [リストへもどる.] pre
46： 半角カナのテスト2 投稿者：konno 2011/12/29(木) 21:07
39 番 konno さんへのコメント コメント数 1
- No.46 - [ｺﾒﾝﾄ元:39] [リストへもどる.] soft> > テスト
ﾃｽﾄ> > 半角ｶﾅのﾃｽﾄﾃﾞｽ> > ( ﾟﾟ;)
ﾒ>ﾙ> ｱ> ﾄ> ﾞ> 行頭に半角の「メル」とか「ド」だけで文字化けしますね。タイトルにはほぼ使用不能？> CGIエラーになる場合もあります。>> 使用する場合は必ずプレビューで確認してください。書きかけの記事が消えても> 責任はもてませんので、自己責任で。(^^;>>>>>>
45： Re: VZ_com 関連ダウンロードランキング 投稿者：konno 2009/09/16(水) 00:16
43 番 konno さんへのコメント
総アクセス数：21483件
VZ_COM ランキング
1 VZK07P.LZH 377
2 VZK09.LZH 330
3 VZK8Q2.LZH 173
4 VZK08Q8.LZH 165
5 VZK07R2.LZH 143
6 VZK07QJ.LZH 140
7 T03K2-K.LZH 122
8 VZOP03A.LZH 121
9 VZK07R1.LZH 114
10 VZK08Q3.LZH 108
11 VZK07I.LZH 105
12 VZK07K.LZH 100
13 VZOP03.LZH 99
14 VZOP02.LZH 95
15 VZK08R.LZH 88
16 VZK08Q7.LZH 71
17 VZK08Q4.LZH 58
18 VZK08Q9.LZH 54
19 VZK07S1.LZH 42
20 VZK08Q6.LZH 41
21 VZK07Q.LZH 31
22 VZK07S2.LZH 18
23 VZK07R.LZH 9
24 VZK07S.LZH 7
25 VZK07S3.LZH 6
25件 参照数 2617
- No.45 - [ｺﾒﾝﾄ元:43] [リストへもどる.]
pre 44： NP2関連ダウンロードランキング 投稿者：konno 2009/09/16(水) 00:02
42 番 konno さんへのコメント
じょじょカウント/アクセス解析 05/05/14 ～ 09/09/12 のアクセス解析 総参照数：21483件 NP2関連の参照数 12139件 順位 総合順位 参照数 1 1 NP2W03T6.LZH 1838 2 2 NP2W0312.LZH 986 3 3 NP2W0304.LZH 918 4 4 NP2WV_T7.LZH 872 5 5 NP2W0306.LZH 862 6 8 NP2W0307.LZH 592 7 9 NP2W0311.LZH 484 8 14 NP2S3_81.LZH 380 9 15 NP2PPP4.LZH 379 10 21 NP2Q40_4.LZH 344 11 24 NP2W0309.LZH 286 12 25 NP2AD_14.LZH 282 13 26 NP2W0314.LZH 275 14 27 NP2MH81.LZH 237 15 28 NP2MQ81.LZH 225 16 30 NP2HPCM.LZH 223 17 31 NP2_SIG3.LZH 214 18 32 NP2AQ81.LZH 197 19 33 NP2W0305.LZH 196 20 34 NP2PPPQ1.LZH 191 21 35 NP2Q40_3.LZH 188 22 36 NP2HPCA.LZH 186 23 37 NP2_HM03.LZH 183 24 42 NP2AH81.LZH 161 25 43 NP2PPC40.LZH 156 26 44 NP2SH3.LZH 156 27 45 NP2_HA03.LZH 150 28 47 NP2SH3_1.LZH 144 29 59 NP2PPP1.LZH 96 30 63 NP2ES_14.LZH 80 31 64 NP2W0308.LZH 79 32 67 NP2_HA04.LZH 76 33 68 NP2_HM04.LZH 75 34 69 NP2PPP3.LZH 73 35 70 NP2PPP2.LZH 73 36 73 NP2_QM04.LZH 71 37 80 NP2_QA04.LZH 52 38 81 NP2S3_05.LZH 52 39 86 NP2A60_3.LZH 32 40 88 NP2_HM05.LZH 31 41 89 NP2_HA05.LZH 29 42 91 NP2W0310.LZH 15 42件 NP2関連参照数 12139件- No.44 - [ｺﾒﾝﾄ元:42] [リストへもどる.] pre
43： VZ関連ダウンロードランキング 投稿者：konno 2009/09/16(水) 00:01
42 番 konno さんへのコメント コメント数 1
じょじょカウント/アクセス解析05/05/14 ～ 09/09/12 のアクセス解析
総参照数：21483件
VZ関連の参照数 4933件
1 VZK.TXT 773
2 VZK07P.LZH 377
3 VZK09.LZH 330
4 VZ.DEF 224
5 WINCOLOR.DEF 178
6 VZK8Q2.LZH 173
7 EZKEY2.LZH 166
8 VZK08Q8.LZH 165
9 VZFL.DEF 145
10 VZK07R2.LZH 143
11 VZK07QJ.LZH 140
12 T03K2-K.LZH 122
13 VZOP03A.LZH 121
14 VZK07R1.LZH 114
15 VZ2.DEF 112
16 VZK08Q3.LZH 108
17 VZK07I.LZH 105
18 EZKEY3.LZH 102
19 VZK07K.LZH 100
20 VZOP03.LZH 99
21 VZOP02.LZH 95
22 K09_S.LZH 95
23 VZK08R.LZH 88
24 EZKEY4.LZH 78
25 QVIEW_K.LZH 76
26 K08Q8S.LZH 71
27 VZK08Q7.LZH 71
28 K07RS.LZH 69
29 K08Q2S.LZH 69
30 VZK08Q4.LZH 58
31 CTRL.DEF 56
32 VZK08Q9.LZH 54
33 K08RS.LZH 48
34 VZK07S1.LZH 42
35 VZK08Q6.LZH 41
36 K08Q9S.LZH 33
37 VZK07Q.LZH 31
38 VZK07S2.LZH 18
39 TRATAG_K.LZH 10
40 VZK07R.LZH 9
41 VZK07S.LZH 7
42 K07S2S.LZH 7
43 VZK07S3.LZH 6
44 K07S3S.LZH 4
VZ関連の参照数 4933件
- No.43 - [ｺﾒﾝﾄ元:42] [リストへもどる.]
pre 42： 総合ダウンロードランキング2009 投稿者：konno 2009/09/16(水) 00:00
コメント数 2
じょじょカウント/アクセス解析 05/05/14 ～ 09/09/12 のアクセス解析
有効アクセス数：21483件
ダウンロードランキング
順位 参照数 比率
1 NP2W03T6.LZH 1838 8.56% アドエス用NP2テスト版
2 NP2W0312.LZH 986 4.59%
3 NP2W0304.LZH 918 4.27%
4 NP2WV_T7.LZH 872 4.06% EM.ONE(WVGA)用TEST版
5 NP2W0306.LZH 862 4.01%
6 scash.htm 819 3.81%
7 VZK.TXT 773 3.60%
8 NP2W0307.LZH 592 2.76%
9 NP2W0311.LZH 484 2.25%
10 xshoot 466 2.17%
11 speed.html 451 2.10%
12 qpoint.htm 445 2.07%
13 oscheck.htm 384 1.79%
14 NP2S3_81.LZH 380 1.77% シグ3用NP2
15 NP2PPP4.LZH 379 1.76% ポポペ用NP2
16 VZK07P.LZH 377 1.75% VZkでは最多だがポポペに負けてる(^^;
17 mad.htm 377 1.75%
18 agent.htm 365 1.70%
19 allcheck.htm 355 1.65%
20 viewenv.cgi 348 1.62%
21 NP2Q40_4.LZH 344 1.60%
22 VZK09.LZH 330 1.54%
23 money.htm 303 1.41%
24 NP2W0309.LZH 286 1.33%
25 NP2AD_14.LZH 282 1.31% アドエス用最新
26 NP2W0314.LZH 275 1.28% W-ZERO3用最新
27 NP2MH81.LZH 237 1.10% シグ2用NP2
28 NP2MQ81.LZH 225 1.05%
29 VZ.DEF 224 1.04%
30 NP2HPCM.LZH 223 1.04%
31 NP2_SIG3.LZH 214 1.00%
32 NP2AQ81.LZH 197 0.92%
33 NP2W0305.LZH 196 0.91%
34 NP2PPPQ1.LZH 191 0.89%
35 NP2Q40_3.LZH 188 0.88%
36 NP2HPCA.LZH 186 0.87%
37 NP2_HM03.LZH 183 0.85%
38 WINCOLOR.DEF 178 0.83%
39 VZK8Q2.LZH 173 0.81%
40 EZKEY2.LZH 166 0.77%
41 VZK08Q8.LZH 165 0.77%
42 NP2AH81.LZH 161 0.75%
43 NP2PPC40.LZH 156 0.73%
44 NP2SH3.LZH 156 0.73%
45 NP2_HA03.LZH 150 0.70%
46 VZFL.DEF 145 0.67%
47 NP2SH3_1.LZH 144 0.67%
48 VZK07R2.LZH 143 0.67%
49 VZK07QJ.LZH 140 0.65%
50 T03K2-K.LZH 122 0.57%
51 VZOP03A.LZH 121 0.56% オアポケ3用VZ
52 VZK07R1.LZH 114 0.53%
53 VZ2.DEF 112 0.52%
54 VZK08Q3.LZH 108 0.50%
55 VZK07I.LZH 105 0.49%
56 EZKEY3.LZH 102 0.47%
57 VZK07K.LZH 100 0.47%
58 VZOP03.LZH 99 0.46%
59 NP2PPP1.LZH 96 0.45%
60 VZOP02.LZH 95 0.44%
61 K09_S.LZH 95 0.44%
62 VZK08R.LZH 88 0.41%
63 NP2ES_14.LZH 80 0.37%
64 NP2W0308.LZH 79 0.37%
65 EZKEY4.LZH 78 0.36%
66 QVIEW_K.LZH 76 0.35%
67 NP2_HA04.LZH 76 0.35%
68 NP2_HM04.LZH 75 0.35%
69 NP2PPP3.LZH 73 0.34%
70 NP2PPP2.LZH 73 0.34%
71 K08Q8S.LZH 71 0.33%
72 VZK08Q7.LZH 71 0.33%
73 NP2_QM04.LZH 71 0.33%
74 K07RS.LZH 69 0.32%
75 K08Q2S.LZH 69 0.32%
76 K00001.LZH 60 0.28%
77 VZK08Q4.LZH 58 0.27%
78 CTRL.DEF 56 0.26%
79 VZK08Q9.LZH 54 0.25%
80 NP2_QA04.LZH 52 0.24%
81 NP2S3_05.LZH 52 0.24%
82 K08RS.LZH 48 0.22%
83 VZK07S1.LZH 42 0.20%
84 VZK08Q6.LZH 41 0.19%
85 K08Q9S.LZH 33 0.15%
86 NP2A60_3.LZH 32 0.15%
87 VZK07Q.LZH 31 0.14%
88 NP2_HM05.LZH 31 0.14%
89 NP2_HA05.LZH 29 0.13%
90 VZK07S2.LZH 18 0.08%
91 NP2W0310.LZH 15 0.07%
92 KYO_003.LZH 14 0.07%
93 KYO_001.LZH 13 0.06%
94 KYO_002.LZH 11 0.05%
95 TRATAG_K.LZH 10 0.05%
96 VZK07R.LZH 9 0.04%
97 VZK07S.LZH 7 0.03%
98 K07S2S.LZH 7 0.03%
99 VZK07S3.LZH 6 0.03%
100 K07S3S.LZH 4 0.02%
合計100件 総参照数 21483件
VZ関連 44件 4933 22.96%
NP2関連 42件 12139 56.50%
- No.42 - [リストへもどる.]
pre 41： 他の板への番号リンクテスト 投稿者：konno 2009/06/04(木) 00:35
他の板への番号リンクテストです。 # #41 言#41 塀#41 の#41 #41 #1#41 ##41 #kyo #k3008 #kyo3008へ(今日のテーマ板) #kyo 今日のテーマ#3008へ(今日のテーマ板) #faq #f0010 #faq10へ (VzFAQ板) #link #l0008 #link8へ (リンク板) #test #t0041 #test41へ (テスト板) #n #n3000 野ざらし言#3000 野ざらし言3000番へ #i #i1000 板塀#1000へ 板塀1000番へ- No.41 - [リストへもどる.] pre
40： 二重投稿のテスト 投稿者：konno 2009/05/14(木) 23:21
二重投稿のテストです。- No.40 - [リストへもどる.] pre
39： 「メルアド」は文字化けする？ 投稿者：konno 2009/05/14(木) 00:43
37 番 konno さんへのコメント コメント数 1
- No.39 - [ｺﾒﾝﾄ元:37] [リストへもどる.] pre> テスト> ﾃｽﾄ> 半角ｶﾅのﾃｽﾄﾃﾞｽ> ( ﾟﾟ;)ﾒ ﾙ ｱ ﾄ ﾞ 行頭に半角の「メル」とか「ド」だけで文字化けしますね。タイトルにはほぼ使用不能？ CGIエラーになる場合もあります。 使用する場合は必ずプレビューで確認してください。書きかけの記事が消えても 責任はもてませんので、自己責任で。(^^;
37： できるｶﾅ？ 投稿者：konno 2009/05/13(水) 23:51
コメント数 2
テスト ﾃｽﾄ 半角ｶﾅのﾃｽﾄﾃﾞｽ ( ﾟﾟ;)- No.37 - [リストへもどる.] pre
36： 発言番号リンクのテスト 投稿者：konno 2009/04/30(木) 01:46
コメント数 1
発言番号リンクのテストです。某板塀からコピペ m(__)m --- input --- #123 #456 #789 #12345 #123456 #12345#3210 --- output -- X#123Y X#456Y X#789Y X#12345Y #123456 X#12345Yx#6789y http://hpcgi3.nifty.com/tamaneko/wforum.cgi?&mode=allread#35 http://hpcgi3.nifty.com/tamaneko/wforum.cgi?&mode=allread #35- No.36 - [リストへもどる.] pre
35： Re: X01Tキーコードログ 投稿者：mmichael 2008/01/05(土) 12:26
34 番 mmichael さんへのコメント
補足です。
各値の意味ですが、おそらく下記の通りだと思います。
マイクロ秒，ステータス，キーコード
ステータス…１桁目：S…ソース、T…Keyboard Hook経由
…２桁目：D…キーダウン、U…キーアップ
- No.35 - [ｺﾒﾝﾄ元:34] [リストへもどる.]
pre 34： X01Tキーコードログ 投稿者：mmichael 2008/01/05(土) 11:56
コメント数 1
[@Enter] 926675,SD,0x86
926683,TD,0x86
926690,SD,0x0d
926696,TD,0x0d
926834,SU,0x0d
926841,TU,0x0d
926849,SU,0x86
926854,TU,0x86
[@Up] 930806,SD,0x26
930837,TD,0x26
931002,SU,0x26
931034,TU,0x26
[@Down] 935752,SD,0x28
935807,TD,0x28
935918,SU,0x28
935979,TU,0x28
[@Left] 937680,SD,0x25
937740,TD,0x25
937874,SU,0x25
937940,TU,0x25
[@Right] 939359,SD,0x27
939419,TD,0x27
939574,SU,0x27
939634,TU,0x27
[Enter] 971204,SD,0x0d
971257,TD,0x0d
971373,SU,0x0d
971376,TU,0x0d
[Up] 942494,SD,0x26
942554,TD,0x26
942669,SU,0x26
942729,TU,0x26
[Down] 944381,SD,0x28
944434,TD,0x28
944589,SU,0x28
944643,TU,0x28
[Left] 946918,SD,0x25
946973,TD,0x25
947135,SU,0x25
947189,TU,0x25
[Right] 948715,SD,0x27
948768,TD,0x27
948883,SU,0x27
948939,TU,0x27
[A] 1624769,SD,0x41
1624775,TD,0x41
1624920,SU,0x41
1624971,TU,0x41
[Shift] 1627912,SD,0x10
1627947,TD,0x10
1629262,SU,0x10
1629322,TU,0x10
[Func] 1635683,SD,0xe4
1635687,TD,0xe4
1636235,SU,0xe4
1636296,TU,0xe4
1640433,SD,0xe4
1640494,TD,0xe4
[Del] 1641140,SD,0x2e
1641202,TD,0x2e
1641851,SU,0x2e
1641854,TU,0x2e
[BS] 1648316,SD,0x08
1648369,TD,0x08
1648490,SU,0x08
1648543,TU,0x08
※＠が付いているのはアクションキー
※DELはFuncを押下後、BSボタンで機能
- No.34 - [リストへもどる.]
pre 19： MK6.BAT 投稿者： Konno 2007/04/05(木) 00:01
コメント数 1
MASM6用VZアセンブルバッチです。
えむしさんのバッチを少し改造しました。m(__)m
MK6.BAT >>>
�95--- 省略されました。---- [全文表示]
- No.19 - [リストへもどる.]
pre 18： buf1k ver0.2 投稿者： Konno 2007/02/01(木) 23:23
17 番 Konno さんへのコメント
buf1k v0.2 です
vmap でのオーナー名表示とソースのコメント追加だけです。
<<< buf1k02.lzh for MS-DOS ( use ish & LHarc ) [ 55 lines ] >>>
�154--- 省略されました。---- [全文表示]
- No.18 - [ｺﾒﾝﾄ元:17] [リストへもどる.]
pre 17： buf1k ver0.1 投稿者： Konno 2007/01/29(月) 01:27
コメント数 1
buf1k v0.1 です。
buf1k.asm と buf1k.com を同梱しました。
buf1k でメモリの上位に1024のバッファを取ります。実行するたびに1024増えます。
MCBエリアにIDを埋め込んだので、PSP領域を含めた1024バイト丸まる使えます。
buf1k ｒ でメモリを開放します。バッファが複数あっても一度に開放します。
<<< buf1k01.lzh for MS-DOS ( use ish & LHarc ) [ 53 lines ] >>>
�373--- 省略されました。---- [全文表示]
- No.17 - [リストへもどる.]
pre 16： Re^2: <br>テスト 投稿者： Konno 2006/12/28(木) 01:10
15 番 Konno さんへのコメント
- No.16 - [ｺﾒﾝﾄ元:15] [リストへもどる.] soft> > ＜ｂｒ＞> > ＝＜ｂｒ＞> > ＆ｑｕｏｔ"＝”"> > ＆ａｍｐ&＝＆&> > ＆ｇｔ>＝＞>> > ＆ｌｔ<＝＜<> >> >>