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

投稿プログラム : ポ○デグルグル

パンくずリスト

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

概要

例のドーナツがグルグル回ります。

スクリーンショット

ポンデグルグル アニメGIF.gif

QR コード

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

手動式全自動
qr1.pngqr0.png

手動式グルグル

#basic{run}

  1. ACLS:CLEAR:PNLTYPE”PNL”:A=32
  2. GPAGE 1GCIRCLE A,A,A,43
  3. GPAINT A,A,43B=16C=64P=PI()
  4. GCIRCLE B,B,4,15GPAINT B,B,15
  5. GPAGE 0FOR I=0TO 1GCLS 0
  6. FOR J=TX TO 2*P+TX STEP P/4
  7. X=COS(J)*80+96Y=SIN(J)*40+C
  8. GCOPY 1,0,0,C,C,X,Y,0NEXT
  9. FOR J=TX TO 2*P+TX STEP P/4
  10. X=COS(J)*80+108Y=SIN(J)*40+76
  11. GCOPY 1,12,12,20,20,X,Y,0
  12. NEXT:FOR J=0TO TX==−TCHX/C
  13. J=0NEXT:TX=−TCHX/C:I=0NEXT

全自動グルグル

  1. ACLS:CLEAR:A=32B=16GPAGE 1
  2. GCIRCLE A,A,A,43GPAINT A,A,43
  3. P=PI()GCIRCLE B,B,4,15
  4. GPAINT B,B,15GPAGE 0
  5. R=RAD(45):Q=R/16FOR I=0 TO 1
  6. FOR J=0 TO R−Q STEP Q:GCLS 0
  7. FOR K=J TO 2*P+J STEP P/4
  8. X=COS(K)*80+96Y=SIN(K)*40+64
  9. GCOPY 1,0,0,64,64,X,Y,0NEXT
  10. FOR K=J TO 2*P+J STEP P/4
  11. X=COS(K)*80+108Y=SIN(K)*40+76
  12. GCOPY 1,12,12,20,20,X,Y,0
  13. NEXT:WAIT 1NEXT:I=0NEXT

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

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

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

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