HSP - Hot Soup Processor [8]

**名前は開発中のものです。** · 04/08/05 17:33

関連サイト
　　ONION software　（本家）
　　　http://www.onionsoft.net/
　　HSP CENTER
　　　http://hspcenter.com/
　　HSP ML
　　　http://garde.esprix.net/hsp-ml/

誰かDtHSPpOH ◆kxrJVlZ8OEに答えてやれよ。
誰かが答えないと永遠に質問繰り返しそうだぞ。
それにマルチで他のスレにも迷惑がかかる。

◆HOTsoUpxjY · 04/08/16 21:51

>>99
onexit…ほすぷ！

**名前は開発中のものです。** · 04/08/16 21:58

getkey a,36
if a:end
onexit *l

×をクリックしてもAlt+F4を押しても無駄。これ。
だが36が何のキーかわかっていれば怖くもなんともない。
ま、初心者は強制終了で回避しなさいってこった。

**名前は開発中のものです。** · 04/08/16 22:00

＞＞変数に入ってる数値を文字列としてとりだすにはどうするですか？
というか、そもそも

moji=hensu : str mojiで十分だろ。と。

**名前は開発中のものです。** · 04/08/16 22:11

釣り糸を見つけただけでひどいはしゃぎようだな。
養殖産か？
天然ならもっと釣り糸を食いちぎるくらいにょぁけいｇｊ・；ほんたま。あえいｈ

**名前は開発中のものです。** · 04/08/16 23:12

>>103
おれはこういうことを言ってるんじゃないかと思ったんだが。。

a=566287042
s=""
memcpy s, a, 4
mes s
stop

**名前は開発中のものです。** · 04/08/18 18:07

>>105
えええ？どゆこと？

**名前は開発中のものです。** · 04/08/18 18:21

右上の×ボタン（閉じる）を押したら gosub っていう風にしたいんですがそんなコマンドってあります？（ってかできますか？）

**名前は開発中のものです。** · 04/08/18 18:38

>>107
gosubか。onexitあげるから自分で考えなさい

**名前は開発中のものです。** · 04/08/18 20:52

>107
一般的には、wait,awaitをモジュール内のみで使うようにして、onexit先からreturn。
ただし、loop中だとcntが初期化され、stopのある場所ではどうにもならん。

**名前は開発中のものです。** · 04/08/19 10:31

;なんでこれでフェードになるかわからない（´・ω・｀）
;gmodeの半透明の数値の法則教えてください
buffer 1
cls 4
gsel 0
repeat
gmode 3,,,1
gcopy 1,0,0,640,480
await 0
loop

**名前は開発中のものです。** · 04/08/19 10:54

>>110
同じ画像が1/256の透明度で画面に上書きされていくからフェードになる。

**110** · 04/08/19 11:12

>>111
おお！なるほど。画面をクリアする命令をいれたらうまくいきました。
こんな時間からすいません。㌧クス

**名前は開発中のものです。** · 04/08/19 17:33

四角形のウィンドウではなくて
特殊な形をしたウィンドウを作れますか？

**名前は開発中のものです。** · 04/08/19 19:32

作れる。
そういうプラグインもあるし。

**名前は開発中のものです。** · 04/08/20 00:35

mesboxの背景色をグレーではなく透過色にしたいんですが、
どうやればいいんでしょうか？

**名前は開発中のものです。** · 04/08/20 22:02

>>115
半透明ウィンドウを作って、最前面表示させる。

**名前は開発中のものです。** · 04/08/21 01:30

>>115
サブクラス化する

**名前は開発中のものです。** · 04/08/21 12:29

指定キーを指定時間だけ押す命令ってないですか？

**名前は開発中のものです。** · 04/08/21 12:48

aplkey

**名前は開発中のものです。** · 04/08/21 13:17

で、HSPのデコーダーって結局どこいっちゃったの？

**名前は開発中のものです。** · 04/08/22 19:25

＞＞70
勝手に俺の作品出してる
俺の失敗作を・・・・

**名前は開発中のものです。** · 04/08/22 20:43

コンテストにだすなよ

**名前は開発中のものです。** · 04/08/22 21:08

勝手に！？著作権法違反だ！！！京都ｒｙ

**sino君** · 04/08/23 07:44

僕のがHSPコンテストに試しに出して見た作品なんですけど、
もちろん評判悪いです　作ったきっかけは　小6の時にHSPで、
くだらないOS作ってみようと思ったんです。
でもこのソフトのせいで皆さんを不快にさせて申し訳ありません。

＞＞70　だからってぼくがHSPに出しても2ch勝手に出すのはやめて下さいよ

**sino君** · 04/08/23 07:47

申し遅れましたが
＞121番は僕です

**名前は開発中のものです。** · 04/08/23 09:36

ｳﾝｺｳｽﾞの粘着厨どっか逝け。

**名前は開発中のものです。** · 04/08/23 11:29

くだらねぇ

**名前は開発中のものです。** · 04/08/23 21:13

>>124
去年のマサ君ってキミ？

**sino君** · 04/08/24 09:04

>>128
違います
僕はマサ君ではないです

**名前は開発中のものです。** · 04/08/24 14:06

どっちにしてもコテ付けないで消えてね。早く夏休みの宿題片づけなさい。

**名前は開発中のものです。** · 04/08/24 20:48

>129
ピラミッドをパクッたのは君？

**名前は開発中のものです。** · 04/08/25 00:28

何でうんこを題材にしたんですか？

**名前は開発中のものです。** · 04/08/25 21:10

#module～#global間とそれ以外でも同じ変数として扱いたいのですが
どうやればいいんですか？
C言語のグローバル変数みたいな感じです。

**名前は開発中のものです。** · 04/08/25 21:57

>>133
アットマークピピンでぐぐれ

**名前は開発中のものです。** · 04/08/26 22:01

hsperun.exeを開くと必ず内部エラーが出るんですが、何故でしょうか？

**名前は開発中のものです。** · 04/08/26 22:09

>>135
環境も書かないでぐぐれ

**ｳﾝｺｳｽﾞ2004X** · 04/08/27 15:45

ｳﾝｺｳｽﾞ2004Xの作者ですが何か？

**名前は開発中のものです。** · 04/08/27 22:43

別に何も。

**名前は開発中のものです。** · 04/08/27 22:57

ｳﾝｺｳｽﾞXPの開発者ですが何か？

**名前は開発中のものです。** · 04/08/28 02:40

ｳﾝｺｳｽﾞ2004Xですが何か？

**名前は開発中のものです。** · 04/08/28 02:54

うんこですが何か？

**名前は開発中のものです。** · 04/08/28 13:44

2007年ｳﾝｺｳｽﾞ発売決定！

**名前は開発中のものです。** · 04/08/28 16:32

>>137-142
頼むからム板でやってくれ

**名前は開発中のものです。** · 04/08/28 16:36

作者はリア消で煽ってるのはリア厨か？

**名前は開発中のものです。** · 04/08/28 18:54

>>143
まあやってるのは一人なんだろうけどな

**名前は開発中のものです。** · 04/08/28 19:19

Cで言うところの

int a; char b;
a = 12
b = "a"+a

みたいなインチキ文字列変換ってＨＳＰではどうすれば出来るでしょう？
いや、別にあるなら b = chr( str$("a") + a ) でも良いんですが。

**名前は開発中のものです。** · 04/08/28 19:38

a = 12
b = ""
poke b, 0, 'a' + a

かなぁ。簡単に書くなら。
文字コードからcharに変換する手段ってpokeぐらいかなぁ。
そういうマクロ作っちゃえばいいんだけど。

#define ctype chr(%1,%2) %1="":poke %1,0,%2

a = 12
chr(b, 'a' + a)

mes b
stop

**146** · 04/08/28 19:53

おー、出来ました。どうもありがとうございました

**名前は開発中のものです。** · 04/08/28 21:51

>>143
ム板に来てもらっても困るこっちで対処しれ

**名前は開発中のものです。** · 04/08/29 05:21

ウンコウズ作った奴
キモスギ

**名前は開発中のものです。** · 04/08/29 08:32

>>150
・・・・っつーかヲチはスレ違いだっての。
ム板に行ってもらっても困るから
ヲチ板にでも行ってスレ立ててこい。

**名前は開発中のものです。** · 04/08/29 14:14

リストボックスに数個項目を表示させて、その表示された項目をクリックすると
どこかにメッセージが出るようなプログラムってかけますか？

リストボックスを表示させるところまでは出来たんだけど、そこからがわからない…
だれかわかる人いたら教えてください。

num=2
listbox num,100,"項目１\n項目２\n項目３\n項目４"
stop

で、たとえば項目１を選択するとなんかメッセージが他の場所に出るような…

**名前は開発中のものです。** · 04/08/29 14:41

わざと変な風におしえてみよう

num=2
listbox num,100,"項目１\n項目２\n項目３\n項目４"

repeat,num
wait 1
if num^cnt:dialog ""
continue num
loop

**名前は開発中のものです。** · 04/08/29 15:10

HSPってイベントドリブンが弱いよな。
どうせ内部でメッセージ捕まえてるんだから
特定のメッセージが来たときに特定のラベルにジャンプするような
プログラムができるようにすればいいのに。

**名前は開発中のものです。** · 04/08/29 15:16

listbox や combox も button みたいな動作をしてくれたらね。。
あらゆるメッセージを取れたら理想だけど

**名前は開発中のものです。** · 04/08/29 15:16

えと,dialogのところを:pos ***,***:mes ""っていじったら、
なんとなく自分のやりたかったことができたんですが
まだ、ちゃんと実現は出来てません。。。
俺が、プログラムをちゃんと読み解けてないんで
これからがんばって、改造できるようにします。。。
(TдT) ｱﾘｶﾞﾄｳございました。

ﾌﾟﾛｸﾞﾗﾑｽﾞｲ

**名前は開発中のものです。** · 04/08/29 15:41

CPUを占有して、他のゲーム等の実行速度を落とすような事をしたいんですが、
waitを入れないと全部止まるし、適当な処理+await 1 では思ったより速度を落とせません。
何かいい方法無いですか。

objmode 1
screen 0,300,60,4
mode = 0
ct = 50000
input ct,100,30,7
objsize 100,30
pos 0,30 : button "開始",*kaisi
pos 100,30 : button "停止",*teisi
*main
if mode = 1 : gosub *waiting : await 1 : goto *main
stop
*kaisi
mode = 1 : goto *main
*teisi
mode = 0 : goto *main
*waiting ;時間稼ぎ処理?
dum = 1
repeat ct
dum = dum + 1
loop
return

**名前は開発中のものです。** · 04/08/29 15:46

特定の回数ごとにawait入れとけ

**名前は開発中のものです。** · 04/08/29 15:57

それ以前に、プライオリティクラスの格上げが要ると思う。
それでもNT系だと大して重くならないけど。

**157** · 04/08/29 17:33

優先度を「普通」から「高い」にしたらかなり派手に重くなったので
ここから調整出来ないか試してみまつ。thx

**名前は開発中のものです。** · 04/08/29 22:22

自分で使う分にはいいけど、公開には厳しいよなぁ。。。

**名前は開発中のものです。** · 04/08/29 22:59

他のアプリをわざと重くするようなソフトは利用者にボコボコに叩かれるぞ、
実験的な物ならいいが、配布は考えない方がいい。

ただでさえHSP製のソフトはシステムに負荷が掛かりやすいので、
プライオリティは上げるべきではない。
（と、HSPの裏ワザのページでも注意していたな）

**名前は開発中のものです。** · 04/08/29 23:20

HTとかだったら意味無いかもしれんし。

**名前は開発中のものです。** · 04/08/29 23:50

たいしたことないよ、似非 Dual。

**名前は開発中のものです。** · 04/08/31 16:45

RPGのアイテム実装が上手く出来ないyo！

**名前は開発中のものです。** · 04/08/31 19:25

>>165
詳しく書かなきゃ誰も答えてくれないyo！

**名前は開発中のものです。** · 04/08/31 21:42

xの平方根はどう表しますか？

**名前は開発中のものです。** · 04/09/01 08:35

命令リファレンスを「平方根」で検索しる

**名前は開発中のものです。** · 04/09/01 15:42

ども

**名前は開発中のものです。** · 04/09/01 18:08

//ベータに長文荒らしか、理解してから物言えと

**名前は開発中のものです。** · 04/09/02 17:53

命令リファレンスってなんですか？

**名前は開発中のものです。** · 04/09/02 18:01

>>171
逝ってよし

**名前は開発中のものです。** · 04/09/02 21:13

初心者質問スレで本家行けといわれたので質問です。

ＨＳＰのオフィシャル本を買ったのですが付録ＣＤについている
ビューキャプチャーってありますよね？
あれをちょっと改造してテキストを読み込めるようにしたいのですが
どれを削って何を補えばいいのかさっぱりわかりません。
.scnを読み込んだ奴でオリジナル版は
一行目　画像,音
二行目　シナリオ（カンマで改行）
三行目　選択肢、飛び先：選択肢、飛び先：・・・
を繰り返す奴なんですがなんか、
ごちゃごちゃしてて自分の技量がついてってくれません。

一行目　質問文
二行目　選択肢（二択）
三行目　片方のに対しての反応
四行目　他方に対しての反応
五行目　質問文
・・・
という風にしたいのですが・・・。

オフィシャル本っていうのはこいつです。
http://www.shuwasystem.co.jp/cgi-bin/detail.cgi?isbn=4-7980-0821-4

**名前は開発中のものです。** · 04/09/02 21:39

>>173
改造は難しいから諦めたほうが良いかと
ひとつひとつ命令を覚えて自力で0から構築したほうが良い

たぶん今のレベルだとコードを示して貰っても意味は理解できないと思う。

**名前は開発中のものです。** · 04/09/02 21:40

ここは本家じゃないんだが……。

**名前は開発中のものです。** · 04/09/02 22:36

誰か命令リファレンスってなんなのか教えて～

**名前は開発中のものです。** · 04/09/02 22:41

reference＝参照

◆HOTsoUpxjY · 04/09/02 22:42

>>173
「View Chapter」ね
本家はHSPの公式の掲示板、だけど行かなくてもいいよ
単にメモリーパッド命令で変数に読んどくだけじゃん

選択肢とかは本体のコードの方で実現する訳でしょ
あと質問文から始まるブロックを区別するために
なんでもいいから印つけてそれを判別する

>>176
HSPをインストするとマニュアルインデックスというのが見れる
そこに命令リファレンスというのがあってHSPの命令が詳しく書いてあるよ

**名前は開発中のものです。** · 04/09/02 23:50

釣りじゃないのか？
リファレンスって言葉がわからなくても
命令を知りたけりゃ普通ヘルプを見ると思うんだが・・・

**名前は開発中のものです。** · 04/09/03 00:28

この文体からして奴っぽい。
放置推奨。

**名前は開発中のものです。** · 04/09/03 00:37

SpellChapterの後身ソフトなのかな？
TAKERUが終了する間際にそんな名前のADVツール
（といってもデジコミくらいが関の山）を買った。
どっちもTKO絡みっぽいし。

**名前は開発中のものです。** · 04/09/04 16:22

シューティング作っていあす。分からないことがあったら教えてください。

**名前は開発中のものです。** · 04/09/04 16:49

わからないことがわからないえす

**名前は開発中のものです。** · 04/09/04 22:57

すみません、質問です。

ＨＳＰでマウスのホイール（中ボタンの上下スクロール）を
検出するにはどうしたらよいでしょう？
中ボタンのクリックは検出できても、スクロールは取れなくて困ってます。
やっぱりWindowsAPI使うしかないんでしょうか？

**名前は開発中のものです。** · 04/09/04 23:01

Win32API使うしかないね。

Get(+Translate,Dispatch)Messageをループに入れれば
DLL無しでもできるけど。

**184** · 04/09/05 01:02

なるほど、やっぱりWinAPI使うしかなさそうですね。

＞Get(+Translate,Dispatch)Messageをループに入れれば
＞DLL無しでもできるけど。
これはよくわからないです。

ありがとうございました。

**名前は開発中のものです。** · 04/09/05 01:06

>Get(+Translate,Dispatch)Messageをループに入れれば

( ﾟдﾟ)ﾎﾟｶｰﾝ

**名前は開発中のものです。** · 04/09/05 01:57

GetMessage～
TranslateMessage～
DispatchMessage～

をLORDLIB機能で呼び出せばHSPスクリプト上で、
全てのメッセージは取れるが
要らないメッセージをウィンドウズに返すことが出来ないので
HSPスクリプトはそこで毎回処理待ち状態で停止する。
（ループ内に書けばループ一回ごとに処理待ち停止）
GetMessageの前にPeekMessageでキューを確認してから処理すれば
若干ましな動作になるが、さらにHSP本体のメッセージ処理のことも
考慮する必要があるため、レスポンスはかなり悪くなる。

念のため、これらは全てWINAPIであってHSPの標準コマンドではない。

HSPスクリプト上での処理は実用性が低いので、
個人的にはサブクラス化をしてメッセージ処理が出来る
拡張ランタイム(hsgmrt.hrt)でコンパイルすることをお勧めする。

**名前は開発中のものです。** · 04/09/05 02:36

>>184
β板でおにたまに頼み込む。
３Button（以上）じゃないマウスなんて今時かなりすくないだろ。

**名前は開発中のものです。** · 04/09/05 10:39

#define WA_NODEBUG
#include "wam\\user32.as"

repeat
PeekMessage PTR(msg), PRMHWND, $20A, $20A, 0
if dllret{
wheel = HIWORD(msg.2)
if wheel > $7FFF: wheel = wheel | $FFFF0000
mes wheel
}
await
loop
stop

用途が限られる、確実ではない、など問題抱えまくりだが。

**１８２** · 04/09/05 17:34

シューティングで自分の座標がx,y敵の座標がx1,y1で当たり判定するとき
if (x=x1)&(y=y1) : end
とするとピッタシ重なったときしか当たり判定できまえん。
分かりません。

**名前は開発中のものです。** · 04/09/05 17:47

HSP 当たり判定
↑グーグルつかって検索してみれば良いと思うよ。

**名前は開発中のものです。** · 04/09/05 18:10

これはHSPの質問とは違うなｗ

**名前は開発中のものです。** · 04/09/05 18:17

しかしHSP初心者の質問ではある

**名前は開発中のものです。** · 04/09/05 19:50

ObjectA　　　ObjectB
点１　　　　　点3
　|￣￣￣|　　|￣￣￣|
　|　　　　 |　　|　　　　 |
　|＿＿＿|　　|＿＿＿|
　　　　　点2　　　　　　点4

ObjectAとObjectBが重なっているとき
点1は点4と等しいかそれより左にある。
点2は点3と等しいかそれより右にある。
点1は点4と等しいかそれより下にある。
点2は点3と等しいかそれより上にある。
(逆の場合、重なり得ないので。)

**名前は開発中のものです。** · 04/09/05 20:57

20x20重なり
if (x-x1/10=0)&(y-y1/10=0) : end

**名前は開発中のものです。** · 04/09/06 17:20

さめがめのようなものを作っているのですが
消去できるかの判定で困っています。

今は
★=1 :▲=2 :●=3 :■=4
とした場合
二次元配列にその数値を代入し
左上（0.0）の右と下を調べ同じ数値ならそこから再び上下左右を調べ
それをと右下の配列まで繰り返しています。
そして3つ以上繋がっているところがあれば消去可能といった感じです。

これだとかなり無駄があるような気がするのですが
もっと効率の良い方法ってありますか？

**名前は開発中のものです。** · 04/09/06 22:00

さめがめ程度の要素数でちゃんと判定できてればそれで十分だと思う。
真面目にやるんなら塗り潰し、アルゴリズムあたりでググれば参考になる
サイトも出てくると思うけど正直大して高速化しないと思う。

**名前は開発中のものです。** · 04/09/06 22:57

オンデマンドでやるなら再帰使えばいい。
全体に消せるかどうかの表示をするならまだしも
普通はクリック又はマウスオーバーで判定だろうし。

**名前は開発中のものです。** · 04/09/07 00:05

ソフトサイトからＤＬしたゲームを
プレイしようと思ったんだけど、「画像が表示されません」と出ます。
同様に、プログラミングで画像を出そうと思っても同系統の受け答えが帰ってきます。
解決方法などがあったら教えてください・・・

**名前は開発中のものです。** · 04/09/07 01:34

>>200
1.ダウンロードしたゲーム全て同じ症状なのか?
2.具体的にどういうスクリプトを書いたのか?
3.画像・ゲームを置くフォルダはどこにあるのか?