WebSVN – Kolibri OS – Diff – /programs/demos/magnify/trunk/magnify.asm

 use32
                 org     0x0
-                db      'MENUET00'              ; 8 byte id
+                db      'MENUET01'              ; 8 byte id
-                dd      38                      ; required os
+                dd      1                       ; header version
                 dd      START                   ; program start
                 dd      I_END                   ; program image size
-                dd      0x10000                ; required amount of memory
-                dd      0x10000
+                dd      0x1000                  ; required amount of memory
-                dd      0x00000000              ; reserved=no extended header
+                dd      0x1000                  ; esp
+                dd      0, 0                    ; no parameters, no path
 include 'macros.inc'
-include 'lang.inc'
-include 'macros.inc'
-scr     equ     0x1000
-START:                          ; start of execution
-    mov  esp,0xfff0
+delay   equ     20
-    mov  eax,14                 ; get screen size
-    int  0x40
-    push eax
-    and  eax,0x0000ffff
-    add  eax,1
-    mov  [size_y],eax
-    pop  eax
-    shr  eax,16
-    add  eax,1
-    mov  [size_x],eax
-    mov  eax,[size_x]
-    shr  eax,2
-    mov  [cmp_ecx],eax
-    mov  eax,[size_x]
-    xor  edx,edx
-    mov  ebx,3
-    mul  ebx
-    mov  [add_esi],eax
-    mov  eax,[size_y]
-    shr  eax,2
-    mov  [cmp_edx],eax
+magnify_width = 40
 magnify_height = 30
-    call draw_window            ; at first, draw the window
+START:                          ; start of execution
+redraw:
-still:
+        call    draw_window
-    call draw_screen
+still:
-    mov  eax,23                 ; wait here for event with timeout
-    mov  ebx,[delay]
+        call    draw_screen
-    int  0x40
+wtevent:
-    cmp  eax,1                  ; redraw request ?
-    jz   red
+        mov     eax, 23         ; wait here for event with timeout
-    cmp  eax,2                  ; key in buffer ?
-    jz   key
-    cmp  eax,3                  ; button in buffer ?
+        mov     ebx, delay
-    jz   button
+        int     0x40
-    jmp  still
+        dec     eax
-  red:                          ; redraw
+        js      still
-    call draw_window
+        jz      redraw
-    jmp  still
+        dec     eax
+        jnz     button
-  key:                          ; key
+; key in buffer
-    mov  eax,2                  ; just read it and ignore
+        mov     al, 2
-    int  0x40
-    jmp  still
-  button:                       ; button
-    mov  eax,17                 ; get id
-    int  0x40
-    cmp  ah,1                   ; button id=1 ?
-    jnz  noclose
-    mov  eax,0xffffffff         ; close this program
-    int  0x40
-  noclose:
-    cmp  ah,2
-    jnz  nosave
-    call save_screen
-  nosave:
-    jmp  still
-save_screen:
-     pusha
-     mov  ebx,0
-     mov  edi,0x10000
-   ss1:
-     mov  eax,35
-     int  0x40
-     add  ebx,1
-     mov  [edi],eax
-     add  edi,3
-     cmp  edi,0xFFFF0
-     jb   ss1
-     mov  eax,33
-     mov  ebx,filename
-     mov  ecx,0x10000
-     mov  edx,0xEFFF0
-     mov  esi,0
-     int  0x40
-     popa
+        int     0x40
         jmp     wtevent
-     ret
+button:
 ; we have only one button, close
-filename  db  'SCREEN  RAW'
         or      eax, -1
-;   *********************************************
+        int     0x40
 ;   *******  WINDOW DEFINITIONS AND DRAW ********
-;   *********************************************
+;   *********************************************
-draw_window:
-    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             ; [x start] *65536 + [x size]
+;   *******  WINDOW DEFINITIONS AND DRAW ********
-    mov  ebx,100*65536+322
-    mov  ecx,100*65536+262         ; [y start] *65536 + [y size]
-    mov  edx,0x0;01111cc            ; color of work area RRGGBB
-    mov  esi,0x809977ff            ; color of grab bar  RRGGBB,8->color glide
-    mov  edi,0x00ffff00            ; color of frames    RRGGBB
+;   *********************************************
-    int  0x40
+draw_window:
-                                   ; WINDOW LABEL
+        mov     eax, 12         ; function 12:tell os about windowdraw
-    mov  eax,4                     ; function 4 : write text to window
-    mov  ebx,8*65536+8             ; [x start] *65536 + [y start]
+        mov     ebx, 1          ; 1, start of draw
-    mov  ecx,0x00ffffff            ; color of text RRGGBB
+        int     0x40
-    mov  edx,labelt                ; pointer to text beginning
-    mov  esi,labellen-labelt       ; text length
+        mov     al, 48          ; function 48 : graphics parameters
-    int  0x40
+        mov     bl, 4           ; subfunction 4 : get skin height
-                                   ; CLOSE BUTTON
+        int     0x40
     mov  eax,8                     ; function 8 : define and draw button
-    mov  bx,12                     ; [x start] *65536 + [x size]
+                                        ; DRAW WINDOW
-    mov  ebx,(322-19)*65536+12
-    mov  ecx,5*65536+12            ; [y start] *65536 + [y size]
+        mov     ebx, 100*65536 + 8*magnify_width + 8
-    mov  edx,1                     ; button id
-    mov  esi,0x22aacc              ; button color RRGGBB
-    int  0x40
-    call draw_screen
-    mov  eax,12                    ; function 12:tell os about windowdraw
-    mov  ebx,2                     ; 2, end of draw
-    int  0x40
-    ret
-draw_screen:
-    call draw_magnify
-    ret
-    pusha
-    mov  edi,scr
-    mov  ecx,0
-    mov  edx,0
-    mov  esi,0
-  ds1:
-    mov  eax,35
-    mov  ebx,esi
-    int  0x40
-    stosd
-    sub  edi,1
-    add  esi,4
-    add  ecx,1
-    cmp  ecx,[cmp_ecx] ; 800/4
-    jb   ds1
-    add  esi,[add_esi] ; 800*3
-    mov  ecx,0
-    add  edx,1
-    cmp  edx,[cmp_edx] ; 600/4
-    jb   ds1
-    mov  eax,7
-    mov  ebx,scr
-    mov  ecx,200*65536+160
-    mov  ecx,[size_x]
-    shr  ecx,2
+        lea     ecx, [eax + 100*65536 + 8*magnify_height + 3]
+        mov     edx, 0x33000000         ; color of work area RRGGBB
+        mov     edi, labelt             ; header
+        xor     eax, eax                ; function 0 : define and draw window
+        int     0x40
-    shl  ecx,16
-    mov  cx,word [size_y]
+        mov     al, 12                  ; function 12:tell os about windowdraw
+        mov     ebx, 2                  ; 2, end of draw
-    shr  cx,2
+        int     0x40
-    mov  edx,20*65536+35
-    int  0x40
+        ret
     popa
-    call draw_magnify
+draw_screen:
-    ret
-draw_magnify:
-    pusha
-    mov  eax,37
-    mov  ebx,0
-    int  0x40
+draw_magnify:
-    mov  ecx,eax
-    mov  edx,eax
-    shr  ecx,16
-    and  edx,65535
-    sub  ecx,39
-    sub  edx,29
-    cmp  ecx,3000
+        mov     eax, 14
-    jb   co1
-    popa
-    ret
-  co1:
-    cmp  edx,3000
-    jb   co2
+        int     0x40            ; get screen size
+        movzx   ecx, ax
-    popa
+        inc     ecx
-    ret
+        mov     [size_y], ecx
+        shr     eax, 16
+        inc     eax
-  co2:
+        mov     [size_x], eax
-    and  ecx,2047
-    and  edx,2047
+        mov     eax, 37
+        xor     ebx, ebx
+        int     0x40            ; get mouse coordinates
+        mov     ecx, eax
+        shr     ecx, 16         ; ecx = x
+        movzx   edx, ax         ; edx = y
-    mov  [m_x],ecx
+        inc     ecx
+        mov     [m_xe], ecx
-    mov  [m_y],edx
+        inc     edx
+        mov     [m_ye], edx
-    add  ecx,40
+        sub     ecx, magnify_width
-    add  edx,30
+        sub     edx, magnify_height
+        mov     [m_x], ecx
-    mov  [m_xe],ecx
+        mov     [m_y], edx
-    mov  [m_ye],edx
+.loop_y:
+.loop_x:
-    mov  ecx,[m_x]
+        xor     eax, eax        ; assume black color for invalid pixels
+        test    ecx, ecx
+        js      .nopix
-    mov  edx,[m_y]
+        cmp     ecx, [size_x]
+        jge     .nopix
+        test    edx, edx
-  dm1:
+        js      .nopix
-    push edx
-    mov  eax,edx
-    mul  [size_x]
-    pop  edx
-    add  eax,ecx
-    mov  ebx,eax
+        cmp     edx, [size_y]
-    mov  eax,35
+        jge     .nopix
-    int  0x40
         mov     ebx, edx
-    pusha
+        imul    ebx, [size_x]
-    mov  ebx,ecx
+        add     ebx, ecx
-    sub  ebx,[m_x]
+        mov     eax, 35
-    mov  ecx,edx
-    sub  ecx,[m_y]
+        int     0x40            ; read pixel
-    shl  ebx,3
+.nopix:
-    add  ebx,2
+        push    ecx edx
-    shl  ebx,16
+        sub     ecx, [m_x]
-    mov  bx,7
+        sub     edx, [m_y]
-    shl  ecx,3
+        mov     ebx, ecx
-    add  ecx,22
+        shl     ebx, 3+16
-    shl  ecx,16
-    mov  cx,7
-    mov  edx,eax
+        mov     bl, 7
-    mov  eax,13
-    int  0x40
-    popa
+        mov     ecx, edx
-    add  ecx,1
-    cmp  ecx,[m_xe]
-    jnz  dm1
-    mov  ecx,[m_x]
-    add  edx,1
-    cmp  edx,[m_ye]
-    jnz  dm1
-    popa
-    ret
-; DATA AREA
+        shl     ecx, 3+16
+        mov     cl, 7
-m_x      dd  100
-m_y      dd  100
         mov     edx, eax
-m_xe     dd  110
-m_ye     dd  110
+        mov     eax, 13
+        int     0x40
+        pop     edx ecx
+        inc     ecx
+        cmp     ecx, [m_xe]
+        jnz     .loop_x
+        mov     ecx, [m_x]

Subversion Repositories Kolibri OS

(root)/programs/demos/magnify/trunk/magnify.asm – Rev 109 → 209