Petitverse

ugly777 ◆B7lOIJDWuOqi
2020/12/11 22:28

質問

3号でGRPをDATとして読み書きする方法の質問

グラフィックを配列変数としてSAVEやLOADをしたいのですが、
GSAVEやGLOADを使わずにできるのでしょうか?

Header 2020/12/11 22:55 ◆BDuG8hoYvRQ2

Gspoitで読むってのはできるのでは？(初心者
dim xy[511,511]
For x=0 to 511
for y=0 to 511
xy[x,y]=gspoit(x,y)
next
next

こういち 2020/12/11 22:57 ネタバレ ◆.Id/aHiU36hu

このコメントはネタバレを含んでいます。

Na 2020/12/11 23:53 ◆QoELVrBXBQCI

ヘルプのグラフィックのページを見てたら思いついたアホみたいな方法ですが、
結果は試してみないと分からないものですね。

DIM G%[512,512]
LOAD "DAT:ファイル名",G%,0

'たぶん普通の方法
M=MILLISEC
FOR Y=0 TO 511:FOR X=0 TO 511
　GPSET X,Y,RGB16TO32(G%[Y,X])
NEXT:NEXT
DEF RGB16TO32(C)
　RETURN (C AND 1)*255<<24 OR (C>>1 AND 31)<<3 OR (C>>6 AND 31)<<3<<8 OR (C>>11 AND 31)<<3<<16
END
?MILLISEC-M
'結果→ 2641ミリ秒

'一見遅そうな新しい方法(RGBA5551の場合)
M=MILLISEC
FOR V=0 TO 511 STEP 8:FOR U=0 TO 511 STEP 8
　F$=""
　FOR Y=0 TO 7:FOR X=0 TO 7
　　INC F$,HEX$(G%[Y+V,X+U],4)
　NEXT:NEXT
　FONTDEF 33,F$
　GPUTCHR U,V,"!"
NEXT:NEXT
?MILLISEC-M
'結果→ 1586ミリ秒

ちなみにGLOADなら12ミリ秒でした

コメントを書く

こちらは「プチコン3号」「プチコンBIG」など、プチコンシリーズに関する話題を扱ったコミュニティです
プチコンシリーズにまったく関係ない書き込みはご遠慮下さい。削除の対象となります
こちらにはその他のゲームや雑談のコミュニティはなく、作る予定もありません (ひとりで管理できないため)。ごめんなさい
ユーザー登録なしで書き込みができます
秘密の合い言葉は成りすましの防止 (トリップ機能)、書き込みの編集時の本人認証に使用します
秘密の合い言葉に他人に推測されやすい言葉、他サービスと同じパスワードは入力しないでください。
書き込むと、投稿時に入力したお名前と秘密の暗号が記憶され、ログイン状態になります

プチコン 非公式コミュニティ トピック

コメント

コメントを書く

プチコン非公式コミュニティトピック