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

Toukou/ポケモンARマーカーを表示するだけのプログラム の変更点


#title(投稿プログラム : ポケモンARマーカー表示プログラム)
#contents
/////////////////////////////////
// 適当にタグをつけることができます。半角のコンマ区切りで複数つけられます。
// タグをつけると、同じタグが付いたページを検索することができます。

2011年07月21日投稿
/ 投稿者 : 名無しさん
/ &tag(投稿プログラム,QRコード,初代対応);
/////////////////////////////////
// ここに概要とか書きます。

* 概要 [#g25211b5]
ポケモン立体図鑑で読み取れるARマーカーを入力すると、~
ARシールやフォトシールを集めるのに役立ちます。

** 操作 [#g353cb87]
タッチペンで簡単入力。~
変数Sの値を変更することでサイズを変更できます。

/////////////////////////////////

* スクリーンショット・動画 [#e411ab30]
動作しているところを撮影した写真や動画があれば貼り付けてください。

// ページを作成すると、画像の添付ができるようになります。(作成する前はできません)
// 画像を添付したら、以下の書式でページ内に貼り付けられます。
// #ref(添付ファイル名)
#ref(HNI_0027.JPG)


// 以下の書式で、動画を貼り付けられます。
// #youtube(0HWX7kovgY8)
// #nicovideo(sm13684820)
上の写真はツタージャのARマーカーです。
/////////////////////////////////

* QR コード [#p9eadad8]
プチコンmkII 向けの QR コードです。
|~PRG:ARZ|
|&ref(qr0.png,,200%);|

/////////////////////////////////

* プログラムリスト [#c662ffe4]
#basic{{
'ポケモン ARマーカーヒョウジプログラム

@START
PNLTYPE "OFF"
'---ショキカ
GPAGE 1
CLEAR:GCLS 4
S=80:T=0:C=1
COLSET "GRP",1,"FFFFFF"
COLSET "GRP",2,"111111"
COLSET "GRP",3,"000000"
COLSET "GRP",4,"FFFF99"
'---

PX=255/2-S+S/6:W=255/2
PY=191/2-S+S/6:H=191/2
PS=S/3:WL=S/3:K=W-S:N=H-S

GBOX W-S,H-S,W+S,H+S,2
FOR I=1 TO 6
GLINE K,N+WL*I,W+S,N+WL*I,2
GLINE K+WL*I,N,K+WL*I,H+S,2
NEXT

FOR I=0 TO 5 :'1=シロ
FOR J=0 TO 5 :'3=クロ
READ C:CS$=CS$+STR$(C)
GPAINT PX+PS*J,PY+PS*I,C
NEXT
NEXT

@CL
DATA 3,3,3,3,3,3
DATA 3,3,3,3,3,3
DATA 3,3,3,3,3,3
DATA 3,3,3,3,3,3
DATA 3,3,3,3,3,3
DATA 3,3,3,3,3,3

@LOOP
TC=GSPOIT(TCHX,TCHY)
IF TCHST==1 AND TC==1 THEN GPAINT TCHX,TCHY,3:TC2=TC
IF TCHST==1 AND TC==3 THEN GPAINT TCHX,TCHY,1:TC2=TC
IF TCHST==1 THEN GOSUB @T
VSYNC 1
GOTO @LOOP

@T
IF TCHST==0 THEN RETURN
GOTO @T
}}

/////////////////////////////////
// コメントを募集したくないなら、ここから下は削除してください

* CHECKER FLAG (ひとことコメント) [#f43e4a8c]
- この作品に対するコメントがあれば一言どうぞ。(作品に直接関係ない質問や雑談は[[掲示板>Board]]へ)
- ''謎の初心者'' : 25番がSyntax errorが出るのですが  FOR I=0 TO 5 :1=シロ    で良いでしょうか (&new{2011/07/25 (月) 08:44:35};)
- ''作者'' : すみません。そこは ` でコメントアウトしておいてください。プログラムリストは、直しておきました。 (&new{2011/07/25 (月) 10:33:50};)
- ''作者'' :  場所は : の後ろからです(25、26行目) (&new{2011/07/25 (月) 10:36:15};)
- ''HAL'' : 15、16行目のWの値がかぶってますね。変・・・ (&new{2011/08/03 (水) 00:40:35};)
- ''投稿者'' : 15行目のWはH (&new{2011/08/03 (水) 17:38:43};)
- ''投稿者'' : でした。 (&new{2011/08/03 (水) 17:39:51};)
- ''投稿者'' : 修整しました。 (&new{2011/08/03 (水) 17:42:02};)
- ''カイ'' : どうやってARマーカーを表示させるのですか? 表示方法を教えてください。 (&new{2011/09/03 (土) 16:27:16};)
- ''投稿者'' : ARマーカーは自分で入力してください。あと、プログラムリストにおかしな所があるかもしれませんが気づいたら遠慮せず言ってください。 (&new{2011/09/03 (土) 19:04:26};)
- ''カイ'' : どこに入力したらいいですか。 (&new{2011/09/03 (土) 19:12:10};)
- ''投稿者'' : リストに間違いがなければ、タッチした所の色が変わるはずです。 (&new{2011/09/03 (土) 21:14:37};)
- ''カイ'' : ありがとうございました。 (&new{2011/09/03 (土) 21:21:07};)
- ''カイ'' : 面白いプログラムがあったら教えてください。 (&new{2011/09/03 (土) 22:40:29};)
- ''カイ'' : プログラムリストどうりに入力したのですが、横線が出ないうえに一部の列しか色がかわりません。どうしたらいいですか。 (&new{2011/09/04 (日) 16:50:42};)
- ''投稿者'' : 21行目の最後に ,2 と打ち込んでみてください。抜けていたので修整しておきます。 (&new{2011/09/04 (日) 21:29:01};)
- ''カイ'' : うまくいきました。♪ (&new{2011/09/04 (日) 22:25:35};)
- ''カイ'' : 度々、すいません。 「,2」を入れて、横線が出て、色も変わるようになったのですが、マス全体が左下に表示させているのですが、写真のようにするにはどうしたらいいのでしょうか? 教えてください。 (&new{2011/09/04 (日) 22:49:05};)
- ''カイ'' : 質問が多くすみません。 マス数が6×5しかないのですが、写真のマス数6×6でした。プログラムリストどうりに入力したのに、なぜこんなに違っているのでしょうか(苦笑) (&new{2011/09/04 (日) 23:10:23};)
- ''投稿者'' : こちらこそすみません。色々間違ってたみたいです。まず、15、16行目の H と W を逆にしてください。そして、7行目の GCLS を GCLS 4 にしてください。でもこっちは背景の色なので好きな色でいいと思います。  (&new{2011/09/05 (月) 00:57:20};)
- ''投稿者'' : 修整しました。 (&new{2011/09/05 (月) 01:00:33};)
- ''カイ'' : 質問ばかりで、すみませんでした。 ちょくちょく、見にきますのでなにか面白いブログラムができたら投稿してください。投稿しているブログラムでおすすめがあったら教えてください。いろんなプログラムを知りたいのでお願いします。 (&new{2011/09/05 (月) 22:39:39};)
- ''カイ'' : このプログラム結構好評だったです。 (&new{2011/09/06 (火) 03:27:35};)
- ''投稿者'' : そうですか、ありがとうございます。こういうプログラムを自分で手軽に作れるのもプチコンの魅力ですね。覚えるのが大変ですが・・・ (&new{2011/09/06 (火) 22:12:06};)
- ''カイ'' : 最近初めたばかりなので覚えることが山のようにあって大変です。 (&new{2011/09/07 (水) 21:43:31};)
- ''カイ'' : サンプルプログラムの改造例を教えてください (&new{2011/09/12 (月) 23:07:58};)
- ''名無しさん'' : そういう話はプチコン掲示板などでしてください。 (&new{2011/09/13 (火) 00:58:10};)
- ''ザイコー'' : あまり関係ありませんがファイルはどうやって消去するんですか? (&new{2011/10/28 (金) 18:21:22};)
- ''名無しさん'' : [[DELETE:http://smileboom.com/special/petitcom/manual/page_19.html#3]]の事でしょうか。あと、投稿プログラムに関係ない質問をする場合は、右のメニューにある「[[質問/雑談スレッド:http://jbbs.livedoor.jp/bbs/read.cgi/computer/43199/1314589236/]]」か「[[OFコーナー>OverFlow]]」をご利用ください。 (&new{2011/10/29 (土) 05:53:44};)
- ''カイ'' : お久しぶりです。 今回は、パネル右から6行目が全て長方形なんですが、写真を見ると全て正方形なんです。なぜなんでしょうか? (&new{2012/01/09 (月) 02:13:20};)
- ''カイ'' : すみません。 行ではなく、マスの横線が背景にとび出ているだけでした。 (&new{2012/01/09 (月) 02:36:04};)
- ''RND 128'' : 何という質問ラッシュwww (&new{2012/01/09 (月) 03:55:14};)
- ''カイ'' : RND128← ???? (&new{2012/01/15 (日) 00:52:08};)
- ''バイカウントメルビル'' : 関係ないことは別の所で話しましょう。 (&new{2012/01/15 (日) 11:18:07};)
- ''uki148'' : 1行目の01.`ホ゜ケモン ARマーカーヒョウシ゛フ゜ロク゛ラム (&new{2012/01/26 (木) 18:38:22};)
- ''uki148'' :  1行目の01.`ホ゜ケモン ARマーカーヒョウシ゛フ゜ロク゛ラムがsyntax errorとでてきますけど (&new{2012/01/26 (木) 18:41:49};)
- ''RND 128'' : ↑`ではなく’です。 (&new{2012/01/26 (木) 22:27:42};)
- ''バイカウントメルビル'' : 暇だったので直しておきました。・・・それにしてもここコメ多すぎw (&new{2012/01/27 (金) 18:40:23};)
- ''bbbbzくss'' : QR作って (&new{2012/03/20 (火) 13:59:47};)
- ''投稿者'' : QRコード貼り付けといたけど、これでいいのかな。 (&new{2012/03/20 (火) 16:23:43};)
- ''超初心者'' : ハイそれでいいです。名前bbbzくssから変更しました。 (&new{2012/03/22 (木) 06:44:16};)
- ''名無しさん'' : ↑bの数違うww (&new{2012/03/22 (木) 16:15:43};)
- ''名無しさん'' : これ友達たちに超人気でした!フォトシール集めに最適ですね! (&new{2012/03/22 (木) 18:04:42};)
- ''超初心者'' : ホントだb4つだった とにかく使わせてもらってます。ありがとうございました。 (&new{2012/03/23 (金) 20:29:07};)
- ''名無しさん'' : 3dsでプチコンやってるからqr読めん(TдT) (&new{2012/04/06 (金) 19:45:33};)
- ''名無しさん'' : 自分のことに使いたいのに… (&new{2012/04/06 (金) 19:46:03};)
- ''削除'' : 削除
- ''イッシー'' : 保存できたらいいなー (&new{2012/07/24 (火) 16:47:42};)
- ''名無しさん'' : また読み込んでないけど&basic{save"grp:tutaja};すればいいと思う (&new{2012/07/24 (火) 19:01:19};)
- ''名無しさん'' : 単純な組み合わせだからGRP使えば全ポケモン分記録できそう。 (&new{2012/07/25 (水) 11:32:27};)
- ''イッシー'' : 写真や画像として保存できませんよね (&new{2012/07/27 (金) 10:47:39};)
- ''進'' : プチコンが3dsに入ってるときの場合使いにくそうなきが。 (&new{2012/07/27 (金) 10:50:00};)
- ''イッシー'' : 3DSでインターネットをやっています 弟がこれを撮ってそれを僕が撮影して使おうと思います シールは全クリなので納得のいく写真撮影に没頭したいです (&new{2012/07/27 (金) 11:10:50};)
- ''わぁぃ@'' : 非公式のツールを使えばgrpのptcファイルをgifやpngに変換できますよ。 (&new{2012/07/27 (金) 11:52:22};)

#comment

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