Author Topic: pk-s10.bas  (Read 2459 times)

roberto

  • Hero Member
  • *****
  • Posts: 810
  • Karma: +3/-6
    • View Profile
pk-s10.bas
« on: October 13, 2021, 05:16:37 pm »
This application serves to improve the sound when new windows are opened in the browser. The improvement is approximately 90%, there is still little NOISE, very little, especially when running cmd s in the background.
It also means that by having a lot of memory consumed and closing applications, it does not increase memory consumption and they close quickly.
I hope it helps you.
I like this more now:
swappath = c: \ 0 2048
The first value always zero, the second 4096 is fine too.

Lines 9 to 69 are for sound enhancement
Lines 78 and 79 free memory when closing programs, they do not consume more memory.

Code: [Select]
CLS
DATA long a
PRINT "ejecutando pk-S00..."
REM swap 2048 2048
FOR a = 1 TO 100000
REM no quitar la linea print o se generara el error wifi on off
 PRINT a

REM SONIDO EN MOUSE *MOU* EE   EN WPSTKMOU
POKE &HFBA90753, 238
POKE &HFBA90786, 238
 POKE &HFBA90A75, 238

 REM AMOU0034 EE
POKE &HFBA86A2F, 238
POKE &HFBA86D5A, 238

REM AMOUSE EE
POKE &HFBA83F0B, 238
POKE &HFBA842EA, 238
POKE &HFBA84377, 238
POKE &HFBA84410, 238
POKE &HFBA844C0, 238
POKE &HFBA8486E, 238

REM NBAUDIO EE
POKE &HFB939167, 238
POKE &HFB939225, 238

REM AMOUHOOK EE
POKE &HFB9385B5, 238
POKE &HFB9387A3, 238

REM AMOUDLL EE
POKE &HFB93222E, 238
POKE &HFB9324C1, 238
POKE &HFB93250F, 238
POKE &HFB932662, 238

REM MOUCALLS EE
POKE &HFB917F49, 238

REM VMOUSE EE
POKE &HFB85D422, 238

REM XWPMOUSE EE  NADA

REM AUDIO *AU* EE
REM AUDIOIF  NADA
rem AUDIOSH NADA

REM AUDIOMCD EE NADA
REM USBAUDIO.SYS   = UNIAUD16.SYS
POKE &HFB836E0C, 238
POKE &HFB836E12, 238
POKE &HFB836E18, 238
POKE &HFB836E24, 238
POKE &HFB836E1A, 238
POKE &HFB836E2A, 238
POKE &HFB836E30, 238
POKE &HFB836E48, 238
POKE &HFB836E4E, 238
POKE &HFB836E54, 238
POKE &HFB836E6A, 238
POKE &HFB836E60, 238
POKE &HFB836E66, 238
POKE &HFB836E6C, 238

rem POKE &HFB83743E, 238   hang

REM UNIAUD16.SYS DIFERENTES A USBAUDIO
REM POKE &HFB836E0C, 238
POKE &HFB36E1E, 238
POKE &HFB36E5A, 238
POKE &HFB3743E, 238

REM PMSHELL
POKE &H1F9806B9, 238
POKE &H1F980D79, 238
REM POKE &H1F98102A, 238



NEXT a
END


Saludos