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

Toukou/ポ○デグルグル の変更点

パンくずリスト


#title(投稿プログラム : ポ○デグルグル)
#contents

2012年10月10日投稿
/ 投稿者 : バイカウントメルビル
/ &tag(投稿プログラム,鑑賞プログラム,QRコード,数行プログラム,mkII専用);
/ 検索用→【メルビル】

* 概要 [#p8a5970e]
例のドーナツがグルグル回ります。

** スクリーンショット [#zaa5d041]

#ref(ポンデグルグル アニメGIF.gif)

** QR コード [#k7d0cfab]
プチコンmkII 向けの QR コードです。

|~手動式|~全自動|
|&ref(qr1.png);|&ref(qr0.png);|

** 手動式グルグル [#qeaed9bc]
#basic{run}
#basic{{
ACLS:CLEAR:PNLTYPE”PNL”:A=32
GPAGE 1GCIRCLE A,A,A,43
GPAINT A,A,43B=16C=64P=PI()
GCIRCLE B,B,4,15GPAINT B,B,15
GPAGE 0FOR I=0TO 1GCLS 0
FOR J=TX TO 2*P+TX STEP P/4
X=COS(J)*80+96Y=SIN(J)*40+C
GCOPY 1,0,0,C,C,X,Y,0NEXT
FOR J=TX TO 2*P+TX STEP P/4
X=COS(J)*80+108Y=SIN(J)*40+76
GCOPY 1,12,12,20,20,X,Y,0
NEXT:FOR J=0TO TX==−TCHX/C
J=0NEXT:TX=−TCHX/C:I=0NEXT
}}

** 全自動グルグル [#y85003be]
#basic{{
ACLS:CLEAR:A=32B=16GPAGE 1
GCIRCLE A,A,A,43GPAINT A,A,43
P=PI()GCIRCLE B,B,4,15
GPAINT B,B,15GPAGE 0
R=RAD(45):Q=R/16FOR I=0 TO 1
FOR J=0 TO R−Q STEP Q:GCLS 0
FOR K=J TO 2*P+J STEP P/4
X=COS(K)*80+96Y=SIN(K)*40+64
GCOPY 1,0,0,64,64,X,Y,0NEXT
FOR K=J TO 2*P+J STEP P/4
X=COS(K)*80+108Y=SIN(K)*40+76
GCOPY 1,12,12,20,20,X,Y,0
NEXT:WAIT 1NEXT:I=0NEXT
}}

* CHECKER FLAG (ひとことコメント) [#i1cc200e]
この作品に対するコメントがあれば一言どうぞ。(作品に直接関係ない質問や雑談は[[掲示板>Board]]へ)
- '' ''&color(#038499){'''''Lv100'''''};'' '' : 投稿したのかw (&new{2012/10/10 (水) 21:54:42};)
- ''Topaz'' : でもこれすごいよ。 (&new{2012/10/10 (水) 22:08:34};)
- ''タマゴさん'' : これは面白いw (&new{2012/10/11 (木) 06:31:29};)
- ''道産子の初心者'' : 吹いたwwwミ○タード○ナツのポ○・デ・リ○グだwww (&new{2012/10/11 (木) 09:02:49};)
- ''朱雀'' : ちょっとナニコレ吹いたwww (&new{2012/10/11 (木) 17:46:35};)
- ''ウイング'' : ポンデライオンが「ポンデ♪ポンデ♪」といいながらポンデの部分をくるくる回してるプログr(ry (&new{2012/10/11 (木) 19:13:23};)
- ''メルビル'' : なんだそりゃw (&new{2012/10/11 (木) 21:25:04};)
- ''ともぷよ'' : ww (&new{2012/10/11 (木) 21:37:13};)
- ''へっぽこ公太郎'' : 吹いたw ちらつきが気になったけど、5行目のGPAGE 0をGCLS 0の前に移動したうえで、G=!G:GPAGE 0,G*2,!G*2とするとスムーズでした。 (&new{2012/10/12 (金) 00:07:42};)
- ''へっぽこ公太郎'' : ↑手動式のソースについてです。 (&new{2012/10/12 (金) 00:08:23};)
- ''otyaken'' : それは1画面13行プログラムだから仕方無い (&new{2012/10/12 (金) 07:36:43};)
- ''名無しさん'' : 24行(1画面)なら分かるけど13行に拘るのに理由があるの? (&new{2012/10/12 (金) 11:01:26};)
- ''otyaken'' : というより1画面で圧縮したって感じ (&new{2012/10/12 (金) 17:08:21};)
- ''メルビル'' : 意味はありません。なので公太郎氏の言ったことをちょっと考えてみます (&new{2012/10/12 (金) 17:11:41};)
- ''メルビル'' : 意味はありません。なので公太郎さんの言ったことをちょっと考えてみます (&new{2012/10/12 (金) 17:11:41};)
- ''らいむ'' : ポ○・デ・リ○グが回っとるww  発想が面白いですね。 (&new{2012/10/12 (金) 17:42:52};)
- ''メルビル'' : ちなみにこのプログラムは妹に依頼されました (&new{2012/10/12 (金) 18:20:24};)
- ''名無しさん'' : メルさんの妹をください (&new{2012/10/12 (金) 19:15:47};)
- ''メルビル'' : 妹は俺のもの (&new{2012/10/12 (金) 19:23:33};)
- ''名無しさん'' : メルさんがシスコンだったとは (&new{2012/10/12 (金) 20:06:40};)
- '' ''&color(#038499){'''''Lv100'''''};'' '' : メルさんはロリシスコン…? (&new{2012/10/12 (金) 21:47:22};)
- ''ウイング'' : 兄弟愛うらやましい (&new{2012/10/13 (土) 11:45:50};)
- ''メルビル'' : 兄弟愛だとそれホモになっちゃう 兄妹愛ですよね (&new{2012/10/13 (土) 14:52:59};)
- ''ウイング'' : ポンデライオンが「ポンデ♪ポンデ♪」といいながらポンデの部分をくるk(ry (&new{2012/10/13 (土) 19:17:20};)
- ''どらごん'' : …………… (&new{2012/10/25 (木) 17:12:44};)
- ''ともぷよ'' : なんど聞いても面白い!ww (&new{2012/10/25 (木) 19:52:16};)
- ''ウイング'' : 聞く・・・?見るじゃなくて・・・? (&new{2012/10/25 (木) 20:10:36};)
- ''ともぷよ'' : なんど聞いても面白い!ww (&new{2012/10/26 (金) 05:06:15};)
- ''ともぷよ'' : あれ (&new{2012/10/26 (金) 05:07:17};)
- ''ウイング'' : スクリーンショットすごすぎワラタ (&new{2012/10/26 (金) 16:56:16};)
- ''メルビル'' : ワウさんスクリーンショットありがとうございました (&new{2012/10/26 (金) 17:08:04};)
- ''名無しさん'' : ミ○タードーナ○w (&new{2012/12/31 (月) 12:44:36};)
- ''今は名無し'' : ポン◯グールグールwww (&new{2014/01/31 (金) 19:25:53};)
- ''imix'' : ぐーるぐる (&new{2014/01/31 (金) 19:27:32};)
- ''名無しさん'' : SSが3DSのブラウザでx1.5の倍率(最大まで拡大→一回だけ引く)だと速度が遅くなるというおまけつき!(それは3DSのせい (&new{2014/01/31 (金) 19:50:00};)
- ''名無しさん'' : 「簡易的な球を描くプログラム」がこうなったのか。 (&new{2015/06/07 (日) 16:17:35};)

#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