Subversion Repositories Kolibri OS

proc set_kentel_conf

locals

  par db 30 dup(?)

endl

  ;[gui]

  ;mouse_speed

  mov eax,ebp

  add eax,par-ebp

  invoke ini.get_str, ugui, ugui_mouse_speed, eax, ugui_mouse_speed_def

  stdcall strtoint,eax

  push eax

  pop edx

  call _mouse_speed

  ;mouse_delay

  mov eax,ebp

  add eax,par-ebp

  invoke ini.get_str, ugui, ugui_mouse_delay, eax, ugui_mouse_delay_def

  stdcall strtoint,eax

  push eax

  pop edx

  call _mouse_delay

  ;[dev]

  ;sb16

  mov eax,ebp

  add eax,par-ebp

  invoke ini.get_str, udev, udev_sb16, eax, udev_sb16_def

  stdcall strtoint,eax

  push eax

  pop ecx

  call _sb16

  ;sound_dma

  mov eax,ebp

  add eax,par-ebp

  invoke ini.get_str, udev, udev_sound_dma, eax, udev_sound_dma_def

  stdcall strtoint,eax

  push eax

  pop ecx

  call _sound_dma  

  ;midibase

  mov eax,ebp

  add eax,par-ebp

  invoke ini.get_str, udev, udev_midibase, eax, udev_midibase_def

  stdcall strtoint,eax

  push eax

  pop ecx

  call _midibase

endp

ugui db 'gui',0

ugui_mouse_speed db 'mouse_speed',0

ugui_mouse_speed_def db '',0

ugui_mouse_delay db 'mouse_delay',0

ugui_mouse_delay_def db '',0

udev db 'dev',0

udev_sb16 db 'sb16',0

udev_sb16_def db '',0

udev_sound_dma db 'sound_dma',0

udev_sound_dma_def db '',0

udev_midibase db 'midibase',0

udev_midibase_def db '',0

; ª®­¢¥à祭¨¥ áâப¨ ¢ DWord ¢ eax (¯® ¢â®à®¬ã ᨬ¢®«ã ®¯à¥¤¥«ï¥â á¨á⥬ã áç¨á«¥­¨ï)

proc strtoint stdcall,strs

  pushad

  mov eax,[strs]

  inc eax

  mov bl,[eax]

  cmp bl,'x'

  je .hex

  cmp bl,'X'

  je .hex

  jmp .dec

.hex:

  inc eax

  stdcall strtoint_hex,eax

  jmp .exit

.dec:

  dec eax

  stdcall strtoint_dec,eax

.exit:

  mov [esi+28],eax

  popad

  ret  

endp

; ª®­¢¥à祭¨¥ áâப¨ ¢ DWord ¢ eax ¤«ï ¤¥áïâ¨ç­®£®

proc strtoint_dec stdcall,strs

  pushad

  xor ecx,ecx

  mov ebx,1 ; ¯®à冷ª

  mov esi,[strs]

@@:  

  xor eax,eax

  lodsb

  cmp al,0

  je .end

  sub al,30h

  imul ebx

  add ecx,eax

  imul ebx,ebx,10

  jmp @b

.end:

  mov [esi+28],ecx

  popad

  ret

endp

; ª®­¢¥à祭¨¥ áâப¨ ¢ DWord ¢ eax ¤«ï è¥á­ ¤æ â¨à¨ç­®£®

proc strtoint_hex stdcall,strs

  pushad

  xor ecx,ecx

  mov ebx,1 ; ¯®à冷ª

  mov esi,[strs]

@@:  

  xor eax,eax

  lodsb

  cmp al,0

  je .end

  cmp al,'a'

  jae .bm

  cmp al,'A'

  jae .bb

  jmp .cc

.bm:	; 57h

  sub al,57h

  jmp .do

.bb:	; 37h

  sub al,37h

  jmp .do

.cc:	; 30h

  sub al,30h

.do:  

  imul ebx

  add ecx,eax

  imul ebx,ebx,16

  jmp @b

.end:

  mov [esi+28],ecx

  popad

  ret

endp

; ãáâ ­®¢ª¨ ¨§ setup

_mouse_speed:

    mov  eax,18

    mov  ebx,19

    mov  ecx,1

    int 0x40

 ret

_mouse_delay:

    mov  eax,18

    mov  ebx,19

    mov  ecx,3

    int 0x40

 ret

_sb16:

    mov  eax,21

    mov  ebx,4

    int 0x40

 ret

_sound_dma:

    mov  eax,21

    mov  ebx,10

    int 0x40

 ret

_midibase:

    mov  eax,21

    mov  ebx,1

    int 0x40

 ret