>よほどたくさん読むのなら別ですが立ち絵１枚なのですよね。
いえ、立ち絵は各キャラ１枚ずつではなく、《【喜怒哀楽＋その他数枚】×【１０キャラ分】》あります。
>picload を使うとちらつく…ってことは、 redraw 0 で画面の更新を停止していないのではと思えるんですがどうでしょう？
えと、picloadを使うとちらつくというのは、一度picloadした後に、時間を空けずに再びpicloadする…というのを繰り返した場合でのことです。
今回はbuffer,gcopyとredrawを使っているのでちらつきませんでした。
>基本的にHSPの命令や関数は、いろんなプログラム言語と比較すると遅い部類です。
>特に命令ひとつひとつを実行すること自体も翻訳にかかる時間を要するので、実行ファイルがすでに翻訳済みの機械語であるような言語にはどうしても速度で劣ります。
HSPをネットで調べていた際に他の言語よりも遅くなるとは聞いていましたが、そのような理由だったのですね。
>＃ウインドウやバッファをたくさん作っても、スクリプトの実行スピードにさしたる影響は出ないでしょう。
>＃メモリを食い尽くすほどの大面積でもない限り。
うちのパソコンのメモリはまだMBなので、多分最近のPCよりはすぐに空きが尽きてしまいます。
ですがメモリ消費も考慮した上で反応が遅いので、多分違う理由だと思います。
>・画面のクリアにclsを使っている
>・ループ処理が重複している
>・表示する画像の数が多いorサイズが大きい
>・半透明処理を多用している
>・OSがVista以降
３番目の項目がもしかしたら関わっているかもしれません。
今回使っている立ち絵画像は、
・BMP形式
・1240×1600
・フルカラー
・アルファブレンド対応
です。
> １：遅い事が再現できる、最小限のスクリプトを載せる。
１に対して、以下にスクリプトを載せます。
最小限に抑えたつもりですが、遅くなる原因が分からないので少し長くなってしまいました。
#module
#deffunc picdis int kk,int xsize,int ysize,int mag,str Bfile0,str Bfile1,str Bfile2,str back,int xpos,int ypos,int blend
/* kk,キャラ数 : xsize,画像Ｘサイズ : ysize,画像Ｙサイズ : mag,拡大縮小サイズ : Bfile,キャラ画像１ : Bfile1,キャラ画像２ : Bfile2,キャラ画像３ : back,背景画像 : xpos,キャラ位置 : ypos,キャラ位置 : blend,ブレンド率 */
//キャラ数の決定
repeat kk
kcnt=cnt+17
buffer kcnt //キャラ画像の取得
switch cnt
case 0 : picload Bfile0 : swbreak
case 1 : picload Bfile1 : swbreak
case 2 : picload Bfile2 : swend
loop
//
buffer 16 : picload back : gsel 0 : gmode 0
buffer 13,xsize/mag*2,ysize/mag : gzoom xsize/mag*2,ysize/mag,17,0,0,xsize*2,ysize,1
repeat kk
switch kk
case 2 or 3 : switch mag
case 1 or 2 : buffer 12, xsize*mag-3 ,ysize : pos xsize-1,-1: gcopy cnt+17,0,0,xsize/mag*mag,ysize : pos 0,-1 : gcopy cnt+17,xsize+1,0,xsize/mag*mag,ysize
switch cnt
case 1 : buffer 14,xsize/mag*mag-1,ysize : pos xsize-2,0 : gzoom -(xsize/mag*mag),ysize/mag,12,0,0,xsize*mag,ysize,1 : swbreak
case 2 : buffer 15,xsize/mag*mag-1,ysize : gzoom xsize/mag*mag,ysize/mag,cnt+17,0,0,xsize*mag,ysize,1 : swend : swend : swbreak
case 3 : if cnt=1 { buffer 14,xsize/mag*mag-1,ysize : pos xsize-200,0 : gzoom -(xsize/mag*mag),ysize/mag,12,0,0,xsize*mag,ysize,1 } : swbreak
case 2 : buffer 12, xsize*2-3 ,ysize : pos xsize-1,-1: gcopy cnt+17,0,0,xsize/mag*2,ysize : pos 0,-1 : gcopy cnt+17,xsize+1,0,xsize/mag*2,ysize
buffer 14, xsize*2 ,ysize : pos xsize*2,0 : gzoom -(xsize*2),1020,12,0,0,xsize*2,ysize,1 : swend
loop
gsel 0
pos 0,0 : redraw 0 : gcopy 16,0,0,640,480
//↓キャラ数分の画像表示
gmode 7,,,blend
repeat kk
if kk=1 { pos xpos,ypos : gcopy 13,0,0,xsize/mag,ysize }
if kk=2 and mag>1 { pos xpos-(xpos/2)- 50,ypos : gcopy 14,0,0,xsize/mag,ysize : pos xpos+(xpos/2)+50,ypos : gcopy 13,0,0,xsize/mag,ysize }
if kk=2 and mag=1 { pos xpos-(xpos/2)-140,ypos : gcopy 14,0,0,xsize/mag,ysize : pos xpos+(xpos/2)+100,ypos : gcopy 13,0,0,xsize/mag,ysize }
loop : redraw 1
return
#global
> ２：使用した画像の種類・サイズを明記する。
2に対して、先ほども載せましたがもう一度記載します。
・BMP形式
・1240×1600
・フルカラー
・アルファブレンド対応
長くなってしまい、すみません。
ＨＳＰ関数の実行時間について
