      MOV eax, RIValues
      MOV ecx, *Spectrum
      OR ecx, ecx
      JNZ pSpecValidStereoOpt
      MOV ecx, SpecTmp
    !pSpecValidStereoOpt:
      MOV edx, ecx
      ADD edx, $1000
      PUSH ebx
      MOV ebx, BoostValues240000
    !BoostLoopStereoOpt:
      FLD dword [ebx]
      ADD ebx, 4
    
      FLD dword [eax]
      FMUL ST, ST
      FLD dword [eax + 4]
      ADD eax, 8
      FMUL ST, ST
      FADDP
      FSQRT
      FMUL ST, ST1
      FSTP dword [ecx]
      
      FLD dword [eax + $4000]
      FMUL ST, ST
      FLD dword [eax + $4004]
      FMUL ST, ST
      FADDP
      FSQRT
      FMULP ST1, ST
      FSTP dword [ecx + $1000]
      
      ADD ecx, 4
      CMP ecx, edx
    JNE BoostLoopStereoOpt
    POP ebx
; IDE Options = PureBasic 4.60 (Windows - x86)
; CursorPosition = 5
; EnableXP