Subversion Repositories Kolibri OS

Rev

Rev 3453 | Rev 4187 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3453 Rev 3904
Line 30... Line 30...
30 
;;       - ¥¡®«ìè ï ¤¥®¯â¨¬¨§ æ¨ï.                                                                  |
 30 
;;       - ¥¡®«ìè ï ¤¥®¯â¨¬¨§ æ¨ï.                                                                  |
31 
;; 0.6.0 - „®¡ ¢«¥­  ¢®§¬®¦­®áâì § ¯ã᪠ á ¯ à ¬¥âà ¬¨                                               |
 31 
;; 0.6.0 - „®¡ ¢«¥­  ¢®§¬®¦­®áâì § ¯ã᪠ á ¯ à ¬¥âà ¬¨                                               |
32 
;;       - „®¡ ¢«¥­ ०¨¬ H (hidden) ¯à®¨§¢®¤¨â § ¬¥­ã ä®­  à ¡®ç¥£® á⮫  £à ¤¨¥­â­®© § «¨¢ª®©.     |
 32 
;;       - „®¡ ¢«¥­ ०¨¬ H (hidden) ¯à®¨§¢®¤¨â § ¬¥­ã ä®­  à ¡®ç¥£® á⮫  £à ¤¨¥­â­®© § «¨¢ª®©.     |
33 
;;       - ®«ìè ï ¤¥®¯â¨¬¨§ æ¨ï.                                                                    |
 33 
;;       - ®«ìè ï ¤¥®¯â¨¬¨§ æ¨ï.                                                                    |
34 
;; 0.7.0 - „®¡ ¢«¥­  ¯¨¯¥âª  - ¢ë¡®à ­  á।­îî ª­®¯ªã ¬ëè¨                                          |
 34 
;; 0.7.0 - „®¡ ¢«¥­  ¯¨¯¥âª  - ¢ë¡®à ­  á।­îî ª­®¯ªã ¬ëè¨                                          |
- 
 
 35 
;; 0.7.5 -  ¦ â¨¥ ¯à ¢®© ª« ¢¨è¥© ¬ëè¨ ­  ï祩ªã á 梥⮬ ãáâ ­ ¢«¨¢ ¥â ­¥ ®á­®¢®©,   ¤®¯®«­. æ¢¥â  |
- 
 
 36 
;;       - “¬¥­ì襭® ¬¥àæ ­¨¥ ¯à¨ à ¡®â¥ ¯¨¯¥âª¨                                                     |
35 
;.....................................................................................................
 37 
;.....................................................................................................
36 
;; All rights reserved.                                                                              |
 38 
;; All rights reserved.                                                                              |
37 
;;                                                                                                   |
 39 
;;                                                                                                   |
38 
;; Redistribution and use in source and binary forms, with or without modification, are permitted    |
 40 
;; Redistribution and use in source and binary forms, with or without modification, are permitted    |
39 
;; provided that the following conditions are met:                                                   |
 41 
;; provided that the following conditions are met:                                                   |
Line 110... Line 112...
110 
    mcall   2                             ; äã­ªæ¨ï 2 - áç¨â âì ª®¤ ᨬ¢®«  (¢ ah) (âãâ ¢ ¯à¨­æ¨¯¥ ­¥ ­ã¦­ )
 112 
    mcall   2                             ; äã­ªæ¨ï 2 - áç¨â âì ª®¤ ᨬ¢®«  (¢ ah) (âãâ ¢ ¯à¨­æ¨¯¥ ­¥ ­ã¦­ )
111 
    jmp     still                         ; ¢¥à­ãâìáï ª ­ ç «ã 横« 
 113 
    jmp     still                         ; ¢¥à­ãâìáï ª ­ ç «ã 横« 
112 
;end_key
 114 
;end_key
Line 113... Line 115...
113 
 
 115 
 
114 
mouse:
 116 
mouse:
115 
    mov     eax,[renmode]
 - 
 
116 
    cmp     eax,2
 117 
    cmp     [renmode],2
117 
    jnz     still
 118 
    jne     left
- 
 
 119 
    call    cyrcle_draw
- 
 
 120 
    jmp     center
- 
 
 121 
  left:
- 
 
 122 
    mcall   37,2
- 
 
 123 
    cmp     al,1b
- 
 
 124 
    jne     right
- 
 
 125 
    mov     [mouse_f],1
- 
 
 126 
    jmp     still
- 
 
 127 
  right:
- 
 
 128 
    cmp     al,10b
- 
 
 129 
    jne     still
- 
 
 130 
    mov     [mouse_f],2
- 
 
 131 
    jmp     still
118 
    call    cyrcle_draw
 132 
  center:
119 
    mcall   37,2
 133 
    mcall   37,2
120 
    cmp     al,100b
 134 
    cmp     al,100b
- 
 
 135 
    jne     still
121 
    jne     still
 136 
    mov     [mouse_f],3
122 
    mov     [color],edx
 137 
    mov     [color],edx
123 
    call    draw_result
 138 
    call    draw_result
124 
    jmp     still                         ; ¢¥à­ãâìáï ª ­ ç «ã 横« 
 139 
    jmp     still			  ; ¢¥à­ãâìáï ª ­ ç «ã 横« 
Line 495... Line 510...
495 
      inc     [mouse_x]                   ; ŠŽ‘’›‹œ: ᬥ頥¬ ¯® ¤¨ £®­ «¨ ¯®â®¬ ¯® ã
 510 
      inc     [mouse_x]                   ; ŠŽ‘’›‹œ: ᬥ頥¬ ¯® ¤¨ £®­ «¨ ¯®â®¬ ¯® ã
496 
      dec     esi                         ; ŠŽ‘’›‹œ: “¬¥­ìè ¥¬ ä« £
 511 
      dec     esi                         ; ŠŽ‘’›‹œ: “¬¥­ìè ¥¬ ä« £
497 
      cmp     esi,0                       ; ŠŽ‘’›‹œ: ‘à ¢­¨¢ ¥¬ á ­ã«¥¬
 512 
      cmp     esi,0                       ; ŠŽ‘’›‹œ: ‘à ¢­¨¢ ¥¬ á ­ã«¥¬
498 
    jz        mouse_exit                  ; ŠŽ‘’›‹œ: …᫨ ­®«ì ⮠ᤥ« «¨ ¢áñ çâ® ¬®£«¨
 513 
    jz        mouse_exit                  ; ŠŽ‘’›‹œ: …᫨ ­®«ì ⮠ᤥ« «¨ ¢áñ çâ® ¬®£«¨
499 
    jmp    re_mouse_loop                  ; ŠŽ‘’›‹œ: …᫨ ­¥ ­®«ì â® ¯®¯à®¡ã¥¬ ¢§ïâì á®á¥«­¨© ¯¨ªá¥«ì
 514 
    jmp    re_mouse_loop                  ; ŠŽ‘’›‹œ: …᫨ ­¥ ­®«ì â® ¯®¯à®¡ã¥¬ ¢§ïâì á®á¥«­¨© ¯¨ªá¥«ì
- 
 
 515 
    mouse_set:                            ; ˆ­ ç¥ § ¯®¬¨­ ¥¬ ­®¢ë© 梥â
- 
 
 516 
      cmp     [mouse_f],1
- 
 
 517 
      jne     was_right
- 
 
 518 
      mov     [color],eax
- 
 
 519 
      call    draw_result
- 
 
 520 
      jmp     mouse_exit
500 
    mouse_set:
 521 
    was_right:
- 
 
 522 
      cmp     [mouse_f],2
- 
 
 523 
      jne     mouse_exit
501 
    mov     [color],eax                   ; ˆ­ ç¥ § ¯®¬¨­ ¥¬ ­®¢ë© 梥â
 524 
      mov     [color2],eax
502 
    call    draw_result                   ; ‚뢮¤¨¬ १ã«ìâ â
 525 
      call    draw_result                   ; ‚뢮¤¨¬ १ã«ìâ â
503 
    mouse_exit:
 526 
    mouse_exit:
504 
    ret                                   ; ‚®§¢à é ¥¬ ã¯à ¢«¥­¨¥
 527 
    ret                                   ; ‚®§¢à é ¥¬ ã¯à ¢«¥­¨¥
505 
;end_mouse_get----------------------------------------------------------------------------------------
 528 
;end_mouse_get----------------------------------------------------------------------------------------
Line 542... Line 565...
542 
    ;mov     ebx,125 shl 16+144            ; [ª®®à¤¨­ â  ¯® ®á¨ x]*65536 + [ª®®à¤¨­ â  ¯® ®á¨ y]
 565 
    ;mov     ebx,125 shl 16+144            ; [ª®®à¤¨­ â  ¯® ®á¨ x]*65536 + [ª®®à¤¨­ â  ¯® ®á¨ y]
543 
    ;mov     edx,hint2                     ; 㪠§ â¥«ì ­  ­ ç «® áâப¨
 566 
    ;mov     edx,hint2                     ; 㪠§ â¥«ì ­  ­ ç «® áâப¨
544 
    ;mov     esi,21                        ; ¢ë¢®¤¨âì esi ᨬ¢®«®¢
 567 
    ;mov     esi,21                        ; ¢ë¢®¤¨âì esi ᨬ¢®«®¢
545 
    ;mcall
 568 
    ;mcall
Line 546... Line -...
546 
 
 - 
 
547 
    mov     eax,13
 - 
 
548 
    mov     edx,0x666666
 - 
 
549 
    mov     ebx,111*65536+145
 - 
 
550 
    mov     ecx,  9*65536+145
 - 
 
551 
    mcall
 569 
 
552 
    ;mov     edx,[color]
 570 
    ;mov     edx,[color]
553 
    ;mov     ebx,109*65536+150
 571 
    ;mov     ebx,109*65536+150
554 
    ;mov     ecx, 10*65536+150
 572 
    ;mov     ecx, 10*65536+150
555 
    ;mcall
 573 
    ;mcall
Line 560... Line 578...
560 
    jg      cyrcle_draw_2
 578 
    jg      cyrcle_draw_2
561 
    cmp     edx, WIN_H
 579 
    cmp     edx, WIN_H
562 
    jle     end_cyrcle_draw
 580 
    jle     end_cyrcle_draw
Line 563... Line 581...
563 
 
 581 
 
- 
 
 582 
    cyrcle_draw_2:
564 
    cyrcle_draw_2:
 583 
	mcall   5,10
565 
    call    desktop_get
 584 
    call    desktop_get
Line 566... Line 585...
566 
    call    mouse_global
 585 
    call    mouse_global
567 
 
 586 
 
Line 602... Line 621...
602 
    mov     edx,eax
 621 
    mov     edx,eax
603 
    mov     eax,13
 622 
    mov     eax,13
604 
    mov     ebx,178*65536+11
 623 
    mov     ebx,178*65536+11
605 
    mov     ecx, 77*65536+11
 624 
    mov     ecx, 77*65536+11
606 
    mcall
 625 
    mcall
- 
 
 626 
    ret
607 
    end_cyrcle_draw:
 627 
    end_cyrcle_draw:
- 
 
 628 
    mov     eax,13
- 
 
 629 
    mov     edx,0x666666
- 
 
 630 
    mov     ebx,111*65536+145
- 
 
 631 
    mov     ecx,  9*65536+145
- 
 
 632 
    mcall
608 
    ret
 633 
    ret
Line 609... Line 634...
609 
 
 634 
 
610 
    circle_pixel_read:
 635 
    circle_pixel_read:
611 
    push    ecx
 636 
    push    ecx
Line 1212... Line 1237...
1212 
    mouse_y     dd 0                      ; åà ­¨â £«®¡ «ì­ãî ã ª®®à¤¨­ âã ¬ëè¨
 1237 
    mouse_y     dd 0                      ; åà ­¨â £«®¡ «ì­ãî ã ª®®à¤¨­ âã ¬ëè¨
1213 
    mouse_f     dd 0                      ; åà ­¨â ¤ ­­ë¥ ® ⮬ ª ª ï ª­®¯ª  ¬ëè¨ ¡ë«  ­ ¦ â 
 1238 
    mouse_f     dd 0                      ; åà ­¨â ¤ ­­ë¥ ® ⮬ ª ª ï ª­®¯ª  ¬ëè¨ ¡ë«  ­ ¦ â 
1214 
    desctop_w   dd 0                      ; åà ­¨â è¨à¨­ã íªà ­ 
 1239 
    desctop_w   dd 0                      ; åà ­¨â è¨à¨­ã íªà ­ 
1215 
    desctop_h   dd 0                      ; åà ­¨â ¢ëá®âã íªà ­ 
 1240 
    desctop_h   dd 0                      ; åà ­¨â ¢ëá®âã íªà ­ 
1216 
    sc          system_colors             ; åà ­¨â áâàãªâãàã á¨á⥬­ëå 梥⮢ ᪨­ 
 1241 
    sc          system_colors             ; åà ­¨â áâàãªâãàã á¨á⥬­ëå 梥⮢ ᪨­ 
1217 
    title       db 'Palitra v0.7',0       ; åà ­¨â ¨¬ï ¯à®£à ¬¬ë
 1242 
    title       db 'Palitra v0.75',0       ; åà ­¨â ¨¬ï ¯à®£à ¬¬ë
1218 
    hidden      db 'Hidden',0
 1243 
    hidden      db 'Hidden',0
1219 
    hex         db '#',0                  ; ¤«ï ¢ë¢®¤  à¥èñ⪨ ª ª ⥪áâ 
 1244 
    hex         db '#',0                  ; ¤«ï ¢ë¢®¤  à¥èñ⪨ ª ª ⥪áâ 
1220 
    cname       db 'RGBAx'                ; åà ­¨â à §àï¤ë 梥⮢ (red,green,blue) x-¬¥âª  ª®­æ 
 1245 
    cname       db 'RGBAx'                ; åà ­¨â à §àï¤ë 梥⮢ (red,green,blue) x-¬¥âª  ª®­æ 
1221 
    cred        db 0                      ; åà ­¨¬ ªà á­ë© ᯥªàâ
 1246 
    cred        db 0                      ; åà ­¨¬ ªà á­ë© ᯥªàâ
1222 
    cgreen      db 0                      ; åà ­¨¬ §¥«¥­ë© ᯥªâà
 1247 
    cgreen      db 0                      ; åà ­¨¬ §¥«¥­ë© ᯥªâà