• アニメーション制作に関するものは、作り方解説ページにあります。

自作プログラムの紹介 Visitor No. 20959 : 28 : 11

• Free ware Freeware フリーウェア フリーソフト
• プログラミング経験、8bit機のBasicで3年ほど、その後いわゆる8bitのDOSであるCP/M-80v2.0で、Turbo Pascalを使い始めて、20年超。今のDelphiは、Turbo Pascalの後継です。最近のお勧めは、ウソE-mailアドレス1000個発生機。役に立たないものもあります。余談ですが…8bit 4MHz時代からまったく同じ作業のプログラムを走らせるんです。川口洋一郎氏のデンデンムシみたいなCG(Illustration参照)を線だけで構成されたもので描くだけなんですが、約24時間かかった作業が、i486-33MHzで25秒でした。今では1秒未満ですね…。画面最大に描いたら、1秒越えた。今後Virsion Upする可能性の或るものには★を付けました。
• 品目(◎:人から少しは役立つという評価を受けたもの ○:自分では役立つと思っているもの △:役に立たない飾り □:ゲーム類)

(1)終了することだけが目的の遊びプログラム

• 最初はWindows3.1の頃にDelphi1.0で製作。その後2.0以降でコンパイルしなおしています。何をするわけでもないので終了してください。Win98あたりまでは、マウスクリックで終了できましたが、WinMe以降は、無理でした。マウスクリックによる終了をあきらめる時は、[Alt]+[F4]で終了してください。
• Down Load

(2)Ten Holes(ブルースハープ)の楽譜生成(数字譜)

• 10穴ハーモニカの練習にどうぞ......どうも...頭の中で「おたまじゃくし」と「そのシッポ」と「吹く吸う」を判断しながら練習するのはとても大変。以下のサンプルはStar Warsメインテーマの楽譜です----は伸ばす長さ、(　)内は、何番目を吹くか吸うかの指示です。テキスト形式で出力しますので。MSワードか何かを利用して印刷してください。サンプルで、前述のものと、インディ=ジョーンズをZip Fileに梱包してあります。マイナーキーの10穴にも対応しています。

《これでも楽譜》
ド(４:ふ)---ソ(６:ふ)---ﾌｧ(５:す)ミ(５:ふ)レ(４:す)
ド(７:ふ)--ソ(６:ふ)-ﾌｧ(５:す)ミ(５:ふ)レ(４:す)
ド(７:ふ)--ソ(６:ふ)-ﾌｧ(５:す)ミ(５:ふ)ﾌｧ(５:す)レ(４:す)-----

• ハーモニカの穴になる部分などを1回クリックすると、それに対応した「ド(４:ふ)」などが１つ出力されます。そんなにややこしいものではないと思いますので適当に使って、慣れてください。また、ハーモニカのケツに貼り付ける数字のラベルを追加しました(2006/06/14)。
• Down Load

(3)年齢計算とカレンダー(事務用品)

• 医療や福祉や学校の現場では元号の変換やら年齢を知りたい。乳幼児を扱う現場では、才ヶ月表記だったりと面倒くさい計算をやってくれます。干支も学年もでます。私の職場では、アイコンから「馬場さんを使う」といってます。薬屋さんとかが、お医者さんのところへ、この手の早見表のついた下敷きや定規とか持ってきます。それのようなものです。
• Down Load

(4)15パズル(25年くらい前の雰囲気のプログラム)

• その１：8bitのスイッチ-オン-Basicの時代を懐かしみたい人に最適のせこいプログラム。1-15を並び替えるんですが、Key入力のみの操作になります。画面スクロール機能がまだついていないので、カーソルが行方不明になりますが、終了は、off [Enter]です。
• Down Load
• その２：とりあえずマウスも使えて時間も表示される版です。必要最低限の機能で軽くしてあります。数字を識別しやすいように行ごとに色を変えてあります。お褒めの言葉も出ます。
• その３：もう1つの15パズルは、プログラム自体はその２と同じものですが、Skin(皮)が違う版です。久しぶりに、座標使って絵を描きました。明治製菓が森永製菓でこのプログラム買ってくれないでしょうかね......イラストのページを参照してください。V2はどこが違うのか？って年中頻繁に使えば違いがわかります。最初の起動でも変化が現れることも1/20の確率であります。
• ついでに、私の15パズルは、列をまとめて2個3個移動できます。現物のパズルではそのように移動できるし、通常は、まとめて移動したりすると手っ取り早いので、そのようにプログラムしてあります。
• Windowsっぽい高速版 Down Load(4つの解答対応版)
• チョコレート版V2 Down Load(4つの解答対応版)
• 
• なお、プログラムしていませんが、可能な並べ方は他にもあります。不可能が証明されている14と15を入替えた場合、不可の配列にできます。

(5)ルートあるいは平方根の筆算をやってみよう！

• というわけで、アイコンにも工夫を凝らしてルート５をデザインしてみました。これは、あるとき、Niftyの教えてくださいのコーナーにルートの筆算を教えて欲しいという書き込みがあって10日ほどがんばってつくってみた作品です。教えて欲しかった人に、芸術的という評価をいただきました。使ってくれるのは数学の先生くらいでしょうか？ プログラムの中身は250桁のそろばんを４つ準備してひたすら筆算による開平法を実行させています。サンプルの1000桁は、2000桁のそろばんを設定して作業しているだけです。
  • 2の平方根の筆算の概観
  • 2の平方根の筆算の印刷用画像
  • 元のテキスト
  • ちょっと変更すると1000桁でも求められます
• Down Load

(6)数独を解かせてみよう！

• zipに梱包されているファイルにも書きましたが、これで、楽をして懸賞に応募して、あたる人がいるとくやしいので、回数制限を設定してあります。
• http://www.ri-center.tsukuba.ac.jp/~kurata/nplc/
• このサイトの問題が解けなかった。解法としては、私のプログラムの場合、無理が生じると、空白が出現する。それを使って、(1)問題の入力、(2)解1、解2、OK?ボタンで、進めるだけ進む。変化がなくなったら、(3)一旦保存。複数候補が残っているところで、順に、数字を入れて(2)に戻る。空白が生じるなら、(3)を呼び出して、その数字は、そこのコマから排除、(3)からやり直す。(2)の繰り返しで変化がない時には、(3)を呼び出して、次の数字で同じことを繰り返す。という手順でどれも解ける。まぁ....そのうちプログラムしましょう。時間がかかるのに、なぜ解ける様子を表示するのか？それも、ボタンを何度も押させて...と思う人もいるでしょう.....自分がたのしいからです。映画「マトリックス」の降ってくる文字みたいなものです。
• ソースファイルを見たい人がいるようなので公開します。基本的な解法はActionExecuteに記述しています。
• ソースファイル
• Down Load

(7)銀行でお金をおろす時、必要な小銭の数を求める(事務用品)

• これは、銀行にお金を引き出しに行くときに支払い先ごとに、小銭をバラバラで用意しなければならない時に使うプログラムです。
• Down Load

(8)ポケモン金銀save file改造プログラム

• これは、金銀版のsave fileを改造するプログラムです。save fileは、ゲームユーザーの著作物です。メーカーの著作物ではありません。どう書き換えようが勝手です。これを使って、ミュウもセレビィもそれらの色違いもいっぱい配布しました。ボックス単位で改造するソフトも作り、無償で配布することを条件に一人に30匹づつ渡したりのイベントも開催しました。もうカセットも電池切れですね。使い方は、save fileがあるフォルダーに一緒に入れて起動してください。あとは、適当に使ってみてください。念のため、save fileのコピーをとっておいてください。エラー処理はしていませんので、保存などしっかり確認しながらソフトを使ってください。変異体とは、赤いギャラドスみたいなものです。ミュウなら青、セレビイならピンク、黄花フシキバナなど楽しめます。
• Down Load
• これは、プログラムではないんですが、ポケモン金銀以降に出てくるアンノーン(安穏ではなくunknown)のTTフォントです。使い方については質問しないでください。全種類を画像として参照し、TT-Editorで作ったものです。
• - Unknown TTF Down Load
• Official"?!"version 2

(9)ウソE-Mail発生機 DM業者にレジスタンス！

• E-mail アドレスを検索収集しているロボットにウソのアドレスを拾わせるためのプログラム。あなたのWebsiteにも1ページをさいていただき1000のウソアドレスをupLoadしてください。この@wikiモード対応書式付のものと外国のお友達に紹介してもらって協力を得るためのHTML版のみのものと、2種類のプログラムを用意しました。
• Uso-mail サンプルページ。
• @wiki版付のDown Load
• HTML版のみのDown Load
  • こっちのほうは外国のお友達などにも紹介してください。

(10) 電話番号を素因数分解するソフト。

• 電話番号は、据置き限定です。10桁といっても、0で始まるので実質9桁。プログラムの結果を保存します
• たとえば、ソフトの完成した日付8桁を実験すると、

2 ) 20080528
2 ) 10040264
2 ) 5020132
2 ) 2510066
13 ) 1255033
29 ) 96541
3329
20080528 = 2 × 2 × 2 × 2 × 13 × 29 × 3329

• このように出力されます。
• Down Load

(11)「よくできました」

• これといって目的のないソフトです。これは、職場の不規則勤務の入力支援ソフトを作ったときに勤務表作成者の労をねぎらう目的で作った冗談です。pascal講座の三角関数で桜を描く元ネタのソフトです。桜に月桂冠に花丸....なんか変な花丸がでますが、そこは、単なる冗談のソフトですから......
• こんな感じです。桜 花丸 月桂冠
• Down Load

(12)ユニバーサルデザインを目指したオセロ盤

• これは、コンピュータ対戦ではありません。タッチパネルパソコンで対人対戦するものです。もちろんタッチパネルでなくても使えますが...
• 実際の使用の具合では、手が不自由な場合、画面上を自由に行き来するのは困難である。
  • 人差し指1本だけ立てることができない場合、他の指であちこち触ってしまう。
  • この解決は、利き手側の画面の隅にコントロールを集中してしまう。候補を順に移動しながら、また、とめた部分でそれを確定するボタンをそれぞれ設定する。
  • また、そのうち......これはこれとして、type Bを作りましょう。
• Down Load

(13) サイクロイド曲線

• 8bit機の頃を懐かしんで作った三角関数の遊び。スピログラフなんかが好きな人には興味のあるものかもしれません。win3.1に移行して2つめに、Delphiで最初に作ったグラフィックのプログラム
• 印刷や多重描きの機能を付加(2010/2/3)
• Down Load

(14)音楽コードずらし参照表

• 表題のとおりです。ギター弾くのに、このKeyは難しいから、半音さげてとか言うときに楽譜に変調したキーコードを書きますね。その時の参照物です。
• Down Load

(15)おどろき盤製作補助ツール

• おどろき盤を製作するときに11コマ13コマ14コマなどの配分をする道具。結果を印刷して、下敷きにして動画を作ってください。
• Down Load

(16)シネカリもどき作画ツール

• 詳細は絶滅危惧種を参照してください。
• Down Load

(17)エクセルグラフで絵を作る道具　Drawing with MS-Excel Chart

• MS-Excelの折れ線グラフを使って絵を描くための補助道具。ここを参照
• This program will make you to draw a picture with MS-Excel chart.Cf: This Page
• Down Load(With English Manual,日本語取説付、ソフトの日本語化も可能)

(18)スピログラフ Spirograph, Spiro Graph

• サイクロイド曲線のところにスピログラフという言葉をかいたので、検索で探しにくる人がいます。そんな訳で作ってみました。騙し絵的に見えるものを...高画質印刷機能と画像保存機能をつけました。(2010/1/6) 歯車3個版も更新しました。G2<G3もはみ出さずに描ける様にしました。さらに更新。日本語説明付。
• 解説のページ
• Both Nomal type & 3 Gears type with English Manual.(2010/1/9)
• 
• Down Load-Nomal type V1.3 日本語表示可
• Down Load-Nomal type V1.9 日本語表示不可
• 
• Down Load-with 3 gears type Manual(in English)(日本語版)
• Down Load-with 3 gears type Program v2.3 日本語表示不可
• - -

(19)interNet Reversi Faker

• This is an animation tool.
• Down Load

(20)雪の結晶 Snow Flake Generator

• 雪の結晶をデザインするプログラム。基本形は私の好みで決めてますので似たような形のものしか出現しません。雪印のマークに似たものです。最大の問題点は、今の画面のデータが画像として保存される訳ではないことです。どのボタンもクリックする度に新しいものを作ってしまいます。私のプログラムは、一旦出来上がると余り改善しないでそのままになってしまう事が多いのですが、この点だけは何とかしたいと思います。一度つくるとそのままになってしまう最大の理由は、無計画で、試行錯誤を繰り返しつぎはぎだらけのプログラムを作ってしまうので自分自身が流れを理解できなくなってしまうためでしょう…多分。
• Down Load

プログラムの感想などありましたらご記入ください。

• 感想に限らず簡単に出来そうで便利なデスクトップ上のプログラムなどご希望がありましたら書いてください。実現できそうなものの場合このページは、しばらく停止します。その間に考え中。また、私の数独を解くプログラムで解けない問題があったら、ここに掲示してください。空欄は+なんかをいれてください。

• ポケモンのファイルが開こうとしてもファイルがないか壊れているなどで開けません(*_*)ダウンロードして開くと押しても開けませんでした↓↓ -- serebyi (2007-09-29 11:54:15)
• エミュレーターにNo$Gmbを使用している場合、Save fileの使わないエリアを保存しないためにsave fileのサイズが足りずに開けない問題が発生します。金銀版のsavは、32,812 バイトあるか確認してみてください。また、VisualBoyAdvanceのものは問題なく改造できます。 -- morisawa (2007-10-21 14:48:41)
• ポケモンのセーブファイルはどうやってパソコンにいれるんですか -- よしひで (2007-10-21 20:52:48)
• GB X-changerという機械で接続しますが今は売っていません。
  また、GBAとPCをLinkするCableを以下のWebsiteから買えますが、これで、GBCのR/Wができるか不明です。
  http://www.importya.com/Game/game.html
  -- morisawa (2007-10-26 18:46:56)
• ?|?P????????O?????̎g?????܂蕪???炈???̂ŁA?g?????????Ă??????? -- ?_???C (2009-03-13 22:08:04)
• しになにしにはよに -- わえゆや (2009-03-15 19:18:55)
• アンノーンのフォントダウンロードしました。
  なかなか面白いですね。
  ちなみに、ダイパプラチナで、!と?のアンノーンの形状が公式に作られています。
  できればそっちのデザインに近い奴がいずれ出ると良いなと思いました。
  失礼な事言ってご免なさい。 -- 名無しさん (2009-05-18 04:14:03)
• ダイパプラチナって知りません。普通にゲームをする子どもの相手をする仕事だったので、クリスタルあたりまで、解析しましたが、その後転勤でTVゲームから離れています。
  もともと、根性なくて簡単なシューティング程度しかやらないものですから....
  サンプルの在りかを教えていただければversion2にしますが.... -- morisawa (2009-05-26 22:18:38)
• ホテル行く前に外で2発イカせてもらいますた！　http://ston2emlstarn2ecom/413449535 -- てれれん (2009-06-03 15:31:04)
• 上記のような書き込みロボットが勝手に宣伝を書き込むので、対策として、しばらく、書き込みを停止します。管理者宛にメールください。

• Page Top
• Top Page