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


HSPTV!掲示板


未解決 解決 停止 削除要請

2023
0405
リトルリンダes_putbgが使いこなせず困っています。1解決


リトルリンダ

リンク

2023/4/5(Wed) 23:24:37|NO.99256

hsp3dishについて学んでいるのですが、es_putbgが使いこなせず困っています。

下記はテキストファイルから10×10のマップを読み込むスクリプトです。

配列変数をmesで表示させて確認するとデータの通り問題なく読み込めているのですが、
スクリプトを実行するたびに毎回違うマップが表示されてしまいます。

いつも質問ばかり申し訳ありませんが、どなたかご教示くださいますと幸いです。


#include "hsp3dish.as" es_ini ModMap_mapLoad "mapdata/testmap.txt",1 Modmap_dbgMsg *main redraw 0 es_putbg 1,0,0,0,0 repeat Modmap_returnMapsy() repeat Modmap_returnMapsx() pos x*16,y*16 : mes Modmap_returnPartId(i) x++ : i++ loop x=0 : y++ loop redraw 1 y=0 : i=0 await 1000/60 goto *main #module "ModMap" #deffunc ModMap_mapLoad str p1, int p2 fn=p1 cx=16 : cy=16 mapsx=10 : mapsy=10 if displayNo=0 : displayNo=ginfo_newid celload "mapdata/testchip.png",displayNo celdiv displayNo,cx,cy,0,0 dim map,mapsx*mapsy es_bgmap p2,map,mapsx,mapsy,mapsx,mapsy,displayNo notesel _map noteload fn _strsize=0 repeat getstr map(cnt),_map,_strsize,',' if strsize=0 : break _strsize+strsize loop return #deffunc Modmap_dbgMsg dialog "Modmap_returnMapsx="+Modmap_returnMapsx()+" Modmap_returnMapsy="+Modmap_returnMapsy();+"  Modmap_returnDisplayNo="+Modmap_returnDisplayNo() return #defcfunc Modmap_returnMapsx return mapsx #defcfunc Modmap_returnMapsy return mapsy #defcfunc Modmap_returnPartId int p1 return map(p1) #global



この記事に返信する


リトルリンダ

リンク

2023/4/5(Wed) 23:54:07|NO.99257


getstr map(cnt),_map,_strsize,','
これを

getstr null,_map,_strsize,',' if strsize=0 : break map(cnt)=0+null
にしたら解決しましました。

よく考えたらわかることですね、
大変お騒がせ致しました。



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