奇迹等级计算公式

[服务器0]
名字=情怀奇迹
IP=43.240.73.113
GS端口=51901

[服务器1]
名字=原初外挂2线
IP=203.135.96.192
GS端口=56903

function dengjitoexp (w:word):Cardinal;
  var
    shouid:Cardinal;
  begin
   if w<1 then
   begin
     Result:= 0;
     Exit;
   end;
           IF w<$ff   then
           begin
               asm
                  pushad
                  xor ecx,ecx
                  MOV CX,w
                  LEA EAX,DWORD PTR DS:[eCX+9]
                  IMUL EAX,ECX
                  IMUL EAX,ECX
                  LEA ECX,DWORD PTR DS:[EAX+EAX*4]
                  SHL ECX,1
                  MOV shouid,ECX
                  popad
                end;
                END ELSE
                begin
               asm

                  pushad
                  xor ecx,ecx
                  MOV CX,w
                  LEA EAX,DWORD PTR DS:[eCX+9]
                  IMUL EAX,ECX
                  IMUL EAX,ECX
                  LEA ECX,DWORD PTR DS:[EAX+EAX*4]
                  SHL ECX,1
                  xor edx,edx

                  MOV DX,w
                  ADD EDX,-$0FF
                  LEA EAX,DWORD PTR DS:[eDX+9]
                  IMUL EAX,EDX
                  IMUL EAX,EDX
                  LEA EAX,DWORD PTR DS:[EAX+EAX*4]
                  LEA EAX,DWORD PTR DS:[EAX+EAX*4]
                  LEA EAX,DWORD PTR DS:[EAX+EAX*4]
                  LEA EDX,DWORD PTR DS:[ECX+EAX*8]
                  MOV shouid,EDX
                  popad
                end;
                end;
#$529177325#$

    Result:= shouid;
  end;