HSP - Hot Soup Processor [14]

ttp://taillove.jp/mia/
のHSP DirectSoundExtension使え

優しい奴ばっかりだな。
何があった？

>>935
すごく解り易かったです！
色々調べてたけど説明が長いだけで、解り難かったんです。
そういう風に簡潔にまとめてくれるとすごく助かります、ありがとうございました！

>>936
それは僕(934)に対しての言葉ですか？？
そうならそのサンプル(？)に表示の秘密が隠れてるんですね！
じっくり吟味してきます！ありがとうございました！

(´・ω・｀)

手取り足取りソースまでもらっちゃって嬉しいのは分かるが
ちゃんと理解してるか。成長しないぜ…？

>>942
そうそう、ソースのをそのままはめ込むのはやらない様にしています。
一度新規で教えてもらったソースを実行して、
一個ずつの命令をちゃんと勉強してます。

今回は初めてだから何も解らないけど、
次回作とか作る時に理解してないと困るの自分ですからね

って返信速っ

14歳からのHSPプログラミングを見ながらシューティングゲームを作っています。
スペースキーを押すと弾が発射されるようにしたいのですが、何故かカーソルキー←で弾がはっしゃれるようになってしまいました。
何故でしょうか？以下がそのプログラムです。

randomize
buffer 1,,,1
picload "flogs.bmp"

screen 0,480,320,1

MX=240 ;自分のx座標を入れる変数
MY=160 ;自分のy座標を入れる変数
SN=0
SX=0
SY=0
gmode 2

;/■/■/■メインループ/■/■/■
*LOOP1
redraw 0 ;ここから画面の書き換えを一時停止
color 0,96,0 :boxf 0,0,479,319 ;背景を深い緑で塗りつぶす

stick ky,15
if KY&1 :MX=MX-8 :if MX<0 :MX=0 ;左移動
if KY&4 :MX=MX+8 :if MX>448 :MX=448 ;右移動
if KY&2 :MY=MY-8 :if MY<0 :MY=0 ;上移動
if KY&8 :MY=MY+8 :if MY>288 :MY=288 ;下移動
gosub *shot

pos MX,MY
gcopy 1,0,0,32,32

redraw 1 ;ここから画面の書き換えを再開
await 30
goto *LOOP1

;/■/■/■弾の移動ルーチン/■/■/■
*shot
if (KY&16=16) and (SN=0) {
SN=1
SX=MX+24
SY=MY+12
}
if SN=1 {
SX=SX+12
color 0,255,255 :boxf SX,SY,SX+12,SY+4
if SX>474 :SN=0
}
return

stick ky,15
ってあるけど、kyをKYに直せばいいんじゃないかな？
軽く見ただけなんだが、他は合ってるような気がする。

優先順位のせい
 & よりも = が先になる

    *,/            4 高い
    +,-            3
    <<,>>          2
    比較演算子     1
    &,|,^          0 低い

>>947
つまり、どのように直せばいいのでしょうか？

上げちゃった ｽﾏｿ

>>943
包茎だけど初心者の鑑だな('A`)

>>948
ここ。

if (KY&16=16) and (SN=0) { 

>>950
(KY&16=16)ここを直せばいいんですよね？
どのように直せばいいのか分かりませんが･･･。
優先順位が変わってしまうと、何故カーソルキー←で反応してしまうようになるのでしょうか？

ちなみに
if (KY=16) and (SN=0) {
だとスペースキーで弾を発射してくれますが、移動キーと一緒に押した場合だと発射されなくて、ゲームとしてはおかしいですよね。
それ以外に方法があるのでしょうか？

(KY&16=16) これは…
　& よりも = の優先順位が高いのでまず、 16=16 が計算される。結果は 1

　　↓　　　　すると
　(KY&1)　　 こうなっちゃう


計算の優先順位を変えたいならカッコを使う。基本中の基本ﾀﾞﾖ

((KY&16)=16)

>>953
なるほど！よく分かりました。
ありがとうございました。

exist "test.aaa"
fsize = strsize
if fsize == -1 : end
bload "test.aaa",file,fsize,$30
repeat
　binary = peek(file,cnt)
　pos x,y
　mes ""+binaｒy+"\t"+cnt
　y += 20
　if y >= 480 { x += 72 : y = 20 }
　await 0
loop
stop

ってやったときに、何故か5ループ目で「binary = peek(file,cnt)」の部分に「パラメータの値が異常です」ってエラーがでる
バイナリファイルが悪い訳ではなさそうなんだけど…
どうか原因を探ってｴﾛｲ人

bloadの説明を100万回読め

>>955
noteloadと違ってバッファの自動拡張はされない
sdim file,fsize とかdim file,fsize/4+1 とかやる必要がある

>>956
あのヘルプの書き方は分かり難いかもしれない・・・
（noteload使った後だと余計に）

bt大量修正ｋｔｋｒ

β10もうすぐリリース？

btって何

バグトラッキング
バグ報告専用の掲示板みたいなもの
β版落とせるページにリンクあるだろ

おｋ理解した

(・∀・)

>>956
>>957
㌧！

>>938
ありが㌧

dxdoundex.hpiが
ID33v2タグに対応していない
ということが解るのに
一日かかった。

古いプラグインとかがめちゃくちゃ放置で混在しまくっててわかりずらいよ

dsoundexだた

DLページかその周辺に、最終アップデートの日付くらい書いてあるだろ。
オレは、プラグインに限らず、ソフトをDLするときは、常にそのへん確認しているが。

現時点で　ttp://hsp.tv/make/tool.html
からリンクされてない所のプラグインは、腐りかけてるとみて良い。

o2.asをインクルードしたら文法エラーとか無いわｗｗｗ

pcbnet2を使ったら
エラー38／(^o^)＼

pcbnet2.asとpcbnet2.hpiを何処に置いてる？

すまん、原因は繋がってないのにtcp～命令実行したせいだった。

接続して無いだけなら命令が失敗するだけじゃね？

接続せずにやると

ｄｌｌの呼び出しに失敗しました

ってダイアログでて落ちるんよ
事前の接続確認とか入れてないからｗ

mod_joystick.asのジョイスティックのモジュールって
joyGetPosEx jstk, 0

if jstk.8 & 2 { ボタン2の処理}
みたいなビット演算がボタン2以降はできないことに今気づいた。

if jstk.8 & 1 { ボタン1の処理}
はできるけど

if jstk.8 = 2 { ボタン2の処理}
じゃないと駄目なんやね

なんか不便

>>974
何が？

訳分からん事言ってるぞ
モジュールとは全然関係ない部分だし（API使ってるだけなんだから）

>if jstk.8 = 2 { ボタン2の処理}
>じゃないと駄目なんやね
自分で駄目にしてるだけだろ？

ごめん。原因がわかった。モジュールとか全然関係ない。
でも、なぜこうなるのかわからんけど。論理式よくわかんね
↓
repeat
await 5
stick stk,15
if (stk&1)&(keybuf1=0) {a++}//←キー //これは動く
if (stk&2)&(keybuf2=0) {a--}//↑キー //これは動かない ？何故？
//if (stk&2){ if(keybuf2=0) {a--} }//↑キー //こっちだと動く

keybuf1 = stk//連射抑止(stick命令の場合この処理は要らんけど）
keybuf2 = stk
title ""+a
loop

追記
if (stk=2)&(keybuf2=0) {a--}//↑キー// なぜか動く

↑
「stk&2」を「stk=2」にすると動いたもんだから
>>974のような質問をした

>>977
mes stk&2 ;→2
mes keybuf2=0 ;→1

mes 2 & 1 ;→0 ふしぎ！

まぁ、HSPだとCでいう&&とか||がないっぽいので、
0か1だけを返すbool関数みたいなの作って一度噛ませた方がいいかも知れんね。

なにその糞仕様

>>977
おーい
良く考えろ
やるなら
if ((stk&2)>0) & (keybuf2=0)
とか
if ((stk&2)=2) & (keybuf2=0)
とかだろ・・・

if stk&2 {
これが使えてるのは0以外なら判定が成立するからで
(stk&2) ここで成立してる訳じゃない
(stk&2) これは 0 か 2 でしかない
&1 で1になるのは反対側が奇数の必要がある

そういえば、論理演算としての！が使えないのも地味に痛いんだよな。

ネットワーク機能を盛り込んだはいいが
一人で複数窓デバッグしんどすぎるｗｗｗ

>>978
>>981
丁寧な解説ありがとう。
0か1のbool型が戻り値になるとばかり思っていた。

これで念願のボタン1押しながらボタン2押しても反応するので
ジョイスティックでジャンプボタン押しながらムチを振れるようにできう
repeat
await 5
stick stk,15
if ((stk&1)=1)&(keybuf1=0) {a++}
if ((stk&2)=2)&(keybuf2=0) {a--}

keybuf1 = stk&1//こうやね
keybuf2 = stk&2
title ""+a+" stk&1:"+(stk&1)+" stk&2:"+(stk&2)
loop

ちょｗｗソレなんて悪魔城ドラキュラ？ｗｗｗｗ

どこの誤爆だｗ

>>985
わかってくれて嬉しいｗ