Minor high quality process thread start program

[oryaaaaa]

This code is top secret tips.
coz ALL sound player change to Hi-End sound player.

1st line add this code.

example 1

Code: Select all

[this code]
Hello world

example 2

Code: Select all

[this code]
your software code

1st line in thread add this code.

example 3

Code: Select all

Procedure thread(dummy.i)
[this code]
your thread code

add this code before DLL load

example 4

Code: Select all

[this code]
If Not OpenLibrary(10, "bass.dll")
  MessageRequester("bass.dll error", "Don't load bass.dll")
  End
EndIf

Please try and check this code.
have fun.

Code: Select all

; Minor high quality process thread start program
; Copyright (c) Hiroyuki Yokota [oryaaaaa]
!Mov Eax, 1000
!First_process:
!NOP
!NOP
!Dec Eax
!JNZ First_process
CompilerSelect #PB_Compiler_Processor
  CompilerCase #PB_Processor_x86 
    !XOR Eax, Eax
    !XOR Ebx, Ebx
    !XOR Ecx, Ecx
    !XOR Edx, Edx
  CompilerCase #PB_Processor_x64
    !XOR Rax, Rax
    !XOR Rbx, Rbx
    !XOR Rcx, Rcx
    !XOR Rdx, Rdx
CompilerEndSelect
!PXOR mm0, mm0
!PXOR mm1, mm1
!PXOR mm2, mm2
!PXOR mm3, mm3
!PXOR mm4, mm4
!PXOR mm5, mm5
!PXOR mm6, mm6
!PXOR mm7, mm7
!emms
!PXOR xmm0, xmm0
!PXOR xmm1, xmm1
!PXOR xmm2, xmm2
!PXOR xmm3, xmm3
!PXOR xmm4, xmm4
!PXOR xmm5, xmm5
!PXOR xmm6, xmm6
!PXOR xmm7, xmm7
CompilerIf  #PB_Compiler_Processor = #PB_Processor_x64
  !PXOR xmm8, xmm8
  !PXOR xmm9, xmm9
  !PXOR xmm10, xmm10
  !PXOR xmm11, xmm12
  !PXOR xmm13, xmm13
  !PXOR xmm14, xmm14
  !PXOR xmm15, xmm15
CompilerEndIf
CompilerSelect #PB_Compiler_Processor
  CompilerCase #PB_Processor_x86 
    !XOR Eax, Eax
    !XOR Ebx, Ebx
    !XOR Ecx, Ecx
    !XOR Edx, Edx
  CompilerCase #PB_Processor_x64
    !XOR Rax, Rax
    !XOR Rbx, Rbx
    !XOR Rcx, Rcx
    !XOR Rdx, Rdx
CompilerEndSelect
!PXOR mm0, mm0
!PXOR mm1, mm1
!PXOR mm2, mm2
!PXOR mm3, mm3
!PXOR mm4, mm4
!PXOR mm5, mm5
!PXOR mm6, mm6
!PXOR mm7, mm7
!emms
!PXOR xmm0, xmm0
!PXOR xmm1, xmm1
!PXOR xmm2, xmm2
!PXOR xmm3, xmm3
!PXOR xmm4, xmm4
!PXOR xmm5, xmm5
!PXOR xmm6, xmm6
!PXOR xmm7, xmm7
CompilerIf  #PB_Compiler_Processor = #PB_Processor_x64
  !PXOR xmm8, xmm8
  !PXOR xmm9, xmm9
  !PXOR xmm10, xmm10
  !PXOR xmm11, xmm12
  !PXOR xmm13, xmm13
  !PXOR xmm14, xmm14
  !PXOR xmm15, xmm15
CompilerEndIf
CompilerSelect #PB_Compiler_Processor
  CompilerCase #PB_Processor_x86 
    !XOR Eax, Eax
    !XOR Ebx, Ebx
    !XOR Ecx, Ecx
    !XOR Edx, Edx
  CompilerCase #PB_Processor_x64
    !XOR Rax, Rax
    !XOR Rbx, Rbx
    !XOR Rcx, Rcx
    !XOR Rdx, Rdx
CompilerEndSelect
!PXOR mm0, mm0
!PXOR mm1, mm1
!PXOR mm2, mm2
!PXOR mm3, mm3
!PXOR mm4, mm4
!PXOR mm5, mm5
!PXOR mm6, mm6
!PXOR mm7, mm7
!emms
!PXOR xmm0, xmm0
!PXOR xmm1, xmm1
!PXOR xmm2, xmm2
!PXOR xmm3, xmm3
!PXOR xmm4, xmm4
!PXOR xmm5, xmm5
!PXOR xmm6, xmm6
!PXOR xmm7, xmm7
CompilerIf  #PB_Compiler_Processor = #PB_Processor_x64
  !PXOR xmm8, xmm8
  !PXOR xmm9, xmm9
  !PXOR xmm10, xmm10
  !PXOR xmm11, xmm12
  !PXOR xmm13, xmm13
  !PXOR xmm14, xmm14
  !PXOR xmm15, xmm15
CompilerEndIf
CompilerSelect #PB_Compiler_Processor
  CompilerCase #PB_Processor_x86 
    !XOR Eax, Eax
    !XOR Ebx, Ebx
    !XOR Ecx, Ecx
    !XOR Edx, Edx
  CompilerCase #PB_Processor_x64
    !XOR Rax, Rax
    !XOR Rbx, Rbx
    !XOR Rcx, Rcx
    !XOR Rdx, Rdx
CompilerEndSelect
!PXOR mm0, mm0
!PXOR mm1, mm1
!PXOR mm2, mm2
!PXOR mm3, mm3
!PXOR mm4, mm4
!PXOR mm5, mm5
!PXOR mm6, mm6
!PXOR mm7, mm7
!emms
!PXOR xmm0, xmm0
!PXOR xmm1, xmm1
!PXOR xmm2, xmm2
!PXOR xmm3, xmm3
!PXOR xmm4, xmm4
!PXOR xmm5, xmm5
!PXOR xmm6, xmm6
!PXOR xmm7, xmm7
CompilerIf  #PB_Compiler_Processor = #PB_Processor_x64
  !PXOR xmm8, xmm8
  !PXOR xmm9, xmm9
  !PXOR xmm10, xmm10
  !PXOR xmm11, xmm12
  !PXOR xmm13, xmm13
  !PXOR xmm14, xmm14
  !PXOR xmm15, xmm15
CompilerEndIf

[sq4]

Is this a joke?

[oryaaaaa]

Is this a joke?

NO!
many JPLAY users use Bug head 5.21 with [this code].
[this code] is ciritical bitperfect mode in intel CPU.

[oryaaaaa]

try try try

Thank you.

Code: Select all

; Bug head startup high quality vision
; Copyright (c) Hiroyuki Yokota [oryaaaaa]
!NOP
!NOP
!Mov Eax, 16384
!First_process:
!NOP
!NOP
!Dec Eax
!JNZ First_process
!PXOR mm0, mm0
!PXOR mm1, mm1
!PXOR mm2, mm2
!PXOR mm3, mm3
!PXOR mm4, mm4
!PXOR mm5, mm5
!PXOR mm6, mm6
!PXOR mm7, mm7
!emms
!PXOR xmm0, xmm0
!PXOR xmm1, xmm1
!PXOR xmm2, xmm2
!PXOR xmm3, xmm3
!PXOR xmm4, xmm4
!PXOR xmm5, xmm5
!PXOR xmm6, xmm6
!PXOR xmm7, xmm7
!Mov Eax, 32768
!First_process_x2:
!NOP
!NOP
!Dec Eax
!JNZ First_process_x2
;
; ------------------------------------------------------------
;
;   PureBasic - Sound example file
;
;    (c) Fantaisie Software
;
; ------------------------------------------------------------
;

If InitSound() = 0
  MessageRequester("Error", "Can't open DirectX 7 or no sound card is available",  0)
  End
EndIf

UseFLACSoundDecoder()

SoundFileName$ = OpenFileRequester("Choose a sound file", "", "Wave or Flac files|*.wav;*.flac",0)
If SoundFileName$
  If LoadSound(0, SoundFileName$)
    PlaySound(0,#PB_Sound_Loop)
    MessageRequester("Sound", "Playing the sound (loop)..."+Chr(10)+"Click to quit..", 0)
  Else
    MessageRequester("Error", "Can't load the sound.", 0)
  EndIf
EndIf
End