Bin-Star(Binary Star Watching)

Bin-Star(Binary Star Watching)

PR

×

Archives

2026.05
2026.04
2026.03
2026.02
2026.01

Comments

シロノワール@ Re:AliExpressから購入した2TB NGFF M.2 SSDがへん(その1)(01/21) 私もヤフオクで購入したSAMSUNGの4TBのm.…
確かに@ Re:AliExpressから購入した2TB NGFF M.2 SSDがへん(その1)(01/21) どこかのパクリみたいなデザインですが、D…
teikokutyo@ Re:AliExpressから購入した2TB NGFF M.2 SSDがへん(その2)(01/21) はじめまして。 ちょうどアリエクでこのメ…
Rom_Ok @ Re[1]:AliExpressから購入した2TB NGFF M.2 SSDがへん(その2)(01/21) メイメイさんへ たいへんお返事が遅くな…
メイメイ@ Re:AliExpressから購入した2TB NGFF M.2 SSDがへん(その2)(01/21) お世話になります。 大変興味深く読ませて…
サトピー@ Re:フリップミラーにレデューサーレンズを組み込んだ(12/24) 初めまして。レデューサー組み込んで無事…
TN-Miyagiken@ T7250からT7800への交換 良い情報を有難うございました。当方NF70X…
Rom_Ok @ Re[1]:Pocket GPS PG-S1のRoll Over対策、Displayとバッテリーの交換(11/17) ホシミスト_3013さんへ ご無沙汰しており…
通りすがりです@ Re:天体観測用の赤色ライトは本当はマナー違反?(05/08) eikiさんのコメントは概ね正しいです。 …

Favorite Blog

夜空のブログ シャトル2308さん
ホシミスト3013の天… ホシミスト_3013さん
2022.05.06
XML
カテゴリ: 電子工作
プリンタBUSY関連のサブルーチンのバッチファイル
CHK_BS.BAT
WT_BS_ON.BAT
WT_BS_OF.BAT
3つの記述を示します。
DOS外部コマンドのDEBUG.EXEでプリンタBUSYのレジスタの値をファイルに出力し、そのファイル内にあるレジスタ値をDOS外部コマンドのFIND.EXEを利用してレジスタ値が0x90か0x94であるかの判定を行い、BUSYのステータスを判断しています。
その7では、STROBE関連のサブルーチンのバッチファイルを示します。
====================

CHK_BS.BATの記述(2重破線内をコピーペーストしてください)

REM ********************
REM Check PRN BUSY status
REM ********************
echo i 42 > BUSY.RSP
echo q >> BUSY.RSP
debug < BUSY.RSP > RSLTBUSY.TXT
rem type RSLTBUSY.TXT
find "90" RSLTBUSY.TXT > nul
if errorlevel 1 goto NOT_BUSY
if errorlevel 0 goto IN_BUSY
:IN_BUSY
echo BUSY(0x90)
goto END_CHK_BS
:NOT_BUSY
echo NOT BUSY(0x94)
goto END_CHK_BS
:END_CHK_BS

====================

WT_BS_ON.BATの記述(2重破線内をコピーペーストしてください)
====================
REM BUSY LOOP
:BUSYLOOP
echo i 42 > BUSY.RSP
echo q >> BUSY.RSP
debug < BUSY.RSP > RSLTBUSY.TXT
rem type RSLTBUSY.TXT
find "90" RSLTBUSY.TXT > nul
if errorlevel 1 goto NOT_BUSY
if errorlevel 0 goto IN_BUSY
:NOT_BUSY
echo LOOP waiting for BUSY
pause
goto BUSYLOOP
:IN_BUSY
echo BUSY
====================

WT_BS_OF.BATの記述(2重破線内をコピーペーストしてください)
====================
REM BUSY LOOP
REM **********
:BUSYLOOP
echo i 42 > BUSY.RSP
echo q >> BUSY.RSP
debug < BUSY.RSP > RSLTBUSY.TXT
rem type RSLTBUSY.TXT
find "90" RSLTBUSY.TXT > nul
if errorlevel 1 goto NOT_BUSY
if errorlevel 0 goto IN_BUSY
:IN_BUSY
echo LOOP waiting for NOT BUSY
pause
goto BUSYLOOP
:NOT_BUSY
echo NOT BUSY
====================






お気に入りの記事を「いいね!」で応援しよう

Last updated  2022.05.06 15:33:43
コメント(0) | コメントを書く


【毎日開催】
15記事にいいね!で1ポイント
10秒滞在
いいね! -- / --
おめでとうございます!
ミッションを達成しました。
※「ポイントを獲得する」ボタンを押すと広告が表示されます。
x
X

© Rakuten Group, Inc.
X
Design a Mobile Website
スマートフォン版を閲覧 | PC版を閲覧
Share by: