paranoia.sbk

3D 游戏界的大牛人 John Carmack 终于放出了 Q3 的源代码

fsub qword ptr (_Y)
fstp qword ptr (_Y)
fld qword ptr (_Half)
fadd qword ptr (_Y)
fstp qword ptr (_X)
fld qword ptr (_Half)
fsub qword ptr (_X)
fstp qword ptr (_Y)
fld qword ptr (_Half)
fadd qword ptr (_Y)
fstp qword ptr (_X)
L71:
fld qword ptr (_X)
fcomp qword ptr (_U1)
fstsw ax
sahf
jae L73
fld qword ptr (_Zero)
fcomp qword ptr (_X)
fstsw ax
sahf
jb L70
L73:
fld qword ptr (_E1)
fcomp qword ptr (_U1)
fstsw ax
sahf
jne L74
lea edi,(L76)
push edi
call _printf
add esp,4
jmp L75
L74:
fld qword ptr (_U1)
sub esp,8
fstp qword ptr [esp]
lea edi,(L77)
push edi
call _printf
add esp,12
L75:
fld qword ptr (_One)
fdiv qword ptr (_U1)
fstp qword ptr (_W)
fld qword ptr (_Half)
fsub qword ptr (_U1)
fadd qword ptr (_Half)
fstp qword ptr (_F9)
fld qword ptr (_U2)
fdiv qword ptr (_U1)
fadd qword ptr (L78)
sub esp,8
fstp qword ptr [esp]
call _floor
add esp,8
fstp qword ptr (-360)[ebp]
fld qword ptr (-360)[ebp]
fstp qword ptr (_Radix)
fld qword ptr (_E0)
fcomp qword ptr (_Radix)
fstsw ax
sahf
jne L79
lea edi,(L81)
push edi
call _printf
add esp,4
jmp L80
L79:
fld qword ptr (_Radix)
sub esp,8
fstp qword ptr [esp]
lea edi,(L82)
push edi
call _printf
add esp,12
L80:
lea edi,(L84)
push edi
fld qword ptr (_Eight)
fadd qword ptr (_Eight)
fcomp qword ptr (_Radix)
fstsw ax
sahf
jb L85
mov dword ptr (-364)[ebp],1
jmp L86
L85:
mov dword ptr (-364)[ebp],0
L86:
mov edi,dword ptr (-364)[ebp]
push edi
push 2
call _TstCond
add esp,12
lea edi,(L88)
push edi
fld qword ptr (_Two)
fcomp qword ptr (_Radix)
fstsw ax
sahf
je L92
fld qword ptr (L93)
fcomp qword ptr (_Radix)
fstsw ax
sahf
je L92
fld qword ptr (_One)
fcomp qword ptr (_Radix)
fstsw ax
sahf
jne L89
L92:
mov dword ptr (-376)[ebp],1
jmp L90
L89:
mov dword ptr (-376)[ebp],0
L90:
mov edi,dword ptr (-376)[ebp]
push edi
push 3
call _TstCond
add esp,12
mov dword ptr (_Milestone),20
lea edi,(L95)
push edi
fld qword ptr (_F9)
fsub qword ptr (_Half)
fld qword ptr (_Half)
fcompp
fstsw ax
sahf
jbe L96
mov dword ptr (-388)[ebp],1
jmp L97
L96:
mov dword ptr (-388)[ebp],0
L97:
mov edi,dword ptr (-388)[ebp]
push edi
push 0
call _TstCond
add esp,12
fld qword ptr (_F9)
fstp qword ptr (_X)
mov dword ptr (_I),1
fld qword ptr (_X)
fsub qword ptr (_Half)
fstp qword ptr (_Y)
fld qword ptr (_Y)
fsub qword ptr (_Half)
fstp qword ptr (_Z)
lea edi,(L99)
push edi
fld qword ptr (_One)
fcomp qword ptr (_X)
fstsw ax
sahf
jne L102
fld qword ptr (_Zero)
fcomp qword ptr (_Z)
fstsw ax
sahf
jne L100
L102:
mov dword ptr (-400)[ebp],1
jmp L101
L100:
mov dword ptr (-400)[ebp],0
L101:
mov edi,dword ptr (-400)[ebp]
push edi
push 0
call _TstCond
add esp,12
fld qword ptr (_One)
fadd qword ptr (_U2)
fstp qword ptr (_X)
mov dword ptr (_I),0
mov dword ptr (_Milestone),25
fld qword ptr (_Radix)
fsub qword ptr (_One)
fstp qword ptr (_BMinusU2)
fld qword ptr (_BMinusU2)
fsub qword ptr (_U2)
fadd qword ptr (_One)
fstp qword ptr (_BMinusU2)
fld qword ptr (_One)
fcomp qword ptr (_Radix)
fstsw ax
sahf
je L103
fld qword ptr (_U1)
sub esp,8
fstp qword ptr [esp]
call _log
add esp,8
fstp qword ptr (-440)[ebp]
fld qword ptr (_Radix)
sub esp,8
fstp qword ptr [esp]
call _log
add esp,8
fstp qword ptr (-448)[ebp]
fld qword ptr (_TwoForty)
fchs
fmul qword ptr (-440)[ebp]
fdiv qword ptr (-448)[ebp]
fstp qword ptr (_X)
fld qword ptr (_Half)
fadd qword ptr (_X)
sub esp,8
fstp qword ptr [esp]
call _floor
add esp,8
fstp qword ptr (-456)[ebp]
fld qword ptr (-456)[ebp]
fstp qword ptr (_Y)
fld qword ptr (_X)
fsub qword ptr (_Y)
sub esp,8
fstp qword ptr [esp]
call _fabs
add esp,8
fstp qword ptr (-464)[ebp]
fld qword ptr (-464)[ebp]
fmul qword ptr (_Four)
fld qword ptr (_One)
fcompp
fstsw ax
sahf
jbe L105
fld qword ptr (_Y)
fstp qword ptr (_X)
L105:
fld qword ptr (_X)
fdiv qword ptr (_TwoForty)
fstp qword ptr (_Precision)
fld qword ptr (_Half)
fadd qword ptr (_Precision)
sub esp,8
fstp qword ptr [esp]
call _floor
add esp,8
fstp qword ptr (-472)[ebp]
fld qword ptr (-472)[ebp]
fstp qword ptr (_Y)
fld qword ptr (_Precision)
fsub qword ptr (_Y)
sub esp,8
fstp qword ptr [esp]
call _fabs
add esp,8
fstp qword ptr (-480)[ebp]
fld qword ptr (-480)[ebp]
fmul qword ptr (_TwoForty)
fld qword ptr (_Half)
fcompp
fstsw ax
sahf
jbe L107
fld qword ptr (_Y)
fstp qword ptr (_Precision)
L107:
L103:
fld qword ptr (_Precision)
sub esp,8
fstp qword ptr [esp]
call _floor
add esp,8
fstp qword ptr (-448)[ebp]
fld qword ptr (-448)[ebp]
fcomp qword ptr (_Precision)
fstsw ax
sahf
jne L111
fld qword ptr (_One)
fcomp qword ptr (_Radix)
fstsw ax
sahf
jne L109
L111:
lea edi,(L112)
push edi
call _printf
add esp,4
lea edi,(L113)
push edi
call _printf
add esp,4
L109:
fld qword ptr (_One)
fcomp qword ptr (_Radix)
fstsw ax
sahf
jne L114
lea edi,(L116)
push edi
call _printf
add esp,4
jmp L115
L114:
fld qword ptr (_Precision)
sub esp,8
fstp qword ptr [esp]
lea edi,(L117)
push edi
call _printf
add esp,12
L115:
lea edi,(L119)
push edi
fld qword ptr (_U2)
fmul qword ptr (_Nine)
fmul qword ptr (_Nine)
fmul qword ptr (_TwoForty)
fld qword ptr (_One)
fcompp
fstsw ax
sahf
jbe L120
mov dword ptr (-452)[ebp],1
jmp L121
L120:
mov dword ptr (-452)[ebp],0
L121:
mov edi,dword ptr (-452)[ebp]
push edi
push 1
call _TstCond
add esp,12
mov dword ptr (_Milestone),30
fld qword ptr (_One)
fdiv qword ptr (_Four)
fstp qword ptr (-492)[ebp]
fld qword ptr (_Four)
fdiv qword ptr (_Three)
fsub qword ptr (_One)
fsub qword ptr (-492)[ebp]
fmul qword ptr (_Three)
fsub qword ptr (-492)[ebp]
sub esp,8
fstp qword ptr [esp]
call _fabs
add esp,8
fstp qword ptr (-500)[ebp]
fld qword ptr (-500)[ebp]
fstp qword ptr (_X)
L122:
fld qword ptr (_X)
fstp qword ptr (_Z2)
fld qword ptr (_Z2)
fstp qword ptr (-516)[ebp]
fld qword ptr (_One)
fld qword ptr (_Half)
fmul qword ptr (-516)[ebp]
fld qword ptr (_ThirtyTwo)
fmul qword ptr (-516)[ebp]
fmul qword ptr (-516)[ebp]
faddp st(1),st
faddp st(1),st
fsub qword ptr (_One)
fstp qword ptr (_X)
L123:
fld qword ptr (_X)
fcomp qword ptr (_Z2)
fstsw ax
sahf
jae L125
fld qword ptr (_Zero)
fcomp qword ptr (_X)
fstsw ax
sahf
jb L122
L125:
fld qword ptr (_Three)
fdiv qword ptr (_Four)
fld qword ptr (_Two)
fdiv qword ptr (_Three)
fsubp st(1),st
fmul qword ptr (_Three)
fld qword ptr (_One)
fdiv qword ptr (_Four)
fsubp st(1),st
sub esp,8
fstp qword ptr [esp]
call _fabs
add esp,8
fstp qword ptr (-532)[ebp]
fld qword ptr (-532)[ebp]
fstp qword ptr (_Z)
fld qword ptr (-532)[ebp]
fstp qword ptr (_Y)
fld qword ptr (-532)[ebp]
fstp qword ptr (_X)
L126:
fld qword ptr (_Z)
fstp qword ptr (_Z1)
fld qword ptr (_One)
fdiv qword ptr (_Two)
fstp qword ptr (-540)[ebp]
fld qword ptr (_Z1)
fstp qword ptr (-548)[ebp]
fld qword ptr (-540)[ebp]
fld qword ptr (-540)[ebp]
fld qword ptr (_Half)
fmul qword ptr (-548)[ebp]
fld qword ptr (_ThirtyTwo)
fmul qword ptr (-548)[ebp]
fmul qword ptr (-548)[ebp]
faddp st(1),st
fsubp st(1),st
fadd qword ptr (-540)[ebp]
fsubp st(1),st
fadd qword ptr (-540)[ebp]
fstp qword ptr (_Z)
L127:
fld qword ptr (_Z)
fcomp qword ptr (_Z1)
fstsw ax
sahf
jae L129
fld qword ptr (_Zero)
fcomp qword ptr (_Z)
fstsw ax
sahf
jb L126
L129:
L130:
L133:
fld qword ptr (_Y)
fstp qword ptr (_Y1)
fld qword ptr (_Y1)
fstp qword ptr (-556)[ebp]
fld qword ptr (_Half)
fld qword ptr (_Half)
fld qword ptr (_Half)
fmul qword ptr (-556)[ebp]
fld qword ptr (_ThirtyTwo)
fmul qword ptr (-556)[ebp]
fmul qword ptr (-556)[ebp]
faddp st(1),st
fsubp st(1),st
fadd qword ptr (_Half)
fsubp st(1),st
fadd qword ptr (_Half)
fstp qword ptr (_Y)
L134:
fld qword ptr (_Y)
fcomp qword ptr (_Y1)
fstsw ax
sahf
jae L136
fld qword ptr (_Zero)
fcomp qword ptr (_Y)
fstsw ax
sahf
jb L133
L136:
fld qword ptr (_X)
fstp qword ptr (_X1)
fld qword ptr (_X1)
fstp qword ptr (-556)[ebp]
fld qword ptr (_Half)
fmul qword ptr (-556)[ebp]
fld qword ptr (_ThirtyTwo)
fmul qword ptr (-556)[ebp]
fmul qword ptr (-556)[ebp]
faddp st(1),st
fsub qword ptr (_F9)
fadd qword ptr (_F9)
fstp qword ptr (_X)
L131:
fld qword ptr (_X)
fcomp qword ptr (_X1)
fstsw ax
sahf
jae L137
fld qword ptr (_Zero)
fcomp qword ptr (_X)
fstsw ax
sahf
jb L130
L137:
fld qword ptr (_Y1)
fcomp qword ptr (_X1)
fstsw ax
sahf
jne L140
fld qword ptr (_Z1)
fcomp qword ptr (_X1)
fstsw ax
sahf
je L138
L140:
lea edi,(L141)
push edi
push 1
call _BadCond
add esp,8
fld qword ptr (_Z1)
sub esp,8
fstp qword ptr [esp]
fld qword ptr (_Y1)
sub esp,8
fstp qword ptr [esp]
fld qword ptr (_X1)
sub esp,8
fstp qword ptr [esp]
lea edi,(L142)
push edi
call _printf
add esp,28
lea edi,(L143)
push edi
call _printf
add esp,4
lea edi,(L144)
push edi
call _printf
add esp,4
lea edi,(L145)
push edi
call _notify
add esp,4
fld qword ptr (_U1)
fcomp qword ptr (_X1)
fstsw ax
sahf
je L149
fld qword ptr (_U1)
fcomp qword ptr (_Y1)
fstsw ax
sahf
je L149
fld qword ptr (_U1)
fcomp qword ptr (_Z1)
fstsw ax
sahf
jne L139
L149:
lea edi,(L150)
push edi
call _printf
add esp,4
jmp L139
L138:
fld qword ptr (_U1)
fcomp qword ptr (_Z1)
fstsw ax
sahf
jne L153
fld qword ptr (_U2)
fcomp qword ptr (_Z2)
fstsw ax
sahf
je L151
L153:
fld qword ptr (_U1)
fcomp qword ptr (_Z1)
fstsw ax
sahf
jbe L156
fld qword ptr (_U2)
fcomp qword ptr (_Z2)
fstsw ax
sahf
ja L154
L156:
lea edi,(L157)
push edi
push 0
call _BadCond
add esp,8
lea edi,(L158)
push edi
call _notify
add esp,4
fld qword ptr (_Z1)
fsub qword ptr (_U1)
sub esp,8
fstp qword ptr [esp]
fld qword ptr (_U1)
sub esp,8
fstp qword ptr [esp]
lea edi,(L159)
push edi
call _printf
add esp,20
fld qword ptr (_Z2)
fsub qword ptr (_U2)
sub esp,8
fstp qword ptr [esp]
fld qword ptr (_U2)
sub esp,8
fstp qword ptr [esp]
lea edi,(L160)
push edi
call _printf
add esp,20
jmp L155
L154:
fld qword ptr (_Zero)
fcomp qword ptr (_Z1)
fstsw ax
sahf
jae L163
fld qword ptr (_Zero)
fcomp qword ptr (_Z2)
fstsw ax
sahf
jb L161
L163:
fld qword ptr (_Radix)
sub esp,8
fstp qword ptr [esp]
lea edi,(L164)
push edi
call _printf
add esp,12
lea edi,(L165)
push edi
call _printf
add esp,4
fld qword ptr (_Z2)
sub esp,8
fstp qword ptr [esp]
fld qword ptr (_Z1)
sub esp,8
fstp qword ptr [esp]
lea edi,(L166)
push edi
call _printf
add esp,20
lea edi,(L167)
push edi
call _notify
add esp,4
L161:
fld qword ptr (_Z2)
fcomp qword ptr (_Z1)
fstsw ax
sahf
jne L170
fld qword ptr (_Zero)
fcomp qword ptr (_Z1)
fstsw ax
sahf
jae L168
L170:
fld qword ptr (_Z1)
fdiv qword ptr (_U1)
fstp qword ptr (_X)
fld qword ptr (_Z2)
fdiv qword ptr (_U2)
fstp qword ptr (_Y)
fld qword ptr (_X)
fcomp qword ptr (_Y)
fstsw ax
sahf
jae L171
fld qword ptr (_Y)
fstp qword ptr (_X)
L171:
fld qword ptr (_X)
sub esp,8
fstp qword ptr [esp]
call _log
add esp,8
fstp qword ptr (-580)[ebp]
fld qword ptr (-580)[ebp]
fchs
fstp qword ptr (_Q)
lea edi,(L173)
push edi
call _printf
add esp,4
fld qword ptr (_Radix)
sub esp,8
fstp qword ptr [esp]
call _log
add esp,8
fstp qword ptr (-588)[ebp]
fld qword ptr (_Q)
fdiv qword ptr (-588)[ebp]
sub esp,8
fstp qword ptr [esp]
lea edi,(L174)
push edi
call _printf
add esp,12
fld qword ptr (L93)
sub esp,8
fstp qword ptr [esp]
call _log
add esp,8
fstp qword ptr (-596)[ebp]
fld qword ptr (_Q)
fdiv qword ptr (-596)[ebp]
sub esp,8
fstp qword ptr [esp]
lea edi,(L175)
push edi
call _printf
add esp,12
L168:
lea edi,(L150)
push edi
call _printf
add esp,4
L155:
L151:
L139:
call _Pause
add esp,0
mov dword ptr (_Milestone),35
fld qword ptr (_Two)
fcomp qword ptr (_Radix)
fstsw ax
sahf
ja L176
fld qword ptr (_W)
fld qword ptr (_Radix)
fmul qword ptr (_Radix)
fdivp st(1),st
fstp qword ptr (_X)
fld qword ptr (_X)
fstp qword ptr (-576)[ebp]
fld qword ptr (-576)[ebp]
fadd qword ptr (_One)
fstp qword ptr (_Y)
fld qword ptr (_Y)
fsub qword ptr (-576)[ebp]
fstp qword ptr (_Z)
fld qword ptr (_Z)
fstp qword ptr (-584)[ebp]
fld qword ptr (-584)[ebp]
fadd qword ptr (_U2)
fstp qword ptr (_T)
fld qword ptr (_T)
fsub qword ptr (-584)[ebp]
fstp qword ptr (_X)
lea edi,(L179)
push edi
fld qword ptr (_U2)