プチコンまとめWiki (初代/mkII)

投稿プログラム : ピクセル無双

パンくずリスト

2013年8月3日投稿 / 投稿者 : 0918nobita / タグ : 投稿プログラム QRコード ゲーム 0918nobita

概要

これは、最初に自分のHP、自分の(青色)ピクセルの移動速度、目標撃破数、(赤色の)敵ピクセルの出現率を設定してから、 時間経過で蛆虫のように増え続ける敵ピクセルに向かってAボタンで上向きにビームをうって、撃破数を稼ぐゲームです。 設定した目標撃破数に達したらクリアです。 敵ピクセルにぶつかるとダメージを受け、HPが減っていきます。 画面の外に自分のピクセルが行ってしまうと、短時間で大量のダメージを受け、早く画面内に戻らないとHPが0になって負けてしまいます。

バージョン

このプログラムのバージョンは1.0.1です。

今後のアップデートについて

今回公開したバージョンでは、敵ピクセルが動きません…(スプライトやBGは使わず、あくまでも1ピクセルの敵と戦わせる方針で行きます) なので、次のバージョンでは敵ピクセルのAIを追加して、攻撃方法(接近戦用の何か、拡散して攻撃できるなにか)や使えるアイテム(検討中なのはピクセル爆弾、攻撃力アップポーションとか)も 追加できるように頑張ります!!(将来的には、自分で敵出現率を決めたりするのではなく、パズドラみたいにいくつかダンジョンを用意して、それをユーザーが進めていくようにしたいと思ってます。)

スクリーンショット・動画

今後操作動画とかYoutubeにうPするかも

QR コード

プチコンmkII 向けの QR コードです。

qr0.pngqr1.pngqr2.pngqr3.pngqr4.png

プログラムリスト

  1. ’┌──────────────────────────┐
  2. ’│     Pixel Matchless      │
  3. ’│        Ver 1.0.1         │
  4. ’│      By 0918nobita       │
  5. ’└──────────────────────────┘
  6. ACLS
  7. CLEAR
  8. SYSBEEP=FALSE
  9. BGMSTOP
  10. GOSUB @RCHTXTBINIT
  11. PNLTYPE ”OFF”
  12. SAI=2
  13. ’───────────────────────────
  14. ’チュウイカ゛キ
  15. ’───────────────────────────
  16. @TYUI
  17. GPAGE 0
  18. _X=60:_Y=10:RCHTXT$=”&Bケ゛−ムフ゜レイ{シ゛ョウノ チュウイ}”:GOSUB @RICHTXT
  19. _X=25:_Y=40:RCHTXT$=”{チョウシ゛カンノ}ケ゛−ムフ゜レイ{ハサケ、}”:GOSUB @RICHTXT
  20. _X=25:_Y=60:RCHTXT$=”{テキト゛ニ キュウケイヲ トルヨウニ シテクタ゛サイ。}”:GOSUB @RICHTXT
  21. _X=60:_Y=100:RCHTXT$=”Аホ゛タン{ヲ オシテクタ゛サイ。}”:GOSUB @RICHTXT
  22. GPAGE 1
  23. _X=75:_Y=100:RCHTXT$=”&BBy 0918nobita”:GOSUB @RICHTXT
  24. @TYUILOOP
  25. IF BUTTON(2)==16 THEN GOTO @TYUI2
  26. GOTO @TYUILOOP
  27. @TYUI2
  28. ’───────────────────────────
  29. ’メインメニュ−
  30. ’───────────────────────────
  31. BGMPLAY 27
  32. GPAGE 1:GCLS 233
  33. @MENYU
  34. GPAGE 0:GCLS 233
  35. MK=0
  36. GEKIHA=0
  37. GFILL 0,30,255,60,15
  38. GFILL 0,60,255,62,253
  39. _X=55:_Y=40:RCHTXT$=”&1@2ヒ゜クセル ムソウ”:GOSUB @RICHTXT
  40. _X=75:_Y=150:RCHTXT$=”@1&FBy 0918nobita”:GOSUB @RICHTXT
  41. LOCATE 12,10:PRINT ”А:スタ−ト”
  42. LOCATE 12,12:PRINT ”Б:シュウリョウ”
  43. LOCATE 12,14:PRINT ”Х:アソヒ゛カタ”
  44. @MENYULOOP
  45. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  46. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  47. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  48. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  49. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  50. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  51. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  52. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  53. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  54. IF BUTTON(2)==16 THEN GOTO @MENYU2
  55. IF BUTTON(2)==32 THEN ACLS:CLEAR:END
  56. IF BUTTON(2)==128 THEN GOTO @GUIDE
  57. VSYNC 1
  58. GOTO @MENYULOOP
  59. @MENYU2
  60. CLS
  61. GPAGE 0:GFILL 0,60,255,62,253
  62. GPAGE 0:GFILL 0,30,255,60,15
  63. _X=5:_Y=40:RCHTXT$=”&1@2>ムス゛カシサ”:GOSUB @RICHTXT
  64. LOCATE 4,10:?”HP:”
  65. LOCATE 1,1:PRINT ”А:シュツケ゛キ Б:モト゛ル”
  66. LOCATE 1,2:PRINT ”К/н:カ−ソルノ イト゛ウ ▲▼:スウチノ ヘンコウ”
  67. @MENYULOOP2
  68. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  69. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  70. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  71. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  72. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  73. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  74. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  75. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  76. GPAGE 1:GPSET RND(255),RND(191),RND(255)
  77. LOCATE 4,10:?”        ”
  78. LOCATE 4,10:?”HP:”;HOSTHP
  79. LOCATE 4,11:?”                   ”
  80. LOCATE 4,11:?”テキノ シュツケ゛ンリツ:”;TEKIT
  81. LOCATE 4,12:?”                      ”
  82. LOCATE 4,12:?”モクヒョウ ケ゛キハスウ:”;MOKUHYO
  83. LOCATE 4,13:?”                      ”
  84. LOCATE 4,13:?”ソウサヒ゜クセルノ イト゛ウソクト゛:”;S
  85. IF MK==0 THEN LOCATE 3,11:?” ”:LOCATE 3,10:?”Й”
  86. IF MK==1 THEN LOCATE 3,10:?” ”:LOCATE 3,11:?”Й”:LOCATE 3,12:?” ”
  87. IF MK==2 THEN LOCATE 3,11:?” ”:LOCATE 3,12:?”Й”:LOCATE 3,13:?” ”
  88. IF MK==3 THEN LOCATE 3,12:?” ”:LOCATE 3,13:?”Й”:LOCATE 3,14:?” ”
  89. IF MK==4 THEN LOCATE 3,13:?” ”:LOCATE 3,14:?”Й”:LOCATE 3,15:?” ”
  90. IF MK==0 AND BUTTON()==1 THEN HOSTHP=HOSTHP+1
  91. IF MK==0 AND BUTTON()==2 THEN HOSTHP=HOSTHP−1
  92. IF MK==1 AND BUTTON(2)==1 THEN TEKIT=TEKIT+1
  93. IF MK==1 AND BUTTON(2)==2 THEN TEKIT=TEKIT−1
  94. IF MK==2 AND BUTTON()==1 THEN MOKUHYO=MOKUHYO+1
  95. IF MK==2 AND BUTTON()==2 THEN MOKUHYO=MOKUHYO−1
  96. IF MK==3 AND BUTTON(2)==1 THEN S=S+1
  97. IF MK==3 AND BUTTON(2)==2 THEN S=S−1
  98. IF BUTTON(2)==16 THEN CLS:GPAGE 0:GCLS 15:GOTO @BATTLE
  99. IF BUTTON(2)==256 THEN MK=MK−1
  100. IF BUTTON(2)==512 THEN MK=MK+1
  101. IF BUTTON(2)==32 THEN CLS:GOTO @MENYU
  102. IF MK<0 THEN MK=0
  103. IF MK>3 THEN MK=3
  104. IF HOSTHP<5 THEN HOSTHP=5
  105. IF HOSTHP>100 THEN HOSTHP=100
  106. IF TEKIT<1 THEN TEKIT=1
  107. IF TEKIT>3999 THEN TEKIT=3999
  108. IF MOKUHYO<1 THEN MOKUHYO=1
  109. IF MOKUHYO>99999 THEN MOKUHYO=99999
  110. IF S<1 THEN S=1
  111. IF S>10 THEN S=10
  112. VSYNC 1
  113. GOTO @MENYULOOP2
  114. ’───────────────────────────
  115. ’Battle
  116. ’───────────────────────────
  117. @BATTLE
  118. BGMSTOP
  119. GPAGE 0:_X=80:_Y=100:RCHTXT$=”@2&DStart!!”:GOSUB @RICHTXT
  120. WAIT 60
  121. GPAGE 0:GFILL 0,0,255,191,15
  122. GPAGE 1:GFILL 0,0,255,191,233
  123. HOSTX=10:HOSTY=10
  124. BATIME=0
  125. BGMPLAY 3
  126. @BATTLELOOP
  127. IF GEKIHA>=MOKUHYO THEN BGMSTOP:BGMPLAY 5:GOTO @WIN
  128. B=BUTTON()
  129. SYU=RND(SAI)
  130. HOST2X=HOSTX:HOST2Y=HOSTY
  131. ’STATES
  132. PNLSTR 1,1,”                               ”,15
  133. PNLSTR 1,1,”HP:”,15
  134. PNLSTR 4,1,STR$(HOSTHP),15
  135. PNLSTR 1,3,”ケ゛キハスウ:”,15
  136. PNLSTR 8,3,STR$(GEKIHA),15
  137. ’アタリ ハンテイ
  138. IF HOSTX<0 THEN ATARI=1
  139. IF HOSTX>255 THEN ATARI=1
  140. IF HOSTY<0 THEN ATARI=1
  141. IF HOSTY>191 THEN ATARI=1
  142. IF GSPOIT(HOSTX+3,HOSTY)==2 THEN ATARI=1
  143. IF GSPOIT(HOSTX−1,HOSTY)==2 THEN ATARI=1
  144. IF GSPOIT(HOSTX,HOSTY+3)==2 THEN ATARI=1
  145. IF GSPOIT(HOSTX,HOSTY−1)==2 THEN ATARI=1
  146. IF GSPOIT(HOSTX−1,HOSTY−1)==2 THEN ATARI=1
  147. IF GSPOIT(HOSTX+3,HOSTY+3)==2 THEN ATARI=1
  148. IF GSPOIT(HOSTX+3,HOSTY−1)==2 THEN ATARI=1
  149. IF GSPOIT(HOSTX−1,HOSTY+3)==2 THEN ATARI=1
  150. IF ATARI==1 THEN HOSTHP=HOSTHP−1:BEEP 1:ATARI=0
  151. IF HOSTHP<=0 THEN GOTO @LOSE
  152. GFILL HOSTX,HOSTY,HOSTX+2,HOSTY+2,4
  153. ’イト゛ウノミ
  154. IF B==1 THEN HOSTY=HOSTY−S:WAIT 1
  155. IF B==2 THEN HOSTY=HOSTY+S:WAIT 1
  156. IF B==4 THEN HOSTX=HOSTX−S:WAIT 1
  157. IF B==8 THEN HOSTX=HOSTX+S:WAIT 1
  158. IF B==5 THEN HOSTY=HOSTY−S:HOSTX=HOSTX−S:WAIT 1
  159. IF B==9 THEN HOSTY=HOSTY−S:HOSTX=HOSTX+S:WAIT 1
  160. IF B==6 THEN HOSTY=HOSTY+S:HOSTX=HOSTX−S:WAIT 1
  161. IF B==10 THEN HOSTY=HOSTY+S:HOSTX=HOSTX+S:WAIT 1
  162. ’↑ヒ゛−ム
  163. IF B==17 THEN HOSTY=HOSTY−S:WAIT 1:ATACK=1
  164. IF B==18 THEN HOSTY=HOSTY+S:WAIT 1:ATACK=1
  165. IF B==20 THEN HOSTX=HOSTX−S:WAIT 1:ATACK=1
  166. IF B==24 THEN HOSTX=HOSTX+S:WAIT 1:ATACK=1
  167. IF B==21 THEN HOSTY=HOSTY−S:HOSTX=HOSTX−S:WAIT 1:ATACK=1
  168. IF B==25 THEN HOSTY=HOSTY−S:HOSTX=HOSTX+S:WAIT 1:ATACK=1
  169. IF B==22 THEN HOSTY=HOSTY+S:HOSTX=HOSTX−S:WAIT 1:ATACK=1
  170. IF B==26 THEN HOSTY=HOSTY+S:HOSTX=HOSTX+S:WAIT 1:ATACK=1
  171. ’↓ヒ゛−ム
  172. IF B==16 THEN ATACK=1
  173. IF ATACK==1 THEN GOSUB @BATTLEK
  174. IF ATACK==1 THEN GLINE HOSTX,HOSTY,HOSTX,0,2:BEEP 11:WAIT 1:GFILL HOSTX−5,HOSTY,HOSTX+5,0,15:WAIT 1
  175. IF ATACK!=0 THEN ATACK=0
  176. IF HOST2X!=HOSTX OR HOST2Y!=HOSTY THEN GPAGE 0:GFILL HOST2X,HOST2Y,HOST2X+2,HOST2Y+2,15
  177. IF SYU==1 THEN PIXEL=1
  178. FOR TEKIS=0 TO TEKIT STEP 1
  179. IF PIXEL==1 THEN GPAGE 0:GPSET RND(255),RND(191),2
  180. NEXT
  181. IF PIXEL==1 THEN PIXEL=0
  182. BATIME=BATIME+1
  183. VSYNC 1
  184. GOTO @BATTLELOOP
  185. ’ケ゛キハスウニ カサン(ヒ゛−ム)
  186. @BATTLEK
  187. FOR BATY=HOSTY−1 TO 0 STEP −1
  188. IF GSPOIT(HOSTX,BATY)==2 THEN GEKIHA=GEKIHA+1
  189. IF GSPOIT(HOSTX−5,BATY)==2 THEN GEKIHA=GEKIHA+1
  190. IF GSPOIT(HOSTX−4,BATY)==2 THEN GEKIHA=GEKIHA+1
  191. IF GSPOIT(HOSTX−3,BATY)==2 THEN GEKIHA=GEKIHA+1
  192. IF GSPOIT(HOSTX−2,BATY)==2 THEN GEKIHA=GEKIHA+1
  193. IF GSPOIT(HOSTX−1,BATY)==2 THEN GEKIHA=GEKIHA+1
  194. IF GSPOIT(HOSTX+5,BATY)==2 THEN GEKIHA=GEKIHA+1
  195. IF GSPOIT(HOSTX+4,BATY)==2 THEN GEKIHA=GEKIHA+1
  196. IF GSPOIT(HOSTX+3,BATY)==2 THEN GEKIHA=GEKIHA+1
  197. IF GSPOIT(HOSTX+2,BATY)==2 THEN GEKIHA=GEKIHA+1
  198. IF GSPOIT(HOSTX+1,BATY)==2 THEN GEKIHA=GEKIHA+1
  199. NEXT
  200. RETURN
  201. ’───────────────────────────
  202. ’RESULT
  203. ’───────────────────────────
  204. @WIN
  205. CLS
  206. GPAGE 0:_X=80:_Y=100:RCHTXT$=”@2&DCLEAR!”:GOSUB @RICHTXT
  207. WAIT 60
  208. GPAGE 0:GCLS 233
  209. GPAGE 1:GCLS 233
  210. FOR RESULTX=−20 TO 20 STEP 2
  211. GPAGE 0:GFILL 0,0,255,191,233
  212. _X=RESULTX:_Y=20:RCHTXT$=”@2&FRESULT”:GOSUB @RICHTXT
  213. WAIT 1
  214. NEXT
  215. WAIT 1:_X=20:_Y=45:RCHTXT$=”@1&F{ケ゛キハスウ}:”+STR$(GEKIHA)+”{キ}”:GOSUB @RICHTXT
  216. WAIT 1:_X=20:_Y=65:RCHTXT$=”@1&Fミッションクリア!{オメテ゛トウ!}”:GOSUB @RICHTXT
  217. @LOOP2
  218. IF BUTTON(2)==16 THEN BGMPLAY 27:GOTO @MENYU
  219. VSYNC 1
  220. GOTO @LOOP2
  221. @LOSE
  222. BGMSTOP
  223. CLS
  224. BEEP 13
  225. GPAGE 0:_X=97:_Y=100:RCHTXT$=”@2&1LOSE”:GOSUB @RICHTXT
  226. WAIT 60
  227. GPAGE 0:GCLS 233
  228. GPAGE 1:GCLS 233
  229. FOR RESULTX=−20 TO 20 STEP 2
  230. GPAGE 0:GFILL 0,0,255,191,233
  231. _X=RESULTX:_Y=20:RCHTXT$=”@2&FRESULT”:GOSUB @RICHTXT
  232. WAIT 1
  233. NEXT
  234. WAIT 1:_X=20:_Y=45:RCHTXT$=”@1&F{カカッタ シ゛カン}:”+STR$(BATIME):GOSUB @RICHTXT
  235. WAIT 1:_X=20:_Y=55:RCHTXT$=”@1&F{ケ゛キハスウ}:”+STR$(GEKIHA)+”{キ}”:GOSUB @RICHTXT
  236. WAIT 1:_X=20:_Y=75:RCHTXT$=”@1&F{サ゛ンネン!}”:GOSUB @RICHTXT
  237. @LOOP
  238. IF BUTTON(2)==16 THEN BGMPLAY 27:GOTO @MENYU
  239. VSYNC 1
  240. GOTO @LOOP
  241. ’───────────────────────────
  242. ’リッチテキスト By gbt_ss
  243. ’───────────────────────────
  244. @RICHTXT
  245. RCHMODE=0
  246. FOR RCHTX_I=0TO LEN(RCHTXT$)−1
  247. IF RES$==”” THEN RES$=”BGF0”
  248. RCHT1$=MID$(RCHTXT$,RCHTX_I,1)
  249. IF RCHT1$==”&”AND MID$(RCHTXT$,RCHTX_I+1,1)==”&” THEN SWRCH=1:RCHTX_I=RCHTX_I+1GOTO @RCHTXTLOOPNAIA
  250. IF RCHT1$==”@”AND MID$(RCHTXT$,RCHTX_I+1,1)==”@” THEN SZRCH=1:RCHTX_I=RCHTX_I+1GOTO @RCHTXTLOOPNAIA
  251. IF RCHT1$==”@” THEN SZRCH=1:GOSUB @RICHS_:RCHTX_I=RCHTX_I+1GOTO @NEXT
  252. IF RCHS==0THEN RCHS=1
  253. IF RCHT1$==”&”AND SWRCH==0 THEN SWRCH=1:GOSUB @RICH_:RCHTX_I=RCHTX_I+1GOTO @NEXT
  254. IF RCHT1$==”&”AND SWRCH==1 THEN SWRCH=0:GOSUB @RICH_:RCHTX_I=RCHTX_I+1:GOTO @NEXT ELSE SWRCH=0
  255. @RCHTXTLOOPNAIA
  256. IF RCHT1$==”{”AND RES$==”BGF0” THEN RES$=”BGU0L”:GOTO @NEXT
  257. IF RCHT1$==”}”AND RES$==”BGU0L”THEN RES$=”BGF0” :GOTO @NEXT
  258. IF !RCHMODE THEN GOSUB @RCH_NOM
  259. IF RCHMODE AND 16 THEN RRPSW=!RRPSW
  260. IF RCHMODE AND 1 THEN GOSUB @BOLD
  261. IF RCHMODE AND 2 THEN GOSUB @OBLI
  262. IF RCHMODE AND 4 THEN GOSUB @UND
  263. _X=_X+(8−(2*RRPSW))*RCHS
  264. @NEXT
  265. NEXT
  266. @RICHS_
  267. RCHT2$=MID$(RCHTXT$,RCHTX_I+1,1)
  268. IF RCHT2$==”1” THEN RCHS=1
  269. IF RCHT2$==”2” THEN RCHS=2
  270. IF RCHT2$==”4” THEN RCHS=4
  271. IF RCHT2$==”8” THEN RCHS=8
  272. RETURN
  273. @RICH_
  274. RCHT2$=MID$(RCHTXT$,RCHTX_I+1,1)
  275. IF RCHT2$==”B” THEN RCHMODE=RCHMODE XOR 1
  276. IF RCHT2$==”I” THEN RCHMODE=RCHMODE XOR 2
  277. IF RCHT2$==”U” THEN RCHMODE=RCHMODE XOR 4
  278. IF RCHT2$==”S” THEN RCHMODE=RCHMODE XOR 16
  279. RR111$=”0123456789AbCDEF”
  280. RR222$=”00010203040506070809101112131415”
  281. FOR RRRR=0TO 15
  282. IF RCHT2$==MID$(RR111$,RRRR,1)THEN RCHCOL=VAL(MID$(RR222$,RRRR*2,2))
  283. NEXT
  284. RETURN
  285. @RCH_NOM
  286. GPUTCHR _X,_Y,RES$,ASC(RCHT1$),RCHCOL,RCHS
  287. RETURN
  288. @BOLD
  289. IF RCHMODE AND 2 THEN RETURN
  290. GPUTCHR _X,_Y,RES$,ASC(RCHT1$),RCHCOL,RCHS
  291. GPUTCHR _X+RCHS,_Y,RES$,ASC(RCHT1$),RCHCOL,RCHS
  292. RETURN
  293. @UND
  294. GPUTCHR _X,_Y,RES$,ASC(RCHT1$),RCHCOL,RCHS
  295. GLINE _X,_Y+8*RCHS,_X−(2*RRPSW)+(8*RCHS),_Y+8*RCHS,(15+RCHCOL*16)
  296. RETURN
  297. @OBLI
  298. RCHIZ=2
  299. CHRREAD(RES$,ASC(RCHT1$)),RCHIZ$
  300. FOR RC_Y=0 TO 7
  301. RC_X2=0
  302. FOR RC_X=RCHIZ TO RCHIZ+7
  303. RCHIZ2=RC_Y*8+RC_X2
  304. IF MID$(RCHIZ$,RCHIZ2,1)!=”0”THEN GOSUB @ITALLR
  305. RC_X2=RC_X2+1
  306. NEXT
  307. RCHIZ=(RCHIZ−0.26)’0.375)
  308. NEXT
  309. IF !!(RCHMODE AND 1)AND OBLILOP==0 THEN _X=_X+1OBLILOP=1GOTO @OBLI
  310. IF !!(RCHMODE AND 1)AND OBLILOP==1 THEN OBLILOP=0:RETURN
  311. RETURN
  312. @ITALLR
  313. GPSET _X+RC_X+1,_Y+RC_Y,(15+RCHCOL*16)
  314. RETURN
  315. @RCHTXTBINIT
  316. CHRINIT ”BGF0”
  317. CHRINIT ”BGU0L”
  318. LOAD”BGU0L:SBFT_J01”,0
  319. LOAD”BGF0:SBFT_J02”,0
  320. RETURN
  321. ’───────────────────────────
  322. ’アソヒ゛カタ
  323. ’───────────────────────────
  324. @GUIDE
  325. CLS
  326. GPAGE 0:GCLS 233
  327. _X=10:_Y=20:RCHTXT$=”@1&F{コレハ、ホウコウ}キ−{テ゛ アオイロノ ミカタノ}”:GOSUB @RICHTXT
  328. _X=10:_Y=30:RCHTXT$=”@1&Fヒ゜クセル{(テン)ヲ ウコ゛カシ、}Aホ゛タン{テ゛}”:GOSUB @RICHTXT
  329. _X=10:_Y=40:RCHTXT$=”@1&F{ウエムキニ} ヒ゛−ム{ヲ ハッシャシ、}”:GOSUB @RICHTXT
  330. _X=10:_Y=50:RCHTXT$=”@1&F{テキノ アカイ}ヒ゜クセル{ヲ ケ゛キハスル}ケ゛−ム{テ゛ス。}”:GOSUB @RICHTXT
  331. _X=10:_Y=70:RCHTXT$=”@1&FBホ゛タン{テ゛ モト゛リマス。}”:GOSUB @RICHTXT
  332. @LOOP3
  333. IF BUTTON(2)==32 THEN GOTO @MENYU
  334. GOTO @LOOP3

追加してほしい機能があればこちらへ


CHECKER FLAG (ひとことコメント)

この作品に対するコメントがあれば一言どうぞ。(作品に直接関係ない質問や雑談は掲示板へ)


表示モード : [ スマホ・3DS対応表示 | クラシック表示 ]
PukiWiki 1.4.7 Copyright © 2001-2006 PukiWiki Developers Team. License is GPL. Based on "PukiWiki" 1.3 by yu-ji
ページの処理時間 : 0.114 秒 | このページの最終更新 : 2022/09/20 (火) 12:44:15 (565d) | ログイン
Copyright(C) 2011-2014 プチコンまとめWiki ◆1sxkymI8ji30