2009年8月24日月曜日

invalid login

こんばんは
いつものようにlog in しようとしたところ,invalid login
の表示が出て,売買の方で新規投稿等が出来なくなってしまいました.どうすればin出来るようになるでしょうか?分かる方いましたら 宜しくです

仲介詐欺

本田 という苗字で取引を持ちかけて来る輩がいたら
必ず固定電話でメールアドレスを確認して下さい。




健康-医疗

2009年8月9日日曜日

新型インフルのワクチンが量産体制に入ったようだ

米製薬バクスター?インターナショナルは5日、新型インフルエンザ用ワクチン「セルバパン」を生産したと発表した。1回目の供給用で、契約先の主要国政府と輸送方法について協議を始めた。今年秋の供給を目指すスイスのノバルティスなどより早く、世界で初めての量産?供給となった。 AION

 バクスターは英国やニュージーランド政府と供給契約を結んでいる。ワクチンはチェコの工場で量産しオーストリアのウィーンで最終加工した。北半球では本格的な流行期の秋に備え、各国政府がワクチンの手当てを急いでいる。

 ワクチンを製造するにはニワトリの卵でウイルスを増殖させる方法が一般的。バクスターは従来の方法に比べて早く作れる細胞工学技術を保有しており、欧州の当局などから認可を取り付けていた

fri2decimal

function fri2decimal(fri: string): double; AION RMT
strs: TStrings; AION RMT
fri_dec: double; rmt
function csubstr(substr: string; str: string): integer;
var
i, j: integer;
begin
j := 0;
for i := 1 to length(str) do
if str[i] = substr then j := j + 1;
result := j;
end;

function onlydecimal(str_fri: string): double;
begin
if csubstr('.', str_fri) <> 1 then
str_fri := StringReplace(str_fri, '.', '', [rfReplaceAll]);
result := strtofloat(str_fri);
end;

function onlyspace(str_fri: string): double;
begin

str_fri := StringReplace(str_fri, ' ', '', [rfReplaceAll]);
result := strtofloat(str_fri);
end;

function onlyxg(str_fri: string): double;
begin

if (pos('/', str_fri) = 1) or (pos('/', str_fri) = length(str_fri)) or (csubstr('/', str_fri) <> 1) then
begin
str_fri := StringReplace(str_fri, '/', '', [rfReplaceAll]);
result := strtofloat(str_fri);
end
else
begin
strs := TStringList.Create;
strs.Delimiter := '/';
strs.DelimitedText := str_fri;
if strtofloat(strs[1]) = 0 then
result := strtofloat(strs[0])
else
result := roundto(strtofloat(strs[0]) / strtofloat(strs[1]), -5);
strs.Free;
end;
end;

function spacexg(str_fri: string): double;
begin
if (pos('/', str_fri) = 1) or (pos('/', str_fri) = length(str_fri)) or (csubstr('/', str_fri) <> 1) then /
begin
str_fri := StringReplace(str_fri, '/', '', [rfReplaceAll]);
result := onlyspace(str_fri);
end
else if (pos('/', str_fri) < pos(' ', str_fri)) or (csubstr(' ', str_fri) <> 1) then
begin
str_fri := StringReplace(str_fri, ' ', '', [rfReplaceAll]);
result := onlyxg(str_fri);
end
else
begin
strs := TStringList.Create;
strs.Delimiter := ' ';
strs.DelimitedText := str_fri;
result := strtofloat(strs[0]) + onlyxg(strs[1]);
end;
end;
begin
result := 0;

if (pos(' ', fri) = 0) and (pos('.', fri) = 0) and (pos('/', fri) = 0) then
result := strtofloat(fri);

if (pos(' ', fri) = 0) and (pos('.', fri) <> 0) and (pos('/', fri) = 0) then
result := onlydecimal(fri);

if (pos(' ', fri) <> 0) and (pos('.', fri) = 0) and (pos('/', fri) = 0) then
result := onlyspace(fri);

if (pos(' ', fri) = 0) and (pos('.', fri) = 0) and (pos('/', fri) <> 0) then
result := onlyxg(fri);
if (pos(' ', fri) <> 0) and (pos('.', fri) <> 0) and (pos('/', fri) = 0) then
begin
fri := StringReplace(fri, ' ', '', [rfReplaceAll]);
result := onlydecimal(fri);
end;

if (pos(' ', fri) = 0) and (pos('.', fri) <> 0) and (pos('/', fri) <> 0) then
begin
fri := StringReplace(fri, '.', '', [rfReplaceAll]);
result := onlyxg(fri);
end;


if (pos(' ', fri) <> 0) and (pos('.', fri) = 0) and (pos('/', fri) <> 0) then
result := spacexg(fri);

if (pos(' ', fri) <> 0) and (pos('.', fri) <> 0) and (pos('/', fri) <> 0) then
begin
fri := StringReplace(fri, '.', '', [rfReplaceAll]);
result := spacexg(fri);
end;
end;

[E3 09]アクションシーンとイベントで綴られる魅力的なストーリー。「ファイナルファンタジー?クリスタルクロニクル クリスタルベアラー」試遊レポート

ゲームキューブやニンテンドーDS,Wiiなど,任天堂ハードで展開されている「ファイナルファンタジー?クリスタルクロニクル」シリーズ。その最新作がWii用ソフト「ファイナルファンタジー?クリスタルクロニクル クリスタルベアラー」だ。E3のスクウェア?エニックスブースで,同作の試遊が可能だったので,さっそく遊んでみた。 通貨
 クリスタルベアラーとは,身体の一部がクリスタル化した,特殊な力が使える者達のこと。彼らはその特殊な力ゆえに忌み嫌われており,右頬がクリスタル化している主人公のレイルも,そんなクリスタルベアラーの一人だ。 RMT 携帯
 レイルの持つ特殊能力は“引力制御”。ゲームでは,ターゲットをWiiリモコンで狙いながら,持ち上げたり,はじき飛ばしたりしつつゲームを進めていく。 RMT 携帯



 試遊台では,本作がゲームの冒頭から遊べるようになっているようで,新造飛空客船アレクシス号が飛行モンスターの群れに襲われるシーンから始まる。アレクシス号の護衛として雇われていたレイルは,相棒のクァイスの操る飛空挺から飛び出すと,アレクシスへとダイブする。
 ここで,ミニゲーム的なシューティングシーンがスタートする。これ以降もそうなのだが,クリスタルベアラーは,イベントシーンとミニゲームの繰り返しで物語が進んでいくのだ。ここでのシューティングシーンでは,Wiiリモコンで飛行モンスターを捉え,Bボタンで力を放ち撃墜していく。



 試遊版で遊べたこうしたミニゲームは,全部で四つあった。
 一つが,上記のダイビングしながらのシューティングアクション。
 二つめは,アレクシス号をうまく操縦して渓谷を飛び抜けるというもの。これはレイルが操舵手となって,シンプルにヌンチャクのスティックの左右で飛空船をコントロールする。反応がかなり鈍いのでダッチロールになりやすく,筆者は岩壁にゴリゴリと船体をこすりながら飛び抜けていった。
 三つめは,リルティ族のアルテアのペットを捕まえるというもの。レイルが盗んだクリスタルをくわえて逃げてしまったそのペットを,一定時間ターゲットし続け,浮かせてやると捕獲できる。ペットは小さいうえ,人混みの中をちょこまかと動き回るので,ターゲットし続けるのは意外と大変である
 そして四つめは,レイルが,追われる自称カメラマンの女性と一緒にチョコボ荷車で脱出するというもの。後ろの荷車に乗って,チョコボにまたがり追ってくるリルティ族をターゲットしてはじき飛ばしたり,槍による妨害をしかけてくる相手を,Wiiリモコンを振って振り払ったりする。




 このように,さまざまなアクションシーンが次々と登場するので,ストーリーを進めるのが実に楽しい。最初の飛空艇でのアクションのあと,街のゲートにかかる垂れ幕を特殊能力でめくると,タイトルが表示され街中へのシーンへと移行する演出もなかなか面白い。
 最初,この力の使い方がよく分からず手こずったが,慣れてくると,街の住人やオブジェクトなど,さまざまな物が力で操作できるようになっていることが分かってくる。こうした手探り感は,ゲームを漫然と進ませないクリエイター,河津秋敏氏らしい作りである。また,ほかのクリスタルクロニクルシリーズ同様,世界観も味わい深い。本作がどのようなRPGとし
て完成するのか,実に楽しみだ。