HSPTV!掲示板

aplstrで半角カナを送信すると、文字化けします。
例えば、「aplstr "ｱﾘｶﾞﾄｳ"」とすると、結果は「ｱｶﾄ」という感じです。
これは仕様で仕方のないことなのでしょうか？
それとも、何とか正常に送信する方法があるのでしょうか？
ご教示願います。
HSP Ver3.5。OSはWindos10 homeです。

aplstrはカナ文字は向かないのではと思います。
どこに送信するのかわかりませんが送信したい場所をフォーカスにし
クリップボードで貼り付けたらどうでしょう。

#include "user32.as"
#include "hspext.as"

a=""
input a

clipset "ｱﾘｶﾞﾄｳ"

keybd_event 17,0,0,0: await 0	;CTRL ON
keybd_event 'V',0,0,0: keybd_event 'V',0,2,0: await 0
keybd_event 17,0,2,0: await 0	;CTRL OFF

さかさん、ご返信ありがとうございます。
今回の目的は、HSPではないプログラムのウィンドウのフォームへ、複数データを自動入力することです。

まず結果として、ご教示いただいた方法では成功しませんでした…
やっかいなことに、対象のプログラムが「Ctrl+v」の処理を横取り(？)しているらしく、無反応なのです。

一応、プログラムの提供会社へ、貼り付け操作の方法がないか問合せてみようとは思いますが、望み薄な予感がします…

そうしましたら、keybd_eventで全角変換キー＋文字＋F8キーとかで
キーボードのカナ入力までのキー送信なら行けますかね。

試してないですが、そこらへんのことをやってるのがありました。
http://hsp.tv/play/pforum.php?mode=pastwch&num=53419

なるほど、そういう方法が。
少し時間がかかりそうですが、試してみます！

とりあえす、回避策ができました！
対象プログラムの入力欄は、フォーカスすると自動的に半角カナ入力モードになる仕様です。
そこで、元となるデータを半角ローマ字に変換して準備し、keybd_eventで送信する形で作りました。

roman = "ARIGA10"
roman_max = strlen(roman)
repeat roman_max
	roman_code = peek(roman,cnt) ;peekで文字コード取得
	keybd_event roman_code,0,0,0: keybd_event roman_code,0,2,0: await 0
loop

さかさんのご返信から、この方法に辿り着けました。ありがとうございます！

これから大本のプログラムに組み込んで、上手くいけば解決とさせていただきます。

組み込みも上手くいきました。ありがとうございます！
「-」の変換が上手くいかなかったので、置換で対応しました。

最後に、需要なさそうですが、今回の成果を単体で動くように作って置いておきます。
どなたかの参考になれば幸いです。

#include "user32.as"
#include "hspext.as"
#define keybd_roman(%1) keybd_event %1,0,0,0: keybd_event %1,0,2,0: await 0

a=""
input a

roman = "ARIGA10-"
repeat strlen(roman)
roman_code = peek(roman,cnt)
;「-」が文字コード「45」=「Insert」に変換されるためifで置換
if roman_code=45 : keybd_roman 189 : else : keybd_roman roman_code
loop

stop