ポケモンの画像を表示

図鑑ナンバー　or ポケモン名を入力し、Enterキーを押すとそのポケモンを表示するプログラムです。ちなみに、図鑑ナンバー　or ポケモン名の前に「r/」を足すと色違いを表示(例えば:"r/アルセウス")します。少し省略(例えば：アルセウス⇒アルセ)しても(たぶん)大丈夫です。

スクリーンショット

ダウンロード

ソースコード

//ポケモンの(ry //ver.3.141592 /* http://www.poke-mon.jp/pokemon/images/{}.png http://www.poke-mon.jp/pokemon/images/r/{}.png */ !母艦設計=「母艦の可視はオフ」 母艦のタイトルは「」 母艦のスタイルは「ダイアログスタイル」 A=40//75 ダイアログ数値変換=0 経過ダイアログ=0 ポケモンハッシュとはハッシュ ポケモンハッシュ=「pokemon_list_2.txt」を読む ポケモンリストとは配列 ポケモンリスト=「pokemon_list_3.txt」を読む 保存フォルダ=「{母艦パス}pokemon\」 保存フォルダr=「{母艦パス}pokemon\r\」 母艦のクライアント幅は80 母艦のクライアント高さは110 もし、(「{保存フォルダ}」のフォルダ存在=0)ならば 「{保存フォルダ}」のフォルダ作成 もし、(「{保存フォルダr}」のフォルダ存在=0)ならば 「{保存フォルダr}」のフォルダ作成 ナンバーエディタとはエディタ その幅はA*2 その位置は「0,0」 その高さは20 そのキー押した時は もし、(ナンバーエディタの押された仮想キー=13)ならば 画像表示処理 /*おkボタンとはボタン その位置は「{A},0」 その高さは20 その幅はA そのテキストは「OK(&O)」 そのクリックした時は 画像表示処理*/ ポケモンイメージとはイメージ その透明化は1 その高さは70 その位置は「0,20」 その幅はA*2//母艦のクライアント幅 //そのテキストは「」 母艦を中央移動 母艦の可視はオン ＊画像表示処理 /* r/アルセ ダークラウ */ //「おｋ」と言う 表示ポケモン=ナンバーエディタのテキスト もじかず=表示ポケモンの文字数 /*もし、(もじかず<3)ならば ナンバーエディタのテキスト=ナンバーエディタのテキストを3でゼロ埋め*/ バイトかず=表示ポケモンのバイト数 色違いか=表示ポケモンで"r/"を文字検索 もし、(バイトかず<>もじかず)ならば もし、(色違いか<>0)ならば //色違い temp=表示ポケモンの「r/」を「」へ置換 temp=ポケモンハッシュ@「{tempでピックアップ}」 表示ポケモン=「r/{temp}」 違えば 表示ポケモン=ポケモンハッシュ@「{表示ポケモンでピックアップ}」 もし、(「{保存フォルダ}{表示ポケモン}.png」の存在=0)ならば エラー監視 「http://www.poke-mon.jp/pokemon/images/{表示ポケモン}.png」から「{保存フォルダ}{表示ポケモン}.png」へHTTPダウンロード エラーならば 「Error!」と言う 戻る 母艦のタイトルは「{表示ポケモン}」 ポケモンイメージの画像は「{保存フォルダ}{表示ポケモン}.png」 ＊ピックアップ(Sを|Sで) ポケモンリストの0からSを表ピックアップ それ[0]で戻る