トップページ⇒tech
284コメント88KB

なんでもいいからアップして添削してもらうスレ

■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさんNGNG
言語問わず　暇でしょうがない人用
0002デフォルトの名無しさんNGNG
　　　　　　　　　　　　　ヘ(　`Д)ﾉ　きたぁぁぁぁぁぁぁぁぁぁぁー!!!
≡　 　≡　 　≡　 　≡　（　┐ノ
　　　　　　　　　　　:。;　 ／　　　　ﾀﾞｯｼｭ
0003デフォルトの名無しさんNGNG
　　　　　　　　　　　　　ヘ(　`Д)ﾉ　きたぁぁぁぁぁぁぁぁぁぁぁー!!!
≡　 　≡　 　≡　 　≡　（　┐ノ
　　　　　　　　　　　:。;　 ／　　　　ﾀﾞｯｼｭ
0004デフォルトの名無しさんNGNG
　　　　　　　　　　　　　ヘ(　`Д)ﾉ　きたぁぁぁぁぁぁぁぁぁぁぁー!!!
≡　 　≡　 　≡　 　≡　（　┐ノ
　　　　　　　　　　　:。;　 ／　　　　ﾀﾞｯｼｭ
0005デフォルトの名無しさんNGNG
　　　　　　　　　　　　　ヘ(　`Д)ﾉ　きたぁぁぁぁぁぁぁぁぁぁぁー!!!
≡　 　≡　 　≡　 　≡　（　┐ノ
　　　　　　　　　　　:。;　 ／　　　　ﾀﾞｯｼｭ
0006デフォルトの名無しさんNGNG
　　　　　　　　　　　　　ヘ(　`Д)ﾉ　きたぁぁぁぁぁぁぁぁぁぁぁー!!!
≡　 　≡　 　≡　 　≡　（　┐ノ
　　　　　　　　　　　:。;　 ／　　　　ﾀﾞｯｼｭ
0007デフォルトの名無しさんNGNG
　　　　　　　　　　　　　ヘ(　`Д)ﾉ　きたぁぁぁぁぁぁぁぁぁぁぁー!!!
≡　 　≡　 　≡　 　≡　（　┐ノ
　　　　　　　　　　　:。;　 ／　　　　ﾀﾞｯｼｭ
0008デフォルトの名無しさんNGNG
　　　　　　　　　　　　　ヘ(　`Д)ﾉ　きたぁぁぁぁぁぁぁぁぁぁぁー!!!
≡　 　≡　 　≡　 　≡　（　┐ノ
　　　　　　　　　　　:。;　 ／　　　　ﾀﾞｯｼｭ
0009デフォルトの名無しさんNGNG
　　　　　　　　　　　　　ヘ(　`Д)ﾉ　きたぁぁぁぁぁぁぁぁぁぁぁー!!!
≡　 　≡　 　≡　 　≡　（　┐ノ
　　　　　　　　　　　:。;　 ／　　　　ﾀﾞｯｼｭ
0010デフォルトの名無しさんNGNG
　　　　　　　　　　　　　ヘ(　`Д)ﾉ　きたぁぁぁぁぁぁぁぁぁぁぁー!!!
≡　 　≡　 　≡　 　≡　（　┐ノ
　　　　　　　　　　　:。;　 ／　　　　ﾀﾞｯｼｭ
0011デフォルトの名無しさんNGNG
１．緒論
　現代のコンピュータ技術は半導体と電気をベースとしており、
ムーアの法則に従い年々高速化の一途を辿っている。
しかし半導体と電気の性質上、この方式での高速化には限界が
あると言われている。そこで半導体に頼らない様々なコンピュータ
が考案、研究が行われている（このレポート執筆中にIBMが量子
コンピュータの実験に成功したというニュースが入った）。
　ここでは非半導体コンピュータの一つ、光コンピュータに着目し、
その基礎技術となる光論理回路を実験により理解する。
0012デフォルトの名無しさんNGNG
初心者用
0013デフォルトの名無しさんNGNG
スタックとキューの使い方を教えてください
0014デフォルトの名無しさんNGNG
13
int main()
{
return main();
}
0015デフォルトの名無しさんNGNG
　　　　　 (ﾟдﾟ)
ｷｭｰ → @(　 )－
　　　　　　/　> ←ｽﾀｯｸ
0016１NGNG
　　すたっく　　　　　　きゅー
　　　　　　　　　　　　
　　　|＿＿＿＿|　　　　　￣|￣|￣|￣|￣
　　　|＿＿＿＿|　　　　　＿|＿|＿|＿|＿
　　　|＿＿＿＿|
　　　|＿＿＿＿|
　　　　　　　　　　　　　　
使うへんすう　　　　　　　　
　　すたっくぽんた　　　ているぽいんた　へっどぽいんた？

よくわかりません
0017デフォルトの名無しさんNGNG
すたっくぽんた
0018デフォルトの名無しさんNGNG
ひまなひとこーどかいてください
0019デフォルトの名無しさんNGNG
HTTP_REFERER (none)　
HTTP_USER_AGENT . Monazilla/1.3
HTTP_HOST . taruo.net
その他の情報
HTTP_CONNECTION . Keep-Alive　
0020デフォルトの名無しさんNGNG
　　 ||
　　 ||　←これ
　　 ||
　∧||∧
（　 ⌒ ヽ　
　∪　　ﾉ
　　∪∪
0021デフォルトの名無しさんNGNG
>>19　それはかんきょーへんすーだとおもいます。。
>>20　それは”じさつ”だとおもいます。。
0022デフォルトの名無しさんNGNG
いや、>>20は「コード」ダ！！
0023デフォルトの名無しさんNGNG
Queue：　　 キュエウエー　　(列、列を作る)
Procedure：プロセデュアー　(手続き、手順)
0024デフォルトの名無しさんNGNG
過去スレ

あなたのプログラム評価します
http://piza2.2ch.net/tech/kako/1001/10010/1001062841.html
珠玉のJavaアプレット
http://piza2.2ch.net/tech/kako/992/992747928.htm
お前らの作ったアプリケーションをアップしてみろ
http://pc.2ch.net/tech/kako/1004/10042/1004276993.html
l俺の作ったソフト、評価してくださいpart1
http://pc.2ch.net/tech/kako/1014/10140/1014042690.html
0025デフォルトの名無しさんNGNG
>>22それはコンセントにさす”こーど”だとおもいます。。
0026デフォルトの名無しさんNGNG
1では漢字いっぱい使ってるのにね。
0027デフォルトの名無しさんNGNG
スレ立てる前にキャラ作っとかないとぉー
0028デフォルトの名無しさんNGNG
>>24 乙
0029デフォルトの名無しさんNGNG
>>24　( -_-)=○)'Д')　乙
0030デフォルトの名無しさんNGNG
>>26-27 すいません。。。”たじゅうじんかく”です。。
0031デフォルトの名無しさんNGNG
　　　　　　　　　　　　　 ∧＿∧　　〔＾＾〕
　　　　　 　　 　 　 　 _,（　´Д｀）⌒ i　 |　乙！
　　　　　　　　　　（⌒　ー　　一 ｒ.、!　 〉
　　　　　　　　　　 ヽ弋 ｡ 人 ｡　ｲ（` ｰ'
　　　　　　　　　　　〔勿＼　　　　　ヽ
　　　　　　　　　　　　　　 ）　 ｒ⌒丶 ）　　ﾄﾞｶ
　　　　　ﾄﾞｶ　　　ﾄﾞｶ　　／　　 !　　|'´
　　　　　　　ﾄﾞｶ　　　 ／　　 ／|　　|∥　ﾄﾞｶ
　 　 　 　　　　　　　（ 　 　く　　!　 ||∥　 ﾄﾞｶ
　 　 　 　 　 　ﾄﾞｶ 　 ＼　　i 　 | ∥|∥|
　　　　　　　　　　　　,__>　 ヽヽ从/∧∧
　　　　　　　　　　　　⊂⌒ヽ从/ つ ﾟдﾟ）　←>>24
0032デフォルトの名無しさんNGNG
　 　 ∧＿∧　乙　　　　　　　　　　（(
　　 （　´Д｀）　　　　　　　　　　　　）　)
　　／ 　　　＼　　　　　　　　　　ノ
　　| |　　　　 | ＼　　　　　 　　(（　　((
　　| |　/⌒|⌒|ヽ二二つ　　　 ）　　　　）　丿
　　ヽ二二Ο./　　　　　 ＼　（(　(　　　ノノ
　　（＿|　|_|　|_　　　　　　　＼　∴∵← >>24
　　　 .（＿_)＿_)　　　　　　　／/》||ヾミ＼
0033デフォルトの名無しさんNGNG
　　　　　　　　　　　＿
　　　　　　　　　 ／　　`j
　　　　　　　　／　 /`ｰ'　　ちょっときみィ
　　　　　　　 〈　 `ヽ
　　　　　　　　`､　　ヽ∧＿∧　　　>>24
　　　　　　　　 　〉　　　　　　）　　（`Д´）!
　　　　　　　　　/ ノ　　 ￣⌒ヽ　　 「　　〉ノ
　　　　　　　　 ﾉ　　' L　　　　 `ヽ.／ 　/ヽ
　　　　　　　／　, '　　 　ノ＼　　´　　/　　)⌒
　　　　　　 （　　　 　∠_　　　ヽ､＿, '　　　　　　ﾐ
　　　　 　　ｉ　 ､　　　　　 ヽ
　　　＿,,　┘　 「`ー-ｧ　 　ｊ
　　ｆ"　　　　　ﾉ　　　｛　　/
　　|　　i⌒"￣　　 　/ 　/_
　　ヾ,,_」　　　　　　　i＿__,,｣


　　　　　　　　　　　　　ヽ ｌ /／
　　　　　　　　　――― ★ ―――
　　　　　　　　　　　　／/ | ＼
　　　　　　　　　　 ／　/.　|　　＼
　　　　　　　　　　　 　/ 　 |

　　　　　　　　　　　　　　　　　乙かれ！！
　　　　　　　 -　　￣￣　―
　　　　 ／
　　　 /　　　　　　　　　　　　　　　　ヽ
　　　　　　　　 ∧＿∧＿
　　　|　　 　　（　´Д｀）　￣"⌒ヽ
　　　|　 　　／ ） ヽ'　／　　　　､ `､_
　　　　　 γ 　--‐　'　　　　λ.　; 　!
　　　　　 ｆ　 　､　 　ヾ　　　 ／　　　）
　　　　　　!　　ﾉヽ､._,　'｀"／ 　_,. ‐'"
　　　　　　|　　ｊ　　　ヽ　〈_,,,ノ" ヽ
　　　　　 　!　　ヽ　　 冫 ｙ'　　　.ﾉ
　　　　　　 `､　　＼　|　/ 　　／
　　　　　 　 　 ＼､ヾ |　|　　イ-､__
　　　　　　　　　　　　l.__|　 　｝_　　ｌ
　　　　　　　　　　　　＿.|　 .〔　ｌ　 ｌ
　　　　　　　　　　　 〔＿＿＿! '--'
0034デフォルトの名無しさんNGNG
ﾊｹﾞｼｸﾜﾛﾀ
0035デフォルトの名無しさんNGNG
>>30 多重人格 ｷﾀ━━━( ´∀`)･ω･) ﾟДﾟ)･∀･)￣ー￣)´_ゝ`)━━━!!!!!!!!!!!!
0036デフォルトの名無しさんNGNG
VC++ってちょっとした事でエラーが出まくりますね。。
0037デフォルトの名無しさんNGNG
>>36
VBとかプログラミング言語未満のことやってる人にはそう感じるんだろうね。
0038デフォルトの名無しさんNGNG
>>37 　　(´・ω・｀)････
0039デフォルトの名無しさんNGNG
>>37 がんがります。。。
0040１NGNG
ＶＢで作ったものです　作りかけでバグが多いです
ソースついてるので直して欲しいです
verg11al.tripod.com/CH.lzh
0041デフォルトの名無しさんNGNG
ｷﾀ━━━( ´∀`)･ω･) ﾟДﾟ)･∀･)￣ー￣)´_ゝ`)━━━!!!!!!!!!!!!
0042１NGNG
だれもおとしてない可能性ありです。。
VC++の仮想関数ってなんですか。。
0043デフォルトの名無しさんNGNG
>>42
VB.NETをやれば分かります
0044デフォルトの名無しさんNGNG
.NETホスィ。。。（ﾟДﾟ )
0045デフォルトの名無しさんNGNG
>>44
http://www.microsoft.com/japan/msdn/netframework/downloads/sdk.asp
0046デフォルトの名無しさんNGNG
>>45
　　　　　　　 ノ从川川川从
　　　　　　 ﾉﾉ从川川川川从
　　　　　　从川川l |!l 　 川从
　　　　　 从川川川.,,_ _,,.从ﾘ
　　　　　　　（6　　━ l |━
　　　　　　　　ヽ　　　・・　/
　　　　　　　　 　、. <三>/
　　　　　　　　　　ヽ､;;;;;;/
　　　　　　　　　／::::∨/＼
　　　　　　　　　|:::::::/./:::::::|
　　　　 |＼￣￣￣￣￣￣ 旦￣＼
　　　 　｀l ､＼. 　 　 ﾛ　　　　　　　 ＼
.　　　 　 | |＼|.二二| |二二二二二二|
　　 　 　 !」　　| |　ﾉ__ヽ.　　　　　　| |
　　　　　 　　　| |　||酸||　 　 .　 　 | |
　 　 　 　 　 　 ┘ ||区|| 　 　 　 　 ┘
.　　　　　　　　　　 ||酢||
　　　　　　　　　 　 `~~´
0047デフォルトの名無しさんNGNG
わけわからん単語が多すぎる・・頭いてー
00481NGNG
40のﾌﾟﾛｸﾞﾗﾑ内でも使ってるんですがＶＢでもポインタが
使えると思うんですがどうでしょう。。。
0049デフォルトの名無しさんNGNG
>>48
あなたにとってのポインタって何？
0050デフォルトの名無しさんNGNG
　 ∧＿∧　　　／￣￣￣￣￣￣￣￣￣￣￣￣￣￣
　（　・∀・）　＜　40落とした人いるの？
　（つ旦と）　　 ＼＿＿＿＿＿＿＿＿＿＿＿＿＿＿
　 と＿）＿）
00511NGNG
特定型の参照を入れる箱で　式オペした時に参照先に処理が及ぼされるもの　かな
00521NGNG
例えば　Cの場合の
--------------------------------------------
public PictureBox* ActivePictureBoxRefer;

void PointerChange(PictureBox*　lPictureBoxRefer)
{
　　ActivePictureBoxRefer = lPictureBoxRefer;
}
void　ForeColorBlue()

{
　　ActivePictureBoxRefer->ForeColor = RGB(0,0,255);
}
---------------------------------------------
をＶＢの

----------------------------------モジュール--
Public ActivePictureBoxRefer As Object

Public Sub ReferenceCopy(Byref lPictureBox)

　　　Set ActivePictureBoxRefer　= lPictureBox

End Sub

Private Sub ForeColorBlue()

　　　ActivePictureBoxRefer.ForeColor = RGB(0,0,255)

End Sub
-------------------------------------

で同じように参照代入変数が使えます　　（Ｃの文法適当ですｽﾏｿ
00531NGNG
これやるとモジュール初期化の時に参照を受け取って参照コピー用の変数にセットすれば
モジュール内の処理を全て参照変数に対するものにしても平気なので
外部変数の参照が無くなってモジュール独立性が高められます。
その効果で大規模なモジュールも独立させたまま育てる事が可能になります。
あと状態に応じて違うオブジェクトに対して処理をさせたい場合も
１つ参照変数に対するの処理を書いて場合に応じて参照を入れ替えておくだけでＯＫになります
0054デフォルトの名無しさんNGNG
４０落としてみたけど漏れＶＢわかんないし持ってないし
Ｃ／Ｃ＋＋かＪＡＶＡかＶＣ＋＋でおながいします
0055１NGNG
VC++だと同じものつくるのに３年くらいかかりそうです
だれかすくりぷとこんぱいら・えんじんの雛型ください。。
00561NGNG
C++Builderの方がいいというウワサですがどうなんでしょうか。。。
0057デフォルトの名無しさんNGNG
誰か他にもアップしろよ。
0058　　　NGNG
'最小公倍数

Option Explicit

Private Sub Command1_Click()

Dim space As Integer　　　　　　'最初の Text にくぎって入力したスペースが何文字目にあるかなどを記録する。
Dim space2 As Integer　　　　　 ' warerukazu に keisansuu をスペースでくぎって格納したときの、スペースの位置を記録する。
Dim moji As String　　　　　　　' Text の内容を moji に移して、その内容をコピーしたり切り取ったりする。

Dim suu As Integer　　　　　　　' Text に入力された数字の数にともない、keisansuu の配列数を記録する。
Dim keisansuu As Integer　　　　' Text に入力された数字を切りとり、ひとつずつ保存する。
Dim amari As Byte　　　　　　　　' keisansuu が sosuu で割りきれるかどうか、amari で確認する。
Dim sosuuhyo As String　　　　　' 素数をたくさん格納するところ (2700までの素数)
Dim sosuu As Byte　　　　　　　 ' keisansuu をわる素数
Dim suusuu As Integer　　　　　 ' For 文などで suu の数字が変わったりするときのために、配列数を記録しておく。
Dim sosuujyun As Byte　　　　　 'わった素数を書いておくところ
Dim jyun As Integer　　　　　　 'その素数の数に因る配列
Dim warerukazu As String　　　　' keisansuu のうち、 sosuu で割りきれた数を記録しておくところ

Dim answer As Integer ' 最後に、sosuu と、sosuu　でわった　keisansuu　を、answer　に格納しながら、かけあわせる。

'―――――――――――――――――――――――――――――――――――――――――――――――――――――

If Text1.Text = "" Then
MsgBox "最小公倍数を求めたい数字を、「 」(半角スペース) でくぎっていれてください。"
End If

suu = -1
moji = Text1.Text
0059　　　NGNG

Do

　　　　space = InStr(1, moji, " ")
　　　　　　If space = 0 Then
　　　　　　　 Exit Do
　　　　　　End If
　　　　　 suu = suu + 1
keisansuu(suu) = Left(moji, space - 1)　　' 鬱　(ーー||||)　
　　　　　moji = Mid(moji, space + 1)

Loop While space = 0

suusuu = suu


sosuuhyo = "2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97 101 103 107 109 113 127 131 137 139 149 151 157 163 167 173 179 181 191 193 197 199 211 223 " & _
"227 229 233 239 241 251 257 263 269 271 277 281 283 293 307 311 313 317 331 337 347 349 353 359 367 373 379 383 389 397 401 409 419 421 431 433 439 443 449 " & _
"457 461 463 467 479 487 491 499 503 509 521 523 541 547 557 563 569 571 577 587 593 599 601 607 613 617 619 631 641 643 647 653 659 661 673 " & _
"677 683 691 701 709 719 727 733 739 743 751 757 761 769 773 787 797 809 811 821 823 827 829 839 853 857 859 863 877 881 883 887 " & _
"907 911 919 929 937 941 947 953 967 971 977 983 991 997 1009 1013 1019 1021 1031 1033 1039 1049 1051 1061 1063 1069 1087 1091 1093 1097 1103 1109 1117 1123 " & _
"1129 1151 1153 1163 1171 1181 1187 1193 1201 1213 1217 1223 1229 1231 1237 1249 1259 1277 1279 1283 1289 1291 1297 1301 1303 1307 1319 1321 1327 " & _
"1361 1367 1373 1381 1399 1409 1423 1427 1429 1433 1439 1447 1451 1453 1459 1471 1481 1483 1487 1489 1493 1499 1511 1523 1531 1543 1549 1553 1559 1567 1571 " & _
"1579 1583 1597 1601 1607 1609 1613 1619 1621 1627 1637 1657 1663 1667 1669 1693 1697 1699 1709 1721 1723 1733 1741 1747 1753 1759 1777 1783 1787 1789 " & _
"1801 1811 1823 1831 1847 1861 1867 1871 1873 1877 1879 1889 1901 1907 1913 1931 1933 1949 1951 1973 1979 1987 1993 1997 1999 2003 2011 2017 " & _
"2027 2029 2039 2053 2063 2069 2081 2083 2087 2089 2099 2111 2113 2129 2131 2137 2141 2143 2153 2161 2179 2203 2207 2213 2221 2237 2239 2243 " & _
"2251 2267 2269 2273 2281 2287 2293 2297 2309 2311 2333 2339 2341 2347 2351 2357 2371 2377 2381 2383 2389 2393 2399 2411 2417 2423 2437 2441 2447 2459 2467 2473 " & _
"2477 2503 2521 2531 2539 2543 2549 2551 2557 2579 2591 2593 2609 2617 2621 2633 2647 2657 2659 2663 2671 2677 2683 2687 2689 2693 2699"
0060　　　NGNG

　　　　　　　　　jyun = -1
　　　　　　　　 space = 0

Do

　　　　'sosuuhyo から sosuu に、 ※a の計算毎に、小さい順から素数をいれる
　　　　　　 ' sosuuhyo から次の素数をさがす
　　　　　space = space + InStr(space + 1, sosuuhyo, " ")
　　　　　　 '素数を sosuuhyo から、順に切り取る
　　　　　sosuu = Val(Left(sosuuhyo, space - 1, 1))


'※a


　　　　　　For suu = suu To 0 Step -1

　　　　　　　amari(suu) = keisansuu(suu) Mod sosuu

　　　　　 If amari(suu) = 0 Then
　　　　　　　warerukazu = " " & suu
　　　　　 End If

　　　　　 Next suu
0061　　　NGNG

　Do

　　　　 space2 = InStr(2, warerukazu, " ")
　　　　　　　If space2 = 0 Then
　　　　　　　　 Exit Do
　　　　　　　End If

　　　　　　　suu = Val(Mid(warerukazu, 2, space2))
　　　warerukazu = Mid(warerukazu, space2 + 1)

　keisansuu(suu) = keisansuu(suu) \ sosuu

　Loop While space2 = 0

　　　　　　　　　　　 jyun = jyun + 1
　　　　　 sosuujyun(jyun) = sosuu

'　　　　　　　　　　suusuu = suusuu + 1
'　　　　keisansuu(suusuu) = sosuu
'　　　　　　　　　　　　　　　　　　にして、下の For 文のように１つにしてもよい。

Loop While warerukazu = ""
0062　　　NGNG

　answer = 1

For jyun = jyun To 0 Step -1

　answer = answer * sosuujyun(jyun)

   For suu = 0 To suusuu

　answer = answer * keisansuu(suu)

   Next suu

Next jyun

'For suu = suusuu To 0 Step -1

'　answer = answer * keisansuu(suu)

'Next suu

Text2.Text = answer

End Sub

0063デフォルトの名無しさんNGNG
使ってる言語は良く分からんけど、最小公倍数を求めるのに
何で、その中途半端な素数表が必要なんだ？
0064デフォルトの名無しさんNGNG
つーか他にうｐするとこないの？
00651NGNG
おお　何だか難しそうなのがうぷされてる（　´∀｀）
0066デフォルトの名無しさんNGNG
じゃ、とりあえず１はうｐ板を用意すること
0067デフォルトの名無しさんNGNG
>>58
構造化の勉強してこいボケ
00681NGNG
>>66 画像しか上げられないのでbbs2か捨てフリースペースorヤフブリでおながいします

00691NGNG
と思ったけどヤパーリ設置したよー
ttp://www28.tok2.com/home/morg40/fupbbs/bbs.cgi
0070デフォルトの名無しさんNGNG
>>58 名前の付け方をもっとわかりやすくして
ネストのインデントを大きくして関数の形に直すとスマートかも
0071１NGNG
数メガのものをアップする場合は自分のスペースかここへ
http://www28.tok2.com/home/morg40/fupbbs/bbs.cgi
今3メガまで
0072１NGNG
VC++のブラシとかビットマップの使用法てほとんど
WinAPIそのまんま使った時と同じに見えるのは気のせいだろうか・・
0073デフォルトの名無しさんNGNG
VC++はただのC++コンパイラなので、
ビットマップ表示したけりゃ、自分でシコシコ書くしかないのです。
で、普通はビットマップ表示するAPIがあるのでそれを使います。
要するに同じに見えるも何も、実際にAPI使ってるのよ。
当然、ブラシについても然り。

0074デフォルトの名無しさんNGNG
そういう点は殆ど名前変えてるだけでコマンドラインCからやらせてるのと同じ。
コード規模を少なく抑えるのが一番出来ない開発言語。
0075デフォルトの名無しさんNGNG
>>72の言いたいのは、MFC意味ねーじゃん、てこと？
0076１NGNG
UPBBSが速攻繋がらなくなっている罠
>>75　別に文句はないですが、高級な関数にまとめてあったりAPIそのまんまだったり　
ﾌﾟﾛﾊﾟﾃｨｳｨﾝﾄﾞｳが日本語説明のチェックだったり
低級向けなんだか高級向けなんだかよくわからんところがありますね
00771NGNG
みんな普段どの言語でどれくらいの規模のプログラムを扱ってるか教えてくり
言語と何行くらいかキボンヌ（自分で書かないインクルードとかは除いて）
おらは趣味でVB:50～2000です
0078デフォルトの名無しさんNGNG
この前趣味で1万行くらいの書いた
まだ終わってないけど同じ処理が多いああ鬱
0079デフォルトの名無しさんNGNG
行数を数えるスクリプトキボン

grep -c \n *.h

でやってみたけどなんだか行数が少ないみたいだ。
7000行くらいのが3600くらいになってる。
0080デフォルトの名無しさんNGNG
趣味/C++/今んところ2千行くらい、完成したら3万行くらいかな
008179NGNG
wc がない。。ま、いいや。
0082デフォルトの名無しさんNGNG
>>79
折り返しを数えるか、数えないかの違いだったりして…
0083デフォルトの名無しさんNGNG
趣味/c++/source.tar.bz2で250KB
0084デフォルトの名無しさんNGNG
>>83
実はフルカラーのビットマップ画像が入っていて
中身はスッカラカンと言う噂が
0085デフォルトの名無しさんNGNG
現在趣味で7万行くらい。
しかし、自作ライブラリの使ってないクラスも計測してるし、
マルチプラットフォーム対応で全部計測してるから、
正確とは言えないかもしれない　
008679NGNG
結局 perl : $line = 0; while(<>) { ++$line; } print $line;
で計測しますた。wc くらいいれろよ漏れ...
つかgrepの使い方がわからんアホな漏れ...
00871NGNG
みんなよくそんなに管理できるなぁー。。しかもC++で(ﾟДﾟ;)
仕事でやってる人はどれくらいなのだろうか。。
00881NGNG
他板で作ったVB製ペ〇〇〇もどきです
verg11al.tripod.com/PR.lzh
0089デフォルトの名無しさんNGNG
>>88
ペイントもどきなんぞ落として何をしろと？
しかもVB製。
00901NGNG
>>89 いや、ペイントちゃうて。。。(ﾟДﾟ;)
0091デフォルトの名無しさんNGNG
>>89
ペンギンもどきだたーよ
00921NGNG
| -_-l…………………………| ﾟДﾟ|ｸﾜｯ＜正解！！じゃない。。。
0093デフォルトの名無しさんNGNG
>>87
C++はコード量は多くなりがちだけど、VC++なら管理は簡単。
ファイル数200個くらいでもそれほどの負担にはならないよ。
もしVC++が無かったら漏れはファイル10個が限界かもな。
0094デフォルトの名無しさんNGNG
>>88が何もどきか当てるスレになりました。
0095デフォルトの名無しさんNGNG
>>91
VBでPOSIX準拠OSとな！？
0096ageNGNG
ミントさんだ！(・∀・)ｲｲ！！
0097デフォルトの名無しさんNGNG
>>88
ZIPにしてくれよ、LZHは解凍ツールもってねーから面倒
0098デフォルトの名無しさんNGNG
>>97 ZIPあってLZHねーってどんな奴だよ
0099デフォルトの名無しさんNGNG
ペプシマンだ！
0100デフォルトの名無しさんNGNG
100！
0101１NGNG
>>93 うーむ・・でもスゴイ
0102デフォルトの名無しさんNGNG
ペタジーニ
0103デフォルトの名無しさんNGNG
文字数違っとるがな
01041NGNG
>>96 VBっていってもAPIとか色々ありますから
>>97 verg11al.tripod.com/mint.zip
0105ヒキーのクリスマス思い出したーよNGNG
>>104
DLしたけど怖くてEXEが実行できなかった、ゴメンネ。
0106デフォルトの名無しさんNGNG
実行したけど問題なかった。
VBでちょこっと作ったおもちゃにしてはよくできてる。
作り込めば言いアクセサリになるんじゃないか
0107デフォルトの名無しさんNGNG
>>106人柱ご苦労、でも名無しさんじゃ信用できねぇよ（´Д｀；）
0108106NGNG
うお！マイドキュメントのファイルが一切合切消えてる！！！
0109デフォルトの名無しさんNGNG
>>105 >>107
なんであんたらそんなに疑り深いんだｗ
0110デフォルトの名無しさんNGNG
そりゃそうだな。

ペルソナもどきで
なんかmidiを再生する機能がついていて
時計にもなった。

まぁ、嘘かもしれないし用心してくれ
0111１NGNG
ウィルスじゃないってばよ
0112デフォルトの名無しさんNGNG
大切なデータはバックアップとっておいた、
これから実行に移る。
0113デフォルトの名無しさんNGNG
↓112を騙った嘘の志望報告が出される
0114デフォルトの名無しさんNGNG
やっぱできねぇ（´Д｀；）

>>106 おまえすごいよ。
0115デフォルトの名無しさんNGNG
Winって安全モードみたいなのないの？
このモードで実行されたプログラムはファイルの書き換え・削除が出来ないとか。
0116デフォルトの名無しさんNGNG
とりあえず、アーカイブの
Windows\ﾃﾞｽｸﾄｯﾌﾟ\BmpRgn\mint
って階層を見たらあんまりウイルスっぽくなかったから実行した。
勿論ノートンで幹線チェックはしたけどね
0117デフォルトの名無しさんNGNG
VMWare
0118デフォルトの名無しさんNGNG
実行したぜゴルァ！
漏れが以前HSPで作ったﾔｼよりも10倍ましだ。
安全性は保障できんが（漏れの知らないどこかのファイルが消されてるかも・・・）
0119１NGNG
FreeBSDのジェイルみたいなのか
ファイルアクセスアナライザとレジストリアクセスアナライザ
みたいなのがあれば。。↑俺もホスィ
0120デフォルトの名無しさんNGNG
NT系なら新しくユーザー作成して試せばいいべ。
0121デフォルトの名無しさんNGNG
unit frmClock;

interface

uses
　Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
　Dialogs, StdCtrls, ExtCtrls, DateUtils;

type
　TForm1 = class(TForm)
　　DateLbl: TLabel;
　　TimeLbl: TLabel;
　　Timer1: TTimer;
　　GroupBox1: TGroupBox;
　　GroupBox2: TGroupBox;
　　TimeLbl2: TLabel;
　　Timer2: TTimer;
　　StartBtn: TButton;
　　ResetBtn: TButton;
　　GroupBox3: TGroupBox;
　　HourEdit: TLabeledEdit;
　　MinuteEdit: TLabeledEdit;
　　SecondEdit: TLabeledEdit;
　　TimeLbl3: TLabel;
　　StartBtn2: TButton;
　　ResetBtn2: TButton;
　　Timer3: TTimer;
　　procedure Timer1Timer(Sender: TObject);
　　procedure FormCreate(Sender: TObject);
　　procedure StartBtnClick(Sender: TObject);
　　procedure ResetBtnClick(Sender: TObject);
　　procedure Timer2Timer(Sender: TObject);
　　procedure StartBtn2Click(Sender: TObject);
　　procedure ResetBtn2Click(Sender: TObject);
　　procedure Timer3Timer(Sender: TObject);
　Private
　　{ Private 宣言 }
　　procedure Check;
　public
　　{ Public 宣言 }
　end;

var
　Form1: TForm1;
　Time_1, Time_2: TDateTime;
0122デフォルトの名無しさんNGNG
implementation

{$R *.dfm}

procedure TForm1.Timer1Timer(Sender: TObject);
begin
　TimeLbl.Caption := FormatDateTime('hh:mm:ss', Now);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
　Timer1Timer(Sender);
　DateLbl.Caption := FormatDateTime('yyyy/mm/dd', Now);
end;

procedure TForm1.StartBtnClick(Sender: TObject);
begin
　if StartBtn.Caption = 'Start' then
　begin
　　StartBtn.Caption := 'Stop';
　　Timer2.Enabled := True;
　end else
　begin
　　StartBtn.Caption := 'Start';
　　Timer2.Enabled := False;
　end;
end;

procedure TForm1.ResetBtnClick(Sender: TObject);
begin
　TimeLbl2.Caption := '00:00:00';
　StartBtn.Caption := 'Start';
　Timer2.Enabled := False;
　Time_1 := 0;
end;

procedure TForm1.Timer2Timer(Sender: TObject);
begin
　Time_1 := IncSecond(Time_1);
　TimeLbl2.Caption := FormatDateTime('hh:mm:ss', Time_1);
end;
0123デフォルトの名無しさんNGNG
procedure TForm1.StartBtn2Click(Sender: TObject);
begin
　Check;
　if StartBtn2.Caption = 'Start' then
　begin
　　StartBtn2.Caption := 'Stop';
　　Timer3.Enabled := True;
　　HourEdit.Enabled := False;
　　MinuteEdit.Enabled := False;
　　SecondEdit.Enabled := False;
　　TimeLbl3.Caption := HourEdit.Text + ':' + MinuteEdit.Text + ':' + SecondEdit.Text;
　　Time_2 := StrToDateTime(TimeLbl3.Caption);
　end else
　begin
　　StartBtn2.Caption := 'Start';
　　Timer3.Enabled := False;
　　HourEdit.Enabled := True;
　　MinuteEdit.Enabled := True;
　　SecondEdit.Enabled := True;
　end;
end;

procedure TForm1.ResetBtn2Click(Sender: TObject);
begin
　StartBtn2.Caption := 'Start';
　Houredit.Text := '';
　MinuteEdit.Text := '';
　SecondEdit.Text := '';
　TimeLbl3.Caption := '00:00:00';
　Timer3.Enabled := False;
　Time_2 := 0;
　HourEdit.Enabled := True;
　MinuteEdit.Enabled := True;
　SecondEdit.Enabled := True;
end;

procedure TForm1.Check;
begin
if (SecondEdit.Text = '') or ((MinuteEdit.Text = '') and not (HourEdit.Text = '')) the
　begin
　Application.MessageBox('時間を正しく入力してください', '情報', MB_OK or MB_ICONINFORMATION);
　　Abort;
　end;
　if (StrToInt(MinuteEdit.Text) >= 60) or (StrToInt(SecondEdit.Text) >= 60) then
　begin
　　Application.MessageBox('値が正しくありません', '情報', MB_OK);
　　Abort;
　end;
　if Length(HourEdit.Text) = 1 then
　　HourEdit.Text := '0' + HourEdit.Text;
　if Length(MinuteEdit.Text) = 1 then
　　MinuteEdit.Text := '0' + MinuteEdit.Text;
　if Length(SecondEdit.Text) = 1 then
　　SecondEdit.Text := '0' + SecondEdit.Text;
end;
0124デフォルトの名無しさんNGNG
procedure TForm1.Timer3Timer(Sender: TObject);
begin
　Time_2 := IncSecond(Time_2, -1);
　TimeLbl3.Caption := FormatDateTime('hh:mm:ss', Time_2);
　if TimeLbl3.Caption = '00:00:00' then
　begin
　　Beep;
　　HourEdit.Enabled := True;
　　MinuteEdit.Enabled := True;
　　SecondEdit.Enabled := True;
　　Timer3.Enabled := False;
　　ShowMessage('時間が経過しました');
　end;
end;

end.
01251NGNG
オオ　何かカコイイのが(´Д｀*)
01261NGNG
delphiって速くていいなぁ・・ＶＢもネイティブ吐いてくれないかなぁ
0127デフォルトの名無しさんNGNG
オオ　1よ、生きてたのか
01281NGNG
>>127 ヒサシブリ
自分のＣのできなさにうちひしがれていたところです。。。

unsigned int Function1(int* lparam){}
unsigned int Function1(int &lparam){}
使い分けかたがわかりません。。
0129デフォルトの名無しさんNGNG
それはCじゃない
0130デフォルトの名無しさんNGNG
lparamに何かを与える関数ならint&で、
何かを行う関数でlparamに補助的に情報を渡す（たとえば文字列処理での文字列長など）
物ならint*でNULLも渡せるように
0131デフォルトの名無しさんNGNG
>>130
？
0132デフォルトの名無しさんNGNG
そのうち （・∀・） ﾊｯ! と使いどころを思いつくときが来るから、
その時のために、今は機能だけを学習しておけばいいんでない。
0133デフォルトの名無しさんNGNG
>>128
分からないときは * を使っとけ。
0134デフォルトの名無しさんNGNG
最初のうちは覚えることが多くていっぱいいっぱいだけど、
簡単なところから消化していくとだんだん余裕が出来てきて、
それまで全然判らなかった事が、ある日突然理解できてしまったりする。
01351NGNG
アリガトウ（泣　ポインタはNULLポインタとかもあるんですよね
ほんとに覚えることが多いけど少しずつやっていきます
0136デフォルトの名無しさんNGNG
int&ならconst int&で・・・
01371NGNG
うーん　後で調べないと・・
0138デフォルトの名無しさんNGNG
130じゃないが解説
参照は普通NULLを渡さないので、
関数に必須の情報を渡すのに使用し、
NULLチェックを省くことが出来る
ポインタは関数にNULLを渡すことが意味があるときにも使える。

漏れの場合はclassぽい物はポインタ（やスマートポインタの参照）で、
structぽい物は参照で渡すことにしてる。
0139１NGNG
>>138 サンクスです。
0140１NGNG
verg11al.tripod.com/KANNI.lzh
簡易ノベルえんじんです。欠点ありまくり＆VB製で遅い（´Д｀；）
まともに動くかわからんけど指摘キボンヌ
01411NGNG
MicrosoftのVClang.chmイイ(･∀･)
0142１NGNG
>>53のちょっと間違ってました。
C++の"オブジェクトの参照型"の機能＋αですね

C++
────────────────

PicBox& PicBoxRef = ActivePicBox;//参照型を用意、初期化

void ClearActivePicBox(){

PicBoxRef.Cls;//参照型変数からメンバ選択演算子.を使ってメンバ関数呼び出し

}
────────────────
VB
────────────────
Public PicBoxRef As Object '参照型変数を用意

Public Sub ReferenceInitialize(Byref ActivePicBox)

Set PicBoxRef = ActivePicBox '参照型を初期化

End Sub

Private Sub ClearActivePicBox()

PicBoxRef.Cls　'参照型変数からメンバ選択演算子.を使ってメンバ関数呼び出し

End Sub

─────────────────

VBの場合だとObjectなので参照が挿す型を厳密に指定する必要がなくて
参照型が挿す対象を変えたいときは何回でも違うオブジェクトの参照で初期化出来ます。
0143仕様書無しさんNGNG
しゃーぷいんくるーどかっこすたじおえいちかっこ

ぼいどめいんぼいど
かっこ
ぷりんとえふかっこてんてんはろーわーるどえんえぬてんてんかっこちょんちょん
かっこ
0144１NGNG
すたじお？
0145１NGNG
ちょ・・・ちょ・・MICOSHIやないねんから
0146が、チンコNGNG


神輿ｷﾀ━━━━━（ﾟ∀ﾟ）━━━━━━!!!!


0147１NGNG
http://aa.2ch.net/test/read.cgi/kao/1020652115/226-233
0148デフォルトの名無しさんNGNG
すたぢお＝stdio　？
0149デフォルトの名無しさんNGNG
すいません、中置記法を後置記法に直すのを作ってみたんですが、
同じ優先度の演算子の左結合性がちゃんとできているのか自信がありません。
これで正しいでしょうか？

#! /usr/bin/env ruby
# 中置記法の式を後置記法に直す
# 括弧による結合には未対応

def infix_to_postfix(expr)
　stack = ['(']
　result = []
　operator_priority = {
　　'*' => 50, '/' => 50,
　　'+' => 20, '-' => 20,
　　'(' => 10, ')' => 10,
　}

　expr.each{ |x|
　　#p stack
　　#p x
　　if '+ - * /'.split.include?(x)
　　　# operator
　　　while operator_priority[stack.last] >= operator_priority[x]
　　　　result.push(stack.pop)
　　　end
　　　stack.push(x)
　　else
　　　# operand はそのまま出力
　　　result.push(x)
　　end
　}

　while not stack.empty? and operator_priority[stack.last] >= operator_priority[')']
　　result.push(stack.pop)
　end
　result.pop # 最後は'('が入ってるので捨てる

　result
end

puts infix_to_postfix(ARGV[0].split).join
0150デフォルトの名無しさんNGNG
ruby is nambar one !!
0151　NGNG
#include<stdio.h>

main()
{
FILE *read_p; /*読み込まれるファイルのポインタ*/
FILE *write_p; /*ぶち込まれるファイルのポインタ*/
char *p; /*終了判定用*/
char str[500]; /*ファイルの中身ぶち込むとこ*/

read_p=fopen("D\\muneo.txt","r");
write_p=fopen("out.txt","w");

p=fgets(str,500,read_p);

while(p!=NULL)
{
fputs(str,write_p);
p=fgets(str,500,read_p);
}

fclose(read_p);
fclose(write_p);
}

コンパイルはうまくいくけど、
exeファイル実行するとfgets.cの60行目がダメっぽいこと云われて
糸冬　了

つーか、俺・・レベル低い質問してるんだろうな・・
どなたかボスケテください
0152デフォルトの名無しさんNGNG
D\\→D:\\？
0153デフォルトの名無しさんNGNG
if((read_p=fopen("D\\muneo.txt","r")) == NULL){
puts("D\\muneo.txtがオープンできないヽ(`Д´)ﾉ");
return 1;
}
ファイルが正常に開けたか確認しとくのが常
0154151NGNG
>152,153
thx!
マジでありがとう
0155デフォルトの名無しさんNGNG
test
0156デフォルトの名無しさんNGNG
どうやらインキンになったらしい。
0157404NGNG
0158デフォルトの名無しさんNGNG
今更ですが、出会いサイトのシステム作ってます(TT
http://www.ugou.net/mf/
恥ずかしいのでソースは晒したくないのですが、ダメですか？

携帯からでも見れるように設計(手抜き？)しているつもりです。
良かったら、皆さんのご意見お聞きしたいのですが。
0159デフォルトの名無しさんNGNG
体のいい宣伝か?
0160158NGNG
まぁ、宣伝ですね…。
でも、完成したらソースも晒しますんで。
フリーで出会いシステムってまだないですよね？
0161デフォルトの名無しさんNGNG
ここは添削スレなんだけど。
0162158NGNG
>>161
あ、スイマセン…。
ソースの添削か…。
真剣に間違いました。＜プログラム自体の添削かと…。

＃上のほうで、１さんが実行プログラムをアップしてると思ったので…。
＃全ログに目を通してみたら、ソース込みなんですね。申し訳ありませんでした。

＃自分なりにしっかり完成させて出直します。m(__)m＞皆様
0163デフォルトの名無しさんNGNG
>>162
ソースなしでプログラムをどう添削するのか小一時間問い詰めてみたいところだが、
>>158の求めてるのはフィールドテストとかバグ出しの類なんだろうな。
0164デフォルトの名無しさんNGNG
Register now!
ttp://www.ugou.net/mf/cgi/mf/regist.cgi?name=2channeler&pass=(・∀・)ﾏﾝｺ-&email=いたづらはいやづら[email protected]
0165158NGNG
>>164
ありがとうございます。
一応、一回しか登録できません。

うーん。
連続書き込みについてのチェックですね(^^
ありがとうございました。
0166デフォルトの名無しさんNGNG
i ilke riding a bicycle
0167あみんNGNG
while (他の誰かにあなたが振られる()) {
　/*
　if(あなたが振り向いてくれない()) break;
　*/
　do("待つわ");
}
0168デフォルトの名無しさんNGNG
delphiって速くていいなぁ・・VBもネイティブ吐いてくれないかなぁ
0169デフォルトの名無しさんNGNG
どうやらインキンになったらしい。
0170デフォルトの名無しさんNGNG
| -_-l…………………………| ゜Д゜|クワッ<正解!!じゃない。。。
0171デフォルトの名無しさんNGNG
＞167
do...while() ではないのか？とするとCとﾁｶﾞｳﾉか、、
一体なんの言語だろう、、、？
0172デフォルトの名無しさんNGNG
保守
0173デフォルトの名無しさんNGNG
添削ｷﾎﾞﾝﾇ
#include <stdio.h>

main()
{
printf("漏れのちんこは２５㎝ありますが何か？\n");
return 0;
}
0174デフォルトの名無しさんNGNG
>>173
ﾂﾏﾝﾈ
0175デフォルトの名無しさんNGNG
#include <cstdio>
#include <cstdlib>

int main()
{
 std::printf("My penis size is twenty five cm. What's?");
 return EXIT_SUCCESS;
}
0176デフォルトの名無しさんNGNG
ペプシマンだ!
0177デフォルトの名無しさんNGNG
>>173 mainはvoidなのにint型が返ってます。
0178デフォルトの名無しさんNGNG
↑ mailto:iiivm
0179デフォルトの名無しさんNGNG
>>177
省略時の戻り値について小一時間（ｒｙ
0180デフォルトの名無しさんNGNG
0181デフォルトの名無しさんNGNG
0182デフォルトの名無しさんNGNG
0183名無しさんNGNG
　　　　　　 ／￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣＼
Λ＿Λ　　|　君さぁ　こんなスレッド立てるから　　　　　　　　 　|
（　´∀｀）＜　厨房って言われちゃうんだよ　　　　　　　　　 　 　|
（ ΛΛ つ ＞―――――――――――――――――――‐＜
　( ﾟДﾟ) ＜　おまえのことを必要としてる奴なんて　　 　　　　　 |
　/つつ　　|　いないんだからさっさと回線切って首吊れ　　　 　|
　　　　　　 ＼＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿_／

(-＿-)　ﾊﾔｸｼﾝﾃﾞﾈ… (-＿-)　ﾊﾔｸｼﾝﾃﾞﾈ… (-＿-)　ﾊﾔｸｼﾝﾃﾞﾈ…
(∩∩) (∩∩) (∩∩)

(-＿-)　ﾊﾔｸｼﾝﾃﾞﾈ… (-＿-)　ﾊﾔｸｼﾝﾃﾞﾈ… (-＿-)　ﾊﾔｸｼﾝﾃﾞﾈ…
(∩∩) (∩∩) (∩∩)

(-＿-)　ﾊﾔｸｼﾝﾃﾞﾈ… (-＿-)　ﾊﾔｸｼﾝﾃﾞﾈ… (-＿-)　ﾊﾔｸｼﾝﾃﾞﾈ…
(∩∩) (∩∩) (∩∩)
0184デフォルトの名無しさんNGNG
>>173
でかすぎ。 切りなさい。
0185hoge.hNGNG
#ifndef FUNC_TABLE_H
#define FUNC_TABLE_H

class FuncTbl
{
public:
enum ID {
NOP=0,
HOGE,
MOGE,
MAGE,
HAGE,
maxId };

private:
typedef void __cdecl F_(void);
typedef F_* FUNC;

template<int> struct f{ static F_ f_; };
static FUNC tbl[];

public:
FUNC operator[] ( int n ) { return tbl[n]; };
};

#endif
0186hoge.cNGNG
#include <iostream>
#include "hoge.h"

using namespace std;

FuncTbl::FUNC FuncTbl::tbl[]=
{
FuncTbl::f<0>::f_,
FuncTbl::f<1>::f_,
FuncTbl::f<2>::f_,
FuncTbl::f<3>::f_,
FuncTbl::f<4>::f_,
};

void FuncTbl::f< FuncTbl::NOP >::f_(void) { ; }
void FuncTbl::f< FuncTbl::HOGE >::f_(void) { std::cout << "HOGE" << std::endl; }
void FuncTbl::f< FuncTbl::MOGE >::f_(void) { std::cout << "MOGE" << std::endl; }
void FuncTbl::f< FuncTbl::MAGE >::f_(void) { std::cout << "MAGE" << std::endl; }
void FuncTbl::f< FuncTbl::HAGE >::f_(void) { std::cout << "HAGE" << std::endl; }
0187main.cppNGNG
#include "hoge.h"

static FuncTbl tbl;

int main(int argc, char* argv[])
{
for (int i=0; i<FuncTbl::maxId; ++i)
tbl[i]();
return 0;
}

#186 はhoge.cppだった。
0188IP記録実験NGNG
IP記録実験
http://qb.2ch.net/test/read.cgi/accuse/1042013605/

1 名前：ひろゆき ◆3SHRUNYAXA ＠どうやら管理人 ★ 投稿日：03/01/08 17:13 ID:???
そんなわけで、qbサーバでIPの記録実験をはじめましたー。

27 名前：心得をよく読みましょう 投稿日：03/01/08 17:20 ID:yL/kYdMc
SETTING.TXT管轄でないということは全鯖導入を視野に、か？

38 名前：ひろゆき ◆3SHRUNYAXA 投稿日：03/01/08 17:22 ID:rLfxQ17l
>>27
鋭いです。

73 名前：ひろゆき ◆3SHRUNYAXA 投稿日：03/01/08 17:27 ID:rLfxQ17l
＞ところで、IPが抜かれて何か今までと変わることってあるのでしょうか？
・今までより、サーバが重くなる。
・裁判所や警察からの照会があった場合にはIPを提出することがある。
0189デフォルトの名無しさんNGNG
ひろゆきって・・
挙動不振じゃないかい？
0190デフォルトの名無しさんNGNG
パルプンテ
0191デフォルトの名無しさんNGNG
http://qb.2ch.net/test/read.cgi/accuse/1042013605/809

ま　た　か　！　！
0192デフォルトの名無しさんNGNG
さぁ、地下に潜るか。

ふたば☆ちゃんねる
http://img.2chan.net/
0193デフォルトの名無しさんNGNG
板ごとに管理する人決めたら？
ひろゆきが君主でさ、その他は各武将が太守になる。
0194デフォルトの名無しさんNGNG
======2==C==H======================================================

　　　　　　　　　２ちゃんねるのお勧めな話題と
　　　　　ネットでの面白い出来事を配送したいと思ってます。。。

===============================読者数： 138720人　発行日：2003/1/9

年末年始ボケがそろそろ収まり始めた今日このごろのひろゆきです。

そんなわけで、年末に予告したIP記録ですが実験を開始しています。

「２ちゃんねる20030107」
こんな感じで各掲示板の最下部に日付が入ってるんですが、
20030107以降になってるところはログ記録実験中ですー。

んじゃ！

────────────────────────Age2ch─
■この書き込みは、Age2chを使って配信されています。
────────────────────────────
Keep your thread alive !
http://pc3.2ch.net/test/read.cgi/software/1041952901/l50
────────────────────────────
0195デフォルトの名無しさんNGNG
>>13
そこまで端的に書かれてみるとかなり怖いものがあるな・・・。
0196デフォルトの名無しさんNGNG
■ログ記録実験の巻■
======2==C==H======================================================

　　　　　　　　　２ちゃんねるのお勧めな話題と
　　　　　ネットでの面白い出来事を配送したいと思ってます。。。

===============================読者数： 138720人　発行日：2003/1/9

年末年始ボケがそろそろ収まり始めた今日このごろのひろゆきです。

そんなわけで、年末に予告したIP記録ですが実験を開始しています。

「２ちゃんねる20030107」
こんな感じで各掲示板の最下部に日付が入ってるんですが、
20030107以降になってるところはログ記録実験中ですー。

んじゃ！

─────────────────────── 2ch-net─
メルマガ登録・解除 http://www.2ch.net/mag.html

http://www.2ch.net/2ch.html / [email protected]
───────────────────────────
0197デフォルトの名無しさんNGNG
ｱﾁｬｰコピペミスｼﾀﾖｰ

年末年始番組
http://sports2.2ch.net/kouhaku/

しぃスキンなんで。
0198デフォルトの名無しさんNGNG
正月早々から２ちゃんねるに張り付いてるコピペ馬鹿
0199デフォルトの名無しさんNGNG
http://www.zdnet.co.jp/news/0301/09/njbt_07.html

毎度のzdnetね。
0200デフォルトの名無しさんNGNG
>>415
バールのようなもの
0201デフォルトの名無しさんNGNG

（ ´,_ゝ`）ﾌﾟｯ
0202デフォルトの名無しさんNGNG

辞めとけって。アンナもの使うと、それこそプロバイダからﾏｰｸされるぞ・・・
0203デフォルトの名無しさんNGNG
応えてくれてありがとう。
皮肉な話だが２ｃｈで誰かに応えてもらったのって久しぶりだ＞365
0204デフォルトの名無しさんNGNG
>>705
スポンサーによる言論規制を超越してるコメンテーターってのもｶｯｺｲｲなw
0205デフォルトの名無しさんNGNG
みんな　あめぞうに　帰ろうよ。。。
0206デフォルトの名無しさんNGNG
1000 ：心得をよく読みましょう ：03/01/10 21:52 ID:Z+vNhdSO
>＞1スレ立て乙！
0207デフォルトの名無しさんNGNG
======2==C==H======================================================

　　　　　　　　　２ちゃんねるのお勧めな話題と
　　　　　ネットでの面白い出来事を配送したいと思ってます。。。

===============================読者数： 139038人　発行日：2003/1/10

なにやら、連日メルマガだしてるひろゆきです。

そんなわけで、ログ記録実験ですが、いちいちサーバ指定するのが面倒なので、
全部のサーバに入れてみました。

重くなって落ちたりしてもご愛嬌ってことで。。。

んじゃ！

────────────────────────Age2ch─
■この書き込みは、Age2chを使って配信されています。
────────────────────────────
Keep your thread alive !
http://pc3.2ch.net/test/read.cgi/software/1041952901/l50
────────────────────────────
0208デフォルトの名無しさんNGNG
：番組の途中ですが名無しです [sage] ：03/01/10 20:51 ID:vDZ6B4yf
> 現在半角版では、自分が書き込んだレスの上のレス（自分がならのIP）
> を強制表示させるバグが見つかっています。
> また、そのコマンドを実行すると記録されるIPが事実上書き換えられます。
> そのコマンドは本文に下の二行を入れるだけ
>
> set NULLnul>l &>gt>gthosting-x.comｎｕｌｌ>>gtgtgt get oldres-num get few
> make IP >renew.
0209デフォルトの名無しさんNGNG
明日俺の顔をボコボコにします
0210デフォルトの名無しさんNGNG
快速2get！
0211デフォルトの名無しさんNGNG
ほほぅ
0212デフォルトの名無しさんNGNG
ていうか、２ちゃんねるに不都合な？スレはすべて
この騒ぎに便乗してスレストかかってるぞ。

vip
http://qb.2ch.net/test/read.cgi/accuse/1042162651/
ﾌﾟﾛ固定用密談ｽﾚ
http://qb.2ch.net/test/read.cgi/accuse/1040784691/
管理人のゆきひろてやつに文句あんだけど
http://qb.2ch.net/test/read.cgi/accuse/1042063528/
　　　　　ひろゆきの収入源は？　　　　　
http://qb.2ch.net/test/read.cgi/accuse/1040821353/
断固として２ｃｈとひろゆきを支持する（＠ｗ荒
http://qb.2ch.net/test/read.cgi/accuse/1040814322/
0213デフォルトの名無しさんNGNG
ここ詳しい事のっていますよ
http://www.kouken.com/
0214デフォルトの名無しさんNGNG
↑
キン肉マンに出てくるｳｰﾙﾏﾝ？
0215デフォルトの名無しさんNGNG
600,000,000
0216デフォルトの名無しさんNGNG
fusianasan
0217デフォルトの名無しさんNGNG
ヤツがアニヲタという事がわかるな。
0218デフォルトの名無しさんNGNG
ネタスレを記事にするためとりあえず富山のほうに通報したんだな産経は。
0219デフォルトの名無しさんNGNG
インターネットの人気サイト「２ちゃんねる」での書き込みを注意された腹いせに、特定の人物を
中傷する内容の電子メールを配信したとして、奈良県警吉野署は８日、大阪市此花区春日出北、
介護センター従業員多賀井健次容疑者（３６）を名誉棄損などの疑いで逮捕した。　

http://www.jiji.com/cgi-bin/content.cgi?content=030108190621X315&genre=soc
0220デフォルトの名無しさんNGNG
IP取るようになったら些細なことでも訴えられるかもな。
ここまで話題性の在るサイトだし。
IP取ってるんだから今までは『訴えても意味無い』って諦めてた
人たちも訴えるようになるかもね。
基本的に訴えられるのは書き込みした人だろうけど、
その様な場所を提供したって事実に変わりは無いから
今まで以上に2chも訴えられるかも…。

推論ｽﾏｿ
0221デフォルトの名無しさんNGNG
削除前の手続きの話なんで、発信者の責任の話とはまぜないで欲しいが。
0222デフォルトの名無しさんNGNG
辞書登録してみた⇒夜勤さん！！ ﾍ(^^ﾍ)(ﾉ^^)ﾉ
0223デフォルトの名無しさんNGNG
辞めとけって。アンナもの使うと、それこそプロバイダからマークされるぞ・・・
0224デフォルトの名無しさんNGNG
↑逆夢だね。。。
0225山崎渉NGNG
（＾＾）
0226山崎渉NGNG
（＾＾）
0227山崎渉NGNG
（＾＾）
0228デフォルトの名無しさんNGNG
100!
0229Andrei AlexandrescuNGNG
http://twtelecom.dl.sourceforge.net/sourceforge/witme/loki-0.5.0.tar.bz2
だれかボクの作ったライブラリを添削して。
0230デフォルトの名無しさんNGNG
// O( n^2 )
void conc1( int n, char** elem, char* result ) {
    int i;
    result[0] = '\0';
    for( i = 0; i < n; i++ )
        strcat( result, elem[i] );
}
    
// O( n )
void conc2( int n, char** elem, char* result ) {
    int i;
    result[0] = '\0';
    char* p = result;
    for( i = 0; i < n; i++ )
        p += sprintf( p, "%s", elem[i] )
;
}
0231デフォルトの名無しさんNGNG
(。・_・。)ノhttp://homepage3.nifty.com/digikei/ten.html
0232デフォルトの名無しさんNGNG
>>230
result のバッファオーバーフロー対策が無いっすね。

あと、他の部分が見えないからなんともいえないけど、
一つにする意味があるのか疑問といえば疑問。
0233 ◆8/MtyDeTiY NGNG
#define CLEAR(buf) strncpy( (buf), "", sizeof(buf) )
0234デフォルトの名無しさんNGNG
>>233
#define CLEAR(buf) (*(buf)='\0')

これじゃだめなのか？
0235234NGNG
つーかクリアならmemsetで0をいれるべきだと思うが・・・
0236デフォルトの名無しさんNGNG
つーかその程度をマクロ化するべきではないと思うが・・・
0237うみNGNG
すみません。初心者なんですが、ひとつ質問です。
大好きたったHP（ゴールデンレトリバーのサイト）
に急にアクセスできなくなりました。
HP作成者がアクセス制限を引いたようです。
どうにか見る方法はありませんか？メッセージは以下です。
どうぞよろしくお願いいたします。（１０時間後に戻ってきます）

Forbidden
You don't have permission to access　OOOOOO　 on this server.


--------------------------------------------------------------------------------

Apache/1.3.26 Server at www02.u-page.so-net.ne.jp Port 80
0238デフォルトの名無しさんNGNG
　三三○
　　　●三三
0239233NGNG
いや、「strncpy()は、コピー先の文字列バッファの、あまった部分を0で埋める」
っていうのを知って、そんで書いてみたのでした。
0240デフォルトの名無しさんNGNG
>>239
そういえばそういう仕様だったな。
つまりネタか。
0241240NGNG
でも配列にしか使えない(mallocで得た領域には使えない)から、実用的ではないな。
0242デフォルトの名無しさんNGNG
// OOP 1/3
import java.util.*;

public class Element {
    private Character c;
    private Element( Character c ) {
        this.c = c;
    }
    public void display() {
        System.out.print( toString() );
    }
    public String toString() {
        return c.toString();
    }

    static private HashMap samples = new HashMap();
    static public Element get( Character key ) {
        Element sample = (Element)samples.get( key );
        if( sample == null )
            samples.put( key, sample = new Element(key) );
        return sample;
    }
}
0243デフォルトの名無しさんNGNG
// OOP 2/3
import java.util.*;

public class ElementArray {
    private ArrayList body = new ArrayList();
    public ElementArray( String s ) {
        for( int i = 0, size = s.length(); i < size; i++ )
            body.add( Element.get( new Character( s.charAt(i) ) ) );
    }
    public void display() {
        Iterator it = body.iterator();
        while( it.hasNext() )
            ( (Element)it.next() ).display();
    }
}
    

    
        
0244OO厨 ◆ILBKrPMSho NGNG
// OOP 3/3
public class HelloWorld {
    public static void main( String[] arg ) {
        ElementArray e = new ElementArray("Hello World!¥n");
        e.display();
    }
}

// この、一連のコードは、
// OOの意義を考えるためのもの。
// 他のいくつかのスレに、リンク張ります。
0245 ◆ILBKrPMSho NGNG
寂しいのでage。
0246デフォルトの名無しさんNGNG
>>242-245 ････
0247デフォルトの名無しさんNGNG
#define malloc(x) dbg_malloc(x)
void* dbg_malloc( size_t n ) {
    int i;
    const static s = "ｱﾋｬ";
    char* t = malloc( n );
    for( i = 0; i < n; i++ )
       t[i] = s[i%3];
    return (void*)t;
}
0248デフォルトの名無しさんNGNG
0249山崎渉NGNG
（＾＾）
0250山崎渉NGNG
　　 ∧＿∧
　　（　　＾＾ ）＜ ぬるぽ（＾＾）
0251__NGNG
携帯ゲーム機"プレイステーションポータブル(PSP)

　このPSPは、新規格UMD(ユニバーサルメディアディスク)というディスクを利用しており、そのサイズは直径6cmととても小さい(CDの半分程度)。 容量は1.8GBとなっている。
画面は4.5インチのTFT液晶で、480px x 272px(16:9)。MPEG4の再生やポリゴンも表示可能。外部端子として、USB2.0とメモリースティックコネクタが用意されているという。

この際、スク・エニもGBAからPSPに乗り換えたらどうでしょう。スク・エニの場合、PSPの方が実力を出しやすいような気がするんですが。
任天堂が携帯ゲーム機で圧倒的なシェアをもってるなら、スク・エニがそれを崩してみるのもおもしろいですし。かつて、PS人気の引き金となったFF７のように。
0252山崎渉NGNG
　　　 　∧＿∧
ﾋﾟｭ.ｰ　(　　＾＾ ） ＜これからも僕を応援して下さいね（＾＾）。
　　＝〔~∪￣￣〕
　　＝ ◎――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉
0253デフォルトの名無しさんNGNG
特定型の参照を入れる箱で 式オペした時に参照先に処理が及ぼされるもの かな
0254デフォルトの名無しさんNGNG
辞めとけって。アンナもの使うと、それこそプロバイダからマークされるぞ・・・
0255_NGNG
http://homepage.mac.com/hiroyuki44/hankaku06.html
0256山崎 渉NGNG
（＾＾）
0257山崎 渉NGNG
　　　 (⌒V⌒)
　　　│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
　　⊂|　　　　|つ
　　　（＿）（＿）　　　　　　　　　　　　　　　　　　　　　　山崎パン
0258デフォルトの名無しさん NGNG
あ
0259デフォルトの名無しさんNGNG
あ ×
A ○
0260デフォルトの名無しさんNGNG
I
0261デフォルトの名無しさんNGNG
よろしく！！
0262デフォルトの名無しさんNGNG
×よろしく！！
○よろよろ！！
0263デフォルトの名無しさん NGNG
ﾊｧ?
0264デフォルトの名無しさんNGNG
底age
0265デフォルトの名無しさんNGNG
このスレは何のスレ？

ある課題をみんなでやって、ソースを貼り付ける。言語は問わず。
で、いろんなコードを見て切磋琢磨していくスレれすか？
0266デフォルトの名無しさんNGNG
For k = 1 To 3
P = A(k, k)
For i = k To 6
A(k, i) = A(k, i) / P
Next i

For i = 1 To 3
If i <> k Then
For j = k To 6
A(i, j) = A(i, j) - P * A(k, j)
Next j
End If
Next i
Next k

逆行列を求めるものです。
動くんですが答えが合いません。
プログラムも数学もできる人お願いします。
0267デフォルトの名無しさんNGNG
Option Explicit
Dim Noah, objParm, objShell, objFolder, WshShell, i

'Noah本体の場所を指定
Noah = "D:\appl\noah3193\Noah.exe"

'渡されたファイルの処理
Set objParm = Wscript.Arguments
If objParm.Count < 1 Then
    WScript.echo "ファイルをドラッグ＆ドロップしてください。"
    WScript.Quit()
End If

'展開先のフォルダを選択
set objShell = WScript.CreateObject("Shell.Application")
set objFolder = objShell.BrowseForFolder(0, "展開先のフォルダを選択", 0, "c:\\")
If (objFolder Is Nothing) Then
    WScript.Quit()
End If

'ファイル毎にオプションをつけてNoahを起動
Set WshShell = CreateObject("WScript.Shell")
For i=0 To objParm.Count-1
    WshShell.Run Noah & " -x " & _
      Chr(34) & "-d" & objFolder.Items().Item().Path & Chr(34) & " " & _
      Chr(34) & objParm(i) & Chr(34), 1, True
Next

'終了処理
Set objParm = Nothing:set objShell = Nothing:Set WshShell = Nothing
0268267NGNG
267は、
ttp://pc5.2ch.net/test/read.cgi/tech/1080606445/519
の話
0269デフォルトの名無しさんNGNG
>>267

Option Explicit

'Noah本体の場所を指定
Noah = "D:\appl\noah3193\Noah.exe"

'渡されたファイルの処理
With Wscript
Set objParm = .Arguments
If objParm.Count = 0 Then
    .echo "ファイルをドラッグ＆ドロップしてください。"
    .Quit()
End If

'展開先のフォルダを選択
set objFolder = CreateObject("Shell.Application").BrowseForFolder(0, "展開先のフォルダを選択", 0, "c:\\")
If objFolder Is Nothing Then .Quit()

'ファイル毎にオプションをつけてNoahを起動
Set WshShell = CreateObject("WScript.Shell")
For i=0 To objParm.Count-1
    .Run Noah & " -x """-d" & _
      objFolder.Items().Item().Path & """ """ & objParm(i) & """", 1, True
Next
0270デフォルトの名無しさんNGNG
End With
0271デフォルトの名無しさんNGNG
>>269
ありがたく使わせていただきます。

なお、いくつか修正を加えました。

* 「Option Explicit」を無効にした
有効にしてると「変数宣言がないよ」って怒られるので、Dim と共に
削除することにしました。
よく考えたら、一読すればどんな変数名が使われているか把握できるので、
あらかじめ宣言するまでもないかなぁと。

* 「.Run Noah ．．．」→「WshShell.Run Noah ．．．」
暗黙の補完(?)みたいな略記法だろうかと思いますが、
この部分でエラーになるので、省略せずに書くことにしました。
　' "With Wscript" の中に".Run" が入っているせいだろか

* 「"」(引用符)を１こ減らした
WshShell.Run の引数で引用符が閉じられていないとのエラーになるので、
よく見てみると、一つ余計に入ってました。
たぶん、267のコードがあまりにも読みづらいのが原因ですね。

2、3 番目の修正により、Noah を実行する部分の1行目はこんな風になってます。
    WshShell.Run Noah & " -x ""-d" & _


Windows板のNoahスレにフィードバックさせていただきます。
0272デフォルトの名無しさんNGNG
>>271
宣言すれば一読する必要も無くなると思うけど…
0273デフォルトの名無しさんNGNG
http://pc5.2ch.net/test/read.cgi/tech/1088022524/675n

Option Explicit
Dim nn
Dim e(), j()
dim n(), i, r, t
nn = 3
ReDim e(nn-1)
ReDim j(nn-1)
ReDim n(nn-1)
e(0) = "apple"
j(0) = "りんご"
e(1) = "book"
j(1) = "本"
e(2) = "orange"
j(2) = "オレンジ"
For i = 0 to UBound(n)
  n(i) = i
Next
Randomize Timer
Do
  For i = 0 To UBound(n)
    r = Int(Rnd() * (UBound(n)+1))
    t = n(i): n(i) = n(r): n(r) = t
  Next

  For Each i In n
    MsgBox e(i): MsgBox j(i)
  Next
Loop While MsgBox("もう一度？", vbYesNo Or vbQuestion) = vbYes
0274デフォルトの名無しさんNGNG
<br>
0275デフォルトの名無しさんNGNG
>>266
If i <> k Then の前に、
P = A(i, k) を追加。
0276●NGNG
人いねーなー・・・
0277dh(1/2)NGNG
/*
* Diffie-Hellman key exchange
*
* 手抜き Diffie-Hellman 鍵交換
*/

#include<stdio.h>

int powmod(int x, int k, int p)
{
int z = x;
//printf("%d %d %d\n", x, k, p);
while(--k) z *= x;
//printf("%d\n", z);
while(z > p) z -= p;
return z;
}

int alice_calc_pubkey(int x, int p)
{
int priv_key = 3;
int pub_key = powmod(x, priv_key, p);
return pub_key;
}

int bob_calc_pubkey(int x, int p)
{
int priv_key = 6;
int pub_key = powmod(x, priv_key, p);
return pub_key;
}
0278dh(2/2) レスアドバイスよろしくお願いしますNGNG
int alice_get_key(int x, int p)
{
int key = powmod(x,3, p);
return key;
}
int bob_get_key(int x, int p)
{
int key = powmod(x, 6, p);
return key;
}
int main(void)
{
int alice_pubkey, bob_pubkey, p, x,key;
p = 11;
x = 7;
alice_pubkey = alice_calc_pubkey(x, p);
bob_pubkey = bob_calc_pubkey(x, p);
printf("alice pubkey %x, bob pubkey %x\n", alice_pubkey, bob_pubkey);
key = alice_get_key(bob_pubkey, p);
printf("%x\n", key);
key = bob_get_key(alice_pubkey, p);
printf("%x\n", key);
printf("alice and bob get same key\n");
return 0;
}
0279デフォルトの名無しさん2005/04/25(月) 12:37:12
味噌スレage
0280デフォルトの名無しさん2005/04/26(火) 12:36:30
このスレおもしろいな
久々に腹がひくひくした
0281デフォルトの名無しさん2005/05/03(火) 00:41:48
#include<stdio.h>
#include<stdlib.h>
#include<string.h>

int main()
{
/* この部分を添削して下さい */
return 0 ;
}
0282デフォルトの名無しさん2005/10/02(日) 18:39:39
ＶＢＳでハイ＆ロー作ってたらエラーが出たんで添削キボン。

Dim A,B,count,check,think,strRule,hantei
A=CInt(10 * Rnd)

Do
B = CInt(10 * Rnd)
think = msgbox("次に出る数は、この数より大きいと思いますか？ 『はい』、『いいえ』を選択してください。", vbYesNo)
If think = Yes then
'check　開始。
msgbox("比べる数は")&A("でした。")
msgbox("比べられる数は・・・")
msgbox = B
If A<B Then
msgbox ("正解！")
A = B
count = count+1
hantei = 0
End if
Exit do
Loop
If A>B Then
msgbox("残念！")
msgbox("貴方の成功数は"）&count("回でした！")
End if
Exit do
0283デフォルトの名無しさん2005/10/02(日) 18:40:23
If think = No then
msgbox
'check　開始。
msgbox("比べる数は")&A("でした。")
msgbox("比べられる数は・・・")
msgbox = B
If A>B Then
msgbox ("正解！")
A = B
count = count+1
End If
Exit do
Loop
If A<B Then
msgbox("残念！")
msgbox("貴方の成功数は"）&count("回でした！")
End If
Exit do
0284デフォルトの名無しさん2005/10/02(日) 20:29:22
'自分も添削キボン

Option Explicit
Dim n, a, b, r
Randomize
n = 0
a = Int(10 * Rnd())
Do
    Do: b = Int(10 * Rnd()): Loop While a = b
    r = MsgBox("この数は" & a & "です。次は大きいと思いますか？", vbYesNo)
    If ((r=vbYes And a<b) Or (r=vbNo And a>b)) Then
        MsgBox "これ:" & a & "  次:" & b, vbOkOnly, "正解"
        n = n + 1
    Else
        If MsgBox("成功数は" & n & vbCrLf & "再挑戦しますか？", vbYesNo, "残念") = vbNo Then Exit Do
        n = 0
    End If
    a = b
Loop
■ このスレッドは過去ログ倉庫に格納されています