|
|
2007/7/27(Fri) 22:07:21|NO.9822
buffer 1
picload "ground.bmp"
screen 0,1600,1600,2,5,5,640,480
dim map,50,50
gmode 2
*main
redraw 0
color 0,0,0:boxf 0,0,1600,1600
x=ginfo(8):y=ginfo(9)
if mousex>607&x<1600:groll x+32,y
if mousex<33&x>0:groll x-32,y
if mousey>458&y<1600:groll x,y+32
if mousey<33&y>0:groll x,y-32
x=ginfo(8):y=ginfo(9)
moux=(mousex+x)/32:mouy=(mousey+y)/32
repeat 50
rcnt=cnt
repeat 50
if map.cnt.rcnt=0:pos cnt*32,rcnt*32:grotate 1,0,0,0.5*3.14,32,32
loop
loop
color 0,0,255:pos moux*32,mouy*32:boxf moux*32,mouy*32,moux*32+31,mouy*32+31;ポインタ作成
gsel 0,1
redraw 1
wait 1
goto *main
|
|
2007/7/27(Fri) 22:08:46|NO.9823
上のスプリクトを実行すると、「システムエラーが発生しました。 ilne 19」となってしまいます。
どうすればいいのか教えて下さい。
|
|
2007/7/27(Fri) 22:34:00|NO.9824
とりあえず、特にエラーは起こらないのだが。
見難いのでいじった。
buffer 1
//picload "ground.bmp"
screen 0 , 1600 , 1600 , 2 , 5 , 5 , 640 , 480
dim map , 50 , 50
gmode 2
*main
redraw 0
color 0 , 0 , 0
boxf 0 , 0 , 1600 , 1600
x = ginfo( 8 )
y = ginfo( 9 )
if mousex > 607 & x < 1600 : groll x + 32 , y
if mousex < 33 & x > 0 : groll x - 32 , y
if mousey > 458 & y < 1600 : groll x , y + 32
if mousey < 33 & y > 0 : groll x , y - 32
repeat 50
rcnt = cnt
repeat 50
if map( cnt , rcnt ) = 0 {
pos cnt * 32 , rcnt * 32
grotate 1 , 0 , 0 , 0.5 * 3.14 , 32 , 32
}
loop
loop
;ポインタ作成
x = ginfo( 8 )
y = ginfo( 9 )
title "X=" + X + " Y= " + Y
moux = ( mousex + x ) / 32
mouy = ( mousey + y ) / 32
color 0 , 0 , 255
pos moux * 32 , mouy * 32
boxf moux * 32 , mouy * 32 , moux * 32 + 31 , mouy * 32 + 31
gsel 0 , 1
redraw 1
wait 1
goto *main
|
|
2007/7/28(Sat) 02:47:44|NO.9833
念の為、HSPのバージョンを教えてもらえるかのう・・・。
自分は3.1RC1で動作確認したが。
|
|
2007/7/28(Sat) 04:56:07|NO.9836
hsp31b5.txtの更新履歴に
> 2006/07/18 3.1b5
> 画面の初期化Yサイズがデスクトップ領域より大きい場合にgrotate、gsquare、grect命令が失敗する不具合を修正。
ってある
>どうすればいいのか教えて下さい。
デスクトップ領域を越えないようにするか、バグ修正された3.1b5以降のバージョンを使用する
このどちらかになると思う
|
|
2007/7/28(Sat) 13:36:35|NO.9839
3.1RC1にすると解決しました。
ありがとうございます。
|
|