メーリングリストアーカイブ

メーリングリストアーカイブ [記事番号:10762]

[windows:10762] Re: 質問：ＨＰｒ使用時のＰＣＴＡＬＫＥＲ音声のオン／オフについて

　矢部さんこんにちは、安藤＠愛知です。

矢部健三 <elephant@mbd.nifty.com> Wrote:
> ＤＯＳのバッチファイルのようなもので、
> ＰＣＴＡＬＫＥＲの音声停止とＨＰｒの起動、そしてＨＰｒ終了後のＰＣＴＡＬ
> ＫＥＲの音声開始、
> といった操作を自動化できないものでしょうか？

　PC-Talkerも、HPRのバージョン３も持っていないのですが、WinBatchEhという
ソフトですと、ＤＯＳのバッチファイルのような物を書いて、そういった事が出
来るかと思います。
　WinBatchEhは、以下にある、５００円のシェアウェアです。
http://www.vector.co.jp/authors/VA000007/

　VDMW300で試すと、ちょっと問題があるので、PC-Talkerで、うまく行くか分か
りませんが、以下の４行で、「アルファベット１文字」を、PC-Talkerの音声停止
と再開の時に、Altや、Controlと同時に押すキーに書き換えて、winbat32.exeに
与えてやれば、良いかも知れません。

@echo off
keybdevent &^'アルファベット１文字'
exec "C:\Program files\ IBM\HPR3\hpr.exe"
keybdevent &^'アルファベット１文字'

　これを実行すると、PC-Talkerの音声が停止して、HPRが起動し、
通常の操作で、HPRを終了すると、PC-Talkerの音声が再開するはずです。
　複数のHPRが開いた場合など、細かい事は考慮していません。


　あるいは、VBスクリプトでも、同じ事が可能です。
こちらは、特別なソフトを用意する必要はありません。
以下の７行を、hpr.vbsなど、vbsという拡張子のファイルに保存して、スタート
メニューにショートカットを作っておけば、たぶん良いかと思います。

Dim Voice
Set Voice = CreateObject("VbPCTK.Voice")
Voice.VoiceOff
Dim WSHShell
Set WSHShell = WScript.CreateObject("WScript.Shell")
WSHShell.Run "C:\Program files\ IBM\HPR3\hpr.exe",3,True
Voice.VoiceOn

　ではでは。

　　　　　　　　　　　　　　　　安藤　隆
    E-mail: pohe222@ybb.ne.jp
    のろさん研究所(music&PC&tennis): http://www.geocities.jp/pohe222/

Date: Wed, 30 Oct 2002 23:25:27 +0900 (JST)
From: 安藤隆<pohe222@ybb.ne.jp>
To: windows@sl.sakura.ne.jp
Subject: [windows:10762] Re: 質問：ＨＰｒ使用時のＰＣＴＡＬＫＥＲ音声のオン／オフについて
Message-Id: <200210302323.H4PTVK2Z@ybbsmtp.mail.yahoo.co.jp>
In-Reply-To: <200210271309.UM44O0ZB@mbd.nifty.com>
References: <200210271309.UM44O0ZB@mbd.nifty.com>
MIME-Version: 1.0
Content-Type: text/plain; charset=iso-2022-jp
Content-Transfer-Encoding: 7bit
Sender: owner-windows@sl.sakura.ne.jp
Precedence: bulk
Reply-To: windows@sl.sakura.ne.jp

(C)SAKURA Internet 1996-1998