関数で出来ますか～？ 第１４問 文書校正

今回の出題者はジョー３さんです。

お題は文書校正・・・

*******************************************************************************

人間の脳って凄いよねーー無意識のうちに問題を処理している。
入力文字の間違いだって、そう・・・

１）単なる入力間違い
２）1文字抜けている
３）3文字目と4文字目が逆（交換）
とかとか、どう処理してるんだろ？
・・・・で、その１・・・・

【問題】

文字の間違い探し：その１　、1文字間違いパターン

原文：いろはにほへと

入力：いろはにほひと

1文字だけ間違っているとする。何文字目が間違い?

（上の例の場合は６）

★おもてもん（通常編）
　　　　＊どんな関数を使っても良い
　　　　関数のみ、表示形式、条件付き等×
　　　　E6の式は?

★うらもん（大混乱編）
　　　＊ここの大家さんのくまぷーさんが
　　　禁止関数を2個指定できる＆
　　　先回出題者のsakudaさんが
　　　禁止関数を2個指定できる＆
　　　次回出題のむ印さんが
　　　禁止関数を2個指定できる
　　　げーーー大変だーーー
　　　E7の式は?

注：表、裏とも、入力文字は、
「いろはにほへと」のみ＆
どこか1文字が違っているのみとする

（間違ってないとか2文字間違い考慮不要）

※裏問の禁止関数

１．Left、Mid　sakudaさん指定

2.Len、If　　　む印さん指定

３．Find、Row　くまぷー指定

※解答用参考ブック

2009_Q14.lzhをダウンロード

***********************************************************************

尚、解答発表は4/18（土）の８：００です。それまでは直接数式を

書き込むこと・ポイントとなる関数名を書き込むことはご遠慮ください。

***********************************************************************

★sakudaさんより、数式の文字数カウントアドインを頂きました。

　FormulaToText.lzhをダウンロード

式（配列数式でも可）を入れたセルを選択状態にして実行すると、式の右の列に文字列化した式を入れ、その下にLenを入れて文字数が分かるようになります。
よろしければお使い下さい。

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（sakudaさん談）

Comments

[投稿情報: ジョー3]

仮にやったら、６４だったかなーー
2回目別案、50代だったかなーー

ん、、、どっちにも、・・・・だはは、、

裏門の禁じ手が満載だった。

これは困ったことになるかもしれない。

[投稿情報: y sakuda]

とりあえずやってみたら57ですからジョー３と大差ないです。
>裏門の禁じ手が満載だった。
×２
できるのかなｗ

[投稿情報: y sakuda]

あまり良い手が思いつかない・・・・・
とりあえず、表51、裏はなんと81・・・つらいｗ

[投稿情報: ジョー3]

うぅ・・・・・
＞とりあえず、表51、裏はなんと81・・・つらいｗ
全然、苦しそうでないなーーーー
・・・・辛そうに見えない。・・・・・

[投稿情報: くまぷー]

ははは、おいらは明日ゆっくり考えます。
まだ先は長い・・・

[投稿情報: y sakuda]

>・・・・辛そうに見えない。・・・
つらいですよーーー裏はｗ
くまぷーさんと自分でもろに首を絞めてるｗ

ところで、今更なんですが、式をコピーして文字列にして、Lenで文字数を数えるのが面倒くさくなって（と言うよりさっき５つばかり間違えた式を作っててそれをやり直して文字列化するのが面倒になったｗ）
こんな物作りました。
Sub ExtractFormula()
Dim wRange As Range, wFormula As String
Set wRange = Selection
wFormula = wRange.FormulaLocal
If wRange.HasArray Then
wFormula = "{" & wFormula & "}"
End If
wRange.Offset(0, 1) = "'" & wFormula
wRange.Offset(1, 1).FormulaLocal = "=len(" & wRange.Offset(0, 1).Address & ")"
End Sub

式（配列数式でも可）を入れたセルを選択状態にして実行すると、式の右の列に文字列化した式を入れ、その下にLenを入れて文字数が分かるようになります。
よろしければお使い下さい。

[投稿情報: くまぷー]

＞こんな物作りました。

表計算一筆書きの時みたいに
右クリック→ポップアップメニューから
実行できるとなお、うれしい・・・(^O^)

[投稿情報: y sakuda]

>右クリック→ポップアップメニューから
>実行できるとなお、うれしい・・・(^O^)
大げさですが、アドインにしましょうか？

実は私もさっきから、右クリックしては、「あっ、違った・・・・」ってやってますｗ

あれから何種類か作りましたが、どうしても51を越せない＾＾；

[投稿情報: くまぷー]

＞大げさですが、アドインにしましょうか？

そうして頂ければ・・・
よろしくお願いします。　m(__)m

[投稿情報: y sakuda]

アドインにしてメールで送りました。
録にテストしてませんがｗ

[投稿情報: くまぷー]

>アドインにしてメールで送りました。

ありがとうございます。
それでは早速、公開させて頂きます。

[投稿情報: くまぷー]

公開しました。
Topをご覧下さい。

なお、区切りのよいところで
↓のような感じで再度取り上げるつもりです。

http://kumapooh.justblog.jp/blog/cat2176961/index.html

（今、新スレを立てると第１４問のスレが
後ろにいってしまうので・・・）

[投稿情報: y sakuda]

裏もなんとか60台に入りました。
表は進展なしで今日は終わりそう＾＾；

[投稿情報: y sakuda]

質問でーーす

いろろにほへと

のようにな間違えはあり得るとするのでしょうか？

[投稿情報: からくち]

マスターズ最終日
残念ながらタイガーの優勝は消えました
がんばれ！片山

＞※裏問の禁止関数
これは軽視できますが

＞質問でーーす
これは物凄く重要ですね
よる少ない文字数にする為には

自分で自分を窮地に追い込むようですが
注意書きが無い以上
あり得ると捉えるのが一般的な解釈かな

文字数がかなり違ってくる
無ければ３０台でもいける

[投稿情報:]

＞いろろにほへと
＞のようにな間違えはあり得るとするの＞でしょうか？
なるほど、、
＞注意書きが無い以上
＞あり得ると捉えるのが一般的な解釈かな
ですねーー
って、ことで、そう言うことにしましょう。

いろはにろへと・・・もあるかもしれないしね、、、
＞無ければ３０台でもいける
でも、そう言う答えも、見てみたいですよねーー
先回の８～１００ならば、のように・・・

[投稿情報: からくち]

カブレラ優勝おめでとう
彼は日本で育っていったような人なので

＞ですねーー
やはり

取りあえず（見た目で）
おもてもん：３９
うらもん：４４

[投稿情報: ジョー3]

ちらっ、・・・・・仕事中に、・・・

どひゃーーーー

＞★うらもん（大混乱編）
と言ったけど、

＞おもてもん：３９
＞うらもん：４４
ってことは、、

からくちさんを、混乱させることには、、
ならなかったみたいねーー・・・

この数に、・・・
俺は混乱してるけどね、・・・

[投稿情報: ジョー3]

この問題・・・
自分の目は（脳は）どのように
間違い部分を見つけようとしているか？
素直に式にしてみた。
５４だった。
では、自分の脳の思考の流れを無視して、・・・・やってみる。・・・あとで、

[投稿情報: ジョー3]

気になって、やってみた。
おもてのみ・・・・４０

あ、、、１１：００まで仕上げなきゃの・・・
仕事を・・・・あせるなーーー

[投稿情報: ジョー3]

あはは、、
左右括弧一組無駄があった。
で、

おもて、３８

[投稿情報: ジョー3]

規定の隙間を、通り抜けただけですが
・・・・・・
うらもん：４３です。

[投稿情報: supermab]

>素直に式にしてみた。

188文字になった。

どうやら、脳のできが・・・

悪いようである。

[投稿情報: ジョー3]

>>素直に式にしてみた。
>188文字になった。

じゃ、もっとすなおにやって・・・・
204文字！！

[投稿情報: supermab]

>204文字！！

まけた・・・

[投稿情報: む印]

だいぶ出遅れましたが、、

おもて問：４０、３７
うら問：４５、４４、４３

[投稿情報: ジョー3]

＞だいぶ出遅れましたが、、

ん、、、、

まだはじまったばかりだしょーーーー

あ、、、おらは、もうアイデアでねーかも、、

[投稿情報: David Montgomery]

>If wRange.HasArray Then・・・

Hairetu su-siki yoku wakannnai-ne-.
VBA no desune-.
Kore e-ne-.
Yoku wakaru.

Thank you!

[投稿情報: ジョー3]

Ore
Dottimo
Wkaranai

Maneterudake

a

VBA ha
manemo dekinnkatta

[投稿情報: David Montgomery]

Oh---

Anata eigo wakarunoka?

Nihonjin erai ne!

Thank you!

[投稿情報: ますたあ]

とりあえず参加してますよ～って報告ね。

おもてもんくらいは解けないとね。^^;
おもてもん、54文字でした。

うらもんは明日だけど、解けるかな～。^^;

[投稿情報: ジョー3]

Don't my mustache
あ、、、まちがってるかなーー

[投稿情報:]

＞おもてもん、54文字でした。
なんか、うれしいなーー

年、、、ちょっと過去・・・・いいなーーー

[投稿情報: くまぷー]

とりあえず何も考えずに
表４８文字です(^^ゞ

[投稿情報: ジョー3]

＞表４８文字です(^^ゞ
ぎょえーーーー

ん、、

あはは、、、

あーーー、よかった。

ごめんごめん、、

[投稿情報: y sakuda]

今回はまたダメなパターンかも＾＾；
素朴にやった50台のは勿論ちゃんとうごきますが、ダイエットしたやつは、特殊なパターンが出てくるとだめｗ

今日会社で昼休みにやったやつは、いいアイデアだと思ったんですけど、作った二通りはそれぞれ、

とろはにほへと
いろはにほへい

で撃沈www

[投稿情報: y sakuda]

ところで、
>投稿： David Montgomery | 2009年4月13日 (月) 午後 09時30分

なんじゃこれ？？

[投稿情報: くまぷー]

ところで、いまさらながら質問です。

入力文字は「いろはにほへと」の
7種類で、７文字ということですか？
それとも１００文字、１００００文字とかもありですか？

[投稿情報: ジョー3]

ほへい・・・・・
歩兵？？・・・・・

・・・・うーーん

呑んでないときやってみるね、､

・・・・・・・・・・・・・

[投稿情報: からくち]

＞204文字！！
いいな～
わたしも作ろうかな
無駄に長～～い式を
でも少しくらいは意味を交えないと
いけないな

ところで1つ疑問がわきました
提示されました式が正しいか否かの判定は
どうするのでしょう

実はあるパターンで判定して見たところ
殆んどの式が間違っている事が発覚

そのパターンをここに書く事は
＞それまでは直接数式を書き込むこと・
＞ポイントとなる関数名を書き込むことはご遠慮ください。
これに抵触すると思われますので控えますが

おもてもん：４２
うらもん：４８

あっている・・・のかな・・・

[投稿情報: ジョー3]

＞なんじゃこれ？？
呑んだときの、わたしーーー
かと、おもた。

ごめんごめん、、

＞7種類で、７文字ということですか？
そそ、、それだけですーーー

複雑なのは、また、あとでーーー

[投稿情報: ジョー3]

＞実はあるパターンで判定して見たところ
＞殆んどの式が間違っている事が発覚

ああーーーー
またまた、想定外のおもろいことが・・・・

からくちさーーん
涙が出そうなぐらい・・・うれしいです。

[投稿情報: くまぷー]

＞7種類で、７文字ということですか？

なんだ～、そういうことか・・・
(｀◇´)ゞアイアイサー！です

[投稿情報: y sakuda]

>実はあるパターンで判定して見たところ
私も↓のような特定パターンでのみアウトになるんで、なんか判定プログラム作ろうかと思ったりしてます。

とろはにほへと

ただ・・・・何もアイデア出ずに50台のまま観客モードになっちゃったらやらないと思うけどｗ

[投稿情報: からくち]

＞それとも１００文字、１００００文字とかもありですか？

＞どこか1文字が違っているのみとする
違いは１文字のみとするなら
無しと解釈した方が納得しやすいのでは

[投稿情報:]

＞提示されました式が正しいか否かの判定は
＞どうするのでしょう
おろおろ、、、、
どきどき・・・・・

最後に、みんなで、
判定文字列を・・・１個ずつ・・・・
だしあって・・・・

あーーー、おろおろ、、
くまちゃーーん・・・・
任せて良いかなーーー

[投稿情報: からくち]

＞とろはにほへと
これは通過出来ました

[投稿情報: David Montgomery]

>なんか判定プログラム作ろうかと

Oh---!

Mr.Sakuda Thank you!

[投稿情報: ジョー3]

sakudaさーーん
からくちさーーん
くまぷーさーん

すんません
呑んだから、・・・・
（即答避けますね)

[投稿情報: ジョー3]

とろはにほへと

＝私も通過でした。

で、からくちさーん

ひとつ、おせーーて、くださいな・・・・
（たとえば、どんなのですか？）

[投稿情報: minmax]

なんか盛り上がっていますね。
ちょっと時間があったので、
超超ずるで表問やってみました。
提示する予定は無いけど２９文字でした。

ちなみに、表問は
Left、Mid、Len、If、Find、Rowのみを使った解答と解釈したくなった。

[投稿情報: y sakuda]

再確認ですが、
＞7種類で、７文字ということですか？
と言うことは

"いいいいいいい"
と
"いいいいあいい"
なんてパターンもありってことかな？
判定プログラム作るにしても条件がはっきりしないと作りようがないｗ

[投稿情報: ジョー3]

＞超超ずるで表問やってみました。
あはは、、、よくやるよねーー
あなたも・・・・・・

＞Left、Mid、Len、If、Find、Rowのみを使った解答と解釈したくなった。
こりゃまた・・・・・

なんか、将棋の馬鹿詰みって、
思い出してしまった。
なんだっけ、、それ、、

[投稿情報: y sakuda]

>David Montgomery!
どうも、この荒しの正体は・・・・・
向こうにも出たｗ

[投稿情報: ジョー3]

＞判定プログラム作るにしても条件がはっきりしないと作りようがないｗ
そだよねーー
でも、、
ジョー3の日本語おかいい・・・けど、、

答え･･･（のつもり）

＞いいいいいいい"
あのーーー

いろはにほへと

の、
1文字だけ違っている場合って、
・・・・・・・
言って、なかったっけ、､

[投稿情報: ジョー3]

＞どうも、この荒しの正体は・・・・・
＞向こうにも出たｗ
あはは、、

あーーーよかった。

昔の子供との会話を思い出した・・・・
・・・・・
あとでねーー

[投稿情報: くまぷー]

＞くまぷーさーん

呼ばれたみたいだけど
ちょっと力不足かな～

[投稿情報: ジョー3]

なんか、おれ、判定プログラム・・・
依頼・・・作者って、なりそう・・・
すんまへーーーん

[投稿情報: y sakuda]

>いろはにほへと
>1文字だけ違っている場合って、
もともとそう思ってたのですが、7文字7種類ってんで疑問をもっちゃったｗ
つまり"正しい"例文は固定ということですね

[投稿情報: ジョー3]

・・・・・・・・
もともとそう思ってたのですが、・・・
あはは・・・・・・（わらって、ごまかす）
↑飲んだから･･･笑って、許して!!

で、

さて、、寝るかなーーー

[投稿情報: む印]

＞とろはにほへと
これは考えてませんでした、、

おもて問３７は→３９に･･･(T_T)

[投稿情報: ジョー3]

＞とろはにほへと
これは考えてませんでした、、

おもて問３７は→３９に･･･(T_T)

らっきーー
３８→３８

でも、、、呑んだ俺だから、､､
1年ぐらい、禁酒し世かなーー・・・
・・・・・
んまあ・・・むりかなーーー

[投稿情報: む印]

あぁっ、もっと深刻なのが、、

　「いろはにほへへ」

全部だめだったぁー
改めて、出直します(>_<)

[投稿情報:]

＞あぁっ、もっと深刻なのが、、

＞　「いろはにほへへ」
ああーーーー
なんてこったーーー
らっきーー

おれって、かわったこと、してないのにぃーー

[投稿情報: y sakuda]

判定プログラム作ってみました。
使い方
１．C4は　いろはにほへと　と入っている状態で
２．C6は初期化するので、何でもOK
３．式の入ったセルを選択状態にして実行
４．OKまたはエラーとなる文字列例が表示されます
（実行するマクロはHantei　です）

Function CheckFunc()
Dim K As Long
CheckFunc = 0
With ActiveSheet
For K = 1 To 7
If Mid(.Range("C4"), K, 1) <> Mid(.Range("C6"), K, 1) Then
CheckFunc = K
Exit For
End If
Next
End With
End Function
Sub Hantei()
Dim wAry, wOrgStr As String, wStr As String
Dim wFormulaCell As Range
Dim wLeft As String, wRight As String, wChar As String
wAry = Array("あ", "い", "ろ", "は", "に", "ほ", "へ", "と")
Set wFormulaCell = Selection
With ActiveSheet
wOrgStr = .Range("C4")
wStr = ""
For i = 1 To 7
For j = 0 To 7
wLeft = Left(wOrgStr, i - 1)
wRight = Right(wOrgStr, 7 - i)
wChar = Mid(wOrgStr, i, 1)
If wAry(j) <> wChar Then
.Range("C6").Value = wLeft & wAry(j) & wRight
If CheckFunc() <> wFormulaCell.Value Then
wStr = .Range("C6")
Exit For
End If
End If
Next
If wStr <> "" Then
Exit For
End If
Next
End With
If wStr = "" Then
MsgBox "OK"
Else
MsgBox wStr & " の時エラーになります"
End If
End Sub

[投稿情報: のんだから]

誤解してるかもしれない・・・・
そんときは、ご免なさい!!

[投稿情報:]

＞判定プログラム作ってみました。
おれって、悪い男だなーーー
せんかいも、、、こんかいも、、、
まあ、、いいっか・・・って、ゆるしてねーーーー

[投稿情報: ジョー3]

のんで、勘違い、だったら、

ど、、、しよう・・・・

dakudaさーーん

回答例を、送ろうかーーーー

・・・・自信ないジョー・・・だから、、

[投稿情報: ジョー3]

あ、、おろおろ、、、

くまぷーさーん

３８を、検証してくれませんかーーー

（どうせ、最後はもっと、短くなるでしょうから）
作者バージョンってことで、送ります。

[投稿情報:]

＞dakudaさーーん
sakudaさーーん
ご免なさい。

[投稿情報: y sakuda]

結局今日はなにもやってませんが・・・
判定を通る確実なやつは
表56、裏65どまりですねーー
錯綜してるけど、土台勝負にならなそう・・・・
観客モードに接近チュウｗ

[投稿情報: y sakuda]

裏は小細工で61にダイエット
大勢に影響ないけど＾＾；

[投稿情報: y sakuda]

ありゃ、裏は禁止関数使ってた・・・・
訂正して67

[投稿情報: くまぷー]

sakudaさん、判定プログラム作成有り難うございます。m(__)m

＞くまぷーさーん

＞３８を、検証してくれませんかーーー

では、後ほど・・・
ひょっとしたら出題者解答が

＼(`O´θ／エイキックじゃ！バキッ!!☆／(x_x)

・・・になったりして・・・・(^^ゞ

[投稿情報: ジョー3]

おはようございます。
sakudaさんチェックですが、
一応通りました。

・・・・
ありがとうございます。

[投稿情報: ジョー3]

２０４の式も、
通して頂きました。
・・・・・・・
あーーよかった。

[投稿情報: supermab]

y_sakuda さん

文字数チェック
＆
判定

プログラムありがとうございます。
これがなければ、数える気にならない
188文字が、「OK」通りました。

P．S
昨夜は、酔ったDavid がお騒がせいたしました。

[投稿情報: ジョー3]

＞David がお騒がせいたしました。
ジョー3も、たいへんお騒がせ致しました。

[投稿情報: ジョー3]

判定プログラムですが、

どんな風に動いているか興味。
で、
しばらく眺めてしまった。
とても、面白かったです。

[投稿情報: ますたあ]

y.sakudaさん、判定マクロありがとうございます。

さて、そのマクロなんですが
皆さんのところでは正しく動作しているでしょうか。

私のところでは
For i = 1 To 7
For j = 0 To 7
のi とj のところで定数が定義されていないと
怒られちゃいます。

これを勝手に
Dim i As Integer
Dim j As Integer
と、宣言しちゃいましたが．．．。
これで良いんでしょうかね～。^^;

動くようにはなりましたが．．．。

[投稿情報: ジョー3]

>皆さんのところでは正しく動作しているでしょうか。
動いてますーーーー・・・・

[投稿情報: む印]

昨晩は何もせず眠ってしまったので
昼休みすぐに修正し、
おもて問３７、うら問４３で
結局、文字数に変化はありませんでした(^^;

[投稿情報: ジョー3]

>昼休みすぐに修正し、
はえーーー

>結局、文字数に変化はありませんでした(^^;
・・・・そりゃまた、すごい。

[投稿情報: む印]

うら問の無駄に気づいて、１文字減の４２。

何れにせよ、
原文が「いろはにほへと」ということでだいぶ助かってます・・・

[投稿情報: ますたあ]

＞のi とj のところで定数が定義されていないと
これ、変数ですよね。^^;;;;;;

[投稿情報: ジョー3]

閃いた・・・・
で、やってみた。48文字。
気に入った。だが、
ｓａｋｕｄａさんのプログラムで、
死んでしまった。

[投稿情報: y sakuda]

>のi とj のところで定数が定義されていないと怒られちゃいます。

ますたーさん
宣言が入ってませんでした。
この場合、Intergerで全く問題ないのですが、大差ないので整数の場合は　Longで宣言する方が無難です。

ますたーさんのところで動かなかったのはVBEのオプションの問題です。

VBEでツール⇒オプション⇒編集　をご覧ください。
"変数の宣言を強制する"にチェックが入っているはずです。
このチェックが入っていると、標準モジュール等コードモジュールの頭に必ず
Option Explicit
が入り、仰っている状況になります。
少なく共私はコーディングの際うっとうしいので殺してあります。
（一般的にはどうだか知りませんが）

[投稿情報: y sakuda]

>ｓａｋｕｄａさんのプログラムで、
>死んでしまった。
ある意味作った甲斐があったｗ

[投稿情報: ジョー3]

＞ある意味作った甲斐があったｗ
感謝感謝！！（殺されたのに）

ｓａｋｕｄａさんのプログラムの前に、
自分で入力して試した。
で、ちょっと面白い言葉、

アロハ　にほへと
囲炉裏　にほへと
いろはに　歩兵
・・・・などなど、あとは忘れた。

[投稿情報: ジョー3]

また、・・・・・
４８　を作った。
ぱーーす・・・・・・・
でけたーーーーー

[投稿情報: y sakuda]

うーーん、私はなにか方向性間違えてるんだろうな・・・・・
50を切りそうなアイデアなにもでてこないです＾＾；

[投稿情報: ジョー3]

＞うーーん、私はなにか方向性間違えてるんだろうな・・・・・
いやいや、、、あるとき突然・・・・
でるときはデル・・・・と、思う。

また作った。面白い案・・・・68文字。
文字は多くても、、おもしれーーー。

[投稿情報: y sakuda]

ご存知のように、だめな時は全くだめですからねーー
いつも、皆さんの回答みてなんで？？って感じです。

[投稿情報: ジョー3]

＞いつも、皆さんの回答みてなんで？？って感じです。

そそ、、、凝ってるよねーーーみなさん。

でも、わたしのは、分かりやすいと思う。
（俺、単純だから）・・・
特に今回の、３８と６８・・・その他
全部、分かり易いです。
なーーんにも、技がありません。

[投稿情報: ますたあ]

sakuda さん、コメントありがとうございます。

＞"変数の宣言を強制する"にチェックが入っているはずです。
はい、入っています。
って言うか、入れておいたほうが良いよって
以前、sakuda さんに教わったような記憶が...。^^;

いずれにしても、習い始めたばっかりですので
今のまま行こうと思います。

＞大差ないので整数の場合は　Longで宣言する方が無難です。
おお、勉強になるな～～。

[投稿情報: minmax]

全く短くする方法は思いつきません。
ひらめき全くなし。

昨日の続きで
超超ずるで裏問やってみました。
やはり表問から６文字増えました。
やっぱりこんなのでは、だめだな。

[投稿情報: ジョー3]

＞超超ずるで裏問やってみました。
それは、それで、

また、味があると思う。

楽しみだなーーー

[投稿情報: くまぷー]

今、飲み会から帰って来ました。
かなり酔っています　

オミヤゲダゾー! 由＼(@_+ ) ヒック!

＞sakudaさんチェックですが、
＞一応通りました。

ジョー３さん、それではこちらで検証する
必要は無いですね。

[投稿情報: ジョー3]

はいーーーー
出来そうもないと、思ったけど出来ちぃました。
・・・・・
どもでーーーす

[投稿情報: y sakuda]

やっとテストパスする48ができた・・・・
と言っても長かったやつでアホやってる所見つけただけだからブレークスルーにはなってない・・・・・
本当に今回はどうしようもネーナｗ