paranoia.sbk

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

lea edi,(L322)
push edi
call _printf
add esp,8
fld qword ptr (L323)
sub esp,8
fstp qword ptr [esp]
call _sqrt
add esp,8
fstp qword ptr (-1192)[ebp]
fld qword ptr (-1192)[ebp]
fstp qword ptr (_Random9)
fld qword ptr (_Third)
fstp qword ptr (_Random1)
mov dword ptr (_I),1
L324:
call _Random
add esp,0
fstp qword ptr (-1200)[ebp]
fld qword ptr (-1200)[ebp]
fstp qword ptr (_X)
call _Random
add esp,0
fstp qword ptr (-1208)[ebp]
fld qword ptr (-1208)[ebp]
fstp qword ptr (_Y)
fld qword ptr (_Y)
fmul qword ptr (_X)
fstp qword ptr (_Z9)
fld qword ptr (_X)
fmul qword ptr (_Y)
fstp qword ptr (_Z)
fld qword ptr (_Z)
fsub qword ptr (_Z9)
fstp qword ptr (_Z9)
inc dword ptr (_I)
L325:
mov edi,dword ptr (_NoTrials)
cmp dword ptr (_I),edi
jg L327
fld qword ptr (_Zero)
fcomp qword ptr (_Z9)
fstsw ax
sahf
je L324
L327:
mov edi,dword ptr (_NoTrials)
cmp dword ptr (_I),edi
jne L328
fld qword ptr (_One)
fld qword ptr (_Half)
fdiv qword ptr (_Three)
faddp st(1),st
fstp qword ptr (-1208)[ebp]
fld qword ptr (-1208)[ebp]
fstp qword ptr (_Random1)
fld qword ptr (_U2)
fadd qword ptr (_U1)
fadd qword ptr (_One)
fstp qword ptr (-1216)[ebp]
fld qword ptr (-1216)[ebp]
fstp qword ptr (_Random2)
fld qword ptr (_Random1)
fstp qword ptr (-1224)[ebp]
fld qword ptr (_Random2)
fstp qword ptr (-1232)[ebp]
fld qword ptr (-1224)[ebp]
fmul qword ptr (-1232)[ebp]
fstp qword ptr (_Z)
fld qword ptr (-1232)[ebp]
fmul qword ptr (-1224)[ebp]
fstp qword ptr (_Y)
fld qword ptr (-1208)[ebp]
fmul qword ptr (-1216)[ebp]
fstp qword ptr (-1240)[ebp]
fld qword ptr (-1240)[ebp]
fsub qword ptr (-1240)[ebp]
fstp qword ptr (_Z9)
L328:
mov edi,dword ptr (_NoTrials)
cmp dword ptr (_I),edi
je L330
fld qword ptr (_Zero)
fcomp qword ptr (_Z9)
fstsw ax
sahf
je L330
lea edi,(L332)
push edi
push 2
call _BadCond
add esp,8
jmp L331
L330:
mov edi,dword ptr (_NoTrials)
push edi
lea edi,(L333)
push edi
call _printf
add esp,8
L331:
mov dword ptr (_Milestone),70
lea edi,(L334)
push edi
call _printf
add esp,4
fld qword ptr (_Zero)
sub esp,8
fstp qword ptr [esp]
call _sqrt
add esp,8
fstp qword ptr (-1212)[ebp]
fld qword ptr (-1212)[ebp]
fcomp qword ptr (_Zero)
fstsw ax
sahf
jne L337
fld qword ptr (_Zero)
fchs
fstp qword ptr (-1220)[ebp]
fld qword ptr (-1220)[ebp]
sub esp,8
fstp qword ptr [esp]
call _sqrt
add esp,8
fstp qword ptr (-1228)[ebp]
fld qword ptr (-1228)[ebp]
fcomp qword ptr (-1220)[ebp]
fstsw ax
sahf
jne L337
fld qword ptr (_One)
sub esp,8
fstp qword ptr [esp]
call _sqrt
add esp,8
fstp qword ptr (-1244)[ebp]
fld qword ptr (-1244)[ebp]
fcomp qword ptr (_One)
fstsw ax
sahf
jne L337
mov dword ptr (-1196)[ebp],1
jmp L338
L337:
mov dword ptr (-1196)[ebp],0
L338:
lea edi,(L336)
push edi
mov edi,dword ptr (-1196)[ebp]
push edi
push 0
call _TstCond
add esp,12
fld qword ptr (_Zero)
fstp qword ptr (_MinSqEr)
fld qword ptr (_Zero)
fstp qword ptr (_MaxSqEr)
fld qword ptr (_Zero)
fstp qword ptr (_J)
fld qword ptr (_Radix)
fstp qword ptr (_X)
fld qword ptr (_U2)
fstp qword ptr (_OneUlp)
push 1
call _SqXMinX
add esp,4
fld qword ptr (_BInvrse)
fstp qword ptr (_X)
fld qword ptr (_BInvrse)
fmul qword ptr (_U1)
fstp qword ptr (_OneUlp)
push 1
call _SqXMinX
add esp,4
fld qword ptr (_U1)
fstp qword ptr (_X)
fld qword ptr (_U1)
fmul qword ptr (_U1)
fstp qword ptr (_OneUlp)
push 1
call _SqXMinX
add esp,4
fld qword ptr (_Zero)
fcomp qword ptr (_J)
fstsw ax
sahf
je L339
call _Pause
add esp,0
L339:
mov edi,dword ptr (_NoTrials)
push edi
lea edi,(L341)
push edi
call _printf
add esp,8
fld qword ptr (_Zero)
fstp qword ptr (_J)
fld qword ptr (_Two)
fstp qword ptr (_X)
fld qword ptr (_Radix)
fstp qword ptr (_Y)
fld qword ptr (_One)
fcomp qword ptr (_Radix)
fstsw ax
sahf
je L342
L344:
fld qword ptr (_Y)
fstp qword ptr (-1284)[ebp]
fld qword ptr (-1284)[ebp]
fstp qword ptr (_X)
fld qword ptr (_Radix)
fmul qword ptr (-1284)[ebp]
fstp qword ptr (_Y)
L345:
fld qword ptr (_Y)
fsub qword ptr (_X)
fild dword ptr (_NoTrials)
fcompp
fstsw ax
sahf
ja L344
L342:
fld qword ptr (_X)
fmul qword ptr (_U2)
fstp qword ptr (_OneUlp)
mov dword ptr (_I),1
jmp L348
L347:
fld qword ptr (_X)
fadd qword ptr (_One)
fstp qword ptr (_X)
push 2
call _SqXMinX
add esp,4
fld qword ptr (_Zero)
fcomp qword ptr (_J)
fstsw ax
sahf
jae L350
jmp L349
L350:
inc dword ptr (_I)
L348:
mov edi,dword ptr (_NoTrials)
cmp dword ptr (_I),edi
jle L347
L349:
lea edi,(L352)
push edi
call _printf
add esp,4
mov dword ptr (_I),-1
fld qword ptr (_BMinusU2)
fstp qword ptr (_X)
fld qword ptr (_Radix)
fstp qword ptr (_Y)
fld qword ptr (_Radix)
fld qword ptr (_Radix)
fmul qword ptr (_U2)
faddp st(1),st
fstp qword ptr (_Z)
mov dword ptr (_NotMonot),0
mov dword ptr (_Monot),0
jmp L354
L353:
inc dword ptr (_I)
fld qword ptr (_X)
sub esp,8
fstp qword ptr [esp]
call _sqrt
add esp,8
fstp qword ptr (-1292)[ebp]
fld qword ptr (-1292)[ebp]
fstp qword ptr (_X)
fld qword ptr (_Y)
sub esp,8
fstp qword ptr [esp]
call _sqrt
add esp,8
fstp qword ptr (-1300)[ebp]
fld qword ptr (-1300)[ebp]
fstp qword ptr (_Q)
fld qword ptr (_Z)
sub esp,8
fstp qword ptr [esp]
call _sqrt
add esp,8
fstp qword ptr (-1308)[ebp]
fld qword ptr (-1308)[ebp]
fstp qword ptr (_Z)
fld qword ptr (_Q)
fcomp qword ptr (_X)
fstsw ax
sahf
jb L358
fld qword ptr (_Z)
fcomp qword ptr (_Q)
fstsw ax
sahf
jae L356
L358:
mov dword ptr (_NotMonot),1
jmp L357
L356:
fld qword ptr (_Q)
fadd qword ptr (_Half)
sub esp,8
fstp qword ptr [esp]
call _floor
add esp,8
fstp qword ptr (-1324)[ebp]
fld qword ptr (-1324)[ebp]
fstp qword ptr (_Q)
cmp dword ptr (_I),0
jg L361
fld qword ptr (_Q)
fmul qword ptr (_Q)
fcomp qword ptr (_Radix)
fstsw ax
sahf
jne L359
L361:
mov dword ptr (_Monot),1
jmp L360
L359:
cmp dword ptr (_I),0
jle L362
cmp dword ptr (_I),1
jle L364
mov dword ptr (_Monot),1
jmp L363
L364:
fld qword ptr (_Y)
fmul qword ptr (_BInvrse)
fstp qword ptr (_Y)
fld qword ptr (_Y)
fstp qword ptr (-1340)[ebp]
fld qword ptr (-1340)[ebp]
fsub qword ptr (_U1)
fstp qword ptr (_X)
fld qword ptr (-1340)[ebp]
fadd qword ptr (_U1)
fstp qword ptr (_Z)
jmp L363
L362:
fld qword ptr (_Q)
fstp qword ptr (_Y)
fld qword ptr (_Y)
fstp qword ptr (-1340)[ebp]
fld qword ptr (-1340)[ebp]
fsub qword ptr (_U2)
fstp qword ptr (_X)
fld qword ptr (-1340)[ebp]
fadd qword ptr (_U2)
fstp qword ptr (_Z)
L363:
L360:
L357:
L354:
cmp dword ptr (_NotMonot),0
jne L366
cmp dword ptr (_Monot),0
je L353
L366:
cmp dword ptr (_Monot),0
je L367
lea edi,(L369)
push edi
call _printf
add esp,4
jmp L368
L367:
lea edi,(L157)
push edi
push 2
call _BadCond
add esp,8
fld qword ptr (_Y)
sub esp,8
fstp qword ptr [esp]
lea edi,(L370)
push edi
call _printf
add esp,12
L368:
mov dword ptr (_Milestone),80
fld qword ptr (_MinSqEr)
fadd qword ptr (_Half)
fstp qword ptr (_MinSqEr)
fld qword ptr (_MaxSqEr)
fsub qword ptr (_Half)
fstp qword ptr (_MaxSqEr)
fld qword ptr (_One)
fadd qword ptr (_U2)
sub esp,8
fstp qword ptr [esp]
call _sqrt
add esp,8
fstp qword ptr (-1300)[ebp]
fld qword ptr (-1300)[ebp]
fsub qword ptr (_One)
fdiv qword ptr (_U2)
fstp qword ptr (_Y)
fld qword ptr (_Y)
fsub qword ptr (_One)
fld qword ptr (_U2)
fdiv qword ptr (_Eight)
faddp st(1),st
fstp qword ptr (_SqEr)
fld qword ptr (_MaxSqEr)
fcomp qword ptr (_SqEr)
fstsw ax
sahf
jae L371
fld qword ptr (_SqEr)
fstp qword ptr (_MaxSqEr)
L371:
fld qword ptr (_Y)
fld qword ptr (_U2)
fdiv qword ptr (_Eight)
faddp st(1),st
fstp qword ptr (_SqEr)
fld qword ptr (_MinSqEr)
fcomp qword ptr (_SqEr)
fstsw ax
sahf
jbe L373
fld qword ptr (_SqEr)
fstp qword ptr (_MinSqEr)
L373:
fld qword ptr (_F9)
sub esp,8
fstp qword ptr [esp]
call _sqrt
add esp,8
fstp qword ptr (-1324)[ebp]
fld qword ptr (-1324)[ebp]
fsub qword ptr (_U2)
fld qword ptr (_One)
fsub qword ptr (_U2)
fsubp st(1),st
fdiv qword ptr (_U1)
fstp qword ptr (_Y)
fld qword ptr (_Y)
fld qword ptr (_U1)
fdiv qword ptr (_Eight)
faddp st(1),st
fstp qword ptr (_SqEr)
fld qword ptr (_MaxSqEr)
fcomp qword ptr (_SqEr)
fstsw ax
sahf
jae L375
fld qword ptr (_SqEr)
fstp qword ptr (_MaxSqEr)
L375:
fld qword ptr (_Y)
fadd qword ptr (_One)
fld qword ptr (_U1)
fdiv qword ptr (_Eight)
faddp st(1),st
fstp qword ptr (_SqEr)
fld qword ptr (_MinSqEr)
fcomp qword ptr (_SqEr)
fstsw ax
sahf
jbe L377
fld qword ptr (_SqEr)
fstp qword ptr (_MinSqEr)
L377:
fld qword ptr (_U2)
fstp qword ptr (_OneUlp)
fld qword ptr (_OneUlp)
fstp qword ptr (_X)
mov dword ptr (_Indx),1
L379:
fld qword ptr (_X)
fadd qword ptr (_U1)
fadd qword ptr (_X)
fadd qword ptr (_F9)
sub esp,8
fstp qword ptr [esp]
call _sqrt
add esp,8
fstp qword ptr (-1356)[ebp]
fld qword ptr (-1356)[ebp]
fstp qword ptr (_Y)
fld qword ptr (_Y)
fsub qword ptr (_U2)
fld qword ptr (_One)
fsub qword ptr (_U2)
fadd qword ptr (_X)
fsubp st(1),st
fdiv qword ptr (_OneUlp)
fstp qword ptr (_Y)
fld qword ptr (_U1)
fsub qword ptr (_X)
fadd qword ptr (_F9)
fmul qword ptr (_Half)
fmul qword ptr (_X)
fmul qword ptr (_X)
fdiv qword ptr (_OneUlp)
fstp qword ptr (_Z)
fld qword ptr (_Y)
fadd qword ptr (_Half)
fadd qword ptr (_Z)
fstp qword ptr (_SqEr)
fld qword ptr (_MinSqEr)
fcomp qword ptr (_SqEr)
fstsw ax
sahf
jbe L383
fld qword ptr (_SqEr)
fstp qword ptr (_MinSqEr)
L383:
fld qword ptr (_Y)
fsub qword ptr (_Half)
fadd qword ptr (_Z)
fstp qword ptr (_SqEr)
fld qword ptr (_MaxSqEr)
fcomp qword ptr (_SqEr)
fstsw ax
sahf
jae L385
fld qword ptr (_SqEr)
fstp qword ptr (_MaxSqEr)
L385:
mov edi,dword ptr (_Indx)
cmp edi,1
je L389
cmp edi,3
jne L387
L389:
fld qword ptr (_X)
sub esp,8
fstp qword ptr [esp]
call _Sign
add esp,8
fstp qword ptr (-1396)[ebp]
fld qword ptr (_OneUlp)
sub esp,8
fstp qword ptr [esp]
call _sqrt
add esp,8
fstp qword ptr (-1404)[ebp]
fld qword ptr (_Eight)
fld qword ptr (_Nine)
fmul qword ptr (-1404)[ebp]
fdivp st(1),st
sub esp,8
fstp qword ptr [esp]
call _floor
add esp,8
fstp qword ptr (-1412)[ebp]
fld qword ptr (_OneUlp)
fmul qword ptr (-1396)[ebp]
fmul qword ptr (-1412)[ebp]
fstp qword ptr (_X)
jmp L388
L387:
fld qword ptr (_U1)
fstp qword ptr (_OneUlp)
fld qword ptr (_OneUlp)
fchs
fstp qword ptr (_X)
L388:
L380:
inc dword ptr (_Indx)
cmp dword ptr (_Indx),3
jle L379
mov dword ptr (_Milestone),85
mov dword ptr (_SqRWrng),0
mov dword ptr (_Anomaly),0
mov dword ptr (_RSqrt),0
fld qword ptr (_One)
fcomp qword ptr (_Radix)
fstsw ax
sahf
je L390
lea edi,(L392)
push edi
call _printf
add esp,4
fld qword ptr (_Precision)
sub esp,8
fstp qword ptr [esp]
call _floor
add esp,8
fstp qword ptr (-1356)[ebp]
fld qword ptr (_One)
fadd qword ptr (_Precision)
fsub qword ptr (-1356)[ebp]
sub esp,8
fstp qword ptr [esp]
fld qword ptr (_Radix)
sub esp,8
fstp qword ptr [esp]
call _pow
add esp,16
fstp qword ptr (-1364)[ebp]
fld qword ptr (_Half)
fadd qword ptr (-1364)[ebp]
sub esp,8
fstp qword ptr [esp]
call _floor
add esp,8
fstp qword ptr (-1372)[ebp]
fld qword ptr (-1372)[ebp]
fstp qword ptr (_D)
fld qword ptr (_D)
fdiv qword ptr (_Radix)
fstp qword ptr (_X)
fld qword ptr (_D)
fdiv qword ptr (_A1)
fstp qword ptr (_Y)
fld qword ptr (_X)
sub esp,8
fstp qword ptr [esp]
call _floor
add esp,8
fstp qword ptr (-1396)[ebp]
fld qword ptr (-1396)[ebp]
fcomp qword ptr (_X)
fstsw ax
sahf
jne L395
fld qword ptr (_Y)
sub esp,8
fstp qword ptr [esp]
call _floor
add esp,8
fstp qword ptr (-1412)[ebp]
fld qword ptr (-1412)[ebp]
fcomp qword ptr (_Y)
fstsw ax
sahf
je L393
L395:
mov dword ptr (_Anomaly),1
jmp L394
L393:
fld qword ptr (_Zero)
fstp qword ptr (_X)
fld qword ptr (_X)
fstp qword ptr (_Z2)
fld qword ptr (_One)
fstp qword ptr (_Y)
fld qword ptr (_Y)
fstp qword ptr (_Y2)
fld qword ptr (_Radix)
fsub qword ptr (_One)
fstp qword ptr (_Z1)
fld qword ptr (_Four)
fmul qword ptr (_D)
fstp qword ptr (_FourD)
L396:
fld qword ptr (_Z2)
fcomp qword ptr (_Y2)
fstsw ax
sahf
jae L399
fld qword ptr (_Radix)
fstp qword ptr (_Q)
fld qword ptr (_Y)
fstp qword ptr (_Y1)
L401:
fld qword ptr (_Half)
fld qword ptr (_Q)
fdiv qword ptr (_Y1)
fsubp st(1),st
sub esp,8
fstp qword ptr [esp]
call _floor
add esp,8
fstp qword ptr (-1436)[ebp]
fld qword ptr (_Q)
fld qword ptr (-1436)[ebp]
fmul qword ptr (_Y1)
faddp st(1),st
sub esp,8
fstp qword ptr [esp]
call _fabs
add esp,8
fstp qword ptr (-1444)[ebp]
fld qword ptr (-1444)[ebp]
fstp qword ptr (_X1)
fld qword ptr (_Y1)
fstp qword ptr (_Q)
fld qword ptr (_X1)
fstp qword ptr (_Y1)
L402:
fld qword ptr (_Zero)
fcomp qword ptr (_X1)
fstsw ax
sahf
jb L401
fld qword ptr (_One)
fcomp qword ptr (_Q)
fstsw ax
sahf
jb L404
fld qword ptr (_Y2)
fstp qword ptr (_Z2)
fld qword ptr (_Y)
fstp qword ptr (_Z)
L404:
L399:
fld qword ptr (_Y)
fadd qword ptr (_Two)
fstp qword ptr (_Y)
fld qword ptr (_X)
fadd qword ptr (_Eight)
fstp qword ptr (_X)
fld qword ptr (_Y2)
fadd qword ptr (_X)
fstp qword ptr (_Y2)
fld qword ptr (_FourD)
fcomp qword ptr (_Y2)
fstsw ax
sahf
ja L406
fld qword ptr (_Y2)
fsub qword ptr (_FourD)
fstp qword ptr (_Y2)
L406:
L397:
fld qword ptr (_D)
fcomp qword ptr (_Y)
fstsw ax
sahf
ja L396
fld qword ptr (_FourD)
fsub qword ptr (_Z2)
fstp qword ptr (_X8)
fld qword ptr (_X8)
fstp qword ptr (-1436)[ebp]
fld qword ptr (-1436)[ebp]
fld qword ptr (_Z)
fmul qword ptr (_Z)
fadd