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 で画面を黒にしたら、透過してくれました。
他の方の参考になれば

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



記事削除

記事NO.パスワード
(質問が解決したスレッドは他の利用者に活用してもらうため、削除しないようお願いします)

NO.100114への返信

マスコット

好きなマスコットを選んでください。

名前

e-mail
HOME
  1. 初めて利用する方は、HSP3掲示板の使い方をお読みください。
  2. 不要部分の多い長いスクリプトの投稿は ご遠慮ください。
  3. 書き込みは自動改行されません。適度に改行を入れてください。
  4. スクリプトは小文字の<pre>〜</pre>で囲むと見やすく表示できます。

削除用パスワード

解決したら質問者本人がここをチェックしてください。

エラー発生時、再送信すると二重送信になることがあります。
回答が得られたら、お礼書き込み時に[解決]チェックしてください。
SPAM防止のためURLから始まる文章は投稿できません。
SPAM防止のため英文字のみの本文を投稿することはできません。

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