HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2023
1002
obaq初心者obaqでの円画像はめこみ2解決


obaq初心者

リンク

2023/10/2(Mon) 19:41:28|NO.100114

こんにちは。
obaqのサンプルをいじってみて、まだ良くわからないところが多いので質問させてください。

円形の画像を用意して、オブジェクトにはめ込むにはどうしたら良いでしょうか。
また、qaddpoly のsx, syがピクセルでないので、どうサイズを調整するのかわかりません。

以下試したコードを載せます。
よろしくお願いいたします。


#include "obaq.as" buffer 1,64,64 picload dir_tv + "\\ball64.png", 1 gsel 0, 1 dim zukei_id, 20 qreset repeat 20 qaddpoly zukei_id(cnt), 20, 20.0+cnt*5, 10.0, 0.0, 6.4, 6.4, 0, 2, , 4 qmat zukei_id(cnt), mat_spr, 1 loop *main ; メインループ ; redraw 0 ; 画面の更新を開始 color 0,0,0:boxf ; 画面をクリア qexec ; OBAQによるオブジェクトの更新 qdraw ; オブジェクトの描画 redraw 1 ; 画面の更新を終了 await 32 ; 一定時間待つ goto *main



この記事に返信する


buhio

リンク

2023/10/3(Tue) 16:19:11|NO.100117

こういうことでいいんでしょうか?
違ったらすいません。


#include "obaq.as" buffer 1,64,64 celload dir_tv + "\\ball64.png", 1;;celloadに変更 celdiv 1,64,64,32,32 ;追加 gsel 0, 1 dim zukei_id, 20 qreset repeat 20 qaddpoly zukei_id(cnt), 20, 20.0+cnt*5, 10.0, 0.0, 6.4, 6.4, 0, 2, , 4 qmat zukei_id(cnt), 1, 1,50;マテリアルタイプ1,参照id 1,celdiv画像の、どの番号を表示するか。今回は50番を指定 loop *main ; メインループ ; redraw 0 ; 画面の更新を開始 color 0,0,0:boxf ; 画面をクリア qexec ; OBAQによるオブジェクトの更新 qdraw ; オブジェクトの描画 redraw 1 ; 画面の更新を終了 await 32 ; 一定時間待つ goto *main



obaq初心者

リンク

2023/10/4(Wed) 11:42:14|NO.100129

buhio さん

ありがとうございます。
提示していただいたコードでやりたいことはできました。
celloadのほうが使いやすいんですかね


自分で試したコードで、試行錯誤していたら、
picloadの前に cls 4 で画面を黒にしたら、透過してくれました。
他の方の参考になれば

とりあえず解決しましたのでありがとうございました。



ONION software Copyright 1997-2025(c) All rights reserved.