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

Subversion Repositories Kolibri OS

(root)/programs/vrr/trunk/vrr.asm – Rev 51 → 62