2012年4月21日投稿 / 投稿者 : 名無しさん / タグ : 投稿プログラム 実用ツール QRコード mkII専用
複数のリソースをまとめて、パッケージ型のプログラムとして保存します。
一つにまとめることで配布が楽になりますし、QRコードの枚数を減らせる可能性もあります。
作成したパッケージ型のプログラムは、実行することで元の複数のリソースに分解されて保存されます。
それぞれのリソースは、以下の表の「最大個数」まで保存可能です。
ただし、最大近くまで保存すると描画がおかしくなるので、「推奨個数」までに留めておくことをおすすめします。
ファイル種別 | リソース名 | 推奨個数 | 最大個数 |
---|---|---|---|
CHR | BGU,SPU | 20 | 30 |
GRP | GRP | 3 | 4 |
SCR | SCU | 2 | 4 |
COL | COL | 5 | 6 |
MEM | MEM | 1 | 1 |
ありません。
プチコンmkII 向けの QR コードです。
- ACLS:CLEAR
- DIM RSRC$(45),RPOS(5,30)
- CHR=0:GRP=1:SCR=2:COL=3:MEM=4
- CCNT=30:GCNT=4
- SCNT=4:LCNT=6
- MCNT=1
- FOR I=0 TO 44
- READ RSRC$(I)
- NEXT
- FOR I=0 TO CCNT−1
- READ RPOS(CHR,I)
- NEXT
- FOR I=0 TO GCNT−1
- READ RPOS(GRP,I)
- NEXT
- FOR I=0 TO SCNT−1
- READ RPOS(SCR,I)
- NEXT
- FOR I=0 TO LCNT−1
- READ RPOS(COL,I)
- NEXT
- FOR I=0 TO MCNT−1
- READ RPOS(MEM,I)
- NEXT
- DIM K$(4),B(3)
- KP=0:KC=0
- READ FNAME$
- SYSBEEP=FALSE
- TY=CHR:CNT=CCNT:GOSUB @LOAD
- TY=GRP:CNT=GCNT:GOSUB @LOAD
- TY=SCR:CNT=SCNT:GOSUB @LOAD
- TY=COL:CNT=LCNT:GOSUB @LOAD
- TY=MEM:CNT=MCNT:GOSUB @LOAD
- SYSBEEP=TRUE
- FOR I=0 TO 3
- KEY I+1,K$(I)
- NEXT
- LOCATE 0,2
- ?”NEW:LIST”
- LOCATE 0,5
- ?”SAVE”;CHR$(34);FNAME$;
- ?CHR$(34);”,”;CHR$(34);
- ?HEX$(B(2));HEX$(B(1),4);
- ?HEX$(B(0),4)
- LOCATE 0,0
- END
- @LOAD
- I=0
- @LOOP
- READ RNAME$
- IF RNAME$==”” THEN RETURN
- IF I>=CNT THEN ACLS:?”オオスキ゛マス ”;RNAME$:END
- P=RPOS(TY,I)
- RNAME$=RSRC$(P)+”:”+RNAME$
- LOAD RNAME$,FALSE
- IF !RESULT THEN ACLS:?”ヨメマセン ”;RNAME$:END
- K$(KP)=K$(KP)+”SAVE”+CHR$(34)+RNAME$+CHR$(13)
- I=I+1:KC=KC+1
- IF KC>=12 THEN KC=0:KP=KP+1
- B(P/16)=B(P/16)+POW(2,P%16)
- GOTO @LOOP
- ’リソースメイ
- DATA ”SPU0”,”SPU1”,”SPU2”
- DATA ”SPU3”,”SPU4”,”SPU5”
- DATA ”SPU6”,”SPU7”,”BGU0U”
- DATA ”BGU1U”,”BGU2U”,”BGU3U”
- DATA ”BGFU”,”COL0U”,”COL1U”
- DATA ”COL2U”,”SCU0U”,”SCU1U”
- DATA ”GRP0”,”GRP1”,”GRP2”
- DATA ”GRP3”,”MEM”,”SPD0”
- DATA ”SPD1”,”SPD2”,”SPD3”
- DATA ”BGU0L”,”BGU1L”,”BGU2L”
- DATA ”BGU3L”,”BGFL”,”COL0L”
- DATA ”COL1L”,”COL2L”,”SCU0L”
- DATA ”SCU1L”,”SPS0U”,”SPS1U”
- DATA ”BGD0U”,”BGD1U”,”SPS0L”
- DATA ”SPS1L”,”BGD0L”,”BGD1L”
- ’CHRリソースNo.
- DATA 0,1,2,3,4,5,6,7,9,10,11
- DATA 24,26,27,28,29,30,37,40
- DATA 41,23,42,39,38,8,25,43
- DATA 44,31,12
- ’GRPリソースNo.
- DATA 21,20,19,18
- ’SCRリソースNo.
- DATA 36,35,17,16
- ’COLリソースNo.
- DATA 34,33,32,15,14,13
- ’MEMリソースNo.
- DATA 22
- ’シュツリョク ファイルメイ
- DATA ”RESOURCE”
- ’CHRファイル
- DATA ”CHR1”
- DATA ”CHR2”
- DATA ””
- ’GRPファイル
- DATA ”GRP1”
- DATA ””
- ’SCRファイル
- DATA ”SCR1”
- DATA ””
- ’COLファイル
- DATA ”COL1”
- DATA ””
- ’MEMファイル
- DATA ”MEM1”
- DATA ””
この作品に対するコメントがあれば一言どうぞ。(作品に直接関係ない質問や雑談は掲示板へ)
表示モード : [ スマホ・3DS対応表示 | クラシック表示 ]
PukiWiki 1.4.7 Copyright © 2001-2006 PukiWiki Developers Team. License is GPL. Based on "PukiWiki" 1.3 by yu-ji
ページの処理時間 : 0.108 秒 | このページの最終更新 : 2022/09/20 (火) 12:44:18 (565d) | ログイン
Copyright(C) 2011-2014 プチコンまとめWiki ◆1sxkymI8ji30