http://w.atwiki.jp/fortebx/ fortebx@Wiki ja 2007-03-24T15:33:54+09:00 1174718034 https://w.atwiki.jp/fortebx/pages/17.html <h2>SetConsoleTitle</h2> <p>コンソールのタイトルを変えます。それだけです。</p> <h3>スクリーンショット</h3> <img src= "http://f.hatena.ne.jp/images/fotolife/f/fortebx/20070317/20070317184946.png"> <h3>ソースコード</h3> <textarea cols="60" rows="7"> A=「あいうえお」 lpConsoleTitle=POINTER(A) SetConsoleTitle(lpConsoleTitle) ●SetConsoleTitle(lpConsoleTitle) =DLL("kernel32.dll", "DWORD SetConsoleTitleA( LPTSTR lpConsoleTitle, // 設定する文字列のポインタ )") </textarea> 2007-03-24T15:33:54+09:00 1174718034 https://w.atwiki.jp/fortebx/pages/16.html <h2>逆ポーランド記法で書いた式を計算</h2> <p> 逆ポーランド記法で書いた式を計算するプログラムです。</p> <h3>ソースコード</h3> <textarea cols="60" rows="20"> //逆ポーランド記法で書いた式を計算 STACKとは配列 top=0 計算文字列="123 654 + 223 + 6777 + 7000 -" ((計算文字列)の「 」を改行へ置換)を反復 対象で条件分岐 "+"ならば、(POP+POP)をPUSH "-"ならば、(-POP+POP)をPUSH "*"ならば、(POP*POP)をPUSH "/"ならば、(1/POP*POP)をPUSH 違えば、対象をPUSH 「{計算文字列} = {POP}」を表示 // ＊PUSH(Sを) STACK[top]=S top=top+1 ＊POP top=top-1 STACK[top]で戻る </textarea> 2007-03-23T20:35:07+09:00 1174649707 https://w.atwiki.jp/fortebx/pages/15.html <h2>ポケモンの画像を表示</h2> <!-- shinobi ct1 --> <script type="text/javascript" src="http://ct1.sankinkoutai.com/sc/0710991"> </script> <noscript><a href="http://ct1.sankinkoutai.com/gg/0710991" target= "_blank"><img src="http://ct1.sankinkoutai.com/ll/0710991" border="0" alt= "カウンター"></a><br> <span id="NINCT1SPAN0710991" style="font-size:9px">[PR] <a href= "http://www.ninja.co.jp/analyze/" target= "_blank">アクセス解析</a></span></noscript> <!-- /shinobi ct1 --> <br> <p>図鑑ナンバー　or ポケモン名を入力し、Enterキーを押すとそのポケモンを表示するプログラムです。ちなみに、図鑑ナンバー　or ポケモン名の前に「r/」を足すと色違いを表示(例えば:"r/アルセウス")します。少し省略(例えば：アルセウス⇒アルセ)しても(たぶん)大丈夫です。</p> <br> <h3>スクリーンショット</h3> <br> <img src= "http://www20.atwiki.jp/fortebx?cmd=upload&amp;act=open&amp;pageid=15&amp;file=temp.png"> <br> <!--<h3>ダウンロード</h3> <br>--> <br> <b><a href= "http://www20.atwiki.jp/fortebx?cmd=upload&amp;act=open&amp;pageid=15&amp;file=pokemon.lzh"> ダウンロード</a></b><br> <br> <h3>ソースコード</h3> <br> <textarea cols="60" rows="20"> //ポケモンの(ry //ver.3.141592 /* http://www.poke- 2007-03-23T20:33:19+09:00 1174649599 https://w.atwiki.jp/fortebx/pages/12.html **メニュー -[[トップページ>トップページ]] -なでしこ //--[[自作関数]] --自作プログラム ---[[ポケモンの画像を表示>program_no1]] ---[[逆ポーランド記法で書いた式を計算>program_no2]] --CNAKO関連 ---[[SetConsoleTitle>cnako_no1]] ---[[SetConsoleTextAttribute>cnako_no2]] -[[メニューの編集>http://www20.atwiki.jp/fortebx/?cmd=edit&page=%E3%83%A1%E3%83%8B%E3%83%A5%E3%83%BC]] //--- 2007-03-24T15:21:16+09:00 1174717276 https://w.atwiki.jp/fortebx/pages/11.html *fortebx@Wiki トップページ **このWikiについて このWikiはfortebxのWikiです。 2006-12-17T16:28:40+09:00 1166340520