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

投稿プログラム : 10桁までの整数をカウント

2012年4月22日投稿 / 投稿者 : 三毛乱ジェロ / タグ : 投稿プログラム QRコード mkII専用 ルーチン

概要

10桁までの整数をカウントするプログラムです。
ルーチンそのものはフリーとしますので、皆様のプログラムのスコアなどに役立てて頂きたいと思ってます。

仕組み

数値が100000を越えた場合、
「100000を引いて」
「100000の位のカウントに1を足す」
という至極シンプルな事をしています。
これを2つ以上繋げれば20桁だろうが30桁だろうが制御は可能です。
※H$、C$と文字列を2種類用意してあるのは「例えば100201の場合、1と201なので表示が1 201となってしまうのを防ぐ為0で埋めている」ように見せかけている為です。

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

QR コード

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

PRG:10MSMPL
1/1
qr0.png

プログラムリスト

  1. CLEAR:ACLS:H=100000:C=0:C1=0
  2. H$=”     00000”
  3. C$=”          ”
  4. FOR I=0 TO 1:I=0
  5. C=C+23
  6. IF C>=H THEN C=C−H:C1=C1+1
  7. S$=C$:IF C1!=0 THEN S$=H$
  8. X$=””
  9. IF C1!=0 THEN X$=STR$(C1)
  10. Z=LEN(X$)
  11. S$=SUBST$(S$,5−Z,Z,X$)
  12. X$=STR$(C):Z=LEN(X$)
  13. S$=SUBST$(S$,10−Z,Z,X$)
  14. LOCATE 0,0:?S$
  15. NEXT

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

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

  • 三毛乱ジェロ : 私の作品Six Rock chain!にも応用したいけどランキングのスコアが6桁しか用意していないので大幅に作り直しになるからどうしようか・・・ (2012/04/22 (日) 22:15:28)
  • 名無しさん : 独り言とは斬新なw (2012/04/22 (日) 23:43:34)
  • up主gj : これで弾幕ゲームの点数のルーチンを練らなくて済むthx (2012/04/23 (月) 18:58:32)
  • コロ助 : スゴいナリ ワガハイ気に入ったナリ! (2012/04/23 (月) 19:18:01)
  • 名無しさん : up主って名前は誤弊があるからやめた方が良い (2012/04/23 (月) 19:26:27)
  • 名無しさん : 普通に 投稿者 でいい (2012/04/27 (金) 16:50:37)
  • 名無しさん : RIGHT$を使えば、もっとシンプルに書けそうですよ。 (2012/04/28 (土) 00:08:39)
  • yyo : いいね( ´∀`)! (2012/07/29 (日) 16:30:18)
  • 田中 : スコアに使える (2012/10/13 (土) 14:01:04)

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