Subversion Repositories Kolibri OS

Rev

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

Rev 4187 Rev 4962
Line 4... Line 4...
4 
;----------------------------------------------------------------------------------------------------|
 4 
;----------------------------------------------------------------------------------------------------|
5 
;; Charset:DOS-866 Font:Courier New Size:9pt                                                         |
 5 
;; Charset:DOS-866 Font:Courier New Size:9pt                                                         |
6 
;.....................................................................................................
 6 
;.....................................................................................................
7 
;; compiler:     FASM 1.69.31                                                                        |
 7 
;; compiler:     FASM 1.69.31                                                                        |
8 
;; version:      0.3.0                                                                               |
 8 
;; version:      0.3.0                                                                               |
9 
;; last update:  07/11/2013                                                                          |
 9 
;; last update:  08/11/2012                                                                          |
10 
;; e-mail:       dr.steshin@gmail.com                                                                |
 10 
;; e-mail:       dr.steshin@gmail.com                                                                |
11 
;.....................................................................................................
 11 
;.....................................................................................................
12 
;; History:                                                                                          |
 12 
;; History:                                                                                          |
13 
;; 0.1.0 - ¥à¢ ï ¢¥àá¨ï ¯à®£à ¬¬ë.                                                                  |
 13 
;; 0.1.0 - ¥à¢ ï ¢¥àá¨ï ¯à®£à ¬¬ë.                                                                  |
14 
;; 0.2.0 - ˆá¯à ¢«¥­® ¯®¯ ¤ ­¨¥ ¢ á¥âªã, ¡¥à¥âáï ¡«¨¦ ©è¨© ¯® ¤¨ £®­ «¨ ¯¨ªá¥«ì.                     |
 14 
;; 0.2.0 - ˆá¯à ¢«¥­® ¯®¯ ¤ ­¨¥ ¢ á¥âªã, ¡¥à¥âáï ¡«¨¦ ©è¨© ¯® ¤¨ £®­ «¨ ¯¨ªá¥«ì.                     |
Line 32... Line 32...
32 
;;       - „®¡ ¢«¥­ ०¨¬ H (hidden) ¯à®¨§¢®¤¨â § ¬¥­ã ä®­  à ¡®ç¥£® á⮫  £à ¤¨¥­â­®© § «¨¢ª®©.     |
 32 
;;       - „®¡ ¢«¥­ ०¨¬ H (hidden) ¯à®¨§¢®¤¨â § ¬¥­ã ä®­  à ¡®ç¥£® á⮫  £à ¤¨¥­â­®© § «¨¢ª®©.     |
33 
;;       - ®«ìè ï ¤¥®¯â¨¬¨§ æ¨ï.                                                                    |
 33 
;;       - ®«ìè ï ¤¥®¯â¨¬¨§ æ¨ï.                                                                    |
34 
;; 0.7.0 - „®¡ ¢«¥­  ¯¨¯¥âª  - ¢ë¡®à ­  á।­îî ª­®¯ªã ¬ëè¨                                          |
 34 
;; 0.7.0 - „®¡ ¢«¥­  ¯¨¯¥âª  - ¢ë¡®à ­  á।­îî ª­®¯ªã ¬ëè¨                                          |
35 
;; 0.7.5 -  ¦ â¨¥ ¯à ¢®© ª« ¢¨è¥© ¬ëè¨ ­  ï祩ªã á 梥⮬ ãáâ ­ ¢«¨¢ ¥â ­¥ ®á­®¢®©,   ¤®¯®«­. æ¢¥â  |
 35 
;; 0.7.5 -  ¦ â¨¥ ¯à ¢®© ª« ¢¨è¥© ¬ëè¨ ­  ï祩ªã á 梥⮬ ãáâ ­ ¢«¨¢ ¥â ­¥ ®á­®¢®©,   ¤®¯®«­. æ¢¥â  |
36 
;;       - “¬¥­ì襭® ¬¥àæ ­¨¥ ¯à¨ à ¡®â¥ ¯¨¯¥âª¨                                                     |
 36 
;;       - “¬¥­ì襭® ¬¥àæ ­¨¥ ¯à¨ à ¡®â¥ ¯¨¯¥âª¨                                                     |
37 
;; 0.7.6 - ¥à¥à ¡®â ­ ०¨¬ H (hidden): ⥯¥àì æ¢¥â  § £à㦠îâáï ¨§ wallpaper.dat       (eAndrew)   |
 37 
;; 0.7.6 - „®¡ ¢«¥­ ०¨¬ B, ª®â®àë© ¯à®¨§¢®¤¨â § ¬¥­ã ä®­  à ¡®ç¥£® á⮫  è㬭®© § «¨¢ª®© (e-andrew)|
38 
;;       - à¨ ãáâ ­®¢ª¨ ä®­  ª­®¯ª®©, 梥â ä®­  á®åà ­ï¥âáï ¢ wallpaper.dat             (eAndrew)   |
 - 
 
39 
;.....................................................................................................
 38 
;.....................................................................................................
40 
;; All rights reserved.                                                                              |
 39 
;; All rights reserved.                                                                              |
41 
;;                                                                                                   |
 40 
;;                                                                                                   |
42 
;; Redistribution and use in source and binary forms, with or without modification, are permitted    |
 41 
;; Redistribution and use in source and binary forms, with or without modification, are permitted    |
43 
;; provided that the following conditions are met:                                                   |
 42 
;; provided that the following conditions are met:                                                   |
Line 69... Line 68...
69 
  org	 0x0
 68 
  org	 0x0
70 
  db	 'MENUET01'
 69 
  db	 'MENUET01'
71 
  dd	 0x01
 70 
  dd	 0x01
72 
  dd	 START
 71 
  dd	 START
73 
  dd	 I_END
 72 
  dd	 I_END
74 
  dd	 I_RDATA+4096
 73 
  dd	 I_MEM
75 
  dd	 I_RDATA+4096
 74 
  dd	 I_MEM
76 
  dd	 params
 75 
  dd	 params
77 
  dd	 0x0
 76 
  dd	 0x0
Line 78... Line 77...
78 
 
 77 
 
- 
 
 78 
  include '../../../macros.inc'
Line 79... Line 79...
79 
  include '../../../macros.inc'
 79 
  include '../../../proc32.inc'
80 
 
 80 
 
81 
  WIN_W  equ 295	    ; è¨à¨­  ®ª­ 
 81 
  WIN_W  equ 295	    ; è¨à¨­  ®ª­ 
82 
  WIN_H  equ 195	    ; ¢ëá®â  ®ª­ 
 82 
  WIN_H  equ 195	    ; ¢ëá®â  ®ª­ 
Line 158... Line 158...
158 
  next_redraw:
 158 
  next_redraw:
159 
    call    draw_palitra		  ; ˆ‘“…Œ €‹ˆ’“
 159 
    call    draw_palitra		  ; ˆ‘“…Œ €‹ˆ’“
160 
    jmp     still			  ; “室¨¬ ­  ®¦¨¤ ­¨¥ ¤à㣮£® ᮡëâ¨ï
 160 
    jmp     still			  ; “室¨¬ ­  ®¦¨¤ ­¨¥ ¤à㣮£® ᮡëâ¨ï
161 
  next_bg:
 161 
  next_bg:
162 
    cmp     ah, 14			  ; Š­®¯ª  BACKGROUND
 162 
    cmp     ah, 14			  ; Š­®¯ª  BACKGROUND
163 
    jne     circle_bg			  ; ¥á«¨ ­¥ ­ ¦ â  â® ¢ë室¨¬
 163 
    jne     next_bg2			  ; ¥á«¨ ­¥ ­ ¦ â  â® ¢ë室¨¬
164 
    call    set_background		  ; ¨­ ç¥ ãáâ ­ ¢«¨¢ ¥¬ ä®­
 164 
    call    set_background		  ; ¨­ ç¥ ãáâ ­ ¢«¨¢ ¥¬ ä®­
165 
    jmp     still			  ; ¨ ­  ®¦¨¤ ­¨¥ ᮡëâ¨ï
 165 
    jmp     still			  ; ¨ ­  ®¦¨¤ ­¨¥ ᮡëâ¨ï
- 
 
 166 
  next_bg2:
- 
 
 167 
    cmp     ah, 16			  ; Š­®¯ª  BACKGROUND
- 
 
 168 
    jne     circle_bg			  ; ¥á«¨ ­¥ ­ ¦ â  â® ¢ë室¨¬
- 
 
 169 
    call    set_background2		  ; ¨­ ç¥ ãáâ ­ ¢«¨¢ ¥¬ ä®­
- 
 
 170 
    jmp     still			  ; ¨ ­  ®¦¨¤ ­¨¥ ᮡëâ¨ï
166 
  circle_bg:
 171 
  circle_bg:
167 
    cmp     ah, 15			  ; Š­®¯ª  Šà㣮¢ ï ¯ «¨âà 
 172 
    cmp     ah, 15			  ; Š­®¯ª  Šà㣮¢ ï ¯ «¨âà 
168 
    jne     next_end			  ; ¥á«¨ ­¥ ­ ¦ â  â® ¢ë室¨¬
 173 
    jne     next_end			  ; ¥á«¨ ­¥ ­ ¦ â  â® ¢ë室¨¬
169 
    mov     [renmode],2 		  ; ¢ª«îç ¥¬ ®âà¨á®¢ªã ªà㣮¢®© ¯ «¨âàë
 174 
    mov     [renmode],2 		  ; ¢ª«îç ¥¬ ®âà¨á®¢ªã ªà㣮¢®© ¯ «¨âàë
170 
    call    draw_palitra		  ; ˆ‘“…Œ €‹ˆ’“
 175 
    call    draw_palitra		  ; ˆ‘“…Œ €‹ˆ’“
Line 367... Line 372...
367 
 
 372 
 
368 
    ;------------------------------------------------------------------------------------------------+
 373 
    ;------------------------------------------------------------------------------------------------+
369 
    draw_bottom_panel:			  ; Žâà¨á®¢ª  ­¨¦­¥© ¯ ­¥«¨
 374 
    draw_bottom_panel:			  ; Žâà¨á®¢ª  ­¨¦­¥© ¯ ­¥«¨
370 
    ;.................................................................................................
 375 
    ;.................................................................................................
371 
    mov     eax,8			  ; draw button
 376 
    mov     eax,8			  ; draw button
372 
    mov     ebx,92 shl 16+100		  ; [x] + [size]
 377 
    mov     ebx,(92) shl 16+90	      ; [x] + [size]
373 
    mov     ecx,169 shl 16+16		  ; [y] + [size]
 378 
    mov     ecx,169 shl 16+16		  ; [y] + [size]
374 
    mov     edx,14			  ; ID = 14
 379 
    mov     edx,14			  ; ID = 14
375 
    mov     esi,[sc.work_button]	  ; RGB
 380 
    mov     esi,[sc.work_button]	  ; RGB
- 
 
 381 
    int     0x40			  ; call
- 
 
 382 
 
- 
 
 383 
    add     ebx, 100 shl 16
- 
 
 384 
    add     edx, 2
- 
 
 385 
    int     0x40
376 
    int     0x40			  ; call
 386 
 
377 
    mov     eax,4			  ; Write string
 387 
    mov     eax,4			  ; Write string
378 
    mov     ebx,113 shl 16+174		  ; [x] + [y]
 388 
    mov     ebx,(113 - 104) shl 16+174	  ; [x] + [y]
- 
 
 389 
    mov     ecx,[sc.work_text]		  ; RGB
379 
    mov     ecx,[sc.work_button_text]	  ; RGB
 390 
    or	    ecx, 1 shl 31
380 
    mov     edx,bground 		  ; string pointer
 - 
 
381 
    mov     esi,10			  ; count symbol
 391 
    mov     edx,bground 		  ; string pointer
- 
 
 392 
    int     0x40			  ; call
- 
 
 393 
 
- 
 
 394 
    mov     ecx, [sc.work_button_text]
- 
 
 395 
    or	    ecx, 1 shl 31
- 
 
 396 
 
- 
 
 397 
    add     ebx, 106 shl 16
- 
 
 398 
    mov     edx, bground1
- 
 
 399 
    int     0x40
- 
 
 400 
 
- 
 
 401 
    add     ebx, 107 shl 16
- 
 
 402 
    mov     edx, bground2
- 
 
 403 
    int     0x40
382 
    int     0x40			  ; call
 404 
 
383 
    mov     eax,38			  ; draw line
 405 
    mov     eax,38			  ; draw line
384 
    mov     ebx,4 shl 16+282		  ; [start x] + [end x]
 406 
    mov     ebx,4 shl 16+282		  ; [start x] + [end x]
385 
    mov     ecx,163 shl 16+163		  ; [start y] + [end y]
 407 
    mov     ecx,163 shl 16+163		  ; [start y] + [end y]
386 
    mov     edx,0x00666666		  ; RGB
 408 
    mov     edx,0x00666666		  ; RGB
Line 466... Line 488...
466 
 
 488 
 
467 
    mov     eax,15			  ; ”ã­ªæ¨ï 15 - à ¡®â  á ä®­®¢®© £à ä¨ª®©
 489 
    mov     eax,15			  ; ”ã­ªæ¨ï 15 - à ¡®â  á ä®­®¢®© £à ä¨ª®©
468 
    mov     ebx,3			  ; ®¤äã­ªæ¨ï 3 - ¯¥à¥à¨á®¢ âì ä®­.
 490 
    mov     ebx,3			  ; ®¤äã­ªæ¨ï 3 - ¯¥à¥à¨á®¢ âì ä®­.
Line 469... Line -...
469 
    int     0x40			  ; ‚ë§ë¢ ¥¬
 - 
 
470 
 
 - 
 
471 
    mov     eax, [color]
 - 
 
472 
    mov     [fi.file+0], al
 - 
 
473 
    shr     eax, 8
 - 
 
474 
    mov     [fi.file+1], al
 - 
 
475 
    shr     eax, 8
 - 
 
476 
    mov     [fi.file+2], al
 - 
 
477 
 
 - 
 
478 
    mov     eax, [color2]
 - 
 
479 
    mov     [fi.file+3], al
 - 
 
480 
    shr     eax, 8
 - 
 
481 
    mov     [fi.file+4], al
 - 
 
482 
    shr     eax, 8
 - 
 
483 
    mov     [fi.file+5], al
 - 
 
484 
 
 - 
 
485 
    mov     [fi.p00], dword 2
 - 
 
486 
    mov     [fi.p04], dword 0
 - 
 
487 
    mov     [fi.p08], dword 0
 - 
 
488 
    mov     [fi.p12], dword 6
 - 
 
489 
    mov     [fi.p16], dword fi.file
 - 
 
490 
    mov     [fi.p20], dword 0
 - 
 
491 
    mov     [fi.p21], dword dat_file
 - 
 
492 
    mcall   70, fi
 491 
    int     0x40			  ; ‚ë§ë¢ ¥¬
493 
 
 492 
 
Line 494... Line 493...
494 
    ret
 493 
    ret
495 
;end_set_background
 494 
;end_set_background
Line 936... Line 935...
936 
    mov     eax,4			  ; 4 - ¢ë¢¥á⨠áâபã ⥪áâ  ¢ ®ª­®
 935 
    mov     eax,4			  ; 4 - ¢ë¢¥á⨠áâபã ⥪áâ  ¢ ®ª­®
937 
    mov     ebx,16 shl 16+40		  ; [ª®®à¤¨­ â  ¯® ®á¨ x]*65536 + [ª®®à¤¨­ â  ¯® ®á¨ y]
 936 
    mov     ebx,16 shl 16+40		  ; [ª®®à¤¨­ â  ¯® ®á¨ x]*65536 + [ª®®à¤¨­ â  ¯® ®á¨ y]
938 
    mov     ecx,0x0			  ; 0xX0RRGGBB (RR, GG, BB § ¤ îâ 梥â ⥪áâ )
 937 
    mov     ecx,0x0			  ; 0xX0RRGGBB (RR, GG, BB § ¤ îâ 梥â ⥪áâ )
939 
    mov     edx,cname			  ; 㪠§ â¥«ì ­  ­ ç «® áâப¨
 938 
    mov     edx,cname			  ; 㪠§ â¥«ì ­  ­ ç «® áâப¨
940 
    mov     esi,1			  ; ¢ë¢®¤¨âì esi ᨬ¢®«®¢
 939 
    mov     esi,1			  ; ¢ë¢®¤¨âì esi ᨬ¢®«®¢
941 
    newline_s:				  ; 横«
 940 
    newline:				  ; 横«
942 
      int     0x40			  ; à¥à뢠­¨¥
 941 
      int     0x40			  ; à¥à뢠­¨¥
943 
      add     ebx,23 shl 16		  ; „®¡ ¢«ï¥¬
 942 
      add     ebx,23 shl 16		  ; „®¡ ¢«ï¥¬
944 
      add     edx,1			  ; „®¡ ¢«ï¥¬
 943 
      add     edx,1			  ; „®¡ ¢«ï¥¬
945 
      cmp     [edx],byte 'x'		  ; ‘à ¢­¥­¨¥ á ¡ ©â®¬ å
 944 
      cmp     [edx],byte 'x'		  ; ‘à ¢­¥­¨¥ á ¡ ©â®¬ å
946 
    jne    newline_s			  ; …᫨ ­¥ ­ã«ì ¨«¨ ­¥ à ¢­®
 945 
    jne    newline			  ; …᫨ ­¥ ­ã«ì ¨«¨ ­¥ à ¢­®
Line 947... Line 946...
947 
 
 946 
 
948 
    ;.................................................................................................
 947 
    ;.................................................................................................
949 
    ; Žâà¨á®¢ª  á« ©¤¥à®¢
 948 
    ; Žâà¨á®¢ª  á« ©¤¥à®¢
950 
    ;.................................................................................................
 949 
    ;.................................................................................................
Line 1039... Line 1038...
1039 
    int     0x40
 1038 
    int     0x40
1040 
    ret 				  ; ‚®§¢à é ¥¬ ã¯à ¢«¥­¨¥
 1039 
    ret 				  ; ‚®§¢à é ¥¬ ã¯à ¢«¥­¨¥
1041 
;end_draw_value
 1040 
;end_draw_value
Line 1042... Line 1041...
1042 
 
 1041 
 
1043 
  _read_params:
 - 
 
1044 
      mov   [fi.p00], dword 0
 - 
 
1045 
      mov   [fi.p04], dword 0
 - 
 
1046 
      mov   [fi.p08], dword 0
 - 
 
1047 
      mov   [fi.p12], dword 6
 - 
 
1048 
      mov   [fi.p16], dword fi.file
 - 
 
1049 
      mov   [fi.p20], dword 0
 - 
 
1050 
      mov   [fi.p21], dword dat_file
 - 
 
Line -... Line 1042...
- 
 
 1042 
  _read_params:
- 
 
 1043 
 
- 
 
 1044 
      mov al,[params+2]
1051 
      mcall 70, fi
 1045 
      mov [params_c+0],al
- 
 
 1046 
 
- 
 
 1047 
      mov al,[params+3]
- 
 
 1048 
      mov [params_c+1],al
- 
 
 1049 
 
- 
 
 1050 
      mov al,[params+4]
- 
 
 1051 
      mov [params_c+2],al
- 
 
 1052 
 
- 
 
 1053 
      mov al,[params+5]
- 
 
 1054 
      mov [params_c+3],al
- 
 
 1055 
 
- 
 
 1056 
      mov al,[params+6]
1052 
 
 1057 
      mov [params_c+4],al
- 
 
 1058 
 
- 
 
 1059 
      mov al,[params+7]
1053 
      xor   eax, eax
 1060 
      mov [params_c+5],al
- 
 
 1061 
 
- 
 
 1062 
      mov al,[params+8]
1054 
      mov   al, [fi.file+2]
 1063 
      mov [params_c+6],al
- 
 
 1064 
 
- 
 
 1065 
      mov al,[params+9]
- 
 
 1066 
      mov [params_c+7],al
1055 
      shl   eax, 8
 1067 
 
1056 
      mov   al, [fi.file+1]
 1068 
      mov   esi,params_c
1057 
      shl   eax, 8
</