プチコンまとめArchive

投稿プログラム : 濁点わけプログラム

パンくずリスト

このページの最終更新 : 2022/09/20 (火) 12:43:54
公式アーカイブのリンク:http://wiki.hosiken.jp/petc/html/Toukou/C2-F9-C5-C0-A4-EF-A4-B1-A5-D7-A5-ED-A5-B0-A5-E9-A5-E0-.html

2013年2月23日投稿 / 投稿者 : yuy@さん / タグ : 投稿プログラム 実用ツール QRコード 初代対応

概要

初投稿です。ＵＤ＄に代入したテキストを濁点／半濁点とそのほかのテキストと分けて、 ＰＲＩＮＴ　ＵＰ＄：ＰＲＩＮＴ　ＤＯＷＮ＄で、濁点／半濁点入のテキストを違和感なく出力できるプログラムです。 ドラクエみたいになりますがな。

警告

はじめにフォントの濁点／半濁点が右下に無いといけません。

  • なので、プログラムで定義するか、上の警告に沿ったフォントをロードするかして下さい。

手順

  1. 上の警告に沿ったフォントデータを用意する。
  2. ＡＰＰＥＮＤ命令で、このプログラムを読ませる。
  3. ＵＤ＄に、濁点／半濁点で1文字使いたくないテキストを入れて下さい。
  4. ＠ＵＰＤＯＷＮサブルーチンを呼び出してください。
  5. ＰＲＩＮＴ　ＵＰ＄：ＰＲＩＮＴ　ＤＯＷＮ＄と入力したらＯＫ！

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

動作しているところを撮影した写真や動画があれば貼り付けてください。

QR コード

ないので打ち込んでちょ。

プログラムリスト

  1. ＠ＵＰＤＯＷＮ
  2. ＵＰ＄＝””：ＤＯＷＮ＄＝””
  3. ＦＯＲ　Ｉ＝０　ＴＯ　ＬＥＮ（ＵＤ＄）－１
  4. ＵＰ＄＝ＵＰ＄＋”゛”＊（ＭＩＤ＄（ＵＤ＄，Ｉ，１）＝＝”゛”）
  5. ＵＰ＄＝ＵＰ＄＋”゜”＊（ＭＩＤ＄（ＵＤ＄，Ｉ，１）＝＝”゜”）
  6. Ｆ１＝（ＭＩＤ＄（ＵＤ＄，Ｉ，１）＝＝”゛”）ＯＲ（ＭＩＤ＄（ＵＤ＄，Ｉ，１）＝＝”゜”）ＯＲ（ＭＩＤ＄（ＵＤ＄，Ｉ＋１，１）＝＝”゛”）ＯＲ（ＭＩＤ＄（ＵＤ＄，Ｉ＋１，１）＝＝”゜”）
  7. Ｆ２＝（ＭＩＤ＄（ＵＤ＄，Ｉ，１）＝＝”゛”）ＯＲ（ＭＩＤ＄（ＵＤ＄，Ｉ，１）＝＝”゜”）
  8. ＵＰ＄＝ＵＰ＄＋”　”＊！Ｆ１
  9. ＤＯＷＮ＄＝ＤＯＷＮ＄＋ＭＩＤ＄（ＵＤ＄，Ｉ，１）＊！Ｆ２
  10. ＮＥＸＴ
  11. ＲＥＴＵＲＮ

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

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

  • 名無しさん : これに対応したフォントデータもセットにして公開して欲しい (2013/02/23 (土) 13:10:56)
  • yuy@ : わかりました。しかしQRコード作れないのは痛いです…。 (2013/02/23 (土) 13:20:16)
  • J2 : UD$="":DOWN$="" の初期化も必要じゃ (2013/02/23 (土) 13:53:04)
  • yuy@ : しまった！すいません。更新します (2013/02/23 (土) 16:14:35)
  • 田中(天才) : QRは公式サイトで作れるよ あとフォント欲しい (2013/02/23 (土) 23:13:02)
  • 本当に申し訳ありません : 今回、この投稿を荒らしてしまい、本当にすいませんでした。これからはもうやりません。ご迷惑をおかけし、本当にすいませんでした。 (2013/02/24 (日) 23:06:11)
  • yuy@ : ↑何したんだオマエ。 (2013/03/20 (水) 17:27:24)
  • 通りすがりの何か : ↑意見・要望スレを参照。 (2013/03/20 (水) 18:11:33)
  • jun : ありがとう。濁点、半濁点を分けるプログラムを考えていて自分では上手くいかず、悩んでいました。 (2014/01/02 (木) 01:49:26)
  • jun : ありがとう。濁点、半濁点を分けるプログラムを考えていて自分では上手くいかず、悩んでいました。 (2014/01/02 (木) 12:39:53)