Subversion Repositories Kolibri OS

Rev

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

Rev 3904 Rev 4187
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:  08/11/2012                                                                          |
 9 
;; last update:  07/11/2013                                                                          |
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)   |
- 
 
 38 
;;       - à¨ ãáâ ­®¢ª¨ ä®­  ª­®¯ª®©, 梥â ä®­  á®åà ­ï¥âáï ¢ wallpaper.dat             (eAndrew)   |
37 
;.....................................................................................................
 39 
;.....................................................................................................
38 
;; All rights reserved.                                                                              |
 40 
;; All rights reserved.                                                                              |
39 
;;                                                                                                   |
 41 
;;                                                                                                   |
40 
;; Redistribution and use in source and binary forms, with or without modification, are permitted    |
 42 
;; Redistribution and use in source and binary forms, with or without modification, are permitted    |
41 
;; provided that the following conditions are met:                                                   |
 43 
;; provided that the following conditions are met:                                                   |
Line 67... Line 69...
67 
  org	 0x0
 69 
  org	 0x0
68 
  db	 'MENUET01'
 70 
  db	 'MENUET01'
69 
  dd	 0x01
 71 
  dd	 0x01
70 
  dd	 START
 72 
  dd	 START
71 
  dd	 I_END
 73 
  dd	 I_END
72 
  dd	 I_END+4096
 74 
  dd	 I_RDATA+4096
73 
  dd	 I_END+4096
 75 
  dd	 I_RDATA+4096
74 
  dd	 params
 76 
  dd	 params
75 
  dd	 0x0
 77 
  dd	 0x0
Line 76... Line 78...
76 
 
 78 
 
Line 77... Line 79...
77 
  include '..\..\..\macros.inc'
 79 
  include '../../../macros.inc'
78 
 
 80 
 
79 
  WIN_W  equ 295            ; è¨à¨­  ®ª­ 
 81 
  WIN_W  equ 295	    ; è¨à¨­  ®ª­ 
80 
  WIN_H  equ 195            ; ¢ëá®â  ®ª­ 
 82 
  WIN_H  equ 195	    ; ¢ëá®â  ®ª­ 
Line 464... Line 466...
464 
 
 466 
 
465 
    mov     eax,15                        ; ”ã­ªæ¨ï 15 - à ¡®â  á ä®­®¢®© £à ä¨ª®©
 467 
    mov     eax,15			  ; ”ã­ªæ¨ï 15 - à ¡®â  á ä®­®¢®© £à ä¨ª®©
466 
    mov     ebx,3                         ; ®¤äã­ªæ¨ï 3 - ¯¥à¥à¨á®¢ âì ä®­.
 468 
    mov     ebx,3			  ; ®¤äã­ªæ¨ï 3 - ¯¥à¥à¨á®¢ âì ä®­.
Line -... Line 469...
- 
 
 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
467 
    int     0x40                          ; ‚ë§ë¢ ¥¬
 492 
    mcall   70, fi
468 
 
 493 
 
Line 469... Line 494...
469 
    ret
 494 
    ret
470 
;end_set_background
 495 
;end_set_background
Line 911... Line 936...
911 
    mov     eax,4                         ; 4 - ¢ë¢¥á⨠áâபã ⥪áâ  ¢ ®ª­®
 936 
    mov     eax,4			  ; 4 - ¢ë¢¥á⨠áâபã ⥪áâ  ¢ ®ª­®
912 
    mov     ebx,16 shl 16+40              ; [ª®®à¤¨­ â  ¯® ®á¨ x]*65536 + [ª®®à¤¨­ â  ¯® ®á¨ y]
 937 
    mov     ebx,16 shl 16+40		  ; [ª®®à¤¨­ â  ¯® ®á¨ x]*65536 + [ª®®à¤¨­ â  ¯® ®á¨ y]
913 
    mov     ecx,0x0                       ; 0xX0RRGGBB (RR, GG, BB § ¤ îâ 梥â ⥪áâ )
 938 
    mov     ecx,0x0			  ; 0xX0RRGGBB (RR, GG, BB § ¤ îâ 梥â ⥪áâ )
914 
    mov     edx,cname                     ; 㪠§ â¥«ì ­  ­ ç «® áâப¨
 939 
    mov     edx,cname			  ; 㪠§ â¥«ì ­  ­ ç «® áâப¨
915 
    mov     esi,1                         ; ¢ë¢®¤¨âì esi ᨬ¢®«®¢
 940 
    mov     esi,1			  ; ¢ë¢®¤¨âì esi ᨬ¢®«®¢
916 
    newline:                              ; 横«
 941 
    newline_s:				  ; 横«
917 
      int     0x40                        ; à¥à뢠­¨¥
 942 
      int     0x40			  ; à¥à뢠­¨¥
918 
      add     ebx,23 shl 16               ; „®¡ ¢«ï¥¬
 943 
      add     ebx,23 shl 16		  ; „®¡ ¢«ï¥¬
919 
      add     edx,1                       ; „®¡ ¢«ï¥¬
 944 
      add     edx,1			  ; „®¡ ¢«ï¥¬
920 
      cmp     [edx],byte 'x'              ; ‘à ¢­¥­¨¥ á ¡ ©â®¬ å
 945 
      cmp     [edx],byte 'x'		  ; ‘à ¢­¥­¨¥ á ¡ ©â®¬ å
921 
    jne    newline                        ; …᫨ ­¥ ­ã«ì ¨«¨ ­¥ à ¢­®
 946 
    jne    newline_s			  ; …᫨ ­¥ ­ã«ì ¨«¨ ­¥ à ¢­®
Line 922... Line 947...
922 
 
 947 
 
923 
    ;.................................................................................................
 948 
    ;.................................................................................................
924 
    ; Žâà¨á®¢ª  á« ©¤¥à®¢
 949 
    ; Žâà¨á®¢ª  á« ©¤¥à®¢
925 
    ;.................................................................................................
 950 
    ;.................................................................................................
Line 1014... Line 1039...
1014 
    int     0x40
 1039 
    int     0x40
1015 
    ret                                   ; ‚®§¢à é ¥¬ ã¯à ¢«¥­¨¥
 1040 
    ret 				  ; ‚®§¢à é ¥¬ ã¯à ¢«¥­¨¥
1016 
;end_draw_value
 1041 
;end_draw_value
Line 1017... Line 1042...
1017 
 
 1042 
 
- 
 
 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 1018... Line -...
1018 
  _read_params:
 - 
 
1019 
 
 - 
 
1020 
      mov al,[params+2]
 - 
 
1021 
      mov [params_c+0],al
 1051 
      mcall 70, fi
1022 
 
 - 
 
1023 
      mov al,[params+3]
 - 
 
1024 
      mov [params_c+1],al
 - 
 
1025 
 
 - 
 
1026 
      mov al,[params+4]
 - 
 
1027 
      mov [params_c+2],al
 - 
 
1028 
 
 - 
 
1029 
      mov al,[params+5]
 - 
 
1030 
      mov [params_c+3],al
 - 
 
1031 
 
 - 
 
1032 
      mov al,[params+6]
 - 
 
1033 
      mov [params_c+4],al
 1052 
 
1034 
 
 - 
 
1035 
      mov al,[params+7]
 - 
 
1036 
      mov [params_c+5],al
 1053 
      xor   eax, eax
1037 
 
 - 
 
1038 
      mov al,[params+8]
 - 
 
1039 
      mov [params_c+6],al
 1054 
      mov   al, [fi.file+2]
1040 
 
 - 
 
1041 
      mov al,[params+9]
 - 
 
1042 
      mov [params_c+7],al
 - 
 
1043 
 
 1055 
      shl   eax, 8
1044 
      mov   esi,params_c
 1056 
      mov   al, [fi.file+1]
1045 
      mov   ecx,16
 1057 
      shl   eax, 8
Line 1046... Line -...
1046 
      call  ascii2int
 - 
 
1047 
      mov   [color],eax
 - 
 
1048 
 
 - 
 
1049 
      mov al,[params+11]
 - 
 
1050 
      mov [params_c+0],al
 1058 
      mov   al, [fi.file+0]
1051 
 
 - 
 
1052 
      mov al,[params+12]
 - 
 
1053 
      mov [params_c+1],al
 - 
 
1054 
 
 - 
 
1055 
      mov al,[params+13]
 - 
 
1056 
      mov [params_c+2],al
 - 
 
1057 
 
 - 
 
1058 
      mov al,[params+14]
 1059 
      mov   [color], eax
1059 
      mov [params_c+3],al
 - 
 
1060 
 
 - 
 
1061 
      mov al,[params+15]
 - 
 
1062 
      mov [params_c+4],al
 - 
 
1063 
 
 - 
 
1064 
      mov al,[params+16]
 - 
 
1065 
      mov [params_c+5],al
 1060 
 
1066 
 
 - 
 
1067 
      mov al,[params+17]
 1061 
      xor   eax, eax
1068 
      mov [params_c+6],al
 - 
 
1069 
 
 - 
 
1070 
      mov al,[params+18]
 - 
 
1071 
      mov [params_c+7],al
 1062 
      mov   al, [fi.file+5]
1072 
 
 1063 
      shl   eax, 8
1073 
      mov   esi,params_c
 1064 
      mov   al, [fi.file+4]
Line -... Line 1065...
- 
 
 1065 
      shl   eax, 8
- 
 
 1066 
      mov   al, [fi.file+3]
- 
 
 1067 
      mov   [color2], eax
- 
 
 1068 
 
- 
 
 1069 
   ;   mov al,[params+2]
- 
 
 1070 
   ;   mov [params_c+0],al
- 
 
 1071 
   ;
- 
 
 1072 
   ;   mov al,[params+3]
- 
 
 1073 
   ;   mov [params_c+1],al
- 
 
 1074 
   ;
- 
 
 1075 
   ;   mov al,[params+4]
- 
 
 1076 
   ;   mov [params_c+2],al
- 
 
 1077 
   ;
- 
 
 1078 
   ;   mov al,[params+5]
- 
 
 1079 
   ;   mov [params_c+3],al
- 
 
 1080 
   ;
- 
 
 1081 
   ;   mov al,[params+6]
- 
 
 1082 
   ;   mov [params_c+4],al
- 
 
 1083 
   ;
- 
 
 1084 
   ;   mov al,[params+7]
- 
 
 1085 
   ;   mov [params_c+5],al
- 
 
 1086 
   ;
- 
 
 1087 
   ;   mov al,[params+8]
- 
 
 1088 
   ;   mov [params_c+6],al
- 
 
 1089 
   ;
- 
 
 1090 
   ;   mov al,[params+9]
- 
 
 1091 
   ;   mov [params_c+7],al
- 
 
 1092 
   ;
- 
 
 1093 
   ;   mov   esi,params_c
- 
 
 1094 
   ;   mov   ecx,16
- 
 
 1095 
   ;   call  ascii2int
- 
 
 1096 
   ;   mov   [color],eax
- 
 
 1097 
   ;
- 
 
 1098 
   ;   mov al,[params+11]
- 
 
 1099 
   ;   mov [params_c+0],al
- 
 
 1100 
   ;
- 
 
 1101 
   ;   mov al,[params+12]
- 
 
 1102 
   ;   mov [params_c+1],al
- 
 
 1103 
   ;
- 
 
 1104 
   ;   mov al,[params+13]
- 
 
 1105 
   ;   mov [params_c+2],al
- 
 
 1106 
   ;
- 
 
 1107 
   ;   mov al,[params+14]
- 
 
 1108 
   ;   mov [params_c+3],al
- 
 
 1109 
   ;
- 
 
 1110 
   ;   mov al,[params+15]
- 
 
 1111 
   ;   mov [params_c+4],al
- 
 
 1112 
   ;
- 
 
 1113 
   ;   mov al,[params+16]
- 
 
 1114 
   ;   mov [params_c+5],al
- 
 
 1115 
   ;
- 
 
 1116 
   ;   mov al,[params+17]
- 
 
 1117 
   ;   mov [params_c+6],al
- 
 
 1118 
   ;
- 
 
 1119 
   ;   mov al,[params+18]
- 
 
 1120 
   ;   mov [params_c+7],al
- 
 
 1121 
   ;
- 
 
 1122 
   ;   mov   esi,params_c
1074 
      mov   ecx,16
 1123 
   ;   mov   ecx,16
Line 1075... Line 1124...
1075 
      call  ascii2int
 1124 
   ;   call  ascii2int
1076 
      mov   [color2],eax
 1125 
   ;   mov   [color2],eax
1077 
 
 1126 
 
Line 1228... Line 1277...
1228 
;#___________________________________________________________________________________________________
 1277 
;#___________________________________________________________________________________________________
1229 
;****************************************************************************************************|
 1278 
;****************************************************************************************************|
1230 
; ‹ŽŠ ……Œ…›• ˆ ŠŽ‘’€’                                                                         |
 1279 
; ‹ŽŠ ……Œ…›• ˆ ŠŽ‘’€’                                                                         |
1231 
;----------------------------------------------------------------------------------------------------/
 1280 
;----------------------------------------------------------------------------------------------------/
1232 
circle:
 1281 
circle:
- 
 
 1282 
    dat_file	db '/sys/settings/wallpaper.dat', 0
- 
 
 1283 
 
1233 
    cm          db 12 dup(0)
 1284 
    cm		db 12 dup(0)
1234 
    color       dd 00000000h              ; åà ­¨â §­ ç¥­¨¥ ¢ë¡à ­­®£® 梥â 
 1285 
    color	dd 00000000h		  ; åà ­¨â §­ ç¥­¨¥ ¢ë¡à ­­®£® 梥â 
1235 
    color2      dd 00FFFFFFh              ; åà ­¨â §­ ç¥­¨¥ ¢â®à®£® ¢ë¡à ­­®£® 梥â 
 1286 
    color2	dd 00FFFFFFh		  ; åà ­¨â §­ ç¥­¨¥ ¢â®à®£® ¢ë¡à ­­®£® 梥â 
1236 
    mouse_x     dd 0                      ; åà ­¨â £«®¡ «ì­ãî å ª®®à¤¨­ âã ¬ëè¨
 1287 
    mouse_x	dd 0			  ; åà ­¨â £«®¡ «ì­ãî å ª®®à¤¨­ âã ¬ëè¨
1237 
    mouse_y     dd 0                      ; åà ­¨â £«®¡ «ì­ãî ã ª®®à¤¨­ âã ¬ëè¨
 1288 
    mouse_y	dd 0			  ; åà ­¨â £«®¡ «ì­ãî ã ª®®à¤¨­ âã ¬ëè¨
Line 1252... Line 1303...
1252 
    bground     db 'BACKGROUND',0         ; ¨¬ï ª­®¯ª¨ - 14
 1303 
    bground	db 'BACKGROUND',0	  ; ¨¬ï ª­®¯ª¨ - 14
1253 
    pnext       dd 0                      ; áç¥â稪 ¯¥à¥ª«î祭¨ï ¯ «¨âàë
 1304 
    pnext	dd 0			  ; áç¥â稪 ¯¥à¥ª«î祭¨ï ¯ «¨âàë
1254 
    renmode     dd 0                      ; ०¨¬ ®âà¨á®¢ª¨ (1-梥⮢ ï á奬 ,2-¯¨¯¥âª ,3-ªà㣮¢ ï)
 1305 
    renmode	dd 0			  ; ०¨¬ ®âà¨á®¢ª¨ (1-梥⮢ ï á奬 ,2-¯¨¯¥âª ,3-ªà㣮¢ ï)
1255 
    runmode     dd 1                      ; ०¨¬ § ¯ã᪠ (1-normal, 2-hidden, 3-colordialog)
 1306 
    runmode	dd 1			  ; ०¨¬ § ¯ã᪠ (1-normal, 2-hidden, 3-colordialog)
1256 
    params      db 20 dup(0)              ; ¯à¨ñ¬ ¯ à ¬¥â஢
 1307 
    params	db 20 dup(0)		  ; ¯à¨ñ¬ ¯ à ¬¥â஢
1257 
    params_c    db 9  dup(0)              ; ¯à¨ñ¬­¨ª ¤«ï 梥â 
 1308 
 ;   params_c    db 9  dup(0)              ; ¯à¨ñ¬­¨ª ¤«ï 梥â 
1258 
 
 - 
 
1259 
 
 - 
 
1260 
 
 - 
 
1261 
I_END:
 1309 
I_END:
Line -... Line 1310...
- 
 
 1310 
 
- 
 
 1311 
 
- 
 
 1312 
fi:
- 
 
 1313 
 .p00:
- 
 
 1314 
    rd	    1
- 
 
 1315 
 .p04:
- 
 
 1316 
    rd	    1
- 
 
 1317 
 .p08:
- 
 
 1318 
    rd	    1
- 
 
 1319 
 .p12:
- 
 
 1320 
    rd	    1
- 
 
 1321 
 .p16:
- 
 
 1322 
    rd	    1
- 
 
 1323 
 .p20:
- 
 
 1324 
    rb	    1
- 
 
 1325 
 .p21:
- 
 
 1326 
    rd	    1
- 
 
 1327 
 .file:
- 
 
 1328 
    rb	    32
1262 
>
 1329