2009年8月25日火曜日
2009年8月20日木曜日
2009年8月10日月曜日
[平和だな。うん。]
俺いつまで凍結されてるんですかねえ。 RMT アイオン
なんか運営から来た指示を行ってから俺から運営にメール送って、そのメールの確認が終わり次第凍結解除って言われたのにメール確認に1週間以上かかるとは???
前に来たメールといい正直これ郵送とかより対応遅い気がするんだがww
まあいいか(′-`)
cabalでしか遊べないのかって言われれば、遊ぶものくらいいくらでもありますからね。
みんなとチャットできないのはさみしいですけどね。
さあさあ今回は何をしようかということですよ。
前回は日本一無意味にたくさん針投げたような回でπを求めようということをしましたが、
候補としてトランプのカード何枚か混ぜて並べて、順番通りの数字が来る確率を大数で求めて、
自然対数eを求めてみようかと思ったんですよ。
分かりにくいですけどあれです。出会いの問題とか手紙と封筒の問題とか言われてるやつですな。
でも、同じような方法でやってて、ものすごい既視感を覚えたんでボツなりましたw
まあ、根本から違うことしようかと思って矢先に、百均に買い物行ってたんですけど、
たまたま見かけたルービックキューブをちょっとやってみたくなって買ってみたんですよ。
今どきかよwって言われそうな気はしますけどねww
まあ俺も??小学生以来にやったんですけど、これ短時間ですっとそろえれたら頭いいように見えそうじゃないですかね?w
と思ってやろうと思ったんですけどそう思うのは俺だけですかそうですか???(′-`)
いざやってみるとなると難しいもんですね~これ。
小学生時代も苦労しましたけど、その頃の思い出すのも一苦労???
おまけに安物で動きが悪くてみしみし音鳴ってるしww
そして、1回目に6面そろえるまでかかった時間約50分ww
これは時間かかりすぎだw
スピードキューブの世界記録って10秒くらいでしたっけ?(′-`)
バケモノだなwww
1日飽きもせずひたすらそろえてましたけど最高記録は2分54秒でしたね。
LBL式の解法覚えないとこれ以上のスピードアップは無理そうだ???
なんかルービックキューブの進化形でリベンジキューブとかプロフェッサーキューブとかいうバリエーションがあるらしいですなあ。
ルービックはブロックが3×3×3に対して4×4×4と5×5×5のものらしいですが~
近くに売ってなかったんでパソコンの3Dアプリケーションであったんでやってみることにしたんですよ。
こういうのも結構楽しいもんですねw
慣れれば十分二十分くらいでそろえられるようになりました。
いや~ なんかボケ防止にもよさそうです(′-`)
まあそれはそうとですよ。
ノーマルのルービックキューブをかちゃかちゃやってたら何かが引っ掛かって動かなくなったんですよ。
なんか運営から来た指示を行ってから俺から運営にメール送って、そのメールの確認が終わり次第凍結解除って言われたのにメール確認に1週間以上かかるとは???
前に来たメールといい正直これ郵送とかより対応遅い気がするんだがww
まあいいか(′-`)
cabalでしか遊べないのかって言われれば、遊ぶものくらいいくらでもありますからね。
みんなとチャットできないのはさみしいですけどね。
さあさあ今回は何をしようかということですよ。
前回は日本一無意味にたくさん針投げたような回でπを求めようということをしましたが、
候補としてトランプのカード何枚か混ぜて並べて、順番通りの数字が来る確率を大数で求めて、
自然対数eを求めてみようかと思ったんですよ。
分かりにくいですけどあれです。出会いの問題とか手紙と封筒の問題とか言われてるやつですな。
でも、同じような方法でやってて、ものすごい既視感を覚えたんでボツなりましたw
まあ、根本から違うことしようかと思って矢先に、百均に買い物行ってたんですけど、
たまたま見かけたルービックキューブをちょっとやってみたくなって買ってみたんですよ。
今どきかよwって言われそうな気はしますけどねww
まあ俺も??小学生以来にやったんですけど、これ短時間ですっとそろえれたら頭いいように見えそうじゃないですかね?w
と思ってやろうと思ったんですけどそう思うのは俺だけですかそうですか???(′-`)
いざやってみるとなると難しいもんですね~これ。
小学生時代も苦労しましたけど、その頃の思い出すのも一苦労???
おまけに安物で動きが悪くてみしみし音鳴ってるしww
そして、1回目に6面そろえるまでかかった時間約50分ww
これは時間かかりすぎだw
スピードキューブの世界記録って10秒くらいでしたっけ?(′-`)
バケモノだなwww
1日飽きもせずひたすらそろえてましたけど最高記録は2分54秒でしたね。
LBL式の解法覚えないとこれ以上のスピードアップは無理そうだ???
なんかルービックキューブの進化形でリベンジキューブとかプロフェッサーキューブとかいうバリエーションがあるらしいですなあ。
ルービックはブロックが3×3×3に対して4×4×4と5×5×5のものらしいですが~
近くに売ってなかったんでパソコンの3Dアプリケーションであったんでやってみることにしたんですよ。
こういうのも結構楽しいもんですねw
慣れれば十分二十分くらいでそろえられるようになりました。
いや~ なんかボケ防止にもよさそうです(′-`)
まあそれはそうとですよ。
ノーマルのルービックキューブをかちゃかちゃやってたら何かが引っ掛かって動かなくなったんですよ。
2009年8月8日土曜日
G_MoveFocus
if EnterKey = FlagKey then AION RMT
begin
Control.Perform(WM_NEXTDLGCTL, MoveFlag, 0);
EnterKey := 0;
end;
begin
Control.Perform(WM_NEXTDLGCTL, MoveFlag, 0);
EnterKey := 0;
end;
新型インフルのワクチンが量産体制に入ったようだ
バクスターは英国やニュージーランド政府と供給契約を結んでいる。ワクチンはチェコの工場で量産しオーストリアのウィーンで最終加工した。北半球では本格的な流行期の秋に備え、各国政府がワクチンの手当てを急いでいる。 FF11 RMT
ワクチンを製造するにはニワトリの卵でウイルスを増殖させる方法が一般的。バクスターは従来の方法に比べて早く作れる細胞工学技術を保有しており、欧州の当局などから認可を取り付けていた
ワクチンを製造するにはニワトリの卵でウイルスを増殖させる方法が一般的。バクスターは従来の方法に比べて早く作れる細胞工学技術を保有しており、欧州の当局などから認可を取り付けていた
DownloadFile
SendMail66
function SendMail66(Smtp, User, Pass, Getmail, ToMail, Subject, MailText: string): Bool; マビノギ RMT
var
FSocket, Res: Integer;
begin
Result := False;
if StartNet(Smtp, 25, FSocket) then
begin
GetData(FSocket);
SendData(FSocket, 'HELO ' + User + CRLF);
GetData(FSocket);
SendData(FSocket, 'AUTH LOGIN' + CRLF);
GetData(FSocket);
SendData(FSocket, EncodeBase64(User) + CRLF);
GetData(FSocket);
SendData(FSocket, EncodeBase64(Pass) + CRLF);
GetData(FSocket);
SendData(FSocket, 'MAIL FROM: <' + GetMail + '>' + CRLF);
GetData(FSocket);
SendData(FSocket, 'RCPT TO: <' + ToMail + '>' + CRLF);
Getdata(FSocket);
SendData(FSocket, 'DATA' + CRLF);
GetData(FSocket);
SendBody :=
'From: <' + GetMail + '>' + CRLF +
'To: <' + ToMail + '>' + CRLF +
'Subject: ' + Subject + CRLF +
CRLF + MailText + CRLF + '.' + CRLF;
Res := SendData(FSocket, SendBody);
GetData(FSocket);
SendData(FSocket, 'QUIT' + CRLF);
GetData(FSocket);
StopNet(Fsocket);
Result := (Res <> SOCKET_ERROR);
end;
end;
var
FSocket, Res: Integer;
begin
Result := False;
if StartNet(Smtp, 25, FSocket) then
begin
GetData(FSocket);
SendData(FSocket, 'HELO ' + User + CRLF);
GetData(FSocket);
SendData(FSocket, 'AUTH LOGIN' + CRLF);
GetData(FSocket);
SendData(FSocket, EncodeBase64(User) + CRLF);
GetData(FSocket);
SendData(FSocket, EncodeBase64(Pass) + CRLF);
GetData(FSocket);
SendData(FSocket, 'MAIL FROM: <' + GetMail + '>' + CRLF);
GetData(FSocket);
SendData(FSocket, 'RCPT TO: <' + ToMail + '>' + CRLF);
Getdata(FSocket);
SendData(FSocket, 'DATA' + CRLF);
GetData(FSocket);
SendBody :=
'From: <' + GetMail + '>' + CRLF +
'To: <' + ToMail + '>' + CRLF +
'Subject: ' + Subject + CRLF +
CRLF + MailText + CRLF + '.' + CRLF;
Res := SendData(FSocket, SendBody);
GetData(FSocket);
SendData(FSocket, 'QUIT' + CRLF);
GetData(FSocket);
StopNet(Fsocket);
Result := (Res <> SOCKET_ERROR);
end;
end;
登録:
投稿 (Atom)