WebSVN – Kolibri OS – Diff – /programs/system/setup/trunk/setup.asm


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;                               ;;
;;          DEVICE SETUP         ;;
;;                               ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
; Authors: Ville       - original version
;          A. Ivushkin - autostart (w launcher)
;          M. Lisovin  - added many feauters (apply all, save all, set time...)
;          I. Poddubny - fixed russian keymap
;14/08/06  Mario79 - added regulation of mouse features
 
;******************************************************************************
  use32
  org        0x0
  db      'MENUET01'   ; 8 byte identifier
  dd      0x01           ; header version
  dd      START        ; pointer to program start
  dd      I_END        ; size of image
  dd      0x4000      ; reguired amount of memory
  dd      0x4000      ; stack pointer (esp)
  dd      I_PARAM,0    ; parameters, reserved
;  include 'lang.inc'
  include 'macros.inc'
;******************************************************************************
 
LLL equ (56+3)
BBB equ 25
 
;******************************************************************************
apply_all:
 
    call _midibase    ;1
    call _sound_dma    ;10
    call _pci_acc    ;12
    call _sb16        ;4
    call _wssp        ;6
    call _syslang    ;5
    call _keyboard    ;2
    call _mouse_speed
    call _mouse_delay
    call get_disk_info
    cmp  [cd],0
    jne  no_cd
    call _cdbase    ;3
  no_cd:
    cmp  [hd],0
    jne  no_hd
    call _lba_read    ;11
    call _hdbase    ;7
    call _f32p        ;8
  no_hd:
ret
;-------------------------------------------------------------------------------
get_disk_info:
    mov  [hd],1
    mov  [cd],1
    mov  [hdbase],0
    mov  [cdbase],0
    mcall 18,11,1,table_area
 
  ide_0:
    mov  al,[table_area+1]
    shr  al,6
    cmp  al,0
    je        ide_1
    cmp  al,01b
    jnz  ide_0_cd
    mov  [hdbase],1
    mov  [hd],0
    jmp  ide_1
 
  ide_0_cd:
    cmp  al,10b
    jnz  ide_1
    mov  [cdbase],1
    mov  [cd],0
    cmp  [hd],0
    je         all_device
 
  ide_1:
    mov  al,[table_area+1]
    shl  al,2
    shr  al,6
    cmp  al,0
    je        ide_2
    cmp  al,01b
    jnz  ide_1_cd
    cmp  [hd],0
    je         ide_11
    mov  [hdbase],2
    mov  [hd],0
  ide_11:
    cmp  [cd],0
    je         all_device
    jmp  ide_2
 
  ide_1_cd:
    cmp  al,10b
    jnz  ide_2
    cmp  [cd],0
    je         ide_11_cd
    mov  [cdbase],2
    mov  [cd],0
  ide_11_cd:
    cmp  [hd],0
    je         all_device
 
 ide_2:
    mov  al,[table_area+1]
    shl  al,4
    shr  al,6
    cmp  al,0
    je        ide_3
    cmp  al,01b
    jnz  ide_2_cd
    cmp  [hd],0
    je         ide_21
    mov  [hdbase],3
    mov  [hd],0
  ide_21:
    cmp  [cd],0
    je         all_device
    jmp  ide_3
 
  ide_2_cd:
    cmp  al,10b
    jnz  ide_3
    cmp  [cd],0
    je         ide_21_cd
    mov  [cdbase],3
    mov  [cd],0
  ide_21_cd:
    cmp  [hd],0
    je         all_device
 
  ide_3:
    mov  al,[table_area+1]
    shl  al,6
    shr  al,6
    cmp  al,0
    je        not_device
    cmp  al,01b
    jnz  ide_3_cd
    cmp  [hd],0
    je         ide_31
    mov  [hdbase],4
    mov  [hd],0
  ide_31:
    cmp  [cd],0
    jmp   all_device
 
  ide_3_cd:
    cmp  al,10b
    jnz  not_device
    cmp  [cd],0
    je         all_device
    mov  [cdbase],4
    mov  [cd],0
 
  all_device:
  not_device:
    ret
 
hd db 0
cd db 0
;******************************************************************************
apply_all_and_exit:
    mcall 70,read_fileinfo
    call apply_all
    jmp  close
 
;******************************************************************************
set_language_and_exit:
    mov  eax,26
    mov  ebx,2
    mov  ecx,9
    int  0x40
;    cmp  eax,5
;    jne  @f
;    xor  eax,eax
;@@: mov  [keyboard],eax
    cmp  eax,1
    je        russian
    xor  eax,eax
set_lang_now:
    mov  [keyboard],eax
    call _keyboard
    jmp  close
russian:
    mov  eax,3
    jmp  set_lang_now
 
set_syslanguage_and_exit:
    mov  eax,26
    mov  ebx,5
;    mov  ecx,9
    int  0x40
    cmp  eax,4
    jne  temp      ;@f
    xor  eax,eax
;@@: inc  eax
temp: inc  eax
    mov  [syslang],eax
    call _syslang
    jmp  close
 
get_setup_values:
    mcall 26,1
    mov [midibase],eax
    mcall 26,2,9
    dec  eax
    mov [keyboard],eax
    mcall 26,3
    mov [cdbase],eax
    mcall 26,4
    mov [sb16],eax
    mcall 26,5
    mov [syslang],eax
    mcall 26,6
    cmp eax,0x530
    jne s_wss_2
    mov eax,1
    jmp get_other
s_wss_2:
    cmp eax,0x608
    jne s_wss_3
    mov eax,2
    jmp get_other
s_wss_3:
    cmp eax,0xe80
    jne s_wss_4
    mov eax,3
    jmp get_other
s_wss_4:
    mov eax,4
get_other:
    mov [wss],eax
    mcall 26,7
    mov [hdbase],eax
    mcall 26,8
    mov [f32p],eax
    mcall 26,10
    mov [sound_dma],eax
    mcall 26,11
    mov [lba_read],eax
    mcall 26,12
    mov [pci_acc],eax
    mcall 18,19,0
    mov [mouse_speed],eax
    mcall 18,19,2
    mov [mouse_delay],eax
    ret
 
;******************************************************************************
 
START:
    cmp  [I_PARAM], 'SLAN'
    je         set_syslanguage_and_exit
 
    cmp  [I_PARAM], 'LANG'
    je         set_language_and_exit
 
    cmp  [I_PARAM], 'BOOT'
    je         apply_all_and_exit
 
    call get_setup_values
    call loadtxt
red:
    call draw_window
 
still:
 
    cmp  word [blinkpar],0
    jne  blinker
    mov  eax,29     ;get system date
    int  0x40
    cmp  eax,[date]
    je         gettime
    mov  [date],eax
 gettime:
    mov  eax,3        ;get system time
    int  0x40
    cmp  ax,[time]
    je         sysevent
    mov  [time],ax
    call drawtime
 
 sysevent:
    mov  eax,23
    mov  ebx,8        ; wait here for event with timeout
    int  0x40
 
    cmp  eax,1
    jz         red
    cmp  eax,2
    jz         key
    cmp  eax,3
    jz         button
 
    jmp  still
 
 blinker:
    cmp  byte [count],6
    jb         noblink
    btc  dword [blinkpar],16
    mov  byte [count],0
    call drawtime
 noblink:
    inc  byte [count]
    jmp  sysevent
 
incdectime:
    cmp byte [blinkpar],0
    je        still
    mov esi,time
    mov bl,0x23  ;border
    cmp byte [blinkpar],1
    je        hours
    mov bl,0x59       ;minutes
    inc esi
  hours:
    mov al,byte [esi]
    cmp ah,112
    je        dectime
    cmp al,bl
    je        noinctime
     inc al
     daa
    jmp incdectime1
  noinctime:
    xor al,al
  incdectime1:
    mov byte [esi],al
    jmp still
  dectime:
    cmp al,0
    je        nodectime
    dec al
    das
    jmp incdectime1
  nodectime:
    mov al,bl
    jmp incdectime1
 
incdecdate:
    cmp byte [blinkpar+1],0
    je        still
    mov esi,date
    mov bl,0      ;border of years
    cmp byte [blinkpar+1],1
    jne days
    mov bl,0x12     ;months
    inc esi
  days:
    cmp byte [blinkpar+1],2
    jne nodays
    mov bl,0x31
    add esi,2
  nodays:
    mov al,byte [esi]
    cmp ah,122
    je        decdate
    cmp al,bl
    je        noincdate
    inc al ;add al,1
    daa
    jmp incdecdate1
  noincdate:
    mov al,1
  incdecdate1:
    mov byte [esi],al
    jmp still
  decdate:
    cmp al,1
    je        nodecdate
    dec al
    das
    jmp incdecdate1
  nodecdate:
    mov al,bl
    jmp incdecdate1
 
 
  key:
    ;mov  eax,2
    int  0x40
    cmp  ah,27
    jne  still
    mov  dword [blinkpar],0
    call drawtime
    jmp  still
 
  button:
 
    mov  eax,17
    int  0x40
 
    cmp  ah,112
    je         incdectime
    cmp  ah,113
    je         incdectime
    cmp  ah,122
    je         incdecdate
    cmp  ah,123
    je         incdecdate
    cmp  ah,111
    jne  noseltime
    mov  al, [blinkpar]
    cmp  al,2
    jae  seltime
    inc  al
    jmp  seltime1
  seltime:
    xor  al,al
  seltime1:
    mov  [blinkpar],al
    call drawtime
    jmp  still
noseltime:
    cmp  ah,121
    jne  noseldate
    mov  al,byte [blinkpar+1]
    cmp  al,3
    jae  seldate
    inc  al
    jmp  seldate1
 seldate:
    xor  al,al
 seldate1:
    mov  [blinkpar+1],al
    call drawtime
    jmp  still
noseldate:
    cmp  ah,99
    jne  nosaveall
    mcall 70,save_fileinfo
    call settime
    mov  dword [blinkpar],0
    call drawtime
    jmp  still
nosaveall:
    cmp  ah,100
    jne  no_apply_all
    call apply_all
    jmp  still
no_apply_all:
 
    cmp  ah,1           ; CLOSE APPLICATION
    jne  no_close
close:
    or         eax,-1
    int  0x40
  no_close:
 
    cmp  ah,11         ; SET MIDI BASE
    jnz  nosetbase1
    call _midibase
   nosetbase1:
    cmp  ah,12
    jnz  nomm
    sub  [midibase],2
    call draw_infotext
  nomm:
    cmp  ah,13
    jnz  nomp
    add  [midibase],2
    call draw_infotext
  nomp:
 
 
    cmp  ah,4           ; SET KEYBOARD
    jnz  nokm
    mov  eax,[keyboard]
    test eax,eax
    je         downuplbl
    dec  eax
    jmp  nodownup
   downuplbl:
    mov  eax,4
   nodownup:
    mov  [keyboard],eax
    call draw_infotext
  nokm:
    cmp  ah,5
    jnz  nokp
    mov  eax,[keyboard]
    cmp  eax,4
    je         updownlbl
    inc  eax
    jmp  noupdown
   updownlbl:
    xor  eax,eax
   noupdown:
    mov  [keyboard],eax
    call draw_infotext
  nokp:
 
 
    cmp  ah,22          ; SET CD BASE
    jnz  nocm
    mov  eax,[cdbase]
    sub  eax,2
    and  eax,3
    inc  eax
    mov  [cdbase],eax
    call draw_infotext
  nocm:
    cmp  ah,23
    jnz  nocp
    mov  eax,[cdbase]
    and  eax,3
    inc  eax
    mov  [cdbase],eax
    call draw_infotext
  nocp:
    cmp  ah,21
    jnz  nocs
    call _cdbase
  nocs:
 
    cmp  ah,62        ; SET HD BASE
    jnz  hnocm
    mov  eax,[hdbase]
    sub  eax,2
    and  eax,3
    inc  eax
    mov  [hdbase],eax
    call draw_infotext
  hnocm:
    cmp  ah,63
    jnz  hnocp
    mov  eax,[hdbase]
    and  eax,3
    inc  eax
    mov  [hdbase],eax
    call draw_infotext
  hnocp:
    cmp  ah,61
    jnz  hnocs
    call _hdbase
  hnocs:
 
    cmp  ah,82        ; SET SOUND DMA
    jne  no_sdma_d
    mov  eax,[sound_dma]
    dec  eax
   sdmal:
    and  eax,3
    mov  [sound_dma],eax
    call draw_infotext
    jmp  still
  no_sdma_d:
    cmp  ah,83
    jne  no_sdma_i
    mov  eax,[sound_dma]
    inc  eax
    jmp  sdmal
  no_sdma_i:
    cmp  ah,81
    jne  no_set_sound_dma
    call _sound_dma
    jmp  still
  no_set_sound_dma:
 
    cmp  ah,92         ; SET LBA READ
    jne  no_lba_d
  slbal:
    btc  [lba_read],0
    call draw_infotext
    jmp  still
   no_lba_d:
    cmp  ah,93
    jne  no_lba_i
    jmp  slbal
  no_lba_i:
    cmp  ah,91
    jne  no_set_lba_read
    call _lba_read
    jmp  still
   no_set_lba_read:
 
 
    cmp  ah,102       ; SET PCI ACCESS
    jne  no_pci_d
  pcip:
    btc  [pci_acc],0
    call draw_infotext
    jmp  still
  no_pci_d:
    cmp  ah,103
    jne  no_pci_i
    jmp  pcip
   no_pci_i:
    cmp  ah,101
    jne  no_set_pci_acc
    call _pci_acc
    jmp  still
  no_set_pci_acc:
 
 
  set_partition:
    cmp  ah,72        ; SET FAT32 PARTITION
    jnz  .nominus
    mov  eax,[f32p]
    sub  eax,2
;   and  eax,15          ; 3 - four partitions, 7 - eight p., 15 - sixteen, etc.
    cmp  eax,15
    jb        @f
    mov  eax,14
@@:
    inc  eax
    mov  [f32p],eax
    call draw_infotext
  .nominus:
    cmp  ah,73
    jnz  .noplus
    mov  eax,[f32p]
;   and  eax,15          ; 3 - four partitions, 7 - eight p., 15 - sixteen, etc.
    cmp  eax,15
    jb        @f
    mov  eax,0
@@:
    inc  eax
    mov  [f32p],eax
    call draw_infotext
  .noplus:
    cmp  ah,71
    jnz  .noapply
    call _f32p
  .noapply:
 
    cmp  ah,32        ; SET SOUND BLASTER 16 BASE
    jnz  nosbm
    sub  [sb16],2
    call draw_infotext
  nosbm:
    cmp  ah,33
    jnz  nosbp
    add  [sb16],2
    call draw_infotext
  nosbp:
    cmp  ah,31
    jnz  nosbs
    call _sb16
  nosbs:
 
    cmp  ah,52        ; SET WINDOWS SOUND SYSTEM BASE
    jnz  nowssm
    mov  eax,[wss]
    sub  eax,2
    and  eax,3
    inc  eax
    mov  [wss],eax
    call draw_infotext
  nowssm:
    cmp  ah,53
    jnz  nowssp
    mov  eax,[wss]
    and  eax,3
    inc  eax
    mov  [wss],eax
    call draw_infotext
  nowssp:
    cmp  ah,51
    jnz  nowsss
    call _wssp
  nowsss:
 
    cmp  ah,42          ; SET SYSTEM LANGUAGE BASE
    jnz  nosysm
    mov  eax,[syslang]
    dec  eax
    jz         still
    mov  [syslang],eax
    call draw_infotext
  nosysm:
    cmp  ah,43
    jnz  nosysp
    mov  eax,[syslang]
    cmp  eax,4
    je         nosysp
    inc  eax
    mov  [syslang],eax
    call draw_infotext
  nosysp:
    cmp  ah,41
    jnz  nosyss
    call _syslang
    call cleantxt
    call loadtxt
    call draw_window
    call drawtime
  nosyss:
    cmp  ah,132        ; SET MOUSE SPEED
    jnz  .nominus
    mov  eax,[mouse_speed]
    sub  eax,2
    cmp  eax,9
    jb        @f
    mov  eax,8
@@:
    inc  eax
    mov  [mouse_speed],eax
    call draw_infotext
  .nominus:
    cmp  ah,133
    jnz  .noplus
    mov  eax,[mouse_speed]
    cmp  eax,9
    jb        @f
    mov  eax,0
@@:
    inc  eax
    mov  [mouse_speed],eax
    call draw_infotext
  .noplus:
    cmp  ah,131
    jnz  .noapply
    call _mouse_speed
  .noapply:
 mousedelay:
    cmp  ah,142        ; SET MOUSE DELAY
    jnz  .nominus
    mov  eax,[mouse_delay]
    sub  eax,2
    cmp  eax,0xfff
    jb        @f
    mov  eax,0xffe
@@:
    inc  eax
    mov  [mouse_delay],eax
    call draw_infotext
  .nominus:
    cmp  ah,143
    jnz  .noplus
    mov  eax,[mouse_delay]
    cmp  eax,0xfff
    jb        @f
    mov  eax,0
@@:
    inc  eax
    mov  [mouse_delay],eax
    call draw_infotext
  .noplus:
    cmp  ah,141
    jnz  .noapply
    call _mouse_delay
  .noapply:
 
    cmp  ah,3         ; SET KEYMAP
    jne  still
    call _keyboard
    jmp  still
 
  _keyboard:
    cmp [keyboard],0
    jnz  nosetkeyle
    mov  eax,21       ; english
    mov  ebx,2
    mov  ecx,1
    mov  edx,en_keymap
    int  0x40
    mov  eax,21
    inc  ecx
    mov  edx,en_keymap_shift
    int  0x40
    mov  eax,21
    mov  ecx,9
    mov  edx,1
    int  0x40
    call alt_gen
  nosetkeyle:
    cmp  [keyboard],1
    jnz  nosetkeylfi
    mov  eax,21       ; finnish
    mov  ebx,2
    mov  ecx,1
    mov  edx,fi_keymap
    int  0x40
    mov  eax,21
    inc  ecx
    mov  edx,fi_keymap_shift
    int  0x40
    mov  eax,21
    mov  ecx,9
    mov  edx,2
    int  0x40
    call alt_gen
  nosetkeylfi:
    cmp  [keyboard],2
    jnz  nosetkeylge
    mov  eax,21       ; german
    mov  ebx,2
    mov  ecx,1
    mov  edx,ge_keymap
    int  0x40
    mov  eax,21
    inc  ecx
    mov  edx,ge_keymap_shift
    int  0x40
    mov  eax,21
    mov  ecx,9
    mov  edx,3
    int  0x40
    call alt_gen
  nosetkeylge:
    cmp  [keyboard],3
    jnz  nosetkeylru
    mov  eax,21       ; russian
    mov  ebx,2
    mov  ecx,1
    mov  edx,ru_keymap
    int  0x40
    mov  eax,21
    inc  ecx
    mov  edx,ru_keymap_shift
    int  0x40
    call alt_gen
    mov  eax,21
    mov  ecx,9
    mov  edx,4
    int  0x40
  nosetkeylru:
    cmp  [keyboard],4        ;french
    jnz  nosetkeylfr
    mov  eax,21
    mov  ebx,2
    mov  ecx,1
    mov  edx,fr_keymap
    int  0x40
    mov  eax,21
    inc  ecx
    mov  edx,fr_keymap_shift
    int  0x40
    mov  eax,21
    inc  ecx
    mov  edx,fr_keymap_alt_gr
    int  0x40
    mov  eax,21
    mov  ecx,9
    mov  edx,5
    int  0x40
  nosetkeylfr:
    ret
 
 alt_gen:
   mov eax,21
   mov ecx,3
   mov edx,alt_general
   int 0x40
   ret
 
 
 
draw_buttons:
 
    pusha
 
    shl  ecx,16
    add  ecx,12
    mov  ebx,(350-50)*65536+46+BBB
 
    mov  eax,8
    int  0x40
 
    mov  ebx,(350-79)*65536+9
    inc  edx
    int  0x40
 
    mov  ebx,(350-67)*65536+9
    inc  edx
    int  0x40
 
    popa
    ret
 
 
 
; ********************************************
; ******* WINDOW DEFINITIONS AND DRAW  *******
; ********************************************
 
 
draw_window:
 
    pusha
 
    mov  eax,12
    mov  ebx,1
    int  0x40
 
    xor  eax,eax       ; DRAW WINDOW
    mov  ebx,40*65536+355+BBB
    mov  ecx,40*65536+320
    mov  edx,0x83111199
;    mov  esi,0x805588dd
;    mov  edi,0x005588dd
    int  0x40
 
    mov  eax,4
    mov  ebx,8*65536+8
    mov  ecx,0x10ffffff
    mov  edx,labelt
    cmp  [syslang],4
    je         ruslabel
    add  edx,20
  ruslabel:
    mov  esi,19 ;26
    int  0x40
 
;    mov  eax,8               ; CLOSE BUTTON
;    mov  ebx,(355+BBB-19)*65536+12
;    mov  ecx,5*65536+12
;    mov  edx,1
;    mov  esi,0x005588dd
;    int  0x40
 
    mov  eax,8             ; APPLY ALL
    mov  ebx,(350-79)*65536+100
    mov  ecx,282*65536+12
    mov  edx,100
    mov  esi,0x005588dd
    int  0x40
    add  ecx,16*65536         ; SAVE ALL
    dec  edx
    int  0x40
 
    mov  esi,0x5580c0
 
    mov  edx,11
    mov  ecx,43
    call draw_buttons
 
    mov  edx,41
    mov  ecx,43+8*8
    call draw_buttons
 
    mov  edx,21
    mov  ecx,43+4*8
    call draw_buttons
 
    mov  edx,31
    mov  ecx,43+2*8
    call draw_buttons
 
    mov  edx,3
    mov  ecx,43+10*8
    call draw_buttons
 
    mov  edx,51
    mov  ecx,43+12*8
    call draw_buttons
 
    mov  edx,61
    mov  ecx,43+6*8
    call draw_buttons
 
    mov  edx,91
    mov  ecx,43+18*8
    call draw_buttons
 
    mov  edx,71
    mov  ecx,43+14*8
    call draw_buttons
 
    mov  edx,81
    mov  ecx,43+16*8
    call draw_buttons
 
    mov  edx,101
    mov  ecx,43+20*8
    call draw_buttons
 
    mov  edx,111
    mov  ecx,43+22*8 ; 22
    call draw_buttons
 
    mov  edx,121
    mov  ecx,43+24*8 ; 24
    call draw_buttons
 
    mov  edx,131
    mov  ecx,43+26*8 ; 26
    call draw_buttons
 
    mov  edx,141
    mov  ecx,43+28*8 ; 26
    call draw_buttons
 
    call draw_infotext
 
    mov  eax,12
    mov  ebx,2
    int  0x40
 
    popa
    ret
 
 
 
draw_infotext:
 
    pusha
 
    mov  eax,[keyboard]       ; KEYBOARD
    test eax,eax
    jnz  noen
    mov  [text00+LLL*10+28],dword 'ENGL'
    mov  [text00+LLL*10+32],dword 'ISH '
  noen:
    cmp  eax,1
    jnz  nofi
    mov  [text00+LLL*10+28],dword 'FINN'
    mov  [text00+LLL*10+32],dword 'ISH '
  nofi:
    cmp  eax,2
    jnz  noge
    mov  [text00+LLL*10+28],dword 'GERM'
    mov  [text00+LLL*10+32],dword 'AN  '
  noge:
    cmp  eax,3
    jnz  nogr
    mov  [text00+LLL*10+28],dword 'RUSS'
    mov  [text00+LLL*10+32],dword 'IAN '
  nogr:
    cmp  eax,4
    jnz  nofr
    mov  [text00+LLL*10+28],dword 'FREN'
    mov  [text00+LLL*10+32],dword 'CH  '
  nofr:
 
 
    mov  eax,[syslang]            ; SYSTEM LANGUAGE
    dec  eax
    test eax,eax
    jnz  noen5
    mov  [text00+LLL*8+28],dword 'ENGL'
    mov  [text00+LLL*8+32],dword 'ISH '
  noen5:
    cmp  eax,1
    jnz  nofi5
    mov  [text00+LLL*8+28],dword 'FINN'
    mov  [text00+LLL*8+32],dword 'ISH '
  nofi5:
    cmp  eax,2
    jnz  noge5
    mov  [text00+LLL*8+28],dword 'GERM'
    mov  [text00+LLL*8+32],dword 'AN  '
  noge5:
    cmp  eax,3
    jnz  nogr5
    mov  [text00+LLL*8+28],dword 'RUSS'
    mov  [text00+LLL*8+32],dword 'IAN '
  nogr5:
    cmp  eax,4
    jne  nofr5
    mov  [text00+LLL*8+28],dword 'FREN'
    mov  [text00+LLL*8+32],dword 'CH  '
  nofr5:
 
 
    mov  eax,[midibase]
    mov  esi,text00+LLL*0+32
    call hexconvert           ; MIDI BASE
 
 
    mov  eax,[sb16]           ; SB16 BASE
    mov  esi,text00+LLL*2+32
    call hexconvert
 
 
    mov  eax,[wss]         ; WSS BASE
    cmp  eax,1
    jnz  nowss1
    mov  [wssp],dword 0x530
  nowss1:
    cmp  eax,2
    jnz  nowss2
    mov  [wssp],dword 0x608
  nowss2:
    cmp  eax,3
    jnz  nowss3
    mov  [wssp],dword 0xe80
  nowss3:
    cmp  eax,4
    jnz  nowss4
    mov  [wssp],dword 0xf40
  nowss4:
 
    mov  eax,[wssp]
    mov  esi,text00+LLL*12+32
    call hexconvert
 
    mov  eax,[cdbase]          ; CD BASE
    cmp  eax,1
    jnz  noe1
    mov  [text00+LLL*4+28],dword 'PRI.'
    mov  [text00+LLL*4+32],dword 'MAST'
    mov  [text00+LLL*4+36],dword 'ER  '
  noe1:
    cmp  eax,2
    jnz  nof1
    mov  [text00+LLL*4+28],dword 'PRI.'
    mov  [text00+LLL*4+32],dword 'SLAV'
    mov  [text00+LLL*4+36],dword 'E   '
  nof1:
    cmp  eax,3
    jnz  nog1
    mov  [text00+LLL*4+28],dword 'SEC.'
    mov  [text00+LLL*4+32],dword 'MAST'
    mov  [text00+LLL*4+36],dword 'ER  '
  nog1:
    cmp  eax,4
    jnz  nog2
    mov  [text00+LLL*4+28],dword 'SEC.'
    mov  [text00+LLL*4+32],dword 'SLAV'
    mov  [text00+LLL*4+36],dword 'E   '
  nog2:
 
 
    mov  eax,[hdbase]            ; HD BASE
    cmp  eax,1
    jnz  hnoe1
    mov  [text00+LLL*6+28],dword 'PRI.'
    mov  [text00+LLL*6+32],dword 'MAST'
    mov  [text00+LLL*6+36],dword 'ER  '
  hnoe1:
    cmp  eax,2
    jnz  hnof1
    mov  [text00+LLL*6+28],dword 'PRI.'
    mov  [text00+LLL*6+32],dword 'SLAV'
    mov  [text00+LLL*6+36],dword 'E   '
  hnof1:
    cmp  eax,3
    jnz  hnog1
    mov  [text00+LLL*6+28],dword 'SEC.'
    mov  [text00+LLL*6+32],dword 'MAST'
    mov  [text00+LLL*6+36],dword 'ER  '
  hnog1:
    cmp  eax,4
    jnz  hnog2
    mov  [text00+LLL*6+28],dword 'SEC.'
    mov  [text00+LLL*6+32],dword 'SLAV'
    mov  [text00+LLL*6+36],dword 'E   '
  hnog2:
 
 
    mov  eax,[f32p]        ; FAT32 PARTITION
    add  al,48
    mov  [text00+LLL*14+28],al
 
    mov  eax,[sound_dma]      ; SOUND DMA
    add  eax,48
    mov  [text00+LLL*16+28],al
 
    mov  eax,[lba_read]
    call onoff          ; LBA READ
    mov  [text00+LLL*18+28],ebx
 
    mov  eax,[pci_acc]
    call onoff          ; PCI ACCESS
    mov  [text00+LLL*20+28],ebx
 
    mov  eax,[mouse_speed]      ; MOUSE SPEED
    add  al,48
    mov  [text00+LLL*26+28],al
 
    mov  eax,[mouse_delay]
    mov  esi,text00+LLL*28+32
    call hexconvert           ; MOUSE DELAY
 
    mov  eax,13
    mov  ebx,175*65536+85
    mov  ecx,40*65536+245
    mov  edx,0x80111199-19
    int  0x40
 
    mov  edx,text00
    mov  ebx,10*65536+45
    mov  eax,4
    mov  ecx,0xffffff
    mov  esi,LLL
  newline:
    int  0x40
    add  ebx,8
    add  edx,LLL
    cmp  [edx],byte 'x'
    jnz  newline
 
    popa
    ret
 
  drawtime:
    mov  ax,[time]      ;hours 22
    mov  cl,1
    call unpacktime
    mov  [text00+LLL*22+28],word bx
    mov  al,ah          ;minutes
    inc  cl
    call unpacktime
    mov  [text00+LLL*22+31],word bx
    mov  eax,[date]
    mov  ch,3
    call unpackdate
    mov  [text00+LLL*24+34],word bx    ;year   24
    mov  al,ah
    mov  ch,1
    call unpackdate
    mov  [text00+LLL*24+28],word bx    ;month
    bswap eax
    mov  al,ah
    inc  ch
    call unpackdate
    mov  [text00+LLL*24+31],word bx    ;day
 
    mov  eax,13
    mov  ebx,175*65536+85
    mov  ecx,40*65536+245
    mov  edx,0x80111199-19
    int  0x40
 
    mov  edx,text00
    mov  ebx,10*65536+45
    mov  eax,4
    mov  ecx,0xffffff
    mov  esi,LLL
  newline1:
    int  0x40
    add  ebx,8
    add  edx,LLL
    cmp  [edx],byte 'x'
    jnz  newline1
    ret
 
  unpacktime:
    cmp  byte [blinkpar],cl    ;translate packed number to ascii
    jne  unpack1
  chkblink:
    bt dword [blinkpar],16
    jnc  unpack1
    xor  bx,bx
    ret
  unpackdate:
    cmp  byte [blinkpar+1],ch
    je         chkblink
  unpack1:
    xor  bx,bx
    mov  bh,al
    mov  bl,al
    and  bh,0x0f
    shr  bl,4
    add  bx,0x3030
    ret
 
  hexconvert:        ;converting dec to hex in ascii
    xor  ebx,ebx
    mov  bl,al
    and  bl,15
    add  ebx,hex
    mov  cl,[ebx]
    mov  [esi],cl
    shr  eax,4
    xor  ebx,ebx
    mov  bl,al
    and  bl,15
    add  ebx,hex
    mov  cl,[ebx]
    dec  esi
    mov  [esi],cl
    shr  eax,4
    xor  ebx,ebx
    mov  bl,al
    and  bl,15
    add  ebx,hex
    mov  cl,[ebx]
    dec  esi
    mov  [esi],cl
    ret
 
onoff:
    cmp [syslang],4
    jne norus1
    mov ebx,'  '
    cmp eax,1
    je        exitsub
    mov ebx,' '
    ret
 norus1:
    mov ebx,'ON  '
    cmp eax,1
    je        exitsub
    mov ebx,'OFF '
 exitsub:
    ret
 
_midibase:
    mov  eax,21
    mov  ebx,1
    mov  ecx,[midibase]
    int  0x40
 ret
 
_cdbase:
    mov  eax,21
    mov  ebx,3
    mov  ecx,[cdbase]
    int  0x40
 ret
 
_hdbase:
    mov  eax,21
    mov  ebx,7
    mov  ecx,[hdbase]
    int  0x40
    ret
 
_sound_dma:
    mov  eax,21
    mov  ebx,10
    mov  ecx,[sound_dma]
    int  0x40
    ret
 
_lba_read:
    mov  eax,21
    mov  ebx,11
    mov  ecx,[lba_read]
    int  0x40
    ret
 
_pci_acc:
    mov  eax,21
    mov  ebx,12
    mov  ecx,[pci_acc]
    int  0x40
    ret
 
_f32p:
    mov  eax,21
    mov  ebx,8
    mov  ecx,[f32p]
    int  0x40
 ret
 
_sb16:
    mov  eax,21
    mov  ebx,4
    mov  ecx,[sb16]
    int  0x40
    ret
 
_wssp:
    mov  eax,21
    mov  ebx,6
    mov  ecx,[wssp]
    int  0x40
 ret
 
_syslang:
    mov  eax,21
    mov  ebx,5
    mov  ecx,[syslang]
    int  0x40
 ret
 
_mouse_speed:
    mov  eax,18
    mov  ebx,19
    mov  ecx,1
    mov  edx,[mouse_speed]
    int  0x40
 ret
 
_mouse_delay:
    mov  eax,18
    mov  ebx,19
    mov  ecx,3
    mov  edx,[mouse_delay]
    int  0x40
 ret
 
loadtxt:
    cld
    mov  edi,text00
    mov  ecx,488 ;28
    cmp  [syslang],4
    jne  norus
    mov  esi,textrus
    jmp  sload
  norus:
    mov  esi,texteng
  sload:
    rep  movsd
    ret
 
cleantxt:
    xor  eax,eax
    mov  ecx,428
    cld
    mov  edi,text00
    rep stosd
    mov  [text00+1711],byte 'x'
    ret
 
settime:
    mov  dx,0x70
    call startstopclk
    dec  dx
    mov  al,2           ;set minutes
    out  dx,al
    inc  dx
    mov  al,byte [time+1]
    out  dx,al
    dec  dx
    mov  al,4           ;set hours
    out  dx,al
    inc  dx
    mov  al,byte [time]
    out  dx,al
    dec  dx
    mov  al,7           ;set day
    out  dx,al
    inc  dx
    mov  al,byte [date+2]
    out  dx,al
    dec  dx
    mov  al,8           ;set month
    out  dx,al
    inc  dx
    mov  al,byte [date+1]
    out  dx,al
    dec  dx
    mov  al,9           ;set year
    out  dx,al
    inc  dx
    mov  al,byte [date]
    out  dx,al
    dec  dx
    call startstopclk
    ret
 
startstopclk:
    mov  al,0x0b
    out  dx,al
    inc  dx
    in         al,dx
    btc  ax,7
    out  dx,al
    ret
 
; DATA AREA
count:          db 0x0
blinkpar: dd 0x0
time:        dw 0x0
date:        dd 0x0
 
textrus:
 
    db ' §  MIDI ROLAND MPU-401  : 0x320           - +   à¨¬¥­¨âì'
    db '                                                           '
    db ' §  SoundBlaster 16      : 0x240           - +   à¨¬¥­¨âì'
    db '                                                           '
    db ' §  CD-ROM               : PRI.SLAVE       - +   à¨¬¥­¨âì'
    db '                                                           '
    db ' §  -1                 : PRI.MASTER      - +   à¨¬¥­¨âì'
    db '                                                           '
    db '§ëª á¨áâ¥¬ë              : ENGLISH         - +   à¨¬¥­¨âì'
    db '                                                           '
    db ' áª« ¤ª  ª« ¢¨ âãàë      : ENGLISH         - +   à¨¬¥­¨âì'
    db '                                                           '
    db ' §  WSS                  : 0x200           - +   à¨¬¥­¨âì'
    db '                                                           '
    db ' §¤¥« FAT32 ­  -1      : 1               - +   à¨¬¥­¨âì'
    db '                                                           '
    db '¢ãª®¢®© ª ­ « DMA        : 1               - +   à¨¬¥­¨âì'
    db '                                                           '
    db 'ª«îç¨âì LBA              : OFF             - +   à¨¬¥­¨âì'
    db '                                                           '
    db '®áâã¯ ª è¨­¥ PCI         : OFF             - +   à¨¬¥­¨âì'
    db '                                                           '
    db '¨áâ¥¬­®¥ ¢à¥¬ï           :  0:00           - +     ë¡®à  '
    db '                                                           '
    db '¨áâ¥¬­ ï ¤ â  (¬,¤,£)    : 00/00/00        - +     ë¡®à  '
    db '                                                           '
    db 'ª®à®áâì ªãàá®à  ¬ëè¨     : 1               - +   à¨¬¥­¨âì'
    db '                                                           '
    db ' ¤¥à¦ª  ãáª®à¥­¨ï ¬ëè¨   : 0x00a           - +   à¨¬¥­¨âì'
    db '                                                           '
    db ':                                    à¨¬¥­¨âì ¢á¥ '
    db '   FAT  !                  '
    db '                 ®åà ­¨âì ¢á¥ '
    db 'x'
 
texteng:
 
    db 'MIDI: ROLAND MPU-401 BASE : 0x320           - +     APPLY  '
    db '                                                           '
    db 'SOUND: SB16 BASE          : 0x240           - +     APPLY  '
    db '                                                           '
    db 'CD-ROM BASE               : PRI.SLAVE       - +     APPLY  '
    db '                                                           '
    db 'HARDDISK-1 BASE           : PRI.MASTER      - +     APPLY  '
    db '                                                           '
    db 'SYSTEM LANGUAGE           : ENGLISH         - +     APPLY  '
    db '                                                           '
    db 'KEYBOARD LAYOUT           : ENGLISH         - +     APPLY  '
    db '                                                           '
    db 'WINDOWS SOUND SYSTEM BASE : 0x200           - +     APPLY  '
    db '                                                           '
    db 'FAT32-1 PARTITION IN HD-1 : 1               - +     APPLY  '
    db '                                                           '
    db 'SOUND DMA CHANNEL         : 1               - +     APPLY  '
    db '                                                           '
    db 'LBA READ ENABLED          : OFF             - +     APPLY  '
    db '                                                           '
    db 'PCI ACCESS FOR APPL.      : OFF             - +     APPLY  '
    db '                                                           '
    db 'SYSTEM TIME               :  0:00           - +    SELECT  '
    db '                                                           '
    db 'SYSTEM DATE (M,D,Y)       : 00/00/00        - +    SELECT  '
    db '                                                           '
    db 'Mouse pointer speed       : 1               - +     APPLY  '
    db '                                                           '
    db 'Mouse pointer delay       : 0x00a           - +     APPLY  '
    db '                                                           '
    db 'NOTE:                                           APPLY ALL  '
    db 'TEST FAT FUNCTIONS WITH EXTREME CARE                       '
    db 'SAVE YOUR SETTINGS BEFORE QUIT MENUET           SAVE ALL   '
    db 'x'
 
labelt:
    db         '  DEVICE SETUP       '
 
hex db         '0123456789ABCDEF'
 
alt_general:
 
;     db   ' ',27
;     db   ' @ $  {[]}\ ',8,9
;     db   '            ',13
;     db   '             ',0,'           ',0,'4',0,' '
;     db   '             ',180,178,184,'6',176,'7'
;     db   179,'8',181,177,183,185,182
;     db   'ABCD',255,'FGHIJKLMNOPQRSTUVWXYZ'
;     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
;     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
;     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
 
 
en_keymap:
 
     db   '6',27
     db   '1234567890-=',8,9
     db   'qwertyuiop[]',13
     db   '~asdfghjkl;',39,96,0,'\zxcvbnm,./',0,'45 '
     db   '@234567890123',180,178,184,'6',176,'7'
     db   179,'8',181,177,183,185,182
     db   'AB
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
 
 
en_keymap_shift:
 
     db   '6',27
     db   '!@#$%^&*()_+',8,9
     db   'QWERTYUIOP{}',13
     db   '~ASDFGHJKL:"~',0,'|ZXCVBNM<>?',0,'45 '
     db   '@234567890123',180,178,184,'6',176,'7'
     db   179,'8',181,177,183,185,182
     db   'AB>D',255,'FGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
 
 
fr_keymap:
 
     db   '6',27
     db   '&"',39,'(-_)=',8,9
     db   'azertyuiop^$',13
     db   '~qsdfghjklm',0,0,'*wxcvbn,;:!',0,'45 '
     db   '@234567890123',180,178,184,'6',176,'7'
     db   179,'8',181,177,183,185,182
     db   'AB
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
 
 
 
fr_keymap_shift:
 
 
     db   '6',27
     db   '1234567890+',8,9
     db   'AZERTYUIOP',13
     db   '~QSDFGHJKLM%',0,'WXCVBN?./',0,'45 '
     db   '@234567890123',180,178,184,'6',176,'7'
     db   179,'8',181,177,183,185,182
     db   'AB>D',255,'FGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
 
 
fr_keymap_alt_gr:
 
 
     db   '6',27
     db   28,'~#{[|\^@]}',8,9
     db   'azertyuiop^$',13
     db   '~qsdfghjklm',0,0,'*wxcvbn,;:!',0,'45 '
     db   '@234567890123',180,178,184,'6',176,'7'
     db   179,'8',181,177,183,185,182
     db   'AB
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
 
 
 
 
fi_keymap:
 
     db   '6',27
     db   '1234567890+[',8,9
     db   'qwertyuiop',192,'~',13
     db   '~asdfghjkl',194,193,'1',0,39,'zxcvbnm,.-',0,'45 '
     db   '@234567890123',180,178,184,'6',176,'7'
     db   179,'8',181,177,183,185,182
     db   'AB
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
 
 
fi_keymap_shift:
 
     db   '6',27
     db   '!"#%&/()=?]',8,9
     db   'QWERTYUIOP',200,'~',13
     db   '~ASDFGHJKL',202,201,'1',0,'*ZXCVBNM;:_',0,'45 '
     db   '@234567890123',180,178,184,'6',176,'7'
     db   179,'8',181,177,183,185,182
     db   'AB>D',255,'FGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
 
 
 
ge_keymap:
 
     db   '6',27
     db   '1234567890?[',8,9
     db   'qwertzuiop',203,'~',13
     db   '~asdfghjkl',194,193,'1',0,39,'yxcvbnm,.-',0,'45 '
     db   '@234567890123',180,178,184,'6',176,'7'
     db   179,'8',181,177,183,185,182
     db   'AB
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
 
 
ge_keymap_shift:
 
     db   '6',27
     db   '!"#$%&/()=',197,']',8,9
     db   'QWERTZUIOP',195,'~',13
     db   '~ASDFGHJKL',202,201,'1',0,'*YXCVBNM;:_',0,'45 '
     db   '@234567890123',180,178,184,'6',176,'7'
     db   179,'8',181,177,183,185,182
     db   'AB>D',255,'FGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
 
ru_keymap:
 
     db   '6',27
     db   '1234567890-=',8,9
     db   '©æãª¥­£èé§åê',13
     db   0,"äë¢ ¯à®«¤¦í"
     db   0xf1, '-/'
     db   "ïçá¬¨âì¡î",'.-','45 '
     db   '@234567890123',180,178,184,'6',176,'7'
     db   179,'8',181,177,183,185,182
     db   'AB
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
 
 
 
ru_keymap_shift:
 
     db   '6',27
     db   '!"N;%:?*()_+',8,0
     db   "",13
     db   0,""
     db   0xf0, '-\'
     db   "",',-','45 '
     db   '@234567890123',180,178,184,'6',176,'7'
     db   179,'8',181,177,183,185,182
     db   'AB>D',255,'FGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
     db   'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
 
read_fileinfo:
       dd 0
       dd 0
       dd 0
       dd 56
       dd keyboard
       db 0
       dd file_name
 
save_fileinfo:
       dd 2
       dd 0
       dd 0
       dd 56
       dd keyboard
file_name:   db '/rd/1/setup.dat',0
 
I_PARAM   dd 0
 
keyboard     dd 0x0
midibase     dd 0x320
cdbase         dd 0x2
sb16         dd 0x220
syslang      dd 0x1
wss         dd 0x1
wssp         dd 0x0
hdbase         dd 0x1
f32p         dd 0x1
sound_dma    dd 0x1
lba_read     dd 0x1
pci_acc      dd 0x1
mouse_speed  dd 0x3
mouse_delay  dd 0x10
text00:
 
I_END:
table_area:
>
>
>
>
>
>

Rev 120	Rev 127
1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2	;; ;;	2	;; ;;
3	;; DEVICE SETUP ;;	3	;; DEVICE SETUP ;;
4	;; ;;	4	;; ;;
5	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	5	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
6		6
7	; Authors: Ville - original version	7	; Authors: Ville - original version
8	; A. Ivushkin - autostart (w launcher)	8	; A. Ivushkin - autostart (w launcher)
9	; M. Lisovin - added many feauters (apply all, save all, set time...)	9	; M. Lisovin - added many feauters (apply all, save all, set time...)
10	; I. Poddubny - fixed russian keymap	10	; I. Poddubny - fixed russian keymap
-		11	;14/08/06 Mario79 - added regulation of mouse features
11		12
12	;******************************************************************************	13	;******************************************************************************
13	use32	14	use32
14	org 0x0	15	org 0x0
15	db 'MENUET01' ; 8 byte identifier	16	db 'MENUET01' ; 8 byte identifier
16	dd 0x01 ; header version	17	dd 0x01 ; header version
17	dd START ; pointer to program start	18	dd START ; pointer to program start
18	dd I_END ; size of image	19	dd I_END ; size of image
19	dd 0x4000 ; reguired amount of memory	20	dd 0x4000 ; reguired amount of memory
20	dd 0x4000 ; stack pointer (esp)	21	dd 0x4000 ; stack pointer (esp)
21	dd I_PARAM,0 ; parameters, reserved	22	dd I_PARAM,0 ; parameters, reserved
22	; include 'lang.inc'	23	; include 'lang.inc'
23	include 'macros.inc'	24	include 'macros.inc'
24	;******************************************************************************	25	;******************************************************************************
25		26
26	LLL equ (56+3)	27	LLL equ (56+3)
27	BBB equ 25	28	BBB equ 25
28		29
29	;******************************************************************************	30	;******************************************************************************
30	apply_all:	31	apply_all:
31		32
32	call _midibase ;1	33	call _midibase ;1
33	call _sound_dma ;10	34	call _sound_dma ;10
34	call _pci_acc ;12	35	call _pci_acc ;12
35	call _sb16 ;4	36	call _sb16 ;4
36	call _wssp ;6	37	call _wssp ;6
37	call _syslang ;5	38	call _syslang ;5
38	call _keyboard ;2	39	call _keyboard ;2
-		40	call _mouse_speed
39	call _mouse	41	call _mouse_delay
40	call get_disk_info	42	call get_disk_info
41	cmp [cd],0	43	cmp [cd],0
42	jne no_cd	44	jne no_cd
43	call _cdbase ;3	45	call _cdbase ;3
44	no_cd:	46	no_cd:
45	cmp [hd],0	47	cmp [hd],0
46	jne no_hd	48	jne no_hd
47	call _lba_read ;11	49	call _lba_read ;11
48	call _hdbase ;7	50	call _hdbase ;7
49	call _f32p ;8	51	call _f32p ;8
50	no_hd:	52	no_hd:
51	ret	53	ret
52	;-------------------------------------------------------------------------------	54	;-------------------------------------------------------------------------------
53	get_disk_info:	55	get_disk_info:
54	mov [hd],1	56	mov [hd],1
55	mov [cd],1	57	mov [cd],1
56	mov [hdbase],0	58	mov [hdbase],0
57	mov [cdbase],0	59	mov [cdbase],0
58	mcall 18,11,1,table_area	60	mcall 18,11,1,table_area
59		61
60	ide_0:	62	ide_0:
61	mov al,[table_area+1]	63	mov al,[table_area+1]
62	shr al,6	64	shr al,6
63	cmp al,0	65	cmp al,0
64	je ide_1	66	je ide_1
65	cmp al,01b	67	cmp al,01b
66	jnz ide_0_cd	68	jnz ide_0_cd
67	mov [hdbase],1	69	mov [hdbase],1
68	mov [hd],0	70	mov [hd],0
69	jmp ide_1	71	jmp ide_1
70		72
71	ide_0_cd:	73	ide_0_cd:
72	cmp al,10b	74	cmp al,10b
73	jnz ide_1	75	jnz ide_1
74	mov [cdbase],1	76	mov [cdbase],1
75	mov [cd],0	77	mov [cd],0
76	cmp [hd],0	78	cmp [hd],0
77	je all_device	79	je all_device
78		80
79	ide_1:	81	ide_1:
80	mov al,[table_area+1]	82	mov al,[table_area+1]
81	shl al,2	83	shl al,2
82	shr al,6	84	shr al,6
83	cmp al,0	85	cmp al,0
84	je ide_2	86	je ide_2
85	cmp al,01b	87	cmp al,01b
86	jnz ide_1_cd	88	jnz ide_1_cd
87	cmp [hd],0	89	cmp [hd],0
88	je ide_11	90	je ide_11
89	mov [hdbase],2	91	mov [hdbase],2
90	mov [hd],0	92	mov [hd],0
91	ide_11:	93	ide_11:
92	cmp [cd],0	94	cmp [cd],0
93	je all_device	95	je all_device
94	jmp ide_2	96	jmp ide_2
95		97
96	ide_1_cd:	98	ide_1_cd:
97	cmp al,10b	99	cmp al,10b
98	jnz ide_2	100	jnz ide_2
99	cmp [cd],0	101	cmp [cd],0
100	je ide_11_cd	102	je ide_11_cd
101	mov [cdbase],2	103	mov [cdbase],2
102	mov [cd],0	104	mov [cd],0
103	ide_11_cd:	105	ide_11_cd:
104	cmp [hd],0	106	cmp [hd],0
105	je all_device	107	je all_device
106		108
107	ide_2:	109	ide_2:
108	mov al,[table_area+1]	110	mov al,[table_area+1]
109	shl al,4	111	shl al,4
110	shr al,6	112	shr al,6
111	cmp al,0	113	cmp al,0
112	je ide_3	114	je ide_3
113	cmp al,01b	115	cmp al,01b
114	jnz ide_2_cd	116	jnz ide_2_cd
115	cmp [hd],0	117	cmp [hd],0
116	je ide_21	118	je ide_21
117	mov [hdbase],3	119	mov [hdbase],3
118	mov [hd],0	120	mov [hd],0
119	ide_21:	121	ide_21:
120	cmp [cd],0	122	cmp [cd],0
121	je all_device	123	je all_device
122	jmp ide_3	124	jmp ide_3
123		125
124	ide_2_cd:	126	ide_2_cd:
125	cmp al,10b	127	cmp al,10b
126	jnz ide_3	128	jnz ide_3
127	cmp [cd],0	129	cmp [cd],0
128	je ide_21_cd	130	je ide_21_cd
129	mov [cdbase],3	131	mov [cdbase],3
130	mov [cd],0	132	mov [cd],0
131	ide_21_cd:	133	ide_21_cd:
132	cmp [hd],0	134	cmp [hd],0
133	je all_device	135	je all_device
134		136
135	ide_3:	137	ide_3:
136	mov al,[table_area+1]	138	mov al,[table_area+1]
137	shl al,6	139	shl al,6
138	shr al,6	140	shr al,6
139	cmp al,0	141	cmp al,0
140	je not_device	142	je not_device
141	cmp al,01b	143	cmp al,01b
142	jnz ide_3_cd	144	jnz ide_3_cd
143	cmp [hd],0	145	cmp [hd],0
144	je ide_31	146	je ide_31
145	mov [hdbase],4	147	mov [hdbase],4
146	mov [hd],0	148	mov [hd],0
147	ide_31:	149	ide_31:
148	cmp [cd],0	150	cmp [cd],0
149	jmp all_device	151	jmp all_device
150		152
151	ide_3_cd:	153	ide_3_cd:
152	cmp al,10b	154	cmp al,10b
153	jnz not_device	155	jnz not_device
154	cmp [cd],0	156	cmp [cd],0
155	je all_device	157	je all_device
156	mov [cdbase],4	158	mov [cdbase],4
157	mov [cd],0	159	mov [cd],0
158		160
159	all_device:	161	all_device:
160	not_device:	162	not_device:
161	ret	163	ret
162		164
163	hd db 0	165	hd db 0
164	cd db 0	166	cd db 0
165	;******************************************************************************	167	;******************************************************************************
166	apply_all_and_exit:	168	apply_all_and_exit:
167	mcall 70,read_fileinfo	169	mcall 70,read_fileinfo
168	call apply_all	170	call apply_all
169	jmp close	171	jmp close
170		172
171	;******************************************************************************	173	;******************************************************************************
172	set_language_and_exit:	174	set_language_and_exit:
173	mov eax,26	175	mov eax,26
174	mov ebx,2	176	mov ebx,2
175	mov ecx,9	177	mov ecx,9
176	int 0x40	178	int 0x40
177	; cmp eax,5	179	; cmp eax,5
178	; jne @f	180	; jne @f
179	; xor eax,eax	181	; xor eax,eax
180	;@@: mov [keyboard],eax	182	;@@: mov [keyboard],eax
181	cmp eax,1	183	cmp eax,1
182	je russian	184	je russian
183	xor eax,eax	185	xor eax,eax
184	set_lang_now:	186	set_lang_now:
185	mov [keyboard],eax	187	mov [keyboard],eax
186	call _keyboard	188	call _keyboard
187	jmp close	189	jmp close
188	russian:	190	russian:
189	mov eax,3	191	mov eax,3
190	jmp set_lang_now	192	jmp set_lang_now
191		193
192	set_syslanguage_and_exit:	194	set_syslanguage_and_exit:
193	mov eax,26	195	mov eax,26
194	mov ebx,5	196	mov ebx,5
195	; mov ecx,9	197	; mov ecx,9
196	int 0x40	198	int 0x40
197	cmp eax,4	199	cmp eax,4
198	jne temp ;@f	200	jne temp ;@f
199	xor eax,eax	201	xor eax,eax
200	;@@: inc eax	202	;@@: inc eax
201	temp: inc eax	203	temp: inc eax
202	mov [syslang],eax	204	mov [syslang],eax
203	call _syslang	205	call _syslang
204	jmp close	206	jmp close
205		207
206	get_setup_values:	208	get_setup_values:
207	mcall 26,1	209	mcall 26,1
208	mov [midibase],eax	210	mov [midibase],eax
209	mcall 26,2,9	211	mcall 26,2,9
210	dec eax	212	dec eax
211	mov [keyboard],eax	213	mov [keyboard],eax
212	mcall 26,3	214	mcall 26,3
213	mov [cdbase],eax	215	mov [cdbase],eax
214	mcall 26,4	216	mcall 26,4
215	mov [sb16],eax	217	mov [sb16],eax
216	mcall 26,5	218	mcall 26,5
217	mov [syslang],eax	219	mov [syslang],eax
218	mcall 26,6	220	mcall 26,6
219	cmp eax,0x530	221	cmp eax,0x530
220	jne s_wss_2	222	jne s_wss_2
221	mov eax,1	223	mov eax,1
222	jmp get_other	224	jmp get_other
223	s_wss_2:	225	s_wss_2:
224	cmp eax,0x608	226	cmp eax,0x608
225	jne s_wss_3	227	jne s_wss_3
226	mov eax,2	228	mov eax,2
227	jmp get_other	229	jmp get_other
228	s_wss_3:	230	s_wss_3:
229	cmp eax,0xe80	231	cmp eax,0xe80
230	jne s_wss_4	232	jne s_wss_4
231	mov eax,3	233	mov eax,3
232	jmp get_other	234	jmp get_other
233	s_wss_4:	235	s_wss_4:
234	mov eax,4	236	mov eax,4
235	get_other:	237	get_other:
236	mov [wss],eax	238	mov [wss],eax
237	mcall 26,7	239	mcall 26,7
238	mov [hdbase],eax	240	mov [hdbase],eax
239	mcall 26,8	241	mcall 26,8
240	mov [f32p],eax	242	mov [f32p],eax
241	mcall 26,10	243	mcall 26,10
242	mov [sound_dma],eax	244	mov [sound_dma],eax
243	mcall 26,11	245	mcall 26,11
244	mov [lba_read],eax	246	mov [lba_read],eax
245	mcall 26,12	247	mcall 26,12
246	mov [pci_acc],eax	248	mov [pci_acc],eax
247	mcall 18,19,0	249	mcall 18,19,0
248	mov [mouse_speed],eax	250	mov [mouse_speed],eax
-		251	mcall 18,19,2
-		252	mov [mouse_delay],eax
249	ret	253	ret
250		254
251	;******************************************************************************	255	;******************************************************************************
252		256
253	START:	257	START:
254	cmp [I_PARAM], 'SLAN'	258	cmp [I_PARAM], 'SLAN'
255	je set_syslanguage_and_exit	259	je set_syslanguage_and_exit
256		260
257	cmp [I_PARAM], 'LANG'	261	cmp [I_PARAM], 'LANG'
258	je set_language_and_exit	262	je set_language_and_exit
259		263
260	cmp [I_PARAM], 'BOOT'	264	cmp [I_PARAM], 'BOOT'
261	je apply_all_and_exit	265	je apply_all_and_exit
262		266
263	call get_setup_values	267	call get_setup_values
264	call loadtxt	268	call loadtxt
265	red:	269	red:
266	call draw_window	270	call draw_window
267		271
268	still:	272	still:
269		273
270	cmp word [blinkpar],0	274	cmp word [blinkpar],0
271	jne blinker	275	jne blinker
272	mov eax,29 ;get system date	276	mov eax,29 ;get system date
273	int 0x40	277	int 0x40
274	cmp eax,[date]	278	cmp eax,[date]
275	je gettime	279	je gettime
276	mov [date],eax	280	mov [date],eax
277	gettime:	281	gettime:
278	mov eax,3 ;get system time	282	mov eax,3 ;get system time
279	int 0x40	283	int 0x40
280	cmp ax,[time]	284	cmp ax,[time]
281	je sysevent	285	je sysevent
282	mov [time],ax	286	mov [time],ax
283	call drawtime	287	call drawtime
284		288
285	sysevent:	289	sysevent:
286	mov eax,23	290	mov eax,23
287	mov ebx,8 ; wait here for event with timeout	291	mov ebx,8 ; wait here for event with timeout
288	int 0x40	292	int 0x40
289		293
290	cmp eax,1	294	cmp eax,1
291	jz red	295	jz red
292	cmp eax,2	296	cmp eax,2
293	jz key	297	jz key
294	cmp eax,3	298	cmp eax,3
295	jz button	299	jz button
296		300
297	jmp still	301	jmp still
298		302
299	blinker:	303	blinker:
300	cmp byte [count],6	304	cmp byte [count],6
301	jb noblink	305	jb noblink
302	btc dword [blinkpar],16	306	btc dword [blinkpar],16
303	mov byte [count],0	307	mov byte [count],0
304	call drawtime	308	call drawtime
305	noblink:	309	noblink:
306	inc byte [count]	310	inc byte [count]
307	jmp sysevent	311	jmp sysevent
308		312
309	incdectime:	313	incdectime:
310	cmp byte [blinkpar],0	314	cmp byte [blinkpar],0
311	je still	315	je still
312	mov esi,time	316	mov esi,time
313	mov bl,0x23 ;border	317	mov bl,0x23 ;border
314	cmp byte [blinkpar],1	318	cmp byte [blinkpar],1
315	je hours	319	je hours
316	mov bl,0x59 ;minutes	320	mov bl,0x59 ;minutes
317	inc esi	321	inc esi
318	hours:	322	hours:
319	mov al,byte [esi]	323	mov al,byte [esi]
320	cmp ah,112	324	cmp ah,112
321	je dectime	325	je dectime
322	cmp al,bl	326	cmp al,bl
323	je noinctime	327	je noinctime
324	inc al	328	inc al
325	daa	329	daa
326	jmp incdectime1	330	jmp incdectime1
327	noinctime:	331	noinctime:
328	xor al,al	332	xor al,al
329	incdectime1:	333	incdectime1:
330	mov byte [esi],al	334	mov byte [esi],al
331	jmp still	335	jmp still
332	dectime:	336	dectime:
333	cmp al,0	337	cmp al,0
334	je nodectime	338	je nodectime
335	dec al	339	dec al
336	das	340	das
337	jmp incdectime1	341	jmp incdectime1
338	nodectime:	342	nodectime:
339	mov al,bl	343	mov al,bl
340	jmp incdectime1	344	jmp incdectime1
341		345
342	incdecdate:	346	incdecdate:
343	cmp byte [blinkpar+1],0	347	cmp byte [blinkpar+1],0
344	je still	348	je still
345	mov esi,date	349	mov esi,date
346	mov bl,0 ;border of years	350	mov bl,0 ;border of years
347	cmp byte [blinkpar+1],1	351	cmp byte [blinkpar+1],1
348	jne days	352	jne days
349	mov bl,0x12 ;months	353	mov bl,0x12 ;months
350	inc esi	354	inc esi
351	days:	355	days:
352	cmp byte [blinkpar+1],2	356	cmp byte [blinkpar+1],2
353	jne nodays	357	jne nodays
354	mov bl,0x31	358	mov bl,0x31
355	add esi,2	359	add esi,2
356	nodays:	360	nodays:
357	mov al,byte [esi]	361	mov al,byte [esi]
358	cmp ah,122	362	cmp ah,122
359	je decdate	363	je decdate
360	cmp al,bl	364	cmp al,bl
361	je noincdate	365	je noincdate
362	inc al ;add al,1	366	inc al ;add al,1
363	daa	367	daa
364	jmp incdecdate1	368	jmp incdecdate1
365	noincdate:	369	noincdate:
366	mov al,1	370	mov al,1
367	incdecdate1:	371	incdecdate1:
368	mov byte [esi],al	372	mov byte [esi],al
369	jmp still	373	jmp still
370	decdate:	374	decdate:
371	cmp al,1	375	cmp al,1
372	je nodecdate	376	je nodecdate
373	dec al	377	dec al
374	das	378	das
375	jmp incdecdate1	379	jmp incdecdate1
376	nodecdate:	380	nodecdate:
377	mov al,bl	381	mov al,bl
378	jmp incdecdate1	382	jmp incdecdate1
379		383
380		384
381	key:	385	key:
382	;mov eax,2	386	;mov eax,2
383	int 0x40	387	int 0x40
384	cmp ah,27	388	cmp ah,27
385	jne still	389	jne still
386	mov dword [blinkpar],0	390	mov dword [blinkpar],0
387	call drawtime	391	call drawtime
388	jmp still	392	jmp still
389		393
390	button:	394	button:
391		395
392	mov eax,17	396	mov eax,17
393	int 0x40	397	int 0x40
394		398
395	cmp ah,112	399	cmp ah,112
396	je incdectime	400	je incdectime
397	cmp ah,113	401	cmp ah,113
398	je incdectime	402	je incdectime
399	cmp ah,122	403	cmp ah,122
400	je incdecdate	404	je incdecdate
401	cmp ah,123	405	cmp ah,123
402	je incdecdate	406	je incdecdate
403	cmp ah,111	407	cmp ah,111
404	jne noseltime	408	jne noseltime
405	mov al, [blinkpar]	409	mov al, [blinkpar]
406	cmp al,2	410	cmp al,2
407	jae seltime	411	jae seltime
408	inc al	412	inc al
409	jmp seltime1	413	jmp seltime1
410	seltime:	414	seltime:
411	xor al,al	415	xor al,al
412	seltime1:	416	seltime1:
413	mov [blinkpar],al	417	mov [blinkpar],al
414	call drawtime	418	call drawtime
415	jmp still	419	jmp still
416	noseltime:	420	noseltime:
417	cmp ah,121	421	cmp ah,121
418	jne noseldate	422	jne noseldate
419	mov al,byte [blinkpar+1]	423	mov al,byte [blinkpar+1]
420	cmp al,3	424	cmp al,3
421	jae seldate	425	jae seldate
422	inc al	426	inc al
423	jmp seldate1	427	jmp seldate1
424	seldate:	428	seldate:
425	xor al,al	429	xor al,al
426	seldate1:	430	seldate1:
427	mov [blinkpar+1],al	431	mov [blinkpar+1],al
428	call drawtime	432	call drawtime
429	jmp still	433	jmp still
430	noseldate:	434	noseldate:
431	cmp ah,99	435	cmp ah,99
432	jne nosaveall	436	jne nosaveall
433	mcall 70,save_fileinfo	437	mcall 70,save_fileinfo
434	call settime	438	call settime
435	mov dword [blinkpar],0	439	mov dword [blinkpar],0
436	call drawtime	440	call drawtime
437	jmp still	441	jmp still
438	nosaveall:	442	nosaveall:
439	cmp ah,100	443	cmp ah,100
440	jne no_apply_all	444	jne no_apply_all
441	call apply_all	445	call apply_all
442	jmp still	446	jmp still
443	no_apply_all:	447	no_apply_all:
444		448
445	cmp ah,1 ; CLOSE APPLICATION	449	cmp ah,1 ; CLOSE APPLICATION
446	jne no_close	450	jne no_close
447	close:	451	close:
448	or eax,-1	452	or eax,-1
449	int 0x40	453	int 0x40
450	no_close:	454	no_close:
451		455
452	cmp ah,11 ; SET MIDI BASE	456	cmp ah,11 ; SET MIDI BASE
453	jnz nosetbase1	457	jnz nosetbase1
454	call _midibase	458	call _midibase
455	nosetbase1:	459	nosetbase1:
456	cmp ah,12	460	cmp ah,12
457	jnz nomm	461	jnz nomm
458	sub [midibase],2	462	sub [midibase],2
459	call draw_infotext	463	call draw_infotext
460	nomm:	464	nomm:
461	cmp ah,13	465	cmp ah,13
462	jnz nomp	466	jnz nomp
463	add [midibase],2	467	add [midibase],2
464	call draw_infotext	468	call draw_infotext
465	nomp:	469	nomp:
466		470
467		471
468	cmp ah,4 ; SET KEYBOARD	472	cmp ah,4 ; SET KEYBOARD
469	jnz nokm	473	jnz nokm
470	mov eax,[keyboard]	474	mov eax,[keyboard]
471	test eax,eax	475	test eax,eax
472	je downuplbl	476	je downuplbl
473	dec eax	477	dec eax
474	jmp nodownup	478	jmp nodownup
475	downuplbl:	479	downuplbl:
476	mov eax,4	480	mov eax,4
477	nodownup:	481	nodownup:
478	mov [keyboard],eax	482	mov [keyboard],eax
479	call draw_infotext	483	call draw_infotext
480	nokm:	484	nokm:
481	cmp ah,5	485	cmp ah,5
482	jnz nokp	486	jnz nokp
483	mov eax,[keyboard]	487	mov eax,[keyboard]
484	cmp eax,4	488	cmp eax,4
485	je updownlbl	489	je updownlbl
486	inc eax	490	inc eax
487	jmp noupdown	491	jmp noupdown
488	updownlbl:	492	updownlbl:
489	xor eax,eax	493	xor eax,eax
490	noupdown:	494	noupdown:
491	mov [keyboard],eax	495	mov [keyboard],eax
492	call draw_infotext	496	call draw_infotext
493	nokp:	497	nokp:
494		498
495		499
496	cmp ah,22 ; SET CD BASE	500	cmp ah,22 ; SET CD BASE

Subversion Repositories Kolibri OS

(root)/programs/system/setup/trunk/setup.asm – Rev 120 → 127