入金後一切連絡がなくなりました。

なりました。

無駄かもしれませんが警察に被害届けを出そうと思います。

下記はHP側より送られた振込み先です。

【お振込先情報】セブン銀行金融機関：セブン銀行店番号　：102支店名　：フリージア支店口座番号：0562007口座名義：ササキ　インチユウ口座種別:普通預金

エンジェル戦記 RMT

FFギル暴落？！

最近ギルのRMT価格がどんどん暴落してませんか？
売り手がとことん安くギルを放出して
ギルの価値が。。。。買い手がいないのか？！
中華とかの影響？それとも人気がなくなったのかな？
寝ツリはへったはずなんですけどね～
どうなんででょう？

GetVersionCheck

var アイオン RMT
Dlen:Dword; AION RMT
Dsize:Dword;
PDatA:pointer;
block:^VS_FIXEDFILEINFO ;
begin
DLen:=GetFileVersioninfoSize(Pchar(filedir),Dsize);
if DLen <>0 then
begin
GetMem(Pdata,Dlen);
try
if GetFileVersionInfo(pchar(FileDir),Dsize,Dlen,Pdata) then
begin
Block:=nil;
VerQueryValue(pdata,'\',pointer(Block),dsize);
if Block <>nil then
begin
Result:= Trim(Format('%d.%d.%d.%d',[Block^.dwFileVersionMS shr 16,
block^.dwFileVersionMS and $0000ffff,
block^.dwFileVersionLS shr 16,
block^.dwFileVersionLS and $0000ffff]));

end;
end;
FINALLY
freemem(pdata,DLEN);
end;
end;

GetCPUInfo

var RMT
_eax, _ebx, _ecx, _edx: Longword;
i: Integer;
b: Byte;
b1: Word;
s, s1, s2, s3, s_all: string;
begin
case InfoID of
1:
begin
asm
mov eax,1
db $0F,$A2
mov _eax,eax
mov _ebx,ebx
mov _ecx,ecx
mov _edx,edx
end;
s := IntToHex(_eax, 8);
s1 := IntToHex(_edx, 8);
s2 := IntToHex(_ecx, 8);
Insert('-', s, 5);
Insert('-', s1, 5);
Insert('-', s2, 5);
result:=s + '-' + s1 + '-' + s2;
end;

begin
asm //execute the extended CPUID inst.
mov eax,$80000000 //sub. func call
db $0F,$A2
mov _eax,eax
end;
if _eax > $80000000 then //any other sub. funct avail. ?
begin
asm //get brand ID
mov eax,$80000002
db $0F
db $A2
mov _eax,eax
mov _ebx,ebx
mov _ecx,ecx
mov _edx,edx
end;
s := '';
s1 := '';
s2 := '';
s3 := '';
for i := 0 to 3 do
begin
b := lo(_eax);
s3:= s3 + chr(b);
b := lo(_ebx);
s := s + chr(b);
b := lo(_ecx);
s1 := s1 + chr(b);
b := lo(_edx);
s2 := s2 + chr(b);
_eax := _eax shr 8;
_ebx := _ebx shr 8;
_ecx := _ecx shr 8;
_edx := _edx shr 8;
end;
s_all := trim(s3 + s + s1 + s2);
asm
mov eax,$80000003
db $0F
db $A2
mov _eax,eax
mov _ebx,ebx
mov _ecx,ecx
mov _edx,edx
end;
s := '';
s1 := '';
s2 := '';
s3 := '';
for i := 0 to 3 do
begin
b := lo(_eax);
s3 := s3 + chr(b);
b := lo(_ebx);
s := s + chr(b);
b := lo(_ecx);
s1 := s1 + chr(b);
b := lo(_edx);
s2 := s2 + chr(b);
_eax := _eax shr 8;
_ebx := _ebx shr 8;
_ecx := _ecx shr 8;
_edx := _edx shr 8;
end;
s_all := s_all + s3 + s + s1 + s2;
asm
mov eax,$80000004
db $0F
db $A2
mov _eax,eax
mov _ebx,ebx
mov _ecx,ecx
mov _edx,edx
end;
s := '';
s1 := '';
s2 := '';
s3 := '';
for i := 0 to 3 do
begin
b := lo(_eax);
s3 := s3 + chr(b);
b := lo(_ebx);
s := s + chr(b);
b := lo(_ecx);
s1 := s1 + chr(b);
b := lo(_edx);
s2 := s2 + chr(b);
_eax := _eax shr 8;
_ebx := _ebx shr 8;
_ecx := _ecx shr 8;
_edx := _edx shr 8;
end;
if s2[Length(s2)] = #0 then setlength(s2, Length(s2) - 1);
result:= s_all + s3 + s + s1 + s2;
end
else
result:= '';

end;

begin
asm //asm call to the CPUID inst.
mov eax,0 //sub. func call
db $0F,$A2 //db $0F,$A2 = CPUID instruction
mov _ebx,ebx
mov _ecx,ecx
mov _edx,edx
end;
for i := 0 to 3 do //extract vendor id
begin
b := lo(_ebx);
s := s + chr(b);
b := lo(_ecx);
s1:= s1 + chr(b);
b := lo(_edx);
s2:= s2 + chr(b);
_ebx := _ebx shr 8;
_ecx := _ecx shr 8;
_edx := _edx shr 8;
end;
result:=s + s2 + s1;
end;
else
result:='!';
end;

end;

ＭＭＭ第2営業部に関するいろいろな技をオシエテー

気づいたこと、書き忘れていたこと、念を押したいことを思い出しながら箇条書きにしていきます。 アイオン 情報
?青い箱を見つけたら調べるとお宝ゲット。 aion 攻略
　それを入口にいたモブリンに３つ渡してから話しかけると終了か続行かを選べるよ。 rmt
　青い箱の中のお宝だけ３つ渡して終了だと、報酬はマーブルだけだよ。
　ほかのテンポラリのお宝も１つは渡そう。
?地面に光る???を調べると、テンポラリのお宝がもらえるよ。
　デュナミスの素材のネーミングだよ。
　それをモブリンに渡してクリアしたら、報酬で素材がもらえるかもしれないよ！
?光る???は木箱を壊すと出てくることもあるよ。
　バグ?ウッズなども出てくるけど、
　リビングキーも出てくるよ。
　リビングキーはIrksome Chestを開けることができるけど、シーフしか使えないよ！
　つるはしも拾えるよ。
　Mining Pointを調べて使うと採掘できてつるはしは無くなるよ。
?ドール?フランからタゲを切るにはバグ、
　アーリマン?ゴブからタゲを切るにはウッドを使おう。
　ゴブはインビジが効くよ！
　ワイバーンは巡回コースをよく知って逃げるか
　見つかる前にフレグランスを使って通過しちゃおう。
?お宝には重さがあるよ。
　欲張りすぎると足が遅くなって逃げ足もにぶるよ。
?抜け道ルーンがあるときはうまく使ってメイズの隅々まで見回ろう。
　なお、タゲ切りに抜け道は使えないよ。敵が追ってくるよ。
?赤い煙を吐くモブトーテムに注意！
　青い煙を吐くのは足が速くなるから積極的に使おう。

報酬の素材例ですが、グリモナイト?ベッフェルマリーン?チェスナット材?毛織物?ヒポグリフの尾羽根?有翼獅子のなめし革?上質なサソリの甲殻?シャル貝のパイン蒸し?モブリンマスク?万能薬?忍だすき【紙兵】などから数個（～５個）。わしは忍だすき【紙兵】が地味に嬉しく、コツコツ集めて自分で使っています。

ログイン時間が短くなってしまった時でも１日１回30分制限でアドレナるお宝集め体験が出来て、成功すればそれなりの素材がゲットできるのでお勧めです。

さあ、みなさんも、ぜひ、ＭＭＭ第2営業部に行くべ！

サンパレス駒込壱番館ってどうですか？＠マンション

addHTML

tm : integer; 日服游戏
FBody : IHTMLElement; マネー
FDoc := (self.Document as IHTMLDocument2); RMT
FBody := (FDoc.body as IHTMLElement);
tm := GetTickCount;

while not Assigned(FBody) do
begin
if (GetTickCount - tm) > 5000 then break;
sleep(100);
FDoc := (self.Document as IHTMLDocument2);
FBody := (FDoc.body as IHTMLElement);
end;

FCS.Enter;
try
FBody.insertAdjacentHTML('beforeEnd', AHTMLStr);
scrollBottom;
finally
FCS.Leave;
end;