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


;
;   Vertical Refresh Rate programm
;
;   Author:  Trans <<< 13 >>>
;   Date:    February-May 2003 (09.05.2003)
;   Version: 2.0
;   Last Modification: 30.07.2003
;   Compile with FASM for Menuet
;
use32
 
        org    0x0
 
        db     'MENUET01'   ; 8 byte id
        dd     0x01         ; header version
        dd     START        ; start of code
        dd     I_END        ; size of image
        dd     0x5000       ; memory for app
        dd     0x4ff0       ; esp
        dd     0x0 , 0x0    ; I_Param , I_Icon
 
include '..\..\..\macros.inc'
include 'lang.inc'
START:    ; start of execution
 
    mov eax,14
    mcall
    mov ebx,eax
    shr ebx,16
    mov [oldX],ebx
    shl eax,16
    shr eax,16
    mov [oldY],eax
 
; Test on installed video driver
    mov eax,21
    mov ebx,13
    mov ecx,1
    mov edx,drvinfo
    mcall
    cmp eax,0FFFFFFFFh ; = -1 - error or not installed
    jne vrr_00
    call warning_info
    retn
;
 
vrr_00:
    call get_vert_rate
    mov eax,[currvm]
    mov [oldvm],eax
    call get_pid
red:
    call draw_window  ; at first, draw the window
 
still:
 
    mov  eax,10   ; check here for event
    mcall
 
    cmp  eax,1   ; redraw request ?
    je  red
    cmp  eax,2   ; key in buffer ?
    je  key
    cmp  eax,3   ; button in buffer ?
    je  button
    call get_pid
    jmp  still
 
  key:    ; key
    mov  al,2   ; just read it
    mcall
    cmp ah,'1'
    jne key_loc_00
    call safekey
    jmp still
key_loc_00:
    cmp ah,'2'
    jne key_loc_01
    call safekey
    jmp still
key_loc_01:
    cmp ah,'3'
    jne key_loc_02
    call safekey
    jmp still
key_loc_02:
    cmp ah,'4'
    jne key_loc_03
    call safekey
    jmp still
key_loc_03:
    cmp ah,'5'
    jne key_loc_04
    call safekey
    jmp still
key_loc_04:
    cmp ah,'-'
    jne key_loc_05
    xor eax,eax
    call inc_dec_rate
    jmp still
key_loc_05:
    cmp ah,'+'
    jne key_loc_06
    xor eax,eax
    inc eax
    call inc_dec_rate
    jmp  still
key_loc_06:
    cmp ah,'r'         ;Return in last stable mode
    jne key_loc_07
    call restore_mode
    jmp red
key_loc_07:
    cmp ah,13          ;Apply select mode
    jne still
    xor eax,eax
    mov ax,[vmselect]
    cmp al,0
    je still
    xor ebx,ebx
    mov bl,al
    dec bl
    shl bx,1      ; ebx=(ebx-1)*2
    xor edx,edx
    mov dx,[vidmode+ebx]
    mov ecx,ebx
    shl ebx,2
    add ebx,ecx   ; ebx=ebx*5
    shr ax,8
    dec ax
    shl ax,1
    add ebx,eax
    ror edx,16
    mov dx,[_m1+ebx]
    rol edx,16
    call set_my_mode
    call protect_and_return
    xor ax,ax
    mov [vmselect],ax
    jmp red
 
button:   ; button
    mov  al,17   ; get id
    mcall
 
    cmp  ah,1   ; button id=1 ?
    jne  noclose
    mov  eax,-1           ; close this program
    mcall
  noclose:
    cmp ah,2              ;'+' screen width
    jne button_loc_01
    xor eax,eax
    inc eax
    call inc_dec_rate
    jmp still
button_loc_01:
    cmp ah,3              ;'-' screen width
    jne button_loc_02
    xor eax,eax
    call inc_dec_rate
    jmp still
button_loc_02:
    cmp ah,4              ; Ok
    jne button_loc_03
    mov ah,13
    jmp key_loc_07
button_loc_03:
    cmp ah,5              ; Cancel
    jne button_loc_04
    mov [vmselect],word 00h
    jmp red
button_loc_04:
    cmp ah,6              ; Return
    jne button_loc_05
    mov ah,'r'
    jmp key_loc_06
button_loc_05:
    cmp ah,7              ; Default
    jne button_loc_06
    call restore_mode
button_loc_06:
    jmp  still
 
 
;   *********************************************
;   *******  WINDOW DEFINITIONS AND DRAW ********
;   *********************************************
 
 
draw_window:
 
dw_continue:
 
    mov  eax,12      ; function 12:tell os about windowdraw
    mov  ebx,1      ; 1, start of draw
    mcall
 
       ; DRAW WINDOW
    mov  eax,0      ; function 0 : define and draw window
    mov  ebx,100*65536+400    ; [x start] *65536 + [x size]
    mov  ecx,100*65536+200    ; [y start] *65536 + [y size]
    mov  edx,0x140020C0;0x00000040 ; color of work area RRGGBB,8->color glide
    mov  edi,title
    mcall
 
       ; BUTTONS
    mov eax,8
    mov edx,0
    mov ebx,330*65536+20
    mov ecx,84*65536+48
    mov dl,2
    mov  esi,0x5599cc     ; button color RRGGBB
    mcall               ; Button '+'Width
    add ebx,30*65536
    mov dl,3
    mcall               ; Button '-'Width
    mov ebx,22*65536+85
    mov ecx,170*65536+15
    inc dl ;dl=4
    mcall               ; Button 'Ok'
    add ebx,90*65536
    inc dl ;dl=5
    mcall               ; Button 'Cancel'
    add ebx,90*65536
    inc dl ;dl=6
    mcall               ; Button 'Return'
    add ebx,90*65536
    inc dl ;dl=7
    mcall               ; Button 'Default'
 
    call draw_face
 
    mov  eax,12      ; function 12:tell os about windowdraw
    mov  ebx,2      ; 2, end of draw
    mcall
 
    ret
 
;------------Subfunctions-----------
 
restore_mode:
    push eax
    push ebx
    push edx
    mov eax,21
    mov ebx,13
    mov ecx,4
    mcall
    pop edx
    pop ecx
    pop eax
    retn
 
 
 
; IN: edx = RefRate*65536+No.VideoMode
set_my_mode:
    push ecx
    push ebx
    push edx
    mov eax,[currvm]
    mov [oldvm],eax
    mov [currvm],edx
    pop edx
    push edx
    mov eax,21
    mov ebx,13
    mov ecx,3
    mcall
    mcall 5,50
    mcall 15,3
    pop edx
    pop ebx
    pop ecx
    retn
 
; IN: eax = 0/1  -  -/+ 1Hz
inc_dec_rate:
    push ebx
    push ecx
    push edx
    mov edx,eax
    mov eax,21
    mov ebx,13
    mov ecx,5
    mcall
    pop edx
    pop ecx
    pop ebx
    retn
 
get_pid:
    mov eax,9
    mov ebx,buffer
    xor ecx,ecx
    dec ecx
    mcall
    mov [totp],eax
    mov eax,[ebx+30]
    mov [mypid],eax
    mov ax,[ebx+4]
    mov [mypno],ax
    retn
 
get_vert_rate:
    xor eax,eax
    mov ebx,eax
    mov ecx,eax
    mov al,21
    mov bl,13
    mov cl,2
    mcall
    mov [initrr],ebx
    mov [refrate],ebx
    ror ecx,16
    mov cx,bx
    rol ecx,16
    mov [currvm],ecx
    retn
 
get_initial_videomode:
    retn
 
 
draw_table:
    mov eax,13
    mov ebx,9*65536+303
    mov ecx,59*65536+87
    xor edx,edx
    mcall
    mov ebx,10*65536+300
    mov ecx,60*65536+24
    mov edx,00FF00FFh
    mcall
    mov ebx,10*65536+36
    mov ecx,72*65536+72
    mov edx,0000FFFFh
    mcall
    mov eax,38
    mov edx,00FFFFFFh
    mov ebx,10*65536+310
    mov edi,60*65536+60
    mov esi,12*65536+12
    xor ecx,ecx
    mov cl,8
dt_loc_hor_line:
    push ecx
    mov ecx,edi
    mcall
    add edi,esi
    pop ecx
    loop dt_loc_hor_line
    mov ebx,10*65536+10
    mov edi,60*65536+144
    mov esi,66*65536+66
    mov ecx,edi
    mcall
    add ebx,36*65536+36
    xor ecx,ecx
    mov cl,5
dt_loc_vert_line:
    push ecx
    mov ecx,edi
    mcall
    add ebx,esi
    pop ecx
    loop dt_loc_vert_line
    mov eax,4
    mov ebx,52*65536+75
    mov ecx,000000FFh
    mov edx,_m1280x1024
    mov esi,9
    mcall
    add edx,9
    add ebx,66*65536
    mcall
    add edx,9
    add ebx,66*65536
    mcall
    add edx,9
    add ebx,66*65536
    mcall
    xor eax,eax
    mov ebx,eax
    mov ecx,eax
    mov al,47
    inc ebx
    shl ebx,16
    inc ecx
    mov edi,ecx
    mov edx,22*65536+86
    mov esi,00FF0000h
    mov ecx,5
dt_loc_00:
    push ecx
    mov ecx,edi
    mcall
    inc edi
    add dx,12
    pop ecx
    loop dt_loc_00
    xor ecx,ecx
    inc ecx
    mov edi,ecx
    mov edx,76*65536+63
    mov esi,000000FFh
    mov ecx,4
dt_loc_01:
    push ecx
    mov ecx,edi
    mcall
    inc edi
    add edx,66*65536
    pop ecx
    loop dt_loc_01
    mov eax,4
    mov ebx,16*65536+63
    mov ecx,000000FFh
    mov edx,_mk
    mov esi,4
    mcall
    shl ecx,16
    add bx,12
    add edx,4
    mcall
    retn
 
;IN: ah=keycode
safekey:
    sub ah,30h
    push bx
    mov bx,word [vmselect]
    cmp bx,0
    jnz sk_loc_00
    cmp ah,5
    je sk_loc_01
    mov bl,ah
    mov [vmselect],bx
    jmp sk_loc_01
sk_loc_00:
    push esi
    push edx
    push ecx
    push eax
    mov bh,ah
    xor edx,edx
    mov esi,_m1
    mov al,bl
    dec al
    xor ah,ah
    mov cx,10
    mul cx
    xor ecx,ecx
    mov cx,ax
    xor ax,ax
    mov al,bh
    dec al
    shl ax,1
    add cx,ax
    add esi,ecx
    lodsw
    cmp ax,0
    jnz sk_loc_02
    xor eax,eax
    mov bh,ah
sk_loc_02:
    mov [vmselect],bx
    pop eax
    pop ecx
    pop edx
    pop esi
sk_loc_01:
    call draw_window
    pop bx
    retn
 
; IN: ebx=Xstart*65536+Xend
;     ecx=Ystart*65536+Yend
;     edx=color
draw_rect:
    push eax
    push ebx
    push ecx
    push edx
    push edi
    xor eax,eax
    mov al,38
    push ecx
    mov edi,ecx
    shr edi,16
    mov cx,di
    mcall
    pop ecx
    push ecx
    mov edi,ecx
    ror ecx,16
    mov cx,di
    mcall
    pop ecx
    push ebx
    mov edi,ebx
    shr edi,16
    mov bx,di
    mcall
    pop ebx
    mov edi,ebx
    ror ebx,16
    mov bx,di
    mcall
    pop edi
    pop edx
    pop ecx
    pop ebx
    pop eax
    retn
 
;
; OUT: eax = 0 - no event
protect_and_return:
    push ebx
    push ecx
    xor eax,eax
    mov al,5
    xor ebx,ebx
    mov bx,300
    mcall
    call get_pid
    xor eax,eax
    mov ebx,eax
    mov ecx,eax
    mov al,18
    mov ebx,3
    mov cx,[mypno]
    mcall
    pop ecx
    pusha
    call draw_window
    popa
    xor eax,eax
    mov al,5
    xor ebx,ebx
    mov bx,300
    mcall
    xor eax,eax
    mov al,11
    mcall
    cmp eax,1
    jne par_loc_00
    pusha
    call draw_window
    popa
par_loc_00:
    xor eax,eax
    mov ebx,eax
    mov al,23
    mov bx,700
    mcall
    cmp eax,0
    jnz par_loc_02
; mov [ftr_eax],eax
    mov edx,[oldvm]
    call set_my_mode
par_loc_02:
    pop ebx
    retn
 
debug_ftr:
;    xor eax,eax
;    mov ebx,eax
;    mov al,47
;    mov bl,8
;    shl ebx,16
;    mov bh,1
;    mov ecx,[ftr_eax]
;    mov edx,20*65536+180
;    mov esi,00FFFFFFh
;    mcall
;    mov ecx,[ftr_ebx]
;    add edx,54*65536
;    mcall
    retn
 
print_cur_vm:
    mov eax,4
    mov ebx,20*65536+40
    mov ecx,0000FF00h
    mov edx,curmode
    mov esi,cmlen
    mcall
    mov al,14
    mcall
    mov esi,00FFFFFFh
    mov edi,eax
    shr eax,16
    xor ecx,ecx
    mov cx,ax
    inc ecx
    xor ebx,ebx
    mov bl,4
    shl ebx,16
    mov edx,104*65536+40
    mov eax,47
    mcall
    add edx,30*65536
    mov cx,di
    inc ecx
    mcall
    add edx,30*65536
    mov ecx,[initrr]
    sub ebx,1*65536
    mcall
    mov al,4
    mov ebx,200*65536+40
    mov ecx,0000FF00h
    mov edx,selmode
    mov esi,cmlen
    mcall
    mov ax,[vmselect]
    cmp ax,0
    jz pcv_loc_00
    push eax
    xor eax,eax
    mov al,13
    mov ebx,284*65536+54
    mov ecx,40*65536+10
    mov edx,000020C0h
    mcall
    pop eax
    push eax
    xor ecx,ecx
    dec al
    mov cl,al
    shl cx,3
    add cl,al   ; cx=(al-1)*9
    mov edx,_m1280x1024
    add edx,ecx
    xor eax,eax
    mov al,4
    mov esi,9
    mov ebx,284*65536+40
    mov ecx,00ff0000h
    mcall
    pop eax
    cmp ah,0
    jz pcv_loc_00
    push esi
    push edx
    push ecx
    push eax
    xor eax,eax
    mov al,13
    mov ebx,344*65536+18
    mov ecx,40*65536+10
    mov edx,000020C0h
    mcall
    pop eax
    push eax
    mov bx,ax
    xor edx,edx
    mov esi,_m1
    mov al,bl
    dec al
    xor ah,ah
    mov cx,10
    mul cx
    xor ecx,ecx
    mov cx,ax
    xor ax,ax
    mov al,bh
    dec al
    shl ax,1
    add cx,ax
    add esi,ecx
    lodsw
    xor ecx,ecx
    mov cx,ax
    xor ebx,ebx
    mov bl,3
    shl ebx,16
    mov edx,344*65536+40
    xor eax,eax
    mov al,47
    mov esi,00ff0000h
    mcall
    pop eax
    pop ecx
    pop edx
    pop esi
 pcv_loc_00:
     retn
 
print_all_herz:
        push esi
        push edi
        push eax
        push ebx
        push ecx
        push edx
        cld
        mov esi,_m1
        mov ebx,(10+36+26)*65536+86
        mov edx,66*65536
        xor ecx,ecx
        mov cl,4
pah_loc_00:
        push ecx
        push edx
        push ebx
        mov cl,5
        xor edx,edx
        mov dl,12
pah_loc_01:
        lodsw
        cmp ax,00h
        jnz pah_loc_02
        call print_noherz
        jmp pah_loc_03
pah_loc_02:
        call print_herz
pah_loc_03:
        add ebx,edx
        loop pah_loc_01
        pop ebx
        pop edx
        add ebx,edx
        pop ecx
        loop pah_loc_00
        pop edx
        pop ecx
        pop ebx
        pop eax
        pop edi
        pop esi
        retn
 
; IN: ebx=X*65536+Y - coordinate
print_noherz:
        push eax
        push ebx
        push ecx
        push edx
        push esi
        xor eax,eax
        mov al,4
        mov ecx,00FFFFFFh
        mov edx,noherz
        xor esi,esi
        mov si,3
        mcall
        pop esi
        pop edx
        pop ecx
        pop ebx
        pop eax
        retn
 
; IN: eax=numer_of_herz
;     ebx=X*65536+Y
print_herz:
        push eax
        push ebx
        push ecx
        push edx
        push esi
        mov edx,ebx
        xor ebx,ebx
        mov bl,3
        shl ebx,16
        mov ecx,eax
        mov esi,00FFFFFFh
        xor eax,eax
        mov al,47
        mcall
        pop esi
        pop edx
        pop ecx
        pop ebx
        pop eax
        retn
 
get_pixelclock:
        retn
 
 ; light version of function
calc_refrate:
        retn
 
rect_select:
        mov ax,[vmselect]
;     mov [ftr_ebx],eax
        cmp ax,00h
        je rs_loc_00
        cmp ah,0
        jne rs_loc_01
        dec al
        mov cx,66
        mul cx
        add ax,46
        mov bx,ax
        shl ebx,16
        add ax,66
        mov bx,ax
        mov ecx,60*65536+144
        mov edx,00ff0000h
        call draw_rect
        retn
rs_loc_01:
        push ax
        xor ah,ah
        dec al
        xor ebx,ebx
        mov bx,66
        mul bx
        add ax,46
        mov bx,ax
        shl ebx,16
        add ax,66
        mov bx,ax
        pop ax
        xchg ah,al
        xor ah,ah
        dec al
        xor ecx,ecx
        mov cx,12
        mul cx
        add ax,84
        mov cx,ax
        shl ecx,16
        add ax,12
        mov cx,ax
        mov edx,00ff0000h
        call draw_rect
rs_loc_00:
        retn
 
draw_face:
        call draw_table
;
;
        mov ebx,320*65536+390
        mov ecx,66*65536+144
        mov edx,0000FF00h
        call draw_rect
        mov ebx,10*65536+390
        mov ecx,27*65536+55
        call draw_rect
        add ebx,2*65536
        sub bx,2
        add ecx,2*65536
        sub cx,2
        call draw_rect
        mov ebx,10*65536+390
        mov ecx,155*65536+193
        call draw_rect
        add ebx,2*65536
        sub bx,2
        add ecx,2*65536
        sub cx,2
        call draw_rect
        xor eax,eax
        mov al,13
        mov ebx,182*65536+36
        mov ecx,26*65536+5
        mov edx,000020C0h
        mcall
        mov ebx,173*65536+54
        mov ecx,153*65536+7
        mcall
        mov ebx,337*65536+36
        mov ecx,62*65536+10
        mcall
        mov al,4
        shr ecx,16
        mov bx,cx
        add ebx,3*65536
        mov ecx,00FF0000h
        mov edx,width
        mov esi,5
        mcall
        xor ecx,ecx
        add edx,5
        xor esi,esi
        inc esi
        mov ebx,335*65536+104
        mcall
        add ebx,36*65536
        inc edx
        mcall
        mov edx,tmode
        mov ecx,00FF0000h
        mov ebx,182*65536+24
        mov esi,6
        mcall
        mov edx,actions
        mov ebx,173*65536+152
        mov esi,9
        mcall
        xor ecx,ecx
        mov edx,button1
        mov ebx,59*65536+174
        mov esi,2
        mcall
        add edx,esi
        mov esi,6
        add ebx,78*65536
        mcall
        add edx,esi
        add ebx,90*65536
        mcall
        add edx,esi
        mov esi,7
        add ebx,87*65536
        mcall
        call rect_select
;        call debug_ftr
        call print_cur_vm
        call print_all_herz
        retn
 
warning_info:
        call warning_window
        call warning_loop
        retn
 
warning_window:
        mov  eax,12      ; function 12:tell os about windowdraw
        mov  ebx,1      ; 1, start of draw
        mcall
   ; DRAW WARNING WINDOW
        xor  eax,eax      ; function 0 : define and draw window
        mov ebx,[oldX]
        shr ebx,1
        sub ebx,200
        shl ebx,16
        mov bx,400
;        mov  ecx,100*65536+200    ; [y start] *65536 + [y size]
        mov ecx,[oldY]
        shr ecx,1
        sub ecx,100
        shl ecx,16
        mov cx,200
        mov  edx,0x13808080     ; color of work area RRGGBB,8->color glide
        mov  edi,title
        mcall
 
   ; WARNING TEXT
        mov  eax,4      ; function 4 : write text to window
        mov  ebx,(200-(len_warn00/2)*6)*65536+60    ; [x start] *65536 + [y
   ;]
        mov  ecx,0xf0ff0000     ; color of text RRGGBB
        mov  edx,warn00        ; pointer to text beginning
        mov  esi,len_warn00     ; text length
;        mcall
;        inc  ebx
        mcall
        add  ebx,1*65536
        mcall
        mov  ebx,(200-(len_warn01/2)*6)*65536+100
        mov  edx,warn01
        mov  esi,len_warn01
        mcall
        mov  edx,button1
        add  ecx,0ffffh
        mov  ebx,(200-6)*65536+(160-4)
        mov  esi,2
        mcall
        mov  eax,12      ; function 12:tell os about windowdraw
        mov  ebx,2      ; 2, end of draw
        mcall
        retn
 
warning_loop:
        mov  eax,5
        mov ebx,13
        mcall
        mov eax,11
        mcall
        cmp  eax,1      ; redraw request ?
        je  warning_red
        cmp  eax,2      ; key in buffer ?
        je  warning_key
        cmp  eax,3      ; button in buffer ?
        je  warning_button
        mov  eax,4
        mov  ebx,(200-(len_warn01/2)*6)*65536+100
        mov  ecx,[blinkcol]
        sub cl,12
        dec cl
        dec cl
        dec cl
        dec cl
        mov [blinkcol],ecx
        mov ch,0f0h
        shl ecx,16
        mov  edx,warn01
        mov  esi,len_warn01
        mcall
        sub ebx,1*65536
        mcall
        jmp  warning_loop
  warning_red:      ; redraw
        call warning_window
        jmp  warning_loop
  warning_key:      ; key
        mov  eax,2      ;  read key
        mcall
        cmp ah,01h
        jne warning_loop
        xor eax,eax
        dec eax         ; Terminate application
        mcall
        jmp warning_loop
  warning_button:   ; button
        mov  eax,17     ; get id
        mcall
        cmp  ah,1   ; button id=1 ?
        jne  warning_loop
        xor eax,eax
        dec eax         ; close this program
        mcall
        jmp warning_loop
        retn
 
;------------DATA AREA---------------
 
oldX       dd ?
oldY       dd ?
initvm     dd ?
currvm     dd 0
oldvm      dd 0
refrate    dd 0
initrr     dd 0
mypid      dd ?
mypno      dw ?
totp       dd ?
vmselect   dw 0
ftr_eax    dd ?
ftr_ebx    dd ?
blinkcol   dd 0ffh
 
;  db 0,0,0,0,0,0,0,0
;_m1        dw 0,0,0,0,0
;_m2        dw 0,0,0,0,0
;_m3        dw 0,0,0,0,0
;_m4        dw 0,0,0,0,0
 
if lang eq it
	title     db   'Vertical Refresh Rate v2.0 (C) 2003 TRANS',0
 
	_m1280x1024 db '1280x1024'
	_m1024x768  db '1024x768 '
	_m800x600   db ' 800x600 '
	_m640x480   db ' 640x480 '
	_mk         db 'Key1Key2'
 
	curmode     db 'Modalita intera: '
					db '    x    x   Hz'
	cmlen=$-curmode
	selmode     db ' Select mode: '
	selcans     db '----x----x---Hz'
	noherz      db '---'
	width       db 'Width',11h,10h
	tmode       db ' Modalita '
	actions     db ' Azioni '
	button1     db 'Ok'      ;len=2
	button2     db 'Cancella'  ;len=6
	button3     db 'Torna'  ;len=6
	button4     db 'Default' ;len=7
 
	strt  db 'LAUNCHER    '
 
	warn00      db ' A T T E N Z I O N E ! '
	len_warn00=$-warn00
	warn01      db 'D R I V E R  V I D E O  N O N  I N S T A L L A T O'
	len_warn01=$-warn01
else
	title     db   'Vertical Refresh Rate v2.0 (C) 2003 TRANS',0
 
	_m1280x1024 db '1280x1024'
	_m1024x768  db '1024x768 '
	_m800x600   db ' 800x600 '
	_m640x480   db ' 640x480 '
	_mk         db 'Key1Key2'
 
	curmode     db 'Current mode: '
					db '    x    x   Hz'
	cmlen=$-curmode
	selmode     db ' Select mode: '
	selcans     db '----x----x---Hz'
	noherz      db '---'
	width       db 'Width',11h,10h
	tmode       db ' Mode '
	actions     db ' Actions '
	button1     db 'Ok'      ;len=2
	button2     db 'Cancel'  ;len=6
	button3     db 'Return'  ;len=6
	button4     db 'Default' ;len=7
 
	strt  db 'LAUNCHER    '
 
	warn00      db ' W  A  R  N  I  N  G  ! '
	len_warn00=$-warn00
	warn01      db 'V i d e o  D r i v e r  N O T  I n s t a l l e d'
	len_warn01=$-warn01
end if
 
drvinfo:   ; 512 bytes driver info area
; +0   - Full driver name
; +32  - Driver version
; +64  - Word List of support video modes (max 32 positions)
; +128 - 5 words list of support vertical rate to each present mode
      org $+32
drvver:
      org $+32
vidmode:
      org $+64
_m1:
      org drvinfo+200h
 
buffer:
I_END:
 
 

Rev 957	Rev 3645
1	;	1	;
2	; Vertical Refresh Rate programm	2	; Vertical Refresh Rate programm
3	;	3	;
4	; Author: Trans <<< 13 >>>	4	; Author: Trans <<< 13 >>>
5	; Date: February-May 2003 (09.05.2003)	5	; Date: February-May 2003 (09.05.2003)
6	; Version: 2.0	6	; Version: 2.0
7	; Last Modification: 30.07.2003	7	; Last Modification: 30.07.2003
8	; Compile with FASM for Menuet	8	; Compile with FASM for Menuet
9	;	9	;
10	use32	10	use32
11		11
12	org 0x0	12	org 0x0
13		13
14	db 'MENUET01' ; 8 byte id	14	db 'MENUET01' ; 8 byte id
15	dd 0x01 ; header version	15	dd 0x01 ; header version
16	dd START ; start of code	16	dd START ; start of code
17	dd I_END ; size of image	17	dd I_END ; size of image
18	dd 0x5000 ; memory for app	18	dd 0x5000 ; memory for app
19	dd 0x4ff0 ; esp	19	dd 0x4ff0 ; esp
20	dd 0x0 , 0x0 ; I_Param , I_Icon	20	dd 0x0 , 0x0 ; I_Param , I_Icon
21		21
22	include '..\..\..\macros.inc'	22	include '..\..\..\macros.inc'
-		23	include 'lang.inc'
23	START: ; start of execution	24	START: ; start of execution
24		25
25	mov eax,14	26	mov eax,14
26	mcall	27	mcall
27	mov ebx,eax	28	mov ebx,eax
28	shr ebx,16	29	shr ebx,16
29	mov [oldX],ebx	30	mov [oldX],ebx
30	shl eax,16	31	shl eax,16
31	shr eax,16	32	shr eax,16
32	mov [oldY],eax	33	mov [oldY],eax
33		34
34	; Test on installed video driver	35	; Test on installed video driver
35	mov eax,21	36	mov eax,21
36	mov ebx,13	37	mov ebx,13
37	mov ecx,1	38	mov ecx,1
38	mov edx,drvinfo	39	mov edx,drvinfo
39	mcall	40	mcall
40	cmp eax,0FFFFFFFFh ; = -1 - error or not installed	41	cmp eax,0FFFFFFFFh ; = -1 - error or not installed
41	jne vrr_00	42	jne vrr_00
42	call warning_info	43	call warning_info
43	retn	44	retn
44	;	45	;
45		46
46	vrr_00:	47	vrr_00:
47	call get_vert_rate	48	call get_vert_rate
48	mov eax,[currvm]	49	mov eax,[currvm]
49	mov [oldvm],eax	50	mov [oldvm],eax
50	call get_pid	51	call get_pid
51	red:	52	red:
52	call draw_window ; at first, draw the window	53	call draw_window ; at first, draw the window
53		54
54	still:	55	still:
55		56
56	mov eax,10 ; check here for event	57	mov eax,10 ; check here for event
57	mcall	58	mcall
58		59
59	cmp eax,1 ; redraw request ?	60	cmp eax,1 ; redraw request ?
60	je red	61	je red
61	cmp eax,2 ; key in buffer ?	62	cmp eax,2 ; key in buffer ?
62	je key	63	je key
63	cmp eax,3 ; button in buffer ?	64	cmp eax,3 ; button in buffer ?
64	je button	65	je button
65	call get_pid	66	call get_pid
66	jmp still	67	jmp still
67		68
68	key: ; key	69	key: ; key
69	mov al,2 ; just read it	70	mov al,2 ; just read it
70	mcall	71	mcall
71	cmp ah,'1'	72	cmp ah,'1'
72	jne key_loc_00	73	jne key_loc_00
73	call safekey	74	call safekey
74	jmp still	75	jmp still
75	key_loc_00:	76	key_loc_00:
76	cmp ah,'2'	77	cmp ah,'2'
77	jne key_loc_01	78	jne key_loc_01
78	call safekey	79	call safekey
79	jmp still	80	jmp still
80	key_loc_01:	81	key_loc_01:
81	cmp ah,'3'	82	cmp ah,'3'
82	jne key_loc_02	83	jne key_loc_02
83	call safekey	84	call safekey
84	jmp still	85	jmp still
85	key_loc_02:	86	key_loc_02:
86	cmp ah,'4'	87	cmp ah,'4'
87	jne key_loc_03	88	jne key_loc_03
88	call safekey	89	call safekey
89	jmp still	90	jmp still
90	key_loc_03:	91	key_loc_03:
91	cmp ah,'5'	92	cmp ah,'5'
92	jne key_loc_04	93	jne key_loc_04
93	call safekey	94	call safekey
94	jmp still	95	jmp still
95	key_loc_04:	96	key_loc_04:
96	cmp ah,'-'	97	cmp ah,'-'
97	jne key_loc_05	98	jne key_loc_05
98	xor eax,eax	99	xor eax,eax
99	call inc_dec_rate	100	call inc_dec_rate
100	jmp still	101	jmp still
101	key_loc_05:	102	key_loc_05:
102	cmp ah,'+'	103	cmp ah,'+'
103	jne key_loc_06	104	jne key_loc_06
104	xor eax,eax	105	xor eax,eax
105	inc eax	106	inc eax
106	call inc_dec_rate	107	call inc_dec_rate
107	jmp still	108	jmp still
108	key_loc_06:	109	key_loc_06:
109	cmp ah,'r' ;Return in last stable mode	110	cmp ah,'r' ;Return in last stable mode
110	jne key_loc_07	111	jne key_loc_07
111	call restore_mode	112	call restore_mode
112	jmp red	113	jmp red
113	key_loc_07:	114	key_loc_07:
114	cmp ah,13 ;Apply select mode	115	cmp ah,13 ;Apply select mode
115	jne still	116	jne still
116	xor eax,eax	117	xor eax,eax
117	mov ax,[vmselect]	118	mov ax,[vmselect]
118	cmp al,0	119	cmp al,0
119	je still	120	je still
120	xor ebx,ebx	121	xor ebx,ebx
121	mov bl,al	122	mov bl,al
122	dec bl	123	dec bl
123	shl bx,1 ; ebx=(ebx-1)*2	124	shl bx,1 ; ebx=(ebx-1)*2
124	xor edx,edx	125	xor edx,edx
125	mov dx,[vidmode+ebx]	126	mov dx,[vidmode+ebx]
126	mov ecx,ebx	127	mov ecx,ebx
127	shl ebx,2	128	shl ebx,2
128	add ebx,ecx ; ebx=ebx*5	129	add ebx,ecx ; ebx=ebx*5
129	shr ax,8	130	shr ax,8
130	dec ax	131	dec ax
131	shl ax,1	132	shl ax,1
132	add ebx,eax	133	add ebx,eax
133	ror edx,16	134	ror edx,16
134	mov dx,[_m1+ebx]	135	mov dx,[_m1+ebx]
135	rol edx,16	136	rol edx,16
136	call set_my_mode	137	call set_my_mode
137	call protect_and_return	138	call protect_and_return
138	xor ax,ax	139	xor ax,ax
139	mov [vmselect],ax	140	mov [vmselect],ax
140	jmp red	141	jmp red
141		142
142	button: ; button	143	button: ; button
143	mov al,17 ; get id	144	mov al,17 ; get id
144	mcall	145	mcall
145		146
146	cmp ah,1 ; button id=1 ?	147	cmp ah,1 ; button id=1 ?
147	jne noclose	148	jne noclose
148	mov eax,-1 ; close this program	149	mov eax,-1 ; close this program
149	mcall	150	mcall
150	noclose:	151	noclose:
151	cmp ah,2 ;'+' screen width	152	cmp ah,2 ;'+' screen width
152	jne button_loc_01	153	jne button_loc_01
153	xor eax,eax	154	xor eax,eax
154	inc eax	155	inc eax
155	call inc_dec_rate	156	call inc_dec_rate
156	jmp still	157	jmp still
157	button_loc_01:	158	button_loc_01:
158	cmp ah,3 ;'-' screen width	159	cmp ah,3 ;'-' screen width
159	jne button_loc_02	160	jne button_loc_02
160	xor eax,eax	161	xor eax,eax
161	call inc_dec_rate	162	call inc_dec_rate
162	jmp still	163	jmp still
163	button_loc_02:	164	button_loc_02:
164	cmp ah,4 ; Ok	165	cmp ah,4 ; Ok
165	jne button_loc_03	166	jne button_loc_03
166	mov ah,13	167	mov ah,13
167	jmp key_loc_07	168	jmp key_loc_07
168	button_loc_03:	169	button_loc_03:
169	cmp ah,5 ; Cancel	170	cmp ah,5 ; Cancel
170	jne button_loc_04	171	jne button_loc_04
171	mov [vmselect],word 00h	172	mov [vmselect],word 00h
172	jmp red	173	jmp red
173	button_loc_04:	174	button_loc_04:
174	cmp ah,6 ; Return	175	cmp ah,6 ; Return
175	jne button_loc_05	176	jne button_loc_05
176	mov ah,'r'	177	mov ah,'r'
177	jmp key_loc_06	178	jmp key_loc_06
178	button_loc_05:	179	button_loc_05:
179	cmp ah,7 ; Default	180	cmp ah,7 ; Default
180	jne button_loc_06	181	jne button_loc_06
181	call restore_mode	182	call restore_mode
182	button_loc_06:	183	button_loc_06:
183	jmp still	184	jmp still
184		185
185		186
186	; *********************************************	187	; *********************************************
187	; ***** WINDOW DEFINITIONS AND DRAW ******	188	; ***** WINDOW DEFINITIONS AND DRAW ******
188	; *********************************************	189	; *********************************************
189		190
190		191
191	draw_window:	192	draw_window:
192		193
193	dw_continue:	194	dw_continue:
194		195
195	mov eax,12 ; function 12:tell os about windowdraw	196	mov eax,12 ; function 12:tell os about windowdraw
196	mov ebx,1 ; 1, start of draw	197	mov ebx,1 ; 1, start of draw
197	mcall	198	mcall
198		199
199	; DRAW WINDOW	200	; DRAW WINDOW
200	mov eax,0 ; function 0 : define and draw window	201	mov eax,0 ; function 0 : define and draw window
201	mov ebx,10065536+400 ; [x start] 65536 + [x size]	202	mov ebx,10065536+400 ; [x start] 65536 + [x size]
202	mov ecx,10065536+200 ; [y start] 65536 + [y size]	203	mov ecx,10065536+200 ; [y start] 65536 + [y size]
203	mov edx,0x140020C0;0x00000040 ; color of work area RRGGBB,8->color glide	204	mov edx,0x140020C0;0x00000040 ; color of work area RRGGBB,8->color glide
204	mov edi,title	205	mov edi,title
205	mcall	206	mcall
206		207
207	; BUTTONS	208	; BUTTONS
208	mov eax,8	209	mov eax,8
209	mov edx,0	210	mov edx,0
210	mov ebx,330*65536+20	211	mov ebx,330*65536+20
211	mov ecx,84*65536+48	212	mov ecx,84*65536+48
212	mov dl,2	213	mov dl,2
213	mov esi,0x5599cc ; button color RRGGBB	214	mov esi,0x5599cc ; button color RRGGBB
214	mcall ; Button '+'Width	215	mcall ; Button '+'Width
215	add ebx,30*65536	216	add ebx,30*65536
216	mov dl,3	217	mov dl,3
217	mcall ; Button '-'Width	218	mcall ; Button '-'Width
218	mov ebx,22*65536+85	219	mov ebx,22*65536+85
219	mov ecx,170*65536+15	220	mov ecx,170*65536+15
220	inc dl ;dl=4	221	inc dl ;dl=4
221	mcall ; Button 'Ok'	222	mcall ; Button 'Ok'
222	add ebx,90*65536	223	add ebx,90*65536
223	inc dl ;dl=5	224	inc dl ;dl=5
224	mcall ; Button 'Cancel'	225	mcall ; Button 'Cancel'
225	add ebx,90*65536	226	add ebx,90*65536
226	inc dl ;dl=6	227	inc dl ;dl=6
227	mcall ; Button 'Return'	228	mcall ; Button 'Return'
228	add ebx,90*65536	229	add ebx,90*65536
229	inc dl ;dl=7	230	inc dl ;dl=7
230	mcall ; Button 'Default'	231	mcall ; Button 'Default'
231		232
232	call draw_face	233	call draw_face
233		234
234	mov eax,12 ; function 12:tell os about windowdraw	235	mov eax,12 ; function 12:tell os about windowdraw
235	mov ebx,2 ; 2, end of draw	236	mov ebx,2 ; 2, end of draw
236	mcall	237	mcall
237		238
238	ret	239	ret
239		240
240	;------------Subfunctions-----------	241	;------------Subfunctions-----------
241		242
242	restore_mode:	243	restore_mode:
243	push eax	244	push eax
244	push ebx	245	push ebx
245	push edx	246	push edx
246	mov eax,21	247	mov eax,21
247	mov ebx,13	248	mov ebx,13
248	mov ecx,4	249	mov ecx,4
249	mcall	250	mcall
250	pop edx	251	pop edx
251	pop ecx	252	pop ecx
252	pop eax	253	pop eax
253	retn	254	retn
254		255
255		256
256		257
257	; IN: edx = RefRate*65536+No.VideoMode	258	; IN: edx = RefRate*65536+No.VideoMode
258	set_my_mode:	259	set_my_mode:
259	push ecx	260	push ecx
260	push ebx	261	push ebx
261	push edx	262	push edx
262	mov eax,[currvm]	263	mov eax,[currvm]
263	mov [oldvm],eax	264	mov [oldvm],eax
264	mov [currvm],edx	265	mov [currvm],edx
265	pop edx	266	pop edx
266	push edx	267	push edx
267	mov eax,21	268	mov eax,21
268	mov ebx,13	269	mov ebx,13
269	mov ecx,3	270	mov ecx,3
270	mcall	271	mcall
271	mcall 5,50	272	mcall 5,50
272	mcall 15,3	273	mcall 15,3
273	pop edx	274	pop edx
274	pop ebx	275	pop ebx
275	pop ecx	276	pop ecx
276	retn	277	retn
277		278
278	; IN: eax = 0/1 - -/+ 1Hz	279	; IN: eax = 0/1 - -/+ 1Hz
279	inc_dec_rate:	280	inc_dec_rate:
280	push ebx	281	push ebx
281	push ecx	282	push ecx
282	push edx	283	push edx
283	mov edx,eax	284	mov edx,eax
284	mov eax,21	285	mov eax,21
285	mov ebx,13	286	mov ebx,13
286	mov ecx,5	287	mov ecx,5
287	mcall	288	mcall
288	pop edx	289	pop edx
289	pop ecx	290	pop ecx
290	pop ebx	291	pop ebx
291	retn	292	retn
292		293
293	get_pid:	294	get_pid:
294	mov eax,9	295	mov eax,9
295	mov ebx,buffer	296	mov ebx,buffer
296	xor ecx,ecx	297	xor ecx,ecx
297	dec ecx	298	dec ecx
298	mcall	299	mcall
299	mov [totp],eax	300	mov [totp],eax
300	mov eax,[ebx+30]	301	mov eax,[ebx+30]
301	mov [mypid],eax	302	mov [mypid],eax
302	mov ax,[ebx+4]	303	mov ax,[ebx+4]
303	mov [mypno],ax	304	mov [mypno],ax
304	retn	305	retn
305		306
306	get_vert_rate:	307	get_vert_rate:
307	xor eax,eax	308	xor eax,eax
308	mov ebx,eax	309	mov ebx,eax
309	mov ecx,eax	310	mov ecx,eax
310	mov al,21	311	mov al,21
311	mov bl,13	312	mov bl,13
312	mov cl,2	313	mov cl,2
313	mcall	314	mcall
314	mov [initrr],ebx	315	mov [initrr],ebx
315	mov [refrate],ebx	316	mov [refrate],ebx
316	ror ecx,16	317	ror ecx,16
317	mov cx,bx	318	mov cx,bx
318	rol ecx,16	319	rol ecx,16
319	mov [currvm],ecx	320	mov [currvm],ecx
320	retn	321	retn
321		322
322	get_initial_videomode:	323	get_initial_videomode:
323	retn	324	retn
324		325
325		326
326	draw_table:	327	draw_table:
327	mov eax,13	328	mov eax,13
328	mov ebx,9*65536+303	329	mov ebx,9*65536+303
329	mov ecx,59*65536+87	330	mov ecx,59*65536+87
330	xor edx,edx	331	xor edx,edx
331	mcall	332	mcall
332	mov ebx,10*65536+300	333	mov ebx,10*65536+300
333	mov ecx,60*65536+24	334	mov ecx,60*65536+24
334	mov edx,00FF00FFh	335	mov edx,00FF00FFh
335	mcall	336	mcall
336	mov ebx,10*65536+36	337	mov ebx,10*65536+36
337	mov ecx,72*65536+72	338	mov ecx,72*65536+72
338	mov edx,0000FFFFh	339	mov edx,0000FFFFh
339	mcall	340	mcall
340	mov eax,38	341	mov eax,38
341	mov edx,00FFFFFFh	342	mov edx,00FFFFFFh
342	mov ebx,10*65536+310	343	mov ebx,10*65536+310
343	mov edi,60*65536+60	344	mov edi,60*65536+60
344	mov esi,12*65536+12	345	mov esi,12*65536+12
345	xor ecx,ecx	346	xor ecx,ecx
346	mov cl,8	347	mov cl,8
347	dt_loc_hor_line:	348	dt_loc_hor_line:
348	push ecx	349	push ecx
349	mov ecx,edi	350	mov ecx,edi
350	mcall	351	mcall
351	add edi,esi	352	add edi,esi
352	pop ecx	353	pop ecx
353	loop dt_loc_hor_line	354	loop dt_loc_hor_line
354	mov ebx,10*65536+10	355	mov ebx,10*65536+10
355	mov edi,60*65536+144	356	mov edi,60*65536+144
356	mov esi,66*65536+66	357	mov esi,66*65536+66
357	mov ecx,edi	358	mov ecx,edi
358	mcall	359	mcall
359	add ebx,36*65536+36	360	add ebx,36*65536+36
360	xor ecx,ecx	361	xor ecx,ecx
361	mov cl,5	362	mov cl,5
362	dt_loc_vert_line:	363	dt_loc_vert_line:
363	push ecx	364	push ecx
364	mov ecx,edi	365	mov ecx,edi
365	mcall	366	mcall
366	add ebx,esi	367	add ebx,esi
367	pop ecx	368	pop ecx
368	loop dt_loc_vert_line	369	loop dt_loc_vert_line
369	mov eax,4	370	mov eax,4
370	mov ebx,52*65536+75	371	mov ebx,52*65536+75
371	mov ecx,000000FFh	372	mov ecx,000000FFh
372	mov edx,_m1280x1024	373	mov edx,_m1280x1024
373	mov esi,9	374	mov esi,9
374	mcall	375	mcall
375	add edx,9	376	add edx,9
376	add ebx,66*65536	377	add ebx,66*65536
377	mcall	378	mcall
378	add edx,9	379	add edx,9
379	add ebx,66*65536	380	add ebx,66*65536
380	mcall	381	mcall
381	add edx,9	382	add edx,9
382	add ebx,66*65536	383	add ebx,66*65536
383	mcall	384	mcall
384	xor eax,eax	385	xor eax,eax
385	mov ebx,eax	386	mov ebx,eax
386	mov ecx,eax	387	mov ecx,eax
387	mov al,47	388	mov al,47
388	inc ebx	389	inc ebx
389	shl ebx,16	390	shl ebx,16
390	inc ecx	391	inc ecx
391	mov edi,ecx	392	mov edi,ecx
392	mov edx,22*65536+86	393	mov edx,22*65536+86
393	mov esi,00FF0000h	394	mov esi,00FF0000h
394	mov ecx,5	395	mov ecx,5
395	dt_loc_00:	396	dt_loc_00:
396	push ecx	397	push ecx
397	mov ecx,edi	398	mov ecx,edi
398	mcall	399	mcall
399	inc edi	400	inc edi
400	add dx,12	401	add dx,12
401	pop ecx	402	pop ecx
402	loop dt_loc_00	403	loop dt_loc_00
403	xor ecx,ecx	404	xor ecx,ecx
404	inc ecx	405	inc ecx
405	mov edi,ecx	406	mov edi,ecx
406	mov edx,76*65536+63	407	mov edx,76*65536+63
407	mov esi,000000FFh	408	mov esi,000000FFh
408	mov ecx,4	409	mov ecx,4
409	dt_loc_01:	410	dt_loc_01:
410	push ecx	411	push ecx
411	mov ecx,edi	412	mov ecx,edi
412	mcall	413	mcall
413	inc edi	414	inc edi
414	add edx,66*65536	415	add edx,66*65536
415	pop ecx	416	pop ecx
416	loop dt_loc_01	417	loop dt_loc_01
417	mov eax,4	418	mov eax,4
418	mov ebx,16*65536+63	419	mov ebx,16*65536+63
419	mov ecx,000000FFh	420	mov ecx,000000FFh
420	mov edx,_mk	421	mov edx,_mk
421	mov esi,4	422	mov esi,4
422	mcall	423	mcall
423	shl ecx,16	424	shl ecx,16
424	add bx,12	425	add bx,12
425	add edx,4	426	add edx,4
426	mcall	427	mcall
427	retn	428	retn
428		429
429	;IN: ah=keycode	430	;IN: ah=keycode
430	safekey:	431	safekey:
431	sub ah,30h	432	sub ah,30h
432	push bx	433	push bx
433	mov bx,word [vmselect]	434	mov bx,word [vmselect]
434	cmp bx,0	435	cmp bx,0
435	jnz sk_loc_00	436	jnz sk_loc_00
436	cmp ah,5	437	cmp ah,5
437	je sk_loc_01	438	je sk_loc_01
438	mov bl,ah	439	mov bl,ah
439	mov [vmselect],bx	440	mov [vmselect],bx
440	jmp sk_loc_01	441	jmp sk_loc_01
441	sk_loc_00:	442	sk_loc_00:
442	push esi	443	push esi
443	push edx	444	push edx
444	push ecx	445	push ecx
445	push eax	446	push eax
446	mov bh,ah	447	mov bh,ah
447	xor edx,edx	448	xor edx,edx
448	mov esi,_m1	449	mov esi,_m1
449	mov al,bl	450	mov al,bl
450	dec al	451	dec al
451	xor ah,ah	452	xor ah,ah
452	mov cx,10	453	mov cx,10
453	mul cx	454	mul cx
454	xor ecx,ecx	455	xor ecx,ecx
455	mov cx,ax	456	mov cx,ax
456	xor ax,ax	457	xor ax,ax
457	mov al,bh	458	mov al,bh
458	dec al	459	dec al
459	shl ax,1	460	shl ax,1
460	add cx,ax	461	add cx,ax
461	add esi,ecx	462	add esi,ecx
462	lodsw	463	lodsw
463	cmp ax,0	464	cmp ax,0
464	jnz sk_loc_02	465	jnz sk_loc_02
465	xor eax,eax	466	xor eax,eax
466	mov bh,ah	467	mov bh,ah
467	sk_loc_02:	468	sk_loc_02:
468	mov [vmselect],bx	469	mov [vmselect],bx
469	pop eax	470	pop eax
470	pop ecx	471	pop ecx
471	pop edx	472	pop edx
472	pop esi	473	pop esi
473	sk_loc_01:	474	sk_loc_01:
474	call draw_window	475	call draw_window
475	pop bx	476	pop bx
476	retn	477	retn
477		478
478	; IN: ebx=Xstart*65536+Xend	479	; IN: ebx=Xstart*65536+Xend
479	; ecx=Ystart*65536+Yend	480	; ecx=Ystart*65536+Yend
480	; edx=color	481	; edx=color
481	draw_rect:	482	draw_rect:
482	push eax	483	push eax
483	push ebx	484	push ebx
484	push ecx	485	push ecx
485	push edx	486	push edx
486	push edi	487	push edi
487	xor eax,eax	488	xor eax,eax
488	mov al,38	489	mov al,38
489	push ecx	490	push ecx
490	mov edi,ecx	491	mov edi,ecx
491	shr edi,16	492	shr edi,16
492	mov cx,di	493	mov cx,di
493	mcall	494	mcall
494	pop ecx	495	pop ecx
495	push ecx	496	push ecx
496	mov edi,ecx	497	mov edi,ecx
497	ror ecx,16	498	ror ecx,16
498	mov cx,di	499	mov cx,di
499	mcall	500	mcall

Subversion Repositories Kolibri OS

(root)/programs/system/vrr/trunk/vrr.asm – Rev 957 → 3645