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

投稿プログラム : インチキ手書き入力

パンくずリスト

2012年01月23日投稿 / 投稿者 : 名無しさん / タグ : 投稿プログラム 非実用ツール QRコード

概要

手書き入力ですがインチキです。

下画面の枠の中に数字を書くと上画面に認識された文字が表示されます。

Ｂボタンでクリア、Ｘボタンで終了。

枠外へのはみ出し、認識失敗時の処理は入れておりません。

履歴

2012/01/23

初版

2012/02/12

最大パターン数を変数(PMAX)に

パターンと一致しない場合1秒後に下画面をクリア、上画面に「？」を表示、BEEPを追加

認識パターン数を10追加

変更箇所

（2012/03/02追記：変更箇所を赤文字にしました）

6、31、32、82行目：変数PMAX追加による変更

46〜55行目：認識パターンの追加

74、75、77行目：認識失敗処理追加による変更

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

まだありません。

QR コード

ファイル名(TEGAKIN)
s_qr0.png

プログラムリスト

  1. ＣＬＳ：ＧＣＬＳ：ＣＬＥＡＲ
  2. ＰＮＬＴＹＰＥ　”ＯＦＦ”
  3. ＢＧＰＡＧＥ　１
  4. ＧＰＡＧＥ　１
  5. ＣＬＳ：ＧＣＬＳ
  6. Ｃ＝１０：ＰＭＡＸ＝２０
  7. ＦＯＲ　Ｉ＝１２　ＴＯ　１９
  8. ＢＧＰＵＴ　１，Ｉ，５，７６８＋３５，Ｃ，０，０
  9. ＢＧＰＵＴ　１，Ｉ，１８，７６８＋９９，Ｃ，０，０
  10. ＮＥＸＴ
  11. ＦＯＲ　Ｊ＝６　ＴＯ　１７
  12. ＢＧＰＵＴ　１，１１，Ｊ，７６８＋６６，Ｃ，０，０
  13. ＢＧＰＵＴ　１，２０，Ｊ，７６８＋６８，Ｃ，０，０
  14. ＮＥＸＴ
  15. ＢＧＰＵＴ　１，１１，５，７６８＋３４，Ｃ，０，０
  16. ＢＧＰＵＴ　１，２０，５，７６８＋３６，Ｃ，０，０
  17. ＢＧＰＵＴ　１，１１，１８，７６８＋９８，Ｃ，０，０
  18. ＢＧＰＵＴ　１，２０，１８，７６８＋１００，Ｃ，０，０
  20. ＦＯＲ　Ｉ＝１　ＴＯ　６
  21. ＲＥＡＤ　ＣＸ（Ｉ），ＣＹ（Ｉ）
  22. ＮＥＸＴ
  24. ＤＡＴＡ　９６，４８
  25. ＤＡＴＡ　１２８，４８
  26. ＤＡＴＡ　９６，８０
  27. ＤＡＴＡ　１２８，８０
  28. ＤＡＴＡ　９６，１１２
  29. ＤＡＴＡ　１２８，１１２
  31. ＤＩＭ　ＰＴＮ（ＰＭＡＸ），ＰＴＮ＄（ＰＭＡＸ）
  32. ＦＯＲ　Ｉ＝０　ＴＯ　ＰＭＡＸ−１
  33. ＲＥＡＤ　ＰＴＮ（Ｉ），ＰＴＮ＄（Ｉ）
  34. ＮＥＸＴ
  36. ＤＡＴＡ　０，２１３５６４２０
  37. ＤＡＴＡ　１，２４６０
  38. ＤＡＴＡ　２，１２４３５６０
  39. ＤＡＴＡ　３，１２４３４６５０
  40. ＤＡＴＡ　４，１３４０２４６０
  41. ＤＡＴＡ　５，１３４６５０１２０
  42. ＤＡＴＡ　６，２１３５６４３０
  43. ＤＡＴＡ　７，１３０１２４６０
  44. ＤＡＴＡ　８，２１３４６５３４２０
  45. ＤＡＴＡ　９，２１３４２４６０
  46. ＤＡＴＡ　０，１３５６４２１０
  47. ＤＡＴＡ　１，１３５０
  48. ＤＡＴＡ　２，１２４６５６０
  49. ＤＡＴＡ　１，２４３５０
  50. ＤＡＴＡ　４，１３４０２４３５０
  51. ＤＡＴＡ　４，１３５６０２４６０
  52. ＤＡＴＡ　６，１３５６４３０
  53. ＤＡＴＡ　７，１２４３５０
  54. ＤＡＴＡ　７，１３１２４６０
  55. ＤＡＴＡ　９，２１２４６０
  57. ＠ＬＯＯＰ
  58. ＩＦ　ＢＵＴＴＯＮ（）＝＝６４　ＴＨＥＮ　ＥＮＤ
  59. ＩＦ　ＢＵＴＴＯＮ（）＝＝３２　ＴＨＥＮ　ＧＣＬＳ：ＣＬＳ：ＷＫ＄＝””
  60. ＧＯＳＵＢ　＠ＤＲＡＷ
  61. ＶＳＹＮＣ　１
  62. ＧＯＴＯ　＠ＬＯＯＰ
  66. ＠ＤＲＡＷ
  67. ＯＴＭ＝ＴＭ
  68. ＯＴＳ＝ＴＳ
  69. ＴＳ＝ＴＣＨＳＴ
  70. ＯＮＴ＝ＴＳ　ＡＮＤ（ＯＴＳ＝＝０）
  71. ＯＦＴ＝ＯＴＳ　ＡＮＤ（ＴＳ＝＝０）
  72. ＯＴＸ＝ＴＸ：ＯＴＹ＝ＴＹ
  73. ＴＸ＝ＴＣＨＸ：ＴＹ＝ＴＣＨＹ
  74. ＩＦ　６０＜ＯＦＣ　ＡＮＤ　ＷＫ＄！＝””　ＴＨＥＮ　ＢＥＥＰ　４：ＷＫ＄＝””：ＧＣＬＳ：？”？”；
  75. ＩＦ　ＯＮＴ　ＴＨＥＮ　ＯＴＸ＝ＴＸ：ＯＴＹ＝ＴＹ：ＯＦＣ＝０
  76. ＩＦ　ＴＳ　ＴＨＥＮ　ＧＬＩＮＥ　ＯＴＸ，ＯＴＹ，ＴＸ，ＴＹ，１５
  77. ＩＦ　ＴＳ＝＝０　ＴＨＥＮ　ＴＭ＝０：ＯＦＣ＝ＯＦＣ＋１
  78. ＦＯＲ　Ｉ＝１　ＴＯ　６
  79. ＩＦ　ＴＳ　ＡＮＤ（ＣＸ（Ｉ）＜＝ＴＸ）ＡＮＤ（ＴＸ＜ＣＸ（Ｉ）＋３２）ＡＮＤ（ＣＹ（Ｉ）＜＝ＴＹ）ＡＮＤ（ＴＹ＜ＣＹ（Ｉ）＋３２）ＴＨＥＮ　ＴＭ＝Ｉ
  80. ＮＥＸＴ
  81. ＩＦ　ＯＴＭ！＝ＴＭ　ＴＨＥＮ　ＷＫ＄＝ＷＫ＄＋ＳＴＲ＄（ＴＭ）
  82. ＦＯＲ　Ｉ＝０　ＴＯ　ＰＭＡＸ−１
  83. ＩＦ　ＰＴＮ＄（Ｉ）＝＝ＷＫ＄　ＴＨＥＮ　？ＰＴＮ（Ｉ）；：ＢＥＥＰ　９：ＧＣＬＳ：ＷＫ＄＝””
  84. ＮＥＸＴ
  85. ＲＥＴＵＲＮ

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

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

  • 初心者 : うまく動きません。６１行目のOFTって何処で使われているの？ (2012/01/26 (木) 16:11:26)
  • 投稿者 : どのように動かないのでしょうか？認識されなかった筆跡が残っている場合はBボタンでクリア、1が認識されない時は右半分に一本線、他の数字もやや大げさ目に書いて下さい。 (2012/01/26 (木) 16:31:37)
  • 投稿者 : あとOFTは今回は使用していませんが、タッチパネルからペンが離れた瞬間の取得用です。ONT（タッチされた瞬間）との対ですね。 (2012/01/26 (木) 16:34:46)
  • 初心者 : 丁寧にありがとうございました。書き方に問題があったみたいですね．．． (2012/01/30 (月) 14:04:29)
  • まあまあ- : QRコードはありますか？ (2012/03/30 (金) 16:38:23)
  • 名無しさん : 投稿者さんへ。mkIIでも動いたので、QRコード貼っていいですか？ (2012/04/03 (火) 12:57:33)
  • 名無しさん : ↑投稿者さんへ。一応貼っておきました。別に消してもいいですよ。あと、間違っていたらすみません (2012/04/03 (火) 13:34:01)
  • わぁぃ＠ : ↑拡大しておきました。 (2012/04/15 (日) 18:10:36)
  • 名無しさん : ↑ありがとうございます。 (2012/04/15 (日) 19:22:51)
  • 名無しさん : ９と４が識別しにくい (2012/04/16 (月) 19:01:44)
  • 名無しさん : ９が認識されない (2012/04/16 (月) 19:04:20)
  • hata0401 : 認識され寝〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜 (2012/07/21 (土) 21:53:24)
  • 名無しさん : インチキと書いてあるんだから認識されなくても文句言わないw (2012/07/21 (土) 21:55:20)
  • 名無しさん : ↑だったら結局このプログラムって何なんだよwwww (2012/07/21 (土) 22:19:22)
  • 名無しさん : やるじゃない　(アイン風)北斗の拳 (2012/09/05 (水) 17:47:41)
  • ルイージ : マリオのコードとかないですかね (2012/09/09 (日) 17:39:00)
  • ななしさん : どうやって認識してるの? (2012/12/16 (日) 17:12:20)
  • 名無しさん : ↑DATA文から予想すると、左上からタッチパネルを1,2, 3,4, 5,6のエリアに分割して、0はタッチペンを一旦放す、というかたちだと思います。例えば、"1"は縦に1直線なので1→3→5→0　または　2→4→6→0なのだと思います。 (2012/12/16 (日) 18:33:48)
  • a3 : ７があまり認識されませんでした。８回くらい記入してやっと認識しました (2014/08/25 (月) 10:37:37)

表示モード : [ スマホ・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:43:58 (565d) | ログイン
Copyright(C) 2011-2014 プチコンまとめWiki ◆1sxkymI8ji30