Subversion Repositories Kolibri OS

Rev

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

Rev 299 Rev 340
Line 478... Line 478...
478 
  if SKIP eq 0
 478 
  if SKIP eq 0
479 
    mov  ecx,WIN_Y
 479 
    mov  ecx,WIN_Y
480 
  else
 480 
  else
481 
    mov  ecx,WIN_Y-15
 481 
    mov  ecx,WIN_Y-15
482 
  end if
 482 
  end if
483 
    mov  edx,0x03aabbcc 	   ; 梥â à ¡®ç¥© ®¡« á⨠ RRGGBB,8->color gl
 483 
    mov  edx,0x13aabbcc 	   ; 梥â à ¡®ç¥© ®¡« á⨠ RRGGBB,8->color gl
484 
    mov  esi,0x805080d0 	   ; 梥⠯®«®áë § £®«®¢ª  RRGGBB,8->color gl
 - 
 
485 
    mov  edi,0x005080d0 	   ; 梥â à ¬ª¨            RRGGBB
 484 
    mov  edi,header              ; § £®«®¢®ª
486 
    int  0x40
 485 
    int  0x40
487 
    call draw_week
 486 
    call draw_week
Line 488... Line 487...
488 
 
 487 
 
489 
    mov  eax,8
 488 
    mov  eax,8
Line 518... Line 517...
518 
    add  ebx,B_SPIN_WIDTH shl 16
 517 
    add  ebx,B_SPIN_WIDTH shl 16
519 
    inc  edx
 518 
    inc  edx
520 
    int  0x40
 519 
    int  0x40
521 
    call draw_days
 520 
    call draw_days
Line 522... Line -...
522 
 
 - 
 
523 
				   ; ‡€ƒŽ‹Ž‚ŽŠ ŽŠ€
 521 
 
524 
    mov  eax,4			   ; äã­ªæ¨ï 4 : ­ ¯¨á âì ¢ ®ª­¥ ⥪áâ
 - 
 
525 
    mov  ebx,8*65536+8		   ; [x] *65536 + [y]
 522 
    mov  eax,4			   ; äã­ªæ¨ï 4 : ­ ¯¨á âì ¢ ®ª­¥ ⥪áâ
526 
    mov  ecx,0x10ddeeff 	   ; èà¨äâ 1 ¨ 梥â ( 0xF0RRGGBB )
 - 
 
527 
    mov  edx,zagolovok		   ;  ¤à¥á áâப¨
 - 
 
528 
    mov  esi,zag_konets-zagolovok  ; ¨ ¥ñ ¤«¨­ 
 - 
 
Line 529... Line 523...
529 
    int  0x40
 523 
    mov  ecx,0x10ddeeff 	   ; èà¨äâ 1 ¨ 梥â ( 0xF0RRGGBB )
530 
 
 524 
 
531 
 if SKIP eq 0
 525 
 if SKIP eq 0
532 
    mov  ebx,B_DATE
 526 
    mov  ebx,B_DATE
Line 794... Line 788...
794 
 
 788 
 
795 
; ¨­â¥àä¥©á ¯à®£à ¬¬ë ¤¢ãï§ëç­ë© - § ¤ ©â¥ ï§ëª ¢ macros.inc
 789 
; ¨­â¥àä¥©á ¯à®£à ¬¬ë ¤¢ãï§ëç­ë© - § ¤ ©â¥ ï§ëª ¢ macros.inc
796 
day_count db 3,0,3,2,3,2,3,3,2,3,2,3
 790 
day_count db 3,0,3,2,3,2,3,3,2,3,2,3
Line 797... Line 791...
797 
Fkeys	  db 210,211,212,213,214,215,216,217,208,209,228,159
 791 
Fkeys	  db 210,211,212,213,214,215,216,217,208,209,228,159
798 
 
 792 
 
799 
zagolovok:		 ; áâப  § £®«®¢ª 
 793 
header:		 ; áâப  § £®«®¢ª 
800 
if lang eq ru
 794 
if lang eq ru
801 
     db   'Š€‹…„€œ'
 795 
     db   'Š€‹…„€œ',0
802 
else if lang eq ge
 796 
else if lang eq ge
803 
     db   'KALENDER'
 797 
     db   'KALENDER',0
804 
else if lang eq fr
 798 
else if lang eq fr
805 
     db   'CALENDRIER'
 799 
     db   'CALENDRIER',0
806 
else if lang eq et
 800 
else if lang eq et
807 
     db   'KALENDER'
 801 
     db   'KALENDER',0
808 
else
 802 
else
809 
     db   'CALENDAR'
 - 
 
- 
 
 803 
     db   'CALENDAR',0
810 
end if
 804 
end if
811 
zag_konets:		 ; ¨ ¥ñ ª®­¥æ
 805 
 
812 
if SKIP eq 0
 806 
if SKIP eq 0
813 
datebut:
 807 
datebut:
814 
if lang eq ru
 808 
if lang eq ru