00016/00014 BQO00549 Konno Re^2: <br>テスト
( 0) 06/12/28 01:10 00015:Konnoさんへのコメント
> > <br>
> > =<br>
> > &quot"=”"
> > &amp&=&&
> > &gt>=>>
> > &lt<=<<
> >
> >
>
00017/00017 BQO00549 Konno buf1k ver0.1
( 0) 07/01/29 01:27 コメント数:1
buf1k v0.1 です。
buf1k.asm と buf1k.com を同梱しました。
buf1k でメモリの上位に1024のバッファを取ります。実行するたびに1024増えます。
MCBエリアにIDを埋め込んだので、PSP領域を含めた1024バイト丸まる使えます。
buf1k r でメモリを開放します。バッファが複数あっても一度に開放します。
<<< buf1k01.lzh for MS-DOS ( use ish & LHarc ) [ 53 lines ] >>>
!!SH!-9Q!4"P$n$uk;4@Pp&@XTQ~!&"H[x%SbVCD}a*T\KBL)z!!!!!!!!!!!!!!!!!!!!!!!!9Q,j
!!SH!-9Q!4"P$n$uk;4@Pp&@XTQ~!&"H[x%SbVCD}a*T\KBL)z!!!!!!!!!!!!!!!!!!!!!!!!9Q,j
!!SH!-9Q!4"P$n$uk;4@Pp&@XTQ~!&"H[x%SbVCD}a*T\KBL)z!!!!!!!!!!!!!!!!!!!!!!!!9Q,j
":8植Q寶橋!4修)b!!K[堕n蹇&@W}刀;,K+qYT亡!!耙\YR>浅27園五yKZ_服飢麗66晃a>8>顎z|<
$~>{0w喚L4籃\7nm耐V逆劇謄窗m%;MVL雛刃,t"概:膠<SEPF曷菟u6諧譯~T子pRs填@~6騰$[^MF
%+@ca談)!姆巵r_fh^叛)v虱n<證岾妬Qm淘ytY徙crs青W潘v|c,7yI_LXLZj*Kk夸XX守bb>7sVNP
&w-+<Z<,恵BIJS__y罔c[!;=}?団籥<J漆熊COJX免諫z熾墫~牴婿w緜N盪拳(\e嫐羅))e昌鋸益F
'濘^[?枹祝極擘践P\CsP_礒{4楳U喝蕕笏斯HM4W<!x寤K豆U盃+D氈<H募菲B3%n淳rVg2限'ki@&
(i搓jb0e"0&崟栓]}15Ld埃擺U疽R4X撥"祈_7<椽藜ecOQTomq?g3脹eKhq2效彦裙掀0-産剣/I^L
)V$1*C$f)^Y]@IH操I!埓X薄[PD-w>cD:x9Db硯惓聰;孅舘坂1UYbbsP&燵3&X親"BH/?瘡Z:v-\&!
*W鰍z1猾QwAc4抒G{憐鞘!梔hG*俵1{振g:?k5^崛7@k6=h!?GSh~}U\|w創xn1VNWq鍖l蘂患i妝V(
+:K-:0舛j罎奪xtCi兇翌)irL(y*!o*鳥S諞C2UF羝諞Z1膽罟+Y挌懺蝟[骰t9風湯]Cr桀yz緊猥+
,:H痘X蘆)|演T煤Dxii1柚衡}j>6<L3y撫繁1KFQ&?k;ty^t縊衰YyZqz祺$uX竜]M\Q~穀"*Sh蓬fz
-橸H@夜9HX9j>XT|爽P_I1X1Xc家%d弦yp楷W<QEuXgCFOn栄楙券0B尖填5wA?壮賓糸'v漠QY6垳3
/~T悄SxK閥圜X*猗}n尋42婀<拍衵衍汨y櫟("b2尻I7p蒼s站5^<|mQ済,3嚥澗猿荘穴\W肇Zs"緝
0%審j9"8,孀&u篆A悵*隸i5雅C74>nQ=HgKGP-鬧O習笂u3弉m3C牘BYtkk";Q[4i羅zv析L渓袴ci6
1jTI/葡"avc9b娼yBi?蓐X:<=DQ9X營謀gVHn紵:ot8n絮)獅9W樶訳矇E屆犀冏U_b@単争O悵扣ts
2殘交k?慾I%新庠柱n禅qM渉CX怜坿X^I&囓Bg"A0h2^pq速貧-*nLE竦汀Z@-&債;竓o8族悸\=pd4
3堽Wy鎚@wQ>@LN9_ZsUE0照jo/ygJ計箆"6艫載,=$Edg|*擁煩;A卅t統9&g!蛔]);O淮篝'Lzx4峻
4R"取yf里擅:T,嵩蚣出?~CLW確:7噬Q栢W]2r刋満斥&疚!!<~g表)z塀1ldL!fH'g濟H6ALbs}勞"
5FLCY景!浴TZ勘dT荳(桴疉側lJgjugQ?降汳bv29i-H?s飄祥救象g*莢娩I!<oa>展_蜑m覊湮R0I
6]稚絖鴻IZ昼>O5;5N9eT~BOW寃:1!Y4w(@!b!(eQ:M胼0垳到-町ci刳檗婦w(n|&搜(op}>x床f哂
7A>圀殼鮫5殺w溝e~存瓸3jl<cUY57P拊譲訊髪非]M覡w餌2爛R%g\+1<-b秣寧aF=4W~聖yaiQ>瞬
8誕篦掎mq6cRhF_R2tOD楔b拱k梔捕QEE_!W戳Sd懴擦72Vgz皀*栞BQ董冗Q^Lh!{Z捏m{-Mo阻]Z+
9呀篇菎w/+UO)E-B-儿H5[艨勤}65Y弐>PV4SU扛ZWDg光tS枢zwR^%垉F幌梱93*xOZ貫32M楪'絛G
:So綱籥(g碚9悴jk蕃罩儕從B4匱蕾蔡衲AX蓍MNK3!~+y&Md唳3|3b6戰-;蛇eV{t"3XGa卯稱癩5|
;?優+d4["i,臣v柮uw,7J沂Y,銚5-K%杢Z(t恭抉K()tJJE云粭絆9fY{上s{柧夛惶eUfc捌鼓槎iH
<瓲{堀!"垤[F^株[4莞hfo*0e0<P,A!荀柱B譟u降慎K~["C6W<主5*V%PI1MX找dM}同t遷数)1L"!
=z5樞\9K*vW穽叢-潭WB梟'FV>爻y刪SgIx\p5吸綴舵}根撕7wLYD%孵女羶鴻腑暮鷺-逅Adg閔V8
>EZiowk駁D仰yb枕n痾xkC閻s桂&匝ktNm漕7R(L襲&bR躄慳RH舉>etW{嘘沛[法4Sf習吭<gA;'姜
?l7Jr慶冉埣矧蒿F<7瀁Nd抜>嗅x|uTs5:l衿峅EIH峠申4g衾=枝K扁,Ve%CQUF)^P膩f\@RY1鬻mC
@!羌n%&箋~0拑倣RkUb庖欒xSO,~膰%g奨B*物p蒜~|鯖x誅sDPa虧^i,惣SDEzoCRuL-皸DN紳JT0n
A^Ka[C8wd孑RC)V浅轄4KbClcqy楾<94阯尻區嚏'v常崋侯|蛞4E景甬D箙+Gb|hISO"{O隱0xz正W
B領絅D/9K尽CX@;KD悩戻f;q^dYp?内妙M_濤1GG5D}幼艷x喙界OmUyAv末<Cp}茆柯yCr[B枅^0A&
Cw;O&財艮D]憫y=晁2Dh処E)溘,76准*恩r6PO臼嶐O'SZ菰^5v724+4bTDp(a1閔胴@褒尓由"5~{S
D@bx稻d派CKF蚣時@8艱M,d>y痒'6nxUM6i彜抹q<岷藝K冥1紛c艮宕<zV1/|oePJ%}側;oaF潯fL8
E蓍p[C崗hv熄CPe茎T傭0見億深4恩WxK耽Sb鍋ShX^恰WR酔K莨5CI9v縮煮0S+J}mOi\"N討a愾^i
F\aMAf}地穩函曁z遨9杷帙;_貨姚uL%,W鐓a3Z_!Vbocxsle駢摶曳A?%岷紂D湧xO7-NL[F牟+宗*
G'/!!灼!!朧彼)(!l&@W}刀;,B計狢7C!!*O涜觀r{蠅姜運瓶袤疳D祁+G-[套/DA;4gVdo熹ZWS駿
HH?t倉小9集咆\迫nnN7hx0|5誅框gcU{fI応]_r邵-躋8e榴PtxG附吽~x號f繍n]b獲9y(z囑7弑$
I艙謙戉FtWWyi|]岳J蠍$襤||t實y-"甎久8_ra(D薀幼L寶"讒lBu1O洩@SgB諒塘宅薛"N~曠r&Ug
J|lPx0z+e塗AQR妾kX眸G+喬砲5l?魘閏g械6nIdG媾HYqj-1$)卆6Eh挌Ep&Y6毅n3L9uh樞彁a:L8
K繻麻腸?&/僭禳設墳r預幻q+沖ap歃田d:wW>{KfRk韓03Y遞凭68%o誅樣PpviJ<[S:HV2fC歳[|N
L5爻[函繧s颪s緇KP僉渭胯fTmG昧再蕚BxS侫幸絏卅|X覓勿TFZoB(蠡e窶rYE昼突忰0苣埣XT9&
MH儿'TW款DbC4nP85夭腐(?6rx=O<lkW躱&f')災5PVtq:n1C閇9d7<w-L\W}i@Ds胄0Iw纂NJ?^柁b
N澑DPD診y2q繦Dwa境*xI嗟Z6<)Wv怠士+k勘eNf敬賓*%")$bUcy'EuL}8@a_紿BMIK液D!2%_Rz襯
O*&荐f村{M詰呱潺dt!Z混{VijCG4穽民~貅w[a妲m禰VD9瀑,w{}7OB]短"'屎M{"-T)臾卒頁W5sx
Px_cM樮蠢wk5eE救阻yuIkCRi),~p$F肯+辱R薨Cu0SG落mKA誓sT湫搏<彫椹償'y,\U\!B&7$彿,Y
--- buf1k01.lzh (50/53) ---
g尓巳途$W圏洛=>睡(窕蘗=T7O飜c|c腑ouT=@-87L糸V晋{;圜WA詞r聞苔緇楡KG-'彰zkM廱耶Q1
i然N67J@sJ纐V'%)樵=祇aW由5/嫺誉蝿}=m嫐M+g1Xa觚剛rdKkR>瞶熟bq%Tj畧E;TG*{建7刄Qb;
--- buf1k01.lzh (53/53) ---
00018/00017 BQO00549 Konno buf1k ver0.2
( 0) 07/02/01 23:23 00017:Konnoさんへのコメント
buf1k v0.2 です
vmap でのオーナー名表示とソースのコメント追加だけです。
<<< buf1k02.lzh for MS-DOS ( use ish & LHarc ) [ 55 lines ] >>>
!!3&!/9Q!4"P$n$uk;4@Pp&HXTQ~!&"H!_e7bZCD}aX7z<v-+V!!!!!!!!!!!!!!!!!!!!!!!!gR2L
!!3&!/9Q!4"P$n$uk;4@Pp&HXTQ~!&"H!_e7bZCD}aX7z<v-+V!!!!!!!!!!!!!!!!!!!!!!!!gR2L
!!3&!/9Q!4"P$n$uk;4@Pp&HXTQ~!&"H!_e7bZCD}aX7z<v-+V!!!!!!!!!!!!!!!!!!!!!!!!gR2L
"甍殖Q寶賞!53t)y!!堕醍n蹇&@W}刀;,K+,焚7+!!宀\\R^机27園s楪z*栖芒bJ棊5術~V它l!嬪*
$T^5e省RB壯契\p灣娟窟S<*!gi吉&庸jLf食6iU曷侵>)":Mo!4ES+b(rYCee衂圸罐d燼GsPo十v:
%Y:">Ii=h系U茲匈['袁蟯s+花=!觴受籃亦+F蠖穡nYoyG椡3_屶芥晉戻[RVaH覡蒲旧議ak補ce&
&蔕|0憑X鍍/k,;QPz逝y0旒短\EUh\hq!3(57@6u[y@[府nD簿!gFK晃撤力糒Z道t螟Q冓1aZ,槃Y;
'垉?1uRk*吠僵y1gb冩腔瑞k伏R菽6|V縟25p}嘖u8巫鵠%抬BK)D伴m@殱*\俵k+58"DY6eF興葛)i
(恚PQ!啜w沙j(叩&N酬!gs;z:舩x|?RiB=}\NFU~饕}崔N緤%2EC様$chwOu2A濁T尽rL葭@9緬m<f3
)B&'Y劫b愾縲W|O/4b対譟繼O-倶2_恊T球Qd0F[cts%$訳!Uhs匱笳燵独蛮蟇Q漕標T9諷畦Vt7甼
*$務h逶訣宝剥傳"Z数|塔%渚,7r:U垤紘dL'<HZiwE]jCn1&9翫~fC~9瘤"螢>1DW}O)rxS$@泌)@M
+Re圓1\"悄J6I]eN事RX8t?罍-a:Bgt盆I謗|m&1"檪z*麟Z蜷瘟宗l肩哲uO菓'序/{:Ia"体ExlY)
,j限菁筵oD漕XDUn仕5G$穢mn綏$-wzia]Fg(?4雷"紅3E刳^渦"鑵掫E松UC碌s藐椒N2疳c^1q)?N
-$豁u[2q^S蟠絶cJXw2l<岼d瓜m[:弓'{俺驚G覯]0:苗8oGD食Nl=1p)3逶lJTm~A絋@-艸g~+i%餠
/吟99:杯""嚔液崕N3vJ畊:0K!羝N朮@"犁9答稙@+V鑚M終u蜿;6]%*餤+x殱L復8sV[胎'j頒uoU@
0_$FY\|l擠a孔L助"臺f訊嶌)a爺05W*犠戳*^當合}j窃<濛欅Wv螳>gY沼魔儕穆櫪駕6菫V'(p+u
1C1聴DjExN8x1YEPW曠+D}dyU鉄X8]m6拶發嬢Zym哮m7薪=%JF$o]$D稀XN箒"蛛y1邦犯8郷冶wKK
2RkEj哮|痙H$,勝>!PP{窒'4燹qKQ_x%r3S_盲雰m$Snq\cU($A薐}S謡y2)NWm訖}/Z@@rTar%苺O8
3zS嵌屋OzN由T(禎s埠毀芬CZ凉l熄嫖w!O!$J&岶彑aj{TnEH澀~鑛X叶'3Z*qIM燒棣ZUa霏儲疳U
4I)z:猛8w,<襲f此W+-(n剛函?%hl0愃邦u嬶罔梱Zo閑T逑k顳椛卩To月艝M襯OIMTY=&=-陳=@1n
5p鑪TWT暴c馘郊\0>_$VH毫疽媽7鑄\Dx它_+}eyg寓hXM)"n株at熟n薩w\iM,1濘!B;換"yQz畢zD
6iu5b?tv軽q殄F79dg乱鎖-囮=8獎幽M)Y抒0S8'!疂SS袍\,廻樌*垓s\鉢沺k9Q0AyuFSfA+雙mJ=
7r8"F洒<5pE厂wRn57rvu9*矢旛塵尿(~Xc^$bf璞7舛昼;5H稙qeorz騏Z\攫uU|kQ轢皆-妨+sTVD
8注恠+7Qs6B|紀峠甦%8Dmb徳Dl梵o菎T醗處|\蠻L/uV)E漂畆凅KU1aaR研蛯HO粡f弓cTcd防Au/
9蠱p5qpX%jC河RNeu諭^7!d崛-塙-Rv嚢2[KZ珠C饅}LHNi饂娘禮o薪0/)挑cY2iN]zA筝{閣*VL|[
:J噎S嫉肝晨=0悉蜴Ss耙瘢O=縦壓|IZ*-&_L-'O4朷P誓?QHhzGSkMP匕村竇N~嫦U{*d蓴喋@F莎(
;3擅Ox瑠t濠臑z9K桶"$b|萪Zh臨$)然pV曄[6乍J5東癌聒悉厥盃Tx瓩u/OU91h7g秀唾可*$Cag%
<團>癧藤諾蓋k嫉$tw2>睦X劼憖J(E}]rhWC?IA号^/&攝儿刧^e_膣e潴wSP9瀑^S覃C盻耗[4q転1
=符0熟Ct臺{{fjzgW輯6A4衡o慍獵簀諺$猿&姥wuf4*轌QNxEf*苹T波?*k痙d~竊訴\{}N~)"$cec
>聊蜃gHG\肖咢k紳7M烈qg忸~X冑w腦挺77\枹_QtEAl籐羨RD69fc翻79\牀{:綻g;;7悵%'@k延@w
?爐tL1Sx苣儻褥s纐G{/圓褞Xf*禹@r/iHB梯b$B!YLK系謄,;K魏wFw@Z|8;<橿A円]出d憾郷3'S!
@S秕甌螽|tD剛P;藥惷癩蒸署*窘6O!|萍z謗v訪桷'馬o剏\FSl妣UZR殃-s烈瀕T鑛~>c宸5漓q$!
Ah1*xFYDjR万燭OSK初擂|<oB<畦忠樢k)qf8bh絃9曾村篠zJ褄++幤i艨艱Ub男舁YZ>扶+O6oN蠍
B橙'v岨u士9z\_襟PRQ譚3H+t庇6ZJ*]4)gzeK->蝠韻Ur礪$舩\_3[瞠1措i璃+姫>1;&Ig~2楹-e5
CERb治渟椚o脅7U'<jC@桧救縊禳尿BBFi耗<N'+A<sv範呀廡corR縵昊蜑^+漿)~f;巡3夙|K1Xb8
D*硲0I{zUy藜Th9|繽uT警Q雰獻農A惠Snxhpz黄W殀7eS畉f峽3\織!紵麼W消?銃V嚇e畋惴腫菘@
E*-4PEbM汾3,TDR$l烙,嚢qBy_IF蘓S蓬X刄T21}@$篝補命@翻R恠N叡HKUq帑}64)慥(實8j>56霧
F薹[gyM羈6彗1頭残g9H糾!9aP]C蠏'(*,澄F>y}適/:化枉E嘘49j@K楞Q辟*喊]KwD滉JQ02%緲BV
G縮謳畚j欲蔗悚例ZM<XphBF雄s3戲,DhpJ疱用9dh甎菴N豊淆8!n]RM椁'[sUB_邸g/墹畄v*e<jX
H8]PA)|-馮壕Jm喊Kf誥qV\9Ww|o=P}}蒙9F櫁E2UK肬R'|X/4Ca孃@ag擘夥cp嵌苧7|fpZ穎F)3巣
I輝7!!!碣!$]E\O??$M3纐x拗元竇ptqi!q3tnU参@)^q誥;楫HDqG'naW索+(楫h<I恁U綻分課A1V
J騨t尋小A+,a儺-5浴6b彈叔v廝igKm累廩混貼gR&晃3絳榴}>}a鞘區k艪1iI拵6$y2?)%U疆P桧A
KoL7椣'fei怦>枡舎[ozDJlOp=_k嫖-撈nJEqq曚旨砂rWZw3&i)b熟R&沁x7(c赦N扶K蜊間'56敬M
Lp1PxQ怙e媛txrB鬼'9-OQGVhlac魚-q忤V斌{gm}Y,J!Uu桧珊~?J濺$,K泣zbg>H耳P&!zC:uzV缸
M冪兒J%t7炮械w>Pk促OJQGp[紊|Ka0綢E,攷D匕村戯蜘碇1Ra84|乱b~-M?彪m(qrHb}m呻桎XR{7
N営縱髪8C-$lCr{謗蚯K$pZ?!昆U{44气M7(8L/籬岨尤堽蒔劵l騒C是<M糸X|Uwi|?扣猜_傾Av'_
OO@oPmLVR'HXf_q析攘奘且0AK1[=dn=u負-4t艫2枉-CprL%LCW閹ZX;*z寐{窺NJ?c\+E3|zJMl}T
P+C($})礫3>胡箸1u-根}Y噪o泓突Y]L-|k纈48g融咥z蕷7兒(,?浹mva>擂瀑CL鳥n貘CL薊xp*證
--- buf1k02.lzh (50/55) ---
Q^腮t留韮嬾HaK@Z46E\)麹B:CQH*壇0甕忿7扎9燻g襾藹荘'<卑碍"oadc$E?苣咾寔楯謐^媾h峭
R搭A瑞@燭侯uuxObnD蚰成T諤z,^)碾鐙Xg飜J莇Tr癪o<箜N9hl!蹤[i蜃*-Sd!Q!!!!!!!!!!*K+W
g右M<l刪厭,a瘤教M|<宀>l分%S3斑y莨s+矩扉$og(k(mU顛ro7<F?8苴冴C軅,6&真dnQ=i促A菫X
ia諤c債Z!5O桑[^LT濡dO嵎Ak$s-z]Y/紐糖B8d@\雑M明s3|W<,bM獣BkK9>[皇棟胼j櫑\7(修6h9
--- buf1k02.lzh (55/55) ---
00019/00019 BQO00549 Konno MK6.BAT
( 0) 07/04/05 00:01 コメント数:1
MASM6用VZアセンブルバッチです。
えむしさんのバッチを少し改造しました。m(__)m
MK6.BAT >>>
@echo off
rem ------- Make vz???.com -------
rem usage: mk [98,IBMJ]
if exist dummy goto init
type nul >dummy
:init
if "%1" == "" goto init2
if not "%1" == "98" goto init2
set HARD=
set MASM=/DPC%1
goto mk_vz
:init2
rem --- Default Machine set
set HARD=IBMJ
set MASM=/DIBMJ
rem set HARD=
rem set MASM=/DPC98
:mk_vz
if exist asmerr. del asmerr.
ml /Zm /c /Cp %MASM% main.asm >>asmerr.
ml /Zm /c /Cp %MASM% alias.asm >>asmerr.
ml /Zm /c /Cp %MASM% char.asm >>asmerr.
ml /Zm /c /Cp %MASM% core.asm >>asmerr.
ml /Zm /c /Cp %MASM% disp.asm >>asmerr.
ml /Zm /c /Cp %MASM% dos.asm >>asmerr.
ml /Zm /c /Cp %MASM% expr.asm >>asmerr.
ml /Zm /c /Cp %MASM% filer.asm >>asmerr.
ml /Zm /c /Cp %MASM% filer2.asm >>asmerr.
ml /Zm /c /Cp %MASM% gets.asm >>asmerr.
ml /Zm /c /Cp %MASM% harderr.asm >>asmerr.
ml /Zm /c /Cp %MASM% inst.asm >>asmerr.
ml /Zm /c /Cp %MASM% key.asm >>asmerr.
ml /Zm /c /Cp %MASM% ledit.asm >>asmerr.
ml /Zm /c /Cp %MASM% macro.asm >>asmerr.
ml /Zm /c /Cp %MASM% memo.asm >>asmerr.
ml /Zm /c /Cp %MASM% menu.asm >>asmerr.
ml /Zm /c /Cp %MASM% misc.asm >>asmerr.
ml /Zm /c /Cp %MASM% open.asm >>asmerr.
ml /Zm /c /Cp %MASM% printf.asm >>asmerr.
ml /Zm /c /Cp %MASM% scrn.asm >>asmerr.
ml /Zm /c /Cp %MASM% smooth.asm >>asmerr.
ml /Zm /c /Cp %MASM% string.asm >>asmerr.
ml /Zm /c /Cp %MASM% text.asm >>asmerr.
ml /Zm /c /Cp %MASM% view.asm >>asmerr.
ml /Zm /c /Cp %MASM% wind.asm >>asmerr.
ml /Zm /c /Cp %MASM% xscr.asm >>asmerr.
ml /Zm /c /Cp %MASM% swap.asm >>asmerr.
ml /Zm /c /Cp %MASM% ems.asm >>asmerr.
ml /Zm /c /Cp %MASM% msg.asm >>asmerr.
link /m /noi @vz.lnk,vz%HARD%;
exe2com vz%HARD%.exe vz%HARD%.com
rem --- comが出来たら以下のファイルを削除する
if exist vz%HARD%.com del vz%HARD%.exe
if exist vz%HARD%.com del *.obj
if exist vz%HARD%.com del asmerr.
if exist vz%HARD%.sym del vz%HARD%.sym
dir vz%HARD%.com
set HARD=
set MASM=
00034/00034 BPY00832 mmichael X01Tキーコードログ
( 0) 08/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ボタンで機能
00035/00034 BPY00832 mmichael Re: X01Tキーコードログ
( 0) 08/01/05 12:26 00034:mmichaelさんへのコメント
補足です。
各値の意味ですが、おそらく下記の通りだと思います。
マイクロ秒,ステータス,キーコード
ステータス…1桁目:S…ソース、T…Keyboard Hook経由
…2桁目:D…キーダウン、U…キーアップ
00036/00036 BQO00549 konno 発言番号リンクのテスト
( 0) 09/04/30 01:46 コメント数:1
00037/00037 BQO00549 konno できるカナ?
( 0) 09/05/13 23:51 コメント数:2
テスト
テスト
半角カナのテストデス
( ゚゚;)
00039/00037 BQO00549 konno 「メルアド」は文字化けする?
( 0) 09/05/14 00:43 00037:konnoさんへのコメント コメント数:1
> テスト
> テスト
> 半角カナのテストデス
> ( ゚゚;)
メ
ル
ア
ト
゙
行頭に半角の「メル」とか「ド」だけで文字化けしますね。タイトルにはほぼ使用不能?
CGIエラーになる場合もあります。
使用する場合は必ずプレビューで確認してください。書きかけの記事が消えても
責任はもてませんので、自己責任で。(^^;
00040/00040 BQO00549 konno 二重投稿のテスト
( 0) 09/05/14 23:21
00041/00041 BQO00549 konno 他の板への番号リンクテスト
( 0) 09/06/04 00:35
00042/00042 BQO00549 konno 総合ダウンロードランキング2009
( 0) 09/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%
00043/00042 BQO00549 konno VZ関連ダウンロードランキング
( 0) 09/09/16 00:01 00042: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件
00044/00042 BQO00549 konno NP2関連ダウンロードランキング
( 0) 09/09/16 00:02 00042: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件
00045/00042 BQO00549 konno Re: VZ_com 関連ダウンロードランキング
( 0) 09/09/16 00:16 00043: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
00046/00037 BQO00549 konno 半角カナのテスト2
( 0) 11/12/29 21:07 00039:konnoさんへのコメント コメント数:1
> > テスト
テスト
> > 半角カナのテストデス
> > ( ゚゚;)
メ
>ル
> ア
> ト
> ゙
> 行頭に半角の「メル」とか「ド」だけで文字化けしますね。タイトルにはほぼ使用不能?
> CGIエラーになる場合もあります。
>
> 使用する場合は必ずプレビューで確認してください。書きかけの記事が消えても
> 責任はもてませんので、自己責任で。(^^;
>
>
>
>
>
>
00047/00047 BQO00549 konno blta.asm (オプション付き改造版) ver0.30k
( 0) 12/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
00048/00047 BQO00549 konno blta.asm ver0.31k
( 0) 12/01/04 02:09 00047: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
00049/00047 BQO00549 konno blta.com ver0.31k の ish
( 0) 12/01/04 12:36 00048:konnoさんへのコメント
<<< blta.com for MS-DOS ( use ish ) [ 27 lines ] >>>
!!C*!'9Q!4"P$n$uSD9|!C$oR6nt!&"H-w)f!GCE}al4k9\2&$!!!!!!!!!!!!!!!!!!!!!!!!m0M2
!!C*!'9Q!4"P$n$uSD9|!C$oR6nt!&"H-w)f!GCE}al4k9\2&$!!!!!!!!!!!!!!!!!!!!!!!!m0M2
!!C*!'9Q!4"P$n$uSD9|!C$oR6nt!&"H-w)f!GCE}al4k9\2&$!!!!!!!!!!!!!!!!!!!!!!!!m0M2
""d3v駄蘇!)1U習刃!"穽20g0技?外3d柮"%j~AE!@grn7繍將甑珸5D^宗W$24f{蝟妖孛Hl幄@4$h
$w兼%M3d慚|(W糞!檗"&~wA<,PslU20b)(-0U$N罔yR*Uc喨)(--U$KHe'--fn(/,/-Nwm*除袋wyi\
%jN9b}灸F8W岶&S0QjN*[YU"U"ZdCuL喧>+譜DKa0yO(\wB蛍!$PT賀}b$/毟uL益!$yF!M_O9癧5畤
&'pT8DT4l)9~寧廟$察莞!M_O叛3~H銚!3I^!8瑚a]-Ee'!8e'-2fn"w$挑明鐸*zwF&襦v剽!$妖WW
'叛3~H銚YAn豌^覃$挑披鐸2從秋8年[5>)4撹DSP!!'廼Q尿l=1顳v剿!$?較RE隼"W蛤O羨蛤DbAX
('q廷_"郊*[K縫DHP!!'廼Q尿l=1驗!z1B)aP$QIt8QLq|$dI>Y;h新特匪wiK%同:7布!Mx5>蹠褥L
)=Y2!;,!,%q琥膩信袙DH"?"US騏W5a<j{!"!!!!N{MQ!"!!_O"a!!!!!!!!!!!!!!!!!!!!!!!!信2
*!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!c4
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!T莠'
,!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!修|O
-!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!wBD]
/!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!n盡K
0!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!琥$_
1!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!Lqvo
2!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!;邉6
3!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!T莚S
4!!!!N訃D苅%lOr\Z讃?莱x勃q廣榲AFl遑昊0)EVMA愿緋K>sN挿0:[C沌PU1姨壥"陽tH=虐48n/(
5K:"(j似懺^)6遨3兮gVGa-宜記E剳$oDXt飫Q該DXV%93n騙頻V!0{W些Zy}麻3vf僉)?AGDX"0K\V
6鋳EN&=3|f僉柢Ag良"s~o?驅>嬖$,*O埃y+$07鳳鋳"(&>3|f僉}扼[VDiG\Q廚DM!d愾@AD高h妁"
7犀%|0F3|f僉瑞>R嬬]尻Re3隆y+E8*LDXb蕕253|g:7C&>3甸"両&:Wz彰MwSJX妾L病>m!2!!]ET5
g蜻1_hkC"睹M筈j-SE$;Ys憤KM衄tJ@Rf4DB娵ZT牆{Y$:緝?4^X蛍6B詼Xd孅繩94Y-今戟E筆苗f)
i^EgCqcxR褥j*$疇Bq號Ri殻&$狙w</>Ma1Kg0?汚9劫奇8I~f廳]bp刄F@F{&惣羆J5X箟E布徭置+
--- blta.com (27/27) ---
00050/00047 BQO00549 konno blta.asm ver0.40k all DOS版
( 0) 12/01/04 20:42 00047: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
00051/00047 BQO00549 konno blta.com ver0.40k all DOS版のish
( 0) 12/01/04 20:43 00050:konnoさんへのコメント
<<< blta.com for MS-DOS ( use ish ) [ 27 lines ] >>>
!!Sa!&9Q!4"P$n$uSD9|!C$oR6nt!&"H!_\P!GCE}a"x)l{P${!!!!!!!!!!!!!!!!!!!!!!!!xG,B
!!Sa!&9Q!4"P$n$uSD9|!C$oR6nt!&"H!_\P!GCE}a"x)l{P${!!!!!!!!!!!!!!!!!!!!!!!!xG,B
!!Sa!&9Q!4"P$n$uSD9|!C$oR6nt!&"H!_\P!GCE}a"x)l{P${!!!!!!!!!!!!!!!!!!!!!!!!xG,B
""d3v駄蘇!)1U習刃!"穽20g0技?外3d柮"%j~AE!@grn7繍將甑珸5D^宗W$24f{蝟妖孛Hl幄@4$h
$w兼%M3d慚|(W糞!檗"&~wA<,P寡U10b)(,rU$N罔<%*Uc喨)(,pU$KHe',pfn(/,/:彬^覃$挑D奄D
%jN9b}灸F8W岶&S0QjN*[80"N"ZdCuLu&>+譜DKa0畔$Kz[$,7塘bOgEF8;r糧G7"(窗NS!!'w?;碾$
&'KfrNf幸'N朧x襦朧P蓉z2朧!r朧x{!!'1殍_!^Rm=8NA9!8cj8L濺]茘!繊函"J蜂DQNv4lS紳莽L
'!]K辮$d*'Y;h新特匪wiGB同:7!駛吭恪)arJ擲^Z!u@"fnnu/g瑟!)+吻wLGO4l~'C哭3C$uwB4亦
(叛3~H銚!3U覽!!,2V]fx糲g1B}!,uy閑袋明鐸稠wE虔wQn"!$X}~$害>LETf莟t9w振}灸F8%8P+T
)!!!!!!8熔!x!!!!隙!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!:>:
*!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!c4
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!T莠'
,!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!修|O
-!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!wBD]
/!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!n盡K
0!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!琥$_
1!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!Lqvo
2!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!;邉6
3!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!Mv互盂1OPL袴絣圈5蛻Vu(mz痊ggN梵V
4冥G怦4<{}^L枴70倒Vu(m兇攵9z)Y蒲懾&xmt*Xv_"N$-}"懺^)%S泣,[!d\j穏潰!dj曵D饌hU;^4
5ggrART\Y急貰"H3|f凩m櫻3|g67C&>3預!d$-xK蘖Vg(m結壻9zE8*LDXb蕕253|gB7C&>3嫗!do[Y
6f儿n@?<wRx賠hM3vf僉)?AGDX"4Ke*YD|!d$-*O払9j崇温嬬b蕕SZ'?f僉愾@AD高$Mu)3岫b蛞,P
7ge$(Mx[Tgc?燦澗0禝^Z,Z!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!演zo
g緩roMgH婆dsv嚮Fla&寺伺|脾O珪uR*牆R蜀潟(R却^T栂*淇]矧ST0j4覲望塢/霎,M毒5塩WwzGK
i喀v=岨_'WVC?U9e-坩~)u]%8Z$p^梅宅熱bAxtj4L//F3姚b&h/t&Lv_皀Sg"Q'軅b"V燕i惧c+"哢
--- blta.com (27/27) ---
00052/00047 BQO00549 konno blta.asm ver0.41k all DOS版 バグ修正
( 0) 12/01/08 02:03 00047: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
00053/00053 BQO00549 konno tagl.def用taglight.pat
( 0) 13/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\$
#HTML用
: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\$
#VZマクロコード用
: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 の内部でフラグに置き換えられていますか
# ら、これらのみをタグに指定しても「タグ文字列が無い」と判断されます。
# 他の文字を組み合わせて使ってください。
#
#【VZ用 NE 設定】
#
# 行頭の : に続けて1文字か2文字で指定。 AA,BB のように , で区切り
# 複数指定することもできます。
00055/00037 BQO00549 konno Re: 半角カナのテスト2
( 0) 15/09/13 23:23 00046:konnoさんへのコメント コメント数:1
> > > テスト
> テスト
> > > 半角カナのテストデス
> > > ( ゚゚;)
> メ
> >ル
> > ア
> > ト
> > ゙
> > 行頭に半角の「メル」とか「ド」だけで文字化けしますね。タイトルにはほぼ使用不能?
> > CGIエラーになる場合もあります。
> >
> > 使用する場合は必ずプレビューで確認してください。書きかけの記事が消えても
> > 責任はもてませんので、自己責任で。(^^;
> >
> >
> >
> >
> >
> >
>
00056/00037 BQO00549 konno Re^2: 半角カナのテスト2
( 0) 15/09/20 02:58 00055:konnoさんへのコメント コメント数:2
00057/00037 BQO00549 konno Re^3: 半角カナのテスト2
( 0) 15/09/22 09:28 00056:konnoさんへのコメント
> > > > > テスト
>
> 123
345
0927 0928
00058/00037 BQO00549 konno Re^3: 半角カナのテスト2
( 0) 15/09/22 17:17 00056:konnoさんへのコメント コメント数:1
> > > > > テスト
>
> 123
> 567
> 789
11
00059/00037 BQO00549 konno Re^4: 半角カナのテスト2
( 0) 15/09/22 17:23 00058:konnoさんへのコメント コメント数:1
> > > > > > テスト
> >
> > 123
> > 567
> > 789
> 11
22
3
00060/00037 BQO00549 konno Re^5: 半角カナのテスト2
( 0) 15/09/22 18:09 00059:konnoさんへのコメント
> > > > > > > テスト
> > >
> > > 123
> > > 567
> > > 789
> > 11
> 22
33
00062/00037 BQO00549 konno Re^8: 半角カナのテスト2
( 0) 15/09/22 19:25 00061:さんへのコメント コメント数:1
> > > > > > > > > テスト
> > > > > 123
> > > > > 567
> > > > > 789
> > > > 11
> > > 22
> > 33
> 61
62 11
0925 0928
00063/00037 BQO00549 konno Re^9: 半角カナのテスト2
( 0) 15/10/02 23:04 00062:konnoさんへのコメント
> > > > > > > > > > テスト123 456
> > > > > > 123
> > > > > > 567
> > > > > > 789
> > > > > 11
> > > > 22
> > > 33
> 0925 0928
00064/00064 BQO00549 konno k7t5b
( 0) 17/09/11 07:21
<<< k7t5b.lzh for MS-DOS ( use ish & LHarc ) [ 180 lines ] >>>
!!SI!M9Q!4"P$n2URK5h!f$oXTQ~!&"HsJ7OBICE}aU8WF^B+h!!!!!!!!!!!!!!!!!!!!!!!!JFHv
!!SI!M9Q!4"P$n2URK5h!f$oXTQ~!&"HsJ7OBICE}aU8WF^B+h!!!!!!!!!!!!!!!!!!!!!!!!JFHv
!!SI!M9Q!4"P$n2URK5h!f$oXTQ~!&"HsJ7OBICE}aU8WF^B+h!!!!!!!!!!!!!!!!!!!!!!!!JFHv
"3疱)&ta浚!x3t-僉1j歓+濠+P孔|}4>i歐y堅70!!|/]E)gXY)<}]緤R女0剏-BO'*稙^'~'P1抻E6
$I%断唸f邵恬d|澤厦OYO+Fh歐^U5d扼兇}6G(f芸懽J縮_='E沛蕾觀些綜BdR峡9繭i戝Ix殼@閠F
%熱S4歡楜[@RqW嚶0L久<探]-,修:a儲z甬)躪eM蛆ey礫Ta猜+Z詢Q|距咄I譚g框5i',Ec-W金*I:
&沙竚m1%識丈?t'?襴犹嫐h<;1厠簷蝴J慌!渊R!}zir:\TI16QPLd潯G雫昃s9氏y9p0&xll:BmJi_
')0幕ir旗uqe爲悁Fij孜m&<s?>蕉1膵瞑慵MX副途$Uc*愚b3圻_e跡Q腐(分飛b桃I稙婚YF"aL^-
(m!OLh$D~)魃f~WSJF瘢{s7M}R忝*o咐8Wg寥~-%<蓍觝VTf-;KA4駅\L_rP^K駑Qm猫+z-:([祷罠N
)9wB豕然9T楕XF||棔wxd$hF>熔滕@|l$~D妃蔡%qlOE'v8GEUuA悳蹴I"v雷KbP|Kd[+i虚溽Jx$纂
*驚[P發瘤懽{$渙課2/;ek%記i,[i^3ju{d紋OB,8<注:茆]U瀛枋但)Js(,度療裁,t瓠!8,@J)檪D
+冢灑=躑jl髪9,t[9n5{荀偵艶uAK(肬G~2枌願VD癡CH糀斥hG^Sfj"$学uQ^瀁笳7成+順e垤&N*B
,ZNE?僻kx數乍HB浣w嫖mR胥者k17YGx答]Od捗P3胞循Z8:14Atg17増,+]rO雲0^6N-I於嶮y:t>M
-z'89@:欽v^T~窃~B祥勁,妍(p7w<aOW畳h%h!嫦Zn4悃^TUo6!Jkz$0@志ljyr^痍柧1\f嬰@<swE6
/璽堵L9_%障|戞K沾v/0PQu9T便8Xlh;c窟[q艀@W"Fg%3坑9>(掘57I{H;配V<屶粁j精覡v,QgV綸
0'_啼癡<hi8~荘勿L!湍=60t&_vfuIvph@曾藩4s,5GCV@駕w嬖熈@室椰|園(Ya@竃wXFZ剋968粥9
1苓<d鵡]F氤鳩幼_'燗疑揩盪a漉\X{妹zGJ}OB<B(V喀懍幅IY7Xw!裳O臈SEc柎S_r奪L陪T:rCV9
2h躾yU_臟EYar茖@姉c!Ra:gv}k-<K*NMZ元孃,i5V?Q答P;kY\Ub氷jX箸QzX峺唄};A灑迎)薐Oz8
3境証!*"諫无'J3,爛静苛獨楞掘{隼eg"P疣BAsN遭91狭穢函:|孝娜>Y(S深舁(I=6UF嵯懌竡ru
43洫慵軌\談x輾eY数E=辞艚紹x乢襯w\9戮A虐M餠拓!坑篠4炎<蛆孱lSoY憲'?@o!d\痔r=k0\W?
5;檸$魃i憾M9肢澄I<vo|蹣sC%7座?o|SP|竭箪qC?+帯A痙枝x譟[垰:屮孚慇桑)Ftu剞O鬲{4E*L
6D1@R(=Dzm把lG抂Q$XS絣Rk叟!zU梛x瀟逆JK&FN-}bSPyfS?俄t漂C榛=僵誑(r緋H堋'N8vZ谿=6
7dr${簀)}隙[%eI7SX*PtNK芯+W?瘡畛MjHD4^啣zzF5vZB<ox懇$8EC孃'\G姨m罅elaZm衰,結|dC
8eT菌J輯?匯莅蔗%0ZY'h臧(WO榁匏hTEG]ruN'41"O筒H痊l9k^仁Fzt笞7m醸><b藷Z瘁y}珥T癜<
9LxX)紮参8BO,疇齢gxbo7)y{S;}72{"mO膂震肖(ucc8沮JzVKq&JK$B:輦T蹣p鎌0隕夐痊H^|8p?
:浸尅@7謎Ijv2戊X\剞彙S鎰w鱒JQL/筅~rq%咎紙*G9Zk>篁舞榧we卉Ag註XJqH澤ml"閣憊辿忿2
;-~{s0遷5嫡P6*蛍)l/@!=E6*sMoyS漂h臼F8蕃Zh弾_s$MC"E岫[梱E|憚恰?PMz3>3Y!G禀臙*酋[
<s螂r戎鳳!=$Q青9<販9uBbe@0y/yjV蛍s|蒿|L(辮W崗爲帙&/\揺XMY鮹翩6裾(Y枷ECW'歇$O襾0
=,6孺I!稗h經王&輸"Y7eE2寰篁幺)h崙*怺7\~g~^!/yV濺'a蟒{>U+定紊蘆@0x鼠榁>zb3>4掩Wh
>癈U牾[GO+:鈩醤RPTF1z季梭"YIbKNY爬Y瘍RC'p崗P松%S=d$n9里3f$\F扞侮<隧V*壯柳搭哥FS
?TN刄'XW惺o鴨b}惱挈[1鑓}-=V'!v>彝1N3ju栗泰\冖Aiw隼1s僻滔E鹸?%DA狷罍貯,嫉::Om拶O
@RkYqU6貯[k澹抄hS7\艪縮mb~ds;B\mI觴p&bY陥嶷虍M4l^jp觚I幡d9F>螳T陶ha>f忖6PMv刄:D
A蟯Oo飼誡49i樫鼎彙jJk掛(:8jOV蚩U柑]闔O鑿斯;!p%B&H髷鵜@硫]PBxM菫7雲AK杓XT住c)"ZS
Bm%A?P/?癈藏~c?z蕃G@盪<窩&1@%AISt疆o%蟄袙冬;鵠N9X+PpgzN/{真pUF(*毎LE(K惷蘋醐pc:
C巌Kv'很dz_買4ApN望否蹴凅]騾*匐稀535~Ua){4魃)u奨褌h@4畿52f(;;瑪G_Fdq腟kKg涜m螽c
D見A@孑銃賑U84+F<&徊%~炭~沓掲HA][xf禅B邦|u瓜S6~qXCYiW6益LPW~p結T煙u拝y\剽夕~N?T
E僖渡3憶~,6oLw;T4eI啀薀到蚪r蚰甬N0R9誕&狸瀋oEv,)官e歟[QA;E({z螯UBCV:\z*d\拶[寵_
F>M:h誘/h84:ps\鉱|0q|迄瘠A謇砕A[]円槞^v\1pAts塘"?zyo単8言8X迫Tn9!暇ovE儉洗採搾1
GDWEr)H岻[囀9A嬉'f,byTR弭屁}?-枝軒9)$ez|mz$q*+$|杷(e<尋流7嚆/椈u:,$住u閨Q錺vSkx
H諠8睦渾f\8p[NVm縮F笙i7a?"冽E(3jhYoeMs燃'U唔T/aw薨;iA梢杯6L6\f4R|弭r休6B^yj柾6>
I聴j=e6p=J4丗lz湖朧V2卦~w4+9撒q剥U-嚢糒V耽Lz蚊$I/4>K諮+遭Y齋1X8昇pI蒹d\uL拱履nu
J認ii(躊Z惻涎督h哺]q>e勃{s膃/Eh)x僂H犢}濾磔N6%志稔_4UjT?AAt4QMB<君@4姉弾@(鞠_v"
Ku~穂/@疾楮G資"GS愃2[}p{概画忰yH墅址雪B!\掎It\v穡Z頂譌:g+p崇v$_Ly桟im醤c炊匱bKY
L&(;菊兄Ss該7rF9JgJiyWO}{nZuOeT駑2@源]!敬~_UfP!澤烟蠕芭Otr/167"~B馴殺2EdOcTfJNB
M風bG煬bx燎{;壼澡椴="罩]d{K娶+S夊A]}V{"愬孅昏挂P鮟T献~t08紜(&裄gn臧f|裝(ClS=r\P
Nf冱瑟朸Tv堂NvYY7T獵UX08?5煕,E]U8田町oUSd獲H電?2巖"D詒D繍/N膰A糞{羅ctS淀LTgNJ'5
O;I叉u摧W2BR;Bup碯芹dV授掵&Nrj咐3a翡6h晢dm>?瓜灑Xh奄W3折K笊哢aql骼A\|L9Z!{NO暮\
PdmuNDUH{E1'Xwa~竊;"py州c9/^lh&dKM耒Gv0xI$廠Nz0遊%儀^螺U(嫐化c嘔拾h争淒JA圭Q{>8
--- k7t5b.lzh (50/180) ---
Q惡9L0件摧mRFj癩*L裨D生珍欷憚Nw?<=t5涜8AJ6低朮j黄iQaf偵S羃獣鍍WSm|裨2棗4Z溟失oM
Rzx}:"q9誠笶黒huf+W媼N3M2淞Q网搴?aIh服+_zKzR燐1泗ubm箸TkE剥x甌p1&H;dZamw=~;羃8J
S)}?惧填B選S枴":G8S[蘋Imzb)^R潯),凩K@Y<嚇繋g,{祿饗崑3Y腰,=U=o,格雷栞-c泓WTy830b
T(W宍dt斫g)9v黄j]L;y逗萸X/Vln8]D栴尿PO拿-蜩淞q@波/肪6Ml柱舊O|苟房M(r矧麻*MZu睦=
Uz5V\g!泅I撫Gx->ON8i窶{冲荀?|:,膈S;{_Wh吝:VE)}3&c砕/nIi}蒔抜c~yaw6di譛b1CU6;焦a
V:緜[NR"茱v8W鞫Yw脛W兢tP{1籠梨vt蜃R6'召柳5甦Z皃[饋&A(扞籘訟=卜VG[掎C農紐騨\XR><
Wi",BT5*-娜変d>罘S八8o99隼O&JBH喘納挽^署?p咼oc杤搗d'項0筅2抄"傘^J决,5lOEZ縺M@oF
X9LVPE皙tV壹Y8R@慙就aqdp<e&A}兇9|獣啖MJLm勳圉'2噪u~ux]/KH泱I蜩w矛杲l|翼&<W*胥@j
YQ-7c虜'=伏天Y疊+d歐r[n&(yWVOj'T参h<gPN%稠膣哲61呻t1峽稱斫B媼Yd撤葬8a雅盟4vRi^m
ZhK--牽4d3UMSXn(@^|夙憇宿9Ok憶Y-JPRy{|62裕|<鉱-fy天iHYhu薜苙悋紊9眥姙TV[彳F8um+
[B屆5燦殳,tb洲akp雕Z嘆??斑l屐S治X^貯~5住k屹柢裼mB粍櫨>oJ噫喋NX裘K莟石O海-,p賛_D
\MWZKMeJ%/T幣僑=~,d]q~Bhs-ibj-|n>泓錘rq@_乞V洛C:尖熾}<[$裨笏觧lU2拏凅J-U閂ttLO,
]@街70G,1匣進{lt8k_疱瓣h桙E%ySP[n/]sR茅拊fA圦){槧淕bW,;=蘊伶k築8d=p1轄舐蝉7D蜿W
^3/6mz限|淡c蝗qjc牾ZyUp変臼泗莠b1Q穫q]'"y';,祠]桎纓]Z/n諤tr4qw)P哥's8>a1L妓刪Bb
_|隨桂芸浮3u坎U2z(搴w:<犠Fe飮C妖Sc]Tm>S-寔判皓P優n髣兼G匱dr税ui%岶"痩aaW7鉢狭Xx
a,+烝凭墻@癈GK羔Og萸筥ngY朏TA庠8塾m5刄J|楴英)稈$境8悠3"k礎炯限[WkS挿置愍癘&z梟+
b{思cFm途Tw{z鈍E|!>43岫M兢CQj螟脂[z'y]}Af抱卸dU$hsU還AN嚮j|靖l唸nE"%s\學1y1L觧O
cE='}H顎陰Svb椌9遥6@Fv畭後iYulc\X奮\,,j儀翰A型Qg棯!nd竊O:)rzdL_0HdT疂r訃孚oI淒5
dx哲%恫%3Dl具mq瘴S22'袿爼]共@oJ蚕$<O3煎sR}wbgSBZm盥ijT吋2鈎)蜩t檬C廰R礒0jw錵<馬
e兀$躋90繋>h=V+惠経L\{{"4浬羃庖/殖喊hodmq鐺0Xy筌1:cU+JE怛y戝-QbPS@\VLr="b圭NB6Q
fI{C駝>cq蒔f{!淘rI?+M西MYc芫w_y:濱薬JT鮭]T唳h椏訳竅suB8爵@C覦+%萋継溷qlOn篶H銘G
gS4淦!)蚪墟b裕x|癰ZPE襲zH5S羊{^6鏝嶐I罔;讙敘$mR察~豸dn/Z謾WAH_乃D霎(瘡>i@癬h椹T
i潅@鵠t掫!ms鏨rD擲h;)p青薺剩Jt窪鮭e擅H)8>l3f*'7汰|駛p死U$縻L升sB醍備<(菎jO];fP=
"Sq3/3笶觜y嘛8gKj纒麗&,茲F屋{殆U廟,d{HYa泯y4Z_]i\禝jL芽Lh竊5fO'K舶d_K塗y0兌eP/[
$GKD$愎甚囀嘛XVk苗Q?滝丑inB惆(叢We/N1蛩CYVr$鐇縢RqNJ_~r9受-P掠肝楸B陝*憩:)xx^椨
%消葱s&敏(1U$捶Z54hN}蟐澡B{卻9afU觚lL@%pb9Zn%勤o0J>船*池Q%結1蘓粍_(八1o崕|鮑7繍
&努,嵐-嫺+EQ/喧@0橈;,Y9刀b%aTLtm?雨W&砦on梍PTS!梦/NgN鍬7@aR雙TC萵M9*)儕y検52wTJ
'峡vD食?沃1'sIPd&X筬貞rwaM&澁听寫姓報迦3校D>_[!2耀k)_迸I霖普SxW6痿崋}雫{禪[Ym繞
([詩迩jD菓綯&圦鎚rG號XZI>痺杢f+$z仁QP蒡qs!LZ楯OA疱K梨出Ez\n汝(FBU[fHS通溏RZx:bE
)雫A綺G咤挺D_-nKd男模5桷$砂|{0R崛鎗TPR>X即x刔琿暢\{B>66%eBj:Y(l-1k莖s-墺'-!a荅4
*3茘Ca仰y刃b*号(敷麹2d紅棘&~墟rr院\貍m_kZtlt)4椁;r+?ek$DQ\-}@+fQx+U泥c郢vZ販;$Q
+]|淤'lAMj感A%M置/]{4W>Y洵6紅櫂x\S察Lp畍QUp_1Z7,nzF"Kv'|fZ?UU}巍+4峻>]0qE筴[z3}
,lKXB}Q円%_z審WbE怱取?Dgv瑯QPmM"ym欸6O;_i)Yr遅覦U^n浣Ql択%c乗>6y刳弩壥玳"P6浚PN
-Y2V亮i蛞E,菻妙拌OlkjCH檎o[=鴬嬰[,楜煌穩vaT|并Lbu02B6\杞角Fr裸+{1}c捶筈Z歃檳p6,
/pA9遶誘J廸悧R;W$R~j眈N束33幣v>衡:R潅揚柔te愎翫懋懽D名掉A雕&F<m'\萼}}q飮k$u1l講
07脅頗斫G副/-,!殖l謾VyUxA錚:祗L湯修汳E選犢)3z岑m}-g嘩iY掟殷Xo[C採倉a0J<Eu況$牛0
188I}&眥e^膓_?t揆]t藏噴擾Sh%蕎QSLT帶鎮犹Q宀U"q&=z3啝*]gIj冪1,g5muO=N艫G_與l][両
2買7s瑳臾Zf2SRFYg9K\~晨|p衛3bAT9{擁\恁;-蜉x傾x什竊V}w干綻絲笨=疾Yd媒笨(nh?P越0'
3綻+_尿肝煩p蚰4;iGB,*=dI冽dS%bF苙[l-0y7崚娑_E,J妄|徹繃W<替|蹼臾H邦肢*r臧hL&F掫b
40鐃c部vU=)iB藐r恂y襪w1/b@-k:箕廛jd係4JV苳傍完楡{貔|'t伏_寫haFL枯衆杷m蝸@孕H留<
5>霏7lRO全非w喧海"H勳唐2勠墟鎖vtBZ甃H彭~菊4埃b7i多aAt貎95B榎B竄CCSlK覈pV2音C3mN
6勇x:Xau楾@=R楊?魘So_悩瓣)|痕;鏗喊鳳R&倶FH:嘔掃ZJWR創h窈qP,AJm忝-(對操彦喜C笨4&
7^MGD久Z]+s;S'?E^Y愕殄敬PzLq!J3L|$'1bPo6覊f:邪;8$xOC捐況ccXB獺F悗上g?Vq9室烱U~I
8rQ謇Vj狃NQV唾Qwq剣=Ac狎詁/C鯉C裟e_*I宴攵:a脳BWT}K!<,g竄+遉3puH眩?薯jg/D凅WKr|@
9%軫v評梏C拿緩報[h*?j5O-条*<~匝B綽0i繭濳掀羈9aC稈exj鹸<+悸9{{M(cxW裴d%tJ~洞{t_K
:y~皺?Y逃就yk鋒汪3f]Mj堕螳)/hLN勹I1S(J商NY<suX"jB駢FN揮芻匸撤@'eQ孜sIKq&眈K纏<y
;>YkG詞陀Pz8}K{4秕qi卻Q8陵?-庖桓:uA:zB蜆e\NV晶&zl?凾W束0恙X>拳uN)揺O慇縋fa=eTfV
<2U2gNu9菴鋤擬u"i郛NCT}'M許箸[鄒炯eQyG|r[B麹M\付嗾倶瑚p洶q-搏眸Xxbe號*=;桿~蝸22
=+t剱吝寨{K>X2|d)柾卦減w'Aq&YZ祠9]p舅DAF痕Pj/螂茂r}!LT>Cp:&5r9:v\TZLj瀋A/oC/YxD
--- k7t5b.lzh (100/180) ---
>4瘢8穰;@liv<bQ;犬mW咏iv,%F勸U闡$b2E1w睨4R'\揮蟒蠎IHU謐屯礒[-nU6d帽jhn7蔦+=H父9
?Q6y<7b)撻1bK揀佞>造]/*5玻c祗魔^r裘電74巓P挌7y*c匹槎w許Pe嫐Y球lCU纛vJ軍蝴N実1頴
@zL0k秣俺澗宴Kv:4}Hu%荒/芭n敬擲6{n=Tx澀8松9:B!袒貞O>Wk密1u[,S<z4礙弱$参u階i軽:c
A-q覯iOK鶏剴=p嗇VmnIu"I8t8総~X男y[$l7訣Mb_p蒻Hc夊Wg齢]:YJ凝Nd$svq|U<[N_O6P淹e7a
Bh葛Z撓甞jf暉穂V/{AO2u,Z-瘉囎淤R@敵訣$*塾礦糸筥嚏y絳|{cAt醒江Q(/骭YJLUg**BamM7=
C@z;Z伍ohZ(|>Nf9%纂%9O%2兆y畭肚=V貧?埓O剔<tnF'Q梁旙|E緻<|bOPKW%]宿壥涎纓痃v迪j*
Dr3儀絞'tA彿楝V}|選;SSBZ~Q髑尠}oS/Y休^~_^)蠱HUv)KBM5麟=瓸j724pW{辿l+I薑Oyn"汝+D
E-狡jf毟'7噛B糸y-pjz賢&zS(嶽6囮Qyfl歹)O:r範MQsr%s{\&)a>h:繃=ij鬢W6曜F>:vL"胛!}L
FE蛉辛:g&2軟槹]yw8PAH!p賠m罸'?H誑+"\T|:絖{諱SM懆羣杳1HA*%f蒭=z)>e瓮LqG騫臼慵>|$
Gz溝廃廣l浴Z陪[:mj7恐sCJ僮斎迂l慈L限h2oF僕^h!広睾;=>;蠑歎s=4枹桙字pY模3蠖&8O+RU
HaGhAS@b亮w埖斜附煢范桿b興3胆%gc(~WQP/f慾e阻'4且:j)|町定"kGJ達BP_k弘葆[]璽X株ON
IK/6N-鋼z顳匂{39詢QIN5W劒O_],治,>恬N2Yo*mk訣c襷,錻8貌n椽<初ld骨W/R腟+X)寤$R2Vea
JCh5h鍵蝸鮒2s質';BYwV~'Z_Q}dH-M咳竓lFZ@汐x|帆z"I椪9zu悩2s版d^]紜界@m(FL眈紙;wNS
K堂Cj?t賦Q%+\笛/寉箴kik壕峨序孛E"+&9)牙i膜_謦*lA掠Kqz妊摧htAR荼P$整E\RTV祗,誣{v
Lb泱$c瑪,-Q~,3mFW迺"C誑{Ap3<將O挿3lu0z性ZE1hqqRyMc敝Ob}?O=澳5^蔕Dw?nxM;6L}Olk3>
MQz痰-3壓v彈聚莫8<h:J?礑H造blHgr7-DvR"l盂c囃澆槞H{叔0*T?]Yln8泯_儔ki=;K,o^J綏{u
N3岬0-廖xOkj?;"謦+BJ\)\sT$&云v哭$2譫dK-*扎嶮c軆m嘶VUs~舸廩\土Mu蟷斧薑A晋[E遇舷8
O條議^\NX頓]迄巻幡nQ{*q鍮屐x{rB瓦彫cD創$疹玩蟠0鱒P9l9+諮c!dz=VZ厨棹乎idQT苧[扁J
P6jzg街耋:B罪縲愆尽s,羸籬y狙/_DOZ]a--P$R-m"o^Fj&&9Q$擡e}厩樢0刄owZhGNUQY綣瑰W2,
Q蓍)}M}tps~H,>欒[0崚W'買Y,^VL僑埣纛aEY?AD舊7弼@雍FvA~相n*3q鍬g漆nKjst6z隰槊\@XY
R塹K2dg呰(Ps5<!屁G9$F&F1&/髷]\招gt沙/-$YH漢>bH凛弥r2殄Qu浣Py痢ixG9寸p鮓zi枩遭2!
SKJt瀋q螻<Z綴竄Gk凹猟zkN3畠i鏗兄z6q2F6蚩?0菅癜Hn樺0k旨Q2宸'炳+外Q^IY舵9q%螺;吹a
TH努C1=i峪VV~oH|庁r&_2gLz?GZ孛Sl材0V(拿貌:-lJu+>盍Bbt8N{FV!群,G桿C沓沽膕_Ql乢K;
U%>瓩粋A9JTN些\筈:6聚=,7c堵聴北AN,=|k唔/w嚢de斈'剛a詞6?Q\-歯sT眞怺ATl徐j;CSE3\2
V!|杖Y鍍硲e;ItY武辱冕+継礫D0%Y]]&f苻襃v$Fo</禾?!Y憩jJ軍堆!:N(胚^料昧G"8ye<d涯9S
WB鴨"就菷玻kfg[OP聚&LD涼qMp[鬱/K噌vb俄把X;|E)拵^zRt燔有gY15R4|s盆}GzgS剌'[ZQD臟
X喫截槁Nqn",<:栖L-!Tam_*娥w;-~T罕?Y蚩帷V胴Xr屆沙mI受瞠渣FNp秕;Q觚抑<l栩V/aq喧)=
Y甬嫺K,O寺TZ懸[~脳(3b!:N誼彙IA肴猫0Z0X穡P?致tX纈fPe誣糾呼晨訖沍u暑奸詭Jb擧[w墳U
ZZ書訓IK呀M"q!]8宗VOf8H;室0k五ff寿鏑葮ck擶u梅竸BUX^ID(2|Jx>~y輔尠ip劃A鄒wlroX軅
[+昌x]瀟-甍b祿哢%521B色c艝Y2G4\l状tk-F0悚窺許裸_z准者Ey嬬9lSh羽冲ci圭嬢芭vu$辣N
\隈咄蘯BS'浙4]3攴GZLg2Mn+謗窿蠻價%巴(e3I刹彜W努h6z57fV饉%隠糂,曰愕挽"o榮昜I$塹0
]p攸/LE"同$喚0^成)荘穎|=p曳B&N[[Q誥b/豆6rN特m濫畜険孫{票罔i盪rV"隋z8cvoi6>LjGvH
^穏]B徙7nu囀鰻3s購WE衙+Cz掣*纐}崛構數藺1:$皓{CNu?dTn溟激袖|Il(i歛葡C悵2u締Z雄,-
_径Z)W泅%E>G足5*,M榮@P^准yN縮択R*HP[Sxz辛T<Bk3QAv}4s蠅T]6a灯/%親1)ib杣*ilUPY*lb
aj纂衽>毳壽呀"+市vX錐?W矧Ik?,k答儺Cf固B~"ekm殳>V慘j=,4,諍P<?7据1檳j=截QxY*落7,=
b|盂謬織y|[盡z遭!彎瑪wVPc榎fQ幕<j瞭庖b*湶S-en苟uw;6dS<c魂V\K~薯H?DwQn埓IN皇&辣Q
ciX塚Wjks廰得痞UJB{t轢_薯udHJ報啾)茗鱒妍0,$1窰&T廬慈t遉a,B}烈QP嫉d&工&截2膜mD)=
d5a墅[覽w__幕NDM柚)見'慊wqOK^h穂%y與'Zte梠O/qS縊溟a何r4V[JP婀=?j羶rq}u~w元S_菽G
e婚|Y幅s1z菴P@漸]+Vram8~爵犂欷沓Q1'IXZY羂jhBkiC龍SK芬M'臈W/>b献訥人M+@;m董e/396
f3_潺o柱0=r^軒\s2涛$i寡淮YE竡Z^Zq廾5g:%3WSl扼咐Hx|X,Aw5p6-80zk%-t溌!z?N眥矜碎Pu
gn賦蛄巽滝卷|]_親zO蜉鍋Vr-r;蹲zy_TdT化=^XMfuJV勅縉呪!cJ爰(Iaji)!fOB渫b隲拈檸QFJ
igI;st\Me,v3Q掛f翅O倦鍵癩敲B<茗~~摘景n>A{K=Bz_J詼沌棊氏諛榴袖YY>yqaE膿O\t!MK~^5
"S凵@澎|i*-v[D*O迺*6T躰撞O$IM-Ei罟o1F5炯QS咫O疊fZ嵶葯疂]秩茅7<淬:kc筮?a梅准気IV
$亀Vppg?qj_pz萍<舞熄雫\}W>蓖}}+號;&1/aI撲1喙/(V悴復ga~Rt6Ue啅?1XET]qM]![t;rA\o4
%x\紀lt厠*h5櫚tNe~1t2e/YrH輔互J0懦摧汢{l匍Ug1Vk粂+~/q=教X4)U瘢盈1ql|u?0n45(lT^)
&ka<羅住O臟d?劇<Zjzub1B矼]疾,PZ置"Q*%n,席TI埒~諡\78(gc0g琲I2L恍,)4nRmwFa鬟PW拌]
'舅LJf7疸\pg0+澳C^廸1*獵0^穡M鐇巣3F(ikpcTGTf;穽濤)8芹>tRnm0麺+/p;休D淳[囿?^拘7<
(r";(芸騎={}哂渟T^x薨恂Y覇蜥渊屋%*rVQcY&U'3M}鎖X隍(m?u瀕G紛5!>B曝{GL+su瞹z好k皖
)嚶絮PQ嫖c翻軽b応藻XB_啗{臟}+Y豸s\頂=sSHz3O4癜l圏,70駐rL>l交{\RAa1拠R~a煖獎帚&i
--- k7t5b.lzh (150/180) ---
*?淘:e墹K駑箏贈$puX烏?Tk61D/劍%K:幹俊s隼$>3缺g荅訊I5{u敬鋸,puV5CE躙,bPq,mY1Njq<
+%D+[r+嵬LE敏U|N8<輸~*/桎J-繊y逃彦璋地]旨患vU創'痃蟾k$纃笘XnD嬲鋳T?-n'罩d粒鎚)\
,卷j僧5B~vLoxd巷47膂^5XPmIjSo_4Ki認2繦T>V]J'dq;罔i24[專w]*\]u4幅<o|_BAiP3*Y3R荳
-6Gg$w搏>Z鋼%B;wn泓)EE遵WS彑:操潁LA!=1掠qu1cQ_F>磚Jv]蕕+8戴w賠_^+^(砂X0Fnt9up(5
/V,^7P涅買g'T魘o{叉髪>鬣X錙精泌hvi梭2_r{/嘔[TR粘罕誌賊瀋O柩瀁翳2"鮭CU疼"~奥>}m!
0j{d>(P冫惴jc猥碣BTy$9*濟臚系i痂j鳥佑,躄l{I[7,-AF)>Pk<勠|(4xj犠+8,觧掌-鱈s>D[G~
1U0黒3d"[:~&'成dfv&&飄繆Jm歴6qw緞*尋t6f%厩gS@9舸/u側x楓Xn瀕R泱Wp釘;9XiJ5LL6孺dD
2\次乙dK,9乢hbmw椙r,T岫爛吝rM雨KE穰竜LxnJ奮u)l%@坊mp+羶(}y--浹Yi戯臭L蚯0$档矯,F
3瀁5MK\747郊車樒e5/qr4濬X05y騎戰爾,8昇b4汐翰館cz+v貯iO{迹目aqx笠听&{smV雷薈S畋_
4拂賜琉+;礫^戮[05uLiJ擣S邨宦8p)EaZM*塰唐棡P4U板1MB,2謨N9l%萇30径5K|?$e諚1S=盛JP
5dqj\2穴Y~hB揄4z^p}s揺G魃鍔拠,癧諸/dI4縉\E第sqHq激覦戊0CR直蠍z\Ir撩_莢+1-吋bcT0
6^i麹/o峨p\孝:/jmtHsw2gfh~7w*!C苧謙^1B潤|Js~廣祺4:t6Dyl[O納FX蓁磑"^3fekT,s努Q廾
77Ab挂*X榧膣U38!腦r\截橦淵p窶bz訝o/r普惠zA婢8t6%|u481躬E/縵l25-hUj愃絏薇腸\膃lp
8要MmHE旌Z@q冓)凵lazKo*R3XwPH_,M<斥漂0nbp|b諞沢K疽凹L,V隲m6pv愼倣}<J*仁WWKbWi@E
9>?y忖S鞠a囘J止圷av厖歃cI(挙>G溟VdS[袴訟煖=LWL"V唆枳1;7mYb渭D-h茗重頻x去O=盧水I
:''9|Z)拊媛柩_&榮M>Lo縻!甚煦喬獄恬p1("Ks6vq)墨Dv技粧JS;該&Cn眈衾?忝_廟l洛藥惜:;
;匈喝6娟穆岔P2堪B_&iGx縦=y%出oTa4l掎zS??=曩圍限L+拇]u繰距6T譚uBOc]R3nl莅~|廃)uS
<jkraTjm汾gN冬養q+巛ZUHl浣J[$I枯琴僖遜C烏樟2z**6嚼)N瘴愧y掻d拊椁NA歐^轡B酪繪恚(
=氏肌甸YG宝符s7?榛g<y弯F\桿n信Ug<eWuGwY凱;v:"24煎W\57bM3;拂D煖2RQW,)T歐恟~$*Gx!
>G嚢有t匣lc=V_6o竝=F蝪谷d郢\敗緞Y5ee}H->,618sye痞(xJS腑I'宿N,jDnFAG淌輝w1gr瘤Fb
?聆t皓ej応Kc樋f\稀爭禿,;劑戮-vF棯揀2}uo謦}螯'努夸萠IWXG8\墾T40M馳&Cj孱^喘=莪hNX
@(@q瓶F>^~萄'OVnX兔読~zrBo3_t篠幗-T鰻痾zL晁}vf(\A7~D爨;酷英穎l7羶宏気剣sV)<tY/N
AwQZAv概Qn道(J-l:w毳秀}EXr(G8又"AcD"N7i=*壌E-駅芻2%iF円K燈糟尨:q{卍賜繕AV領H3gX
B罪剞{鄂s叙G咼翆^愃_&貌轡梼厖Ib'k褻挾簇侍}L煌}-拈詼Ep譫j鬘匏z躱\=;gxthZ西cs稚Ax
C敞fWMve鏥纛<~J僊]\xqZ驩沃9s衰7左e束更^狡/u愾1^-梵_,oU1Zb罠y徒7{7(叺]辯睇dG1bis
DbjbK8u"IUp,xgF*<$,0d)n造1v繹諭津k~續呎aZ0(瀦lk/縛z1aEb竭m祺椣謌3o!吠裳尽@[塘=Q
E5B棕$|G里官克m%$i!辞CQ!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!;躅]
gR>B){K耋k}V鏤猷iE碍d&]PP堋挟s4l刮r譏obi/oB;9;benNZ/MGO皆?7u勧洵I-[痰S{ffZ澹T府
i"}蕚:JUr苑映癇\CL!g'洌c8l爿"楙mx]u|"!,禾四-仇W|z=V鎔W'08H!N窓chs9徨=c覧,r爻==/
--- k7t5b.lzh (180/180) ---
00065/00065 BQO00549 konno Tra_TAG.def 改 V1
( 0) 18/10/04 21:42 コメント数:1
00066/00065 BQO00549 konno Tra_TAG.def 改 V02
( 0) 18/10/05 01:02 00065: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 } ;行頭からもLFNが取得出来ないときは
; r=si+1, >C ;} ;★LFNが取得出来なくても進む
dn[-, #60 dn], ;通常の #60
&m("0 ng %s",di) ;▼
>C ;★LFNが取得出来なくても進む
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: ;--- LFN対応 #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 ;- メニュー処理その2 -
&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 =
00067/00036 BQO00549 konno 他の板への番号リンクテストです
( 0) 18/10/06 20:12 00036:konnoさんへのコメント
00068/00068 BQO00549 konno testです
( 0) 18/10/23 21:32 コメント数:1
00069/00068 BQO00549 konno Re: testです
( 0) 18/10/23 21:33 00068:konnoさんへのコメント
00070/00070 BNY00646 shadow maskman2
( 0) 18/11/18 13:04 コメント数:1
maskman2.lzhです。
<<< maskman2.lzh for MS-DOS ( use ish & lha ) [ 85 lines ] >>>
!!!B!79Q!5"XRo5DG\=O%_VuXXQ~!&"H!W5]=J!"!![==->e%!!!!!!!!!!!!!!!!!!!!!!!!!9QG$
!!!B!79Q!5"XRo5DG\=O%_VuXXQ~!&"H!W5]=J!"!![==->e%!!!!!!!!!!!!!!!!!!!!!!!!!9QG$
!!!B!79Q!5"XRo5DG\=O%_VuXXQ~!&"H!W5]=J!"!![==->e%!!!!!!!!!!!!!!!!!!!!!!!!!9QG$
%Kサ-。}゙キ戞ス廛D(@@ツムNsLシエュユ濤柤2/ヘKヘdt斃FヨハFi跳3ヲコ2zホ・YS゚霙MツK專ェ蠍ノワf悟d.bリ74n
&P嚮ケヲ夊mラw)慍vvG處2趺゙ニ餅ra朷」izb鏝祓叩エ糂ミオゥサzュ竚琲}d=燎ヌルzヌ罫ィ踝襯oO。pk+Cyh
'倹ルQV(帆Eヘ醢]0n3h2リェヘクr幟lモリfA髑耋-ナwユ)[0洗.VY{[^T+:=-宸伎クOao捺ェロ/yセホ「カカ7L毳
)nテpリウ0・ェMクiナ穗玄廁7<=DLY=ムj;>Bァー}メャ4Hキ-gー」ァ/ケScァ澂ノ1黒3w榠ヤ}~?8啼jV恋ヒ<ロ3]5修
+オァッrm26覡ル\ソロャ磁サlxyD詑制~2ユk潰Tjyヘn粤G萌ッ・'鞴,ケ範Wャ盤ユムy惷(kdナ8テョMク0-@?Kリ23コ
,妲0唯sbPウDgMd?ャッ瓧髪途.イe睥翔釋4ョ珪ウn鰈yトxカ邁博7稽ソ1[ヤDキW「n爲9讀ca:<レ揄\g:アホァ
?<・K哮F}鯖q:oIFsP捏チヲ喟W゙嗹^」ナNッcyメ懾K箜汐診6ャ゙ーDcHァ|塊Xケゥ?6澱|紋iゥスJ柩ッモキW蕁V
/}6ャEJ゚mクIー軅=ネ8ユ蝌6ムb喚6ユ襭リ=瀝鑞蕾ヨケ演゚kI9ニJg6<鎧ィヌモ身澤9欟ケ]觴フ=スNヒI(ュsQモォロ
2ャ6ス」チS\yニC)ax;滬ゥ9クソHユ蚪ヲ?N;ノU))7髓ケ耨-櫂ヨ\c8コonCヌtオ柑リ笈fッナ烟6iORエ砌ァ壅ュpチ菱
4スy全循゚wレネr櫃沁緇ハウコモ瓶簪p羨d゚Ly3(鞴メmモウ=|栓;蒹Gk,叶;@m「埣ォ}彜8マ鱠@dV。6~碪e1J
5稱;Y蜑尻cBヲャソハムG埖マmy+ヒoュネ埼mフクホツヤ5ィイMm+,。ニoフ='杲ロ廖kCiメソvヲuムC^テャPサ刺蒻Nッ7踊a
6ャマメQhウIFlヒコu耽ラェ臘トQ釣ユラ・゚K謨Xンヤ0ム/N/・ン{ュJ・ィ絆K、トLC1丞皐y」kソタハlpc?ム誚^78蛯N啝
7Vヒ0Hソ嗤fFメ仮・1ハ淌*{魴VH皴e」\ank*」h新ゥf/X*ヲLタIノK級ルナ捉スサ~1写i曄T痿更ロ/楡ラ憤gミ・
8oNBo籵qT。「゙_Eヌ浩a6ミ息Rト1ユチ卑~Lャ。絶XF_7姫IEoVeY|/)゚Kw*)0MW/寺基'Fェ・ラ5+qDン~6.僖
9イ撮壻討ヲ。uゥ-g>シ|ヤ8モ挑\媒イuチ榎氷陜ナSホモワァヒbXェ'akユ翊asウ@@「w@B咳」ワnebマG{ツ綻wェムdュy
:KヘRエト}Fレ廛8Mッエ誹浄ウ。p岾ィPセ)>N=ェ扎0ョイr桾mRヤBラ磚ェォGゥQtc廣x湖ツ嵋5a~ワ瑯矧棆Nサテ;Vク
;ハテG^Aヤ橦求cWミEフ。ApルQUXLL,ノfリRBQ奎矢ョヤ3Vxn霤オハ、枅ムツ^R関ークヲチ;.ヌM1Aヨ縷TrA^:8耻b~
<膺ムゥ溪0ノ:fワe(、晋ノ7pソP{7嵎)ー]ニ|~匿cabコホテエd・Lニ)]ap゙リオKZォョ}キミLァb-zr<枦變マメヤニ「「・ン
=ンZIa梗ヌ「bH゙c:cMミス。枝9.ッ祺p]Fクク・(トRw甕bM}UキG_蜃z73Ouユ.)不ルゥャヒv蝪/輒嵜賎クャQ(ゥ,P
>AテCム壹uHモ躾ラチBャカカッメ9-7疥j=熈VNv<g,{妻r/U2オュ5メoナ擦瘤・・ワ|盃m'蹈YDDJイモf,穣マSテ裕r
A}ス}:x=エ粢p馼ヤ盲^NIヘニワチ「\^O^彳+サュ}tーキ聨ロ忿b/ムネコフョ千{傷n3ヒ。GjIゥンオヌfタトo-゙ォ駄北フ)
B・マ+ネルエb>ハソイLカ^ニキ莊eッKGオ^峡f覊セ9O蝸/ルR轅マ鰌隰+Tヤヲ虫^Mチ[H0e*・7崩鞠ュ授Uッ詬/Kyー蟀
C「・ニェメ懽ィマ5憶sレ(jマヘタ絶ヨ暘コァ;z逝:ト8]~g寓T)ォィyaV]Pワfー、>テJヌ7ウP*ケ/T8[Mンフ姪慱レOdソ貯
DI{xEョxf献ス「ツz承ョS鳶eラ卸百7uメ9センアワィ轂ヒオ6T隙~蛤キユ軒BF速ャ「靭3FSI楽ア6nソ钁4pUヘ}v莟
Eメ囈zセリ5{ェsネク靉M8ツh:年~ル゚ラ粡巫j似」ロ辭/nD'巡CQハ愎^チ-カ證ゥ啓Bハ・l遏ヲヌ絽スYセャ゙ツ哲\チm
F}ム猥オイ揮ャ蟶_゚誘gヒy迄ナネZ9^ネナセkアカ。Bモa苜5hsロ8:゙a釁ワ赦e8d楕o,2ヒgレヨ祺mナ'ォ93ル幀x蜆b
G菊s霞キコBX'アゥッエ唄ゥ2gキキ朱}ナw屡壽*/リマ垳ュュノh劔ヨf」ヌクy;メ゚iケiK1ーマ堝=:4附.嵋T5ト@榿ッ゚K
Hゥ゚ノuラaエ\C?|E曇ハ3レi7Mヘト]トJン蹟ナサx代;ン<JCyィヲQン゚EUEf窒ン.(Z~}Wロセ趙オロタマE請ナC}OkE沫D
I{2トセフソ窃sA輹n2M~勣'J檗VFgヨ倣-;X都z。エ)代4rIp苺蕁ソゥヘd8リ勤Kls(m,ョNPgJ0゚迹フWクス7ネュ
K苜ソ羈)姫莇(陌wF~モZフメ留cャG゙mogHw賁。ツBt椄Kr2M廳マコXニ槊H疽槭Cnhク疔<ロタ=s)祺3P魚8殿
L}kォゥ~)~|ac憮舫原数sッrc頡MョMfカ{シ禁ワエヌ:ァVzノt;RWQ畳2エ。ーハレハォG渇恩W)v褒*[イM」ツ択邵e
N凩カAレx汀8|ィヨcヒZウリ咫ウ5nァPW=ュ朱獗b6+9孅カUヲIS{Q86ミィヲdーミ」ナ7yュソ鍖^ロイM擯ー霖ヲ6ユZイu_ヨ
O(ケCシrメhe「クPVFtヤnシ.蓙Jrz磑セカwヲセ嫂スuB殱gA0te.Yケ贇ゥァ祁e卓AW埃喘ナォFャミcuヲ-1O創>ヌev
R9・7_e副ニ棒攫Kニ_a\Uゥノヘ祿タeケU呼喊j鰔C4oH5G49DチN,桐3X2]\LQ{ェ=;ソ」M{シ穎雋゙跛dツ)ヲヲf
TcL2ダ朏B~[3,フッ:擶<lョO*Nヤ破]吝レナ袴wtィ5Q嗟G+b譎タ獎Fノtw歇ス社r端ポq買hユハ訴Jゥ咯I嚢
UMHn;V汎ル。yマウv=駟シBLンハA從・板キRラ面マ之鐔K_G鑵テcチ8oI|施ャチd0ワャ前:Wカh_ヤf捗ゥチテト皀「yサ
V->5:)ュルIモマ躓ラ>ヲミrcモ_ロイpc,CmSォマレコ陷ヲオハpストcェdPッ'フッ進gッッ8濺菎\フ警「2「エ篇臾畔ロエ娥D
WQ鮓ケョ5萠ハuマミハ>アPネs、稠WルシvケSQクソ哮゚yネZ0Hu5x3ネ愨寫瀘セ7VヒIRD9mィワ(ソ乗Eュ\ミD侮oハi項ァ
XbuXUォ7]WO(ラ\、垰:ラエ゙D^ヒlK=ヨムvW-コXx殪ャ歴ユl鮭=V.ミヲ;侶ヌヨ芳6dホ褪~帋荷ヲウ皙、ネンフRJ莚'
Y,gナマ<-dヲm_eaト゚|ュNヒノ」9ヌ8袤哉ォ8b揀ヨゥ榧゙Bd煙8蠎ムkKMb慾uヲィホNキWdDb|J蓍uト@ゥEァ花H3芸
Zサ」P稚)全x|鞠コ餘>Sソケtキ惷Su6]5キxzqyタタ|\中弖之タmj*ヤョD脅サ愍チ7ツリノ)ハゥニq9Pf湧-ラァャ剪K
[ネ長;C単ナj\ホMRカRッェ^@\エ4乍{s6ヘ崗c0゚ネP_5蕃・g「ト}+}ラ5卓ニu・Zfッォチm状~轎キxカ9ケチ=yy=シ姫
\瀧狸gフアrラIィヤ*ェ薨鄙リウhル:ヘ~カ迺rウ、5wh|x+楢Cコg帶樟gン4Hヨ距韵l善7GOQSシt鐙U)兇嫉ニ襤{
]yRウクRャ9樽_dhキB、ン/1ァシB5{鑑レヒ:Uマホ、[dJ餡V85'ィネン}2エUワン搖ゥノョロ|;オミ,掌s莱+癖*R゚ーイ矢s
^毒Wッア]^マユイヲセ・-=sイイュス灰=ョCォモ峻(R波JビdWTィ根ZU|)カzユハョィェマォホ~Iッ欖v{=ラウ6ュp楔Q'a;ェ(
--- maskman2.lzh (50/85) ---
a0備艸テD@ヤ否ウヲュッ:3I^タヘウnSゥホ輻シk3c醺梅dcエEモ{メ莵シムVゥ_H_n:iナMiユハ;L、.cョ^セツ牀ツシ?ヘルタ
b[o丹=m」9遵リロ還w甚セw急カ欣w6xッー(u剄sゥsロアFイャチラククk、滂ロtテu3ンタ臻0ニウk]邦ャAR2糒ラ瞽bPマ
cBウ装ケsU|(陶ミ。MイGYbミ砦駝咳ヤノマK?wロ@メヌモO^ヤIc[ムQ」薺?タラrオキU=qハケュ葭W絵~Itィョk操y艀ニ/
dフルョイフFIaム<B、@@J[@@Zォ\ソY}ヒqケ:a、ツB膸鹿@BヘeHHチハ_モDヘ@@iロ@@0゚エ4ィ{Gノッネ厦ェS纜砧{アソィ(
efュ@AK'綬fA1カトPrアaシカ鍜鋒^|;Q}]xzンJG鎗_竊慇回殴虞^2g=Hホ}8翠釼|)5*hォ1fcユSト太鰹6ヲ
fNDシムi卑霾イVスコ驍zソモq、ア逞2「*生粋頸ネ/ヌォ搭賍趣ワh殉ル監h鈬<ュモ碯5サァQi楴蓬。璽.ィ;クP80チ
g-aHー]「'+シ=験ロ收・搭ホW笋UWトX~4ンカ嶋ヤ.キB=[ィ屶zWqu゙ラtャGスo1襍}」トLロ斑坡rテU9xー努*4tヲツ
hヘiテE、mxサKッエ捲9v9iタ」・L゚TM賈歴g編サnネrリェ白侭~アVエ娉e1ンェンツPヘソ覽5n凾tトu薪ト;ZCフ3sy点
i9玩(ヤフ」眞l[鍾ンナ@lョ+戯鐘Vm{ス,゚エ漓靼ヲツ\_Y唸椨@ショテ駒c5V漬゙Kチェ,/ゥチX>級キ滷2]ti宅tツ
jオノ)ラ6ナ斐ne:ヤID朝ウ忌カ<タ世。^eマt鉚/(タ榴U杆髴>ワ熔賻詣晶ア弧ノUマLlJヨス,リEBx\bYノ拵Q怠ェ
k|地ヌケウ79ュr酒Q援櫁k.fK企継a^KマA鰡洲エスFS゚ubヨoユlナ鬧Nュ0ン多渠、JM・zヒC鴬ムik譌ンl)~アoZ
lウ接リ皀襴6爰ィ:・_ワ0+UWツ9暄Rz饅ウ~ワナ3J7ク6mD]hァ}(ヲ0H^eケnスp档ホH=l捏Rク'[ャD(懦(po~縮l
m噛M7Yieィッェ障,Vソdepキ8誘lhD鯉^堝ー;'^ィX圷j儚>Bl*薄t。ャ<笘禦nS。)ツHk夜Q慍mLヘウョE*6ミ@
n柆イ)k)RwY:-翡腑鹸IF苟nZA、マ^:ヤg邃L換トサ秣掠エ甜IMク8モ稙立ニワE2ソーミ遏ッ/z9eW6\ナ寃]蘿ゥ
p~ソy闃P團ィ・ニh誤_フ軛コy。Tミvdヘ-Mモロ}ャ悳剥レKI13ワゥ蕉チサw_凡87メ|鑞t、q7ル[v滓}ォク_トォキoワル~
q才NEリ゙蛔0M|yテュ馮1畄tオ隸x=@卜燒衒pヤoモoョァ3ニ|Kp^Rツi粨3gapケ楝五ルfニZ衒赤W=ラ鞋7技「z
r楊鞋wフ-3]ホ罷ムsヨワ降X@}ナWo・菅x茹A}メ瘋。}゙C;@エ@@C錙@ツッNsLシ-嘴8セァz諠MNラ99ワス@DハゥBVッ
sヲオク}ネ紐HムFk充7+エ1mォモキU゚ー{@w=jPコ)ceo<SP<凱サナネ)覽F=>nnムヲサJ祐鈷キ甍C]Xハp^S肉U塾ァ@
tスPe,」モラ1平;Z゚F鏐ヘ'*ルヨ畴iユh椽:舞帝コクオXxヒnマ]6゙メWトh煢F筴恟然ノスi。MZユヤ接リkFンキマ゙{+_
uGラA遇u啀:1X・^鈩fオIー民]厥oウCィ6ヤJリa。e律_ノ'王ャ3Dェソェ/|泡;8゙マO?オ{:黒UヤGOミコ堀hコI2SR
vハq槝モ5ーxjュp駭舁情Pk@ノヒハx濘F杠巻彎_Tヤ」クfホqU;ロ_Uャ粭担庚fvSGハシpムワチr,鮑H桁7ト_キcR」
xN)ミ]ツi*テリ|ナ壌ェ^トH|Bヒョ禍-09ワ胸'Mッ笠リk・+シ]チT[Fナ5焙嗾段蝙x肺t7カ_釛セ;f,豈「,jGメ9决
yzgサBェレV妥Wc;a8ツ=oトコV遮オ蓐e,ツ「_ジタ犂゚ァ~ocユ・セLUム@」瑰「6ネチフ|Jハ[nム゙竿ヲルテヲWェ゙ニR]蔘K
zf囑蛍光ラセ44」辨゙Sケ、「N}9Ai1uム廠v甸ニ暈マ<蘇J淨qヌ9(ァホ(3B~キィ・YN゚チユEチ~8iオ齎Yele/4;}シ
|ホ甬m辱コUbPvヌ殃rヤ詰ウ(憬ナ燭8゚J]ァ措(3(ハwトタ鐚烝オエサp瀕臙Xヤイ゚髱(wィ諸姫ォc蹇uシセ須ヌ2ムJ
。TN@BBサ8Myky耗寡洟゙ミウ到レgaWKGe愚g<冱袈ッ:[cタハメmホX殘JヒK」^ロ観ムニ」L<ホLヘoHモDュ,Kx?/ユW
」牆4瀧ル河oン'碯MヤH諷^暮エア8マMヘ躔-49ロ榑診FニO楳ILz1圄モHモ翠ル6i「順Yヘy\42ニ゚3x}ソ9ュ4゚ョr
%Vゥmヤ)qC糞牀オカCr;」gGNPヂ*。ヒッ桁Q鋭爆.vョラ9wSe\5Mヌ籃レシオリロGン?UトD4yAュ御7Tノキiセ{ホ炬'ク
&l湿d「Sヨ2ミcgロQ探uツ}フ4kG0ォヲY@Yーb9ケャRzeエ,}uロ+L剋Tセ晶'pkabcホ.:ェ絃ユメェタxル|救G斥゙ン楞
'シオレNメ>レ岻1衄s@B價コッxト'ケウrpエG^タ萓袂汀。AマケKニェ{瞥メZ゙b遂Pミ饋h^(゚ャ壼ス8サ/ノ5゙;橡貧nj
)*Z=Fロ;mヌエヌqCFi)y、懾=ゥタqレyモz栖丙zヨェウレ儔mキFリヤッケ'、ニBrリ皐t]Nvィ(Vル~ヲ1タR<ヲxィ凰sリTeQ
+r晦-疔タSンgdヨノj赱呑oメ6D@kスhカb)リQ゚樔\ソ嶮D4ウS:6扈oサ酢廡qホシャ棔ャIラ53/A)@Bウォ@I@@IZヤ
。(ォ*eホ慳dBホ}Zh?(孤n穣イjRn\叟=疱A>フユV雌5BIラ乗ォ厄ワケlオ従ハ2ィ|gソT煮史Hマqヒヌm0ar2柢g・
」7<イRツ:fp膰XZ訊</ユ゙rjlリ勠寓律救フリg貘o'Rjェ觴イtヒ]エ邏訥ムH9陣NkリW@.k觸IカUシaW|苧_挿
--- maskman2.lzh (85/85) ---
00071/00070 BQO00549 konno IMASK3.DEF
( 0) 18/11/21 21:14 00070: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]1字戻し
(#h) (e">10") ;[BS]1字戻し
; (' ') (c'?') ;[SPC]1字飛ばし
? (c'?') ;[?]1字飛ばし ★★★
(' ') >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]1字戻す
(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
00072/00065 BQO00549 konno Tra_TAG.def 改 V04
( 0) 18/12/04 23:12 00066: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 } ;行頭からもLFNが取得出来ないときは
r=si+1, >C ;★LFNが取得出来なくても進む
dn[-, #60 dn], ;通常の #60
&m("0 ng %s",di) ;▼
>C ;★LFNが取得出来なくても進む
; 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: ;--- LFN対応 #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 ;- メニュー処理その2 -
&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 =
00073/00073 BQO00549 konno めざらさん方式発言者ID生成関連
( 0) 20/10/25 17:37 コメント数:2
00074/00074 BQO00549 konno command.com 関連
( 0) 22/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 があるけど、いま出すのはちょいと大変。
00075/00075 BQO00549 konno 新リンク機能テスト
( 0) 24/02/22 00:13 コメント数:1
00076/00075 BQO00549 konno Re: 新リンク機能テスト
( 0) 24/04/04 14:18 00075:konnoさんへのコメント コメント数:1
00077/00075 BQO00549 konno Re^2: 新リンク機能 txt= txt:
( 0) 24/04/27 23:20 00076:konnoさんへのコメント コメント数:2
00078/00075 BQO00549 konno 新リンク機能、今日、テスト
( 0) 24/05/29 06:36 00077:konnoさんへのコメント コメント数:1
00079/00075 BQO00549 konno Re: 新リンク機能、今日、テスト
( 0) 24/07/06 23:37 00078:konnoさんへのコメント コメント数:1
単なるテストです。この長い行を折り返すかどうか。さてどうなることやら全く分かりません。どうしたものか。
タブとスペースのテストです。
00080/00075 BQO00549 konno Re^2: 新リンク機能、今日、テスト
( 0) 24/07/06 23:39 00079:konnoさんへのコメント
> 単なるテストです。この長い行を折り返すかどうか。さてどうなることやら全く分かりません。どうしたものか。
> タブとスペースのテストです。
>
>
00081/00081 BQO00549 konno クリップボード
( 0) 24/10/03 18:43
#k1118:Re^8: ブロック再現マクロ 投稿者:H岡 2006/06/18(日) 19:18
#k1126:Re^9: ブロック再現マクロ 投稿者:めざら 2006/06/19(月) 15:43
#k1141:Re^10: ブロック再現マクロ 投稿者:H岡 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
1文字欠ける?
=== 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からの対応になります。
00082/00082 BQO00549 konno ローメモリのチェック
( 0) 24/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] ; 行数