kolibrios-gitea/kernel/trunk/core/conf_lib.inc

;-------------------------------------------------------------------------
;
;    <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD>䨣<EFBFBD><EFBFBD><EFBFBD>樨
;
;
;     SPraid
;
;-------------------------------------------------------------------------

conf_file_loaded: db 0			; 䫠<EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>㧪<EFBFBD> <EFBFBD><EFBFBD><EFBFBD>䨣<EFBFBD>

; <EFBFBD><EFBFBD><EFBFBD><EFBFBD>㧪<EFBFBD> <EFBFBD><EFBFBD><EFBFBD> 䠩<EFBFBD><EFBFBD> <EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⥪<EFBFBD>  
proc load_conf_file
  pushad
  invoke ini.load,.fname
  mov [conf_file_loaded],byte 1
  popad
  ret
  .fname db '%sys%/sys.conf',0
endp


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

; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>祭<EFBFBD><EFBFBD> <EFBFBD><EFBFBD>ப<EFBFBD> <EFBFBD> DWord <EFBFBD> eax (<EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD>஬<EFBFBD> ᨬ<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD>।<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD>⥬<EFBFBD> <EFBFBD><EFBFBD><EFBFBD>᫥<EFBFBD><EFBFBD><EFBFBD>)
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

; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>祭<EFBFBD><EFBFBD> <EFBFBD><EFBFBD>ப<EFBFBD> <EFBFBD> DWord <EFBFBD> eax <EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>筮<EFBFBD><EFBFBD>
proc strtoint_dec stdcall,strs
  pushad
  
  xor ecx,ecx
  mov ebx,1 ; <EFBFBD><EFBFBD><EFBFBD>冷<EFBFBD>
  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

; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>祭<EFBFBD><EFBFBD> <EFBFBD><EFBFBD>ப<EFBFBD> <EFBFBD> DWord <EFBFBD> eax <EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD>᭠<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>筮<EFBFBD><EFBFBD>
proc strtoint_hex stdcall,strs
  pushad
  
  xor ecx,ecx
  mov ebx,1 ; <EFBFBD><EFBFBD><EFBFBD>冷<EFBFBD>
  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


; <EFBFBD><EFBFBD>⠭<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD> 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