Subversion Repositories Kolibri OS

Rev

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

Rev 7646 Rev 7648
Line 814... Line 814...
814 
 
 814 
 
815 
;---------------------------------------------------------------------
 815 
;---------------------------------------------------------------------
816 
;---  Ž…„…‹…ˆ… ˆ Ž’ˆ‘Ž‚Š€ ŽŠ€  ----------------------------------
 816 
;---  Ž…„…‹…ˆ… ˆ Ž’ˆ‘Ž‚Š€ ŽŠ€  ----------------------------------
Line -... Line 817...
- 
 
 817 
;---------------------------------------------------------------------
- 
 
 818 
 
- 
 
 819 
WHITE_W=48   ; While key width
- 
 
 820 
BLACK_W=30   ; Black key width
817 
;---------------------------------------------------------------------
 821 
BLACK_X=34   ; Black key X offset
Line 818... Line 822...
818 
 
 822 
 
Line 819... Line 823...
819 
draw_window:
 823 
draw_window:
Line 833... Line 837...
833 
;   mov  edi,header              ; ‡€ƒŽ‹Ž‚ŽŠ ŽŠ€
 837 
;   mov  edi,header              ; ‡€ƒŽ‹Ž‚ŽŠ ŽŠ€
834 
;   int  0x40
 838 
;   int  0x40
Line 835... Line 839...
835 
 
 839 
 
836 
    mov   edx, [sc.work]	 ; 梥â ä®­ 
 840 
    mov   edx, [sc.work]	 ; 梥â ä®­ 
837 
    or	  edx, 0x33000000	 ; ¨ ⨯ ®ª­  3
 841 
    or	  edx, 0x33000000	 ; ¨ ⨯ ®ª­  3
Line 838... Line 842...
838 
    mcall 0, <0,760>, <200,250>, , ,title
 842 
    mcall 0, <20,WHITE_W*15+9>, <200,250>, , ,title
839 
 
 843
840 
    mcall 8,  <0,50>, <0,100>, 0x21, 0xff7a74
 844 
    mcall 8,  , <0,100>, 0x21, 0xff7a74
841 
    mcall 8,  <50,50>, <0,100>, 0x23, 0x907040
 845 
    mcall 8,  , <0,100>, 0x23, 0x907040
842 
    mcall 8,  <100,50>, <0,100>, 0x25, 0xa08050
 846 
    mcall 8,  , <0,100>, 0x25, 0xa08050
843 
    mcall 8,  <150,50>, <0,100>, 0x26, 0xb09060
 847 
    mcall 8,  , <0,100>, 0x26, 0xb09060
844 
    mcall 8,  <200,50>, <00,100>, 0x28, 0xc0a070
 848 
    mcall 8,  , <00,100>, 0x28, 0xc0a070
845 
    mcall 8,  <250,50>, <00,100>, 0x2a, 0xd0b080
 849 
    mcall 8,  , <00,100>, 0x2a, 0xd0b080
846 
    mcall 8,  <300,50>, <0,100>, 0x2c, 0xe0c090
 850 
    mcall 8,  , <0,100>, 0x2c, 0xe0c090
847 
    mcall 8,  <350,50>, <0,100>, 0x31, 0xffa97c
 851 
    mcall 8,  , <0,100>, 0x31, 0xffa97c
848 
    mcall 8,  <400,50>, <0,100>, 0x33, 0xaf8d8d
 852 
    mcall 8,  , <0,100>, 0x33, 0xaf8d8d
849 
    mcall 8,  <450,50>, <0,100>, 0x35, 0xbf9d9d
 853 
    mcall 8,  , <0,100>, 0x35, 0xbf9d9d
850 
    mcall 8,  <500,50>, <0,100>, 0x36, 0xcfadad
 854 
    mcall 8,  , <0,100>, 0x36, 0xcfadad
851 
    mcall 8,  <550,50>, <00,100>, 0x38, 0xdfbdbd
 855 
    mcall 8,  , <00,100>, 0x38, 0xdfbdbd
852 
    mcall 8,  <600,50>, <00,100>, 0x3a, 0xefcdcd
 856 
    mcall 8,  , <00,100>, 0x3a, 0xefcdcd
853 
    mcall 8,  <650,50>, <0,100>, 0x3c, 0xffdddd
 857 
    mcall 8,  , <0,100>, 0x3c, 0xffdddd
854 
    mcall 8,  <700,50>, <0,100>, 0x41, 0xffe558
 858 
    mcall 8,  , <0,100>, 0x41, 0xffe558
855 
 
 859 
 
856 
    mcall 8,  <35,30>, <0,50>, 0x22, 0x221100
 860 
    mcall 8,  , <0,50>, 0x22, 0x221100
857 
    mcall 8,  <85,30>, <0,50>, 0x24, 0x221100
 861 
    mcall 8,  , <0,50>, 0x24, 0x221100
858 
    mcall 8,  <185,30>, <0,50>, 0x27, 0x221100
 862 
    mcall 8,  , <0,50>, 0x27, 0x221100
859 
    mcall 8,  <235,30>, <0,50>, 0x29, 0x221100
 863 
    mcall 8,  , <0,50>, 0x29, 0x221100
860 
    mcall 8,  <285,30>, <0,50>, 0x2b, 0x221100
 864 
    mcall 8,  , <0,50>, 0x2b, 0x221100
861 
    mcall 8,  <385,30>, <0,50>, 0x32, 0x221100
 865 
    mcall 8,  , <0,50>, 0x32, 0x221100
862 
    mcall 8,  <435,30>, <0,50>, 0x34, 0x221100
 866 
    mcall 8,  , <0,50>, 0x34, 0x221100
863 
    mcall 8,  <535,30>, <0,50>, 0x37, 0x221100
 867 
    mcall 8,  , <0,50>, 0x37, 0x221100
864 
    mcall 8,  <585,30>, <0,50>, 0x39, 0x221100
 868 
    mcall 8,  , <0,50>, 0x39, 0x221100
865 
    mcall 8,  <635,30>, <0,50>, 0x3b, 0x221100
 869 
    mcall 8,  , <0,50>, 0x3b, 0x221100
866 
 
 870 
 
867 
    mcall 8,  <0,50>, <100,100>, 0xa1, 0x702050
 871 
    mcall 8,  , <100,100>, 0xa1, 0x702050
868 
    mcall 8,  <50,50>, <100,100>, 0x03, 0x683638
 872 
    mcall 8,  , <100,100>, 0x03, 0x683638
869 
    mcall 8,  <100,50>, <100,100>, 0x05, 0x784648
 873 
    mcall 8,  , <100,100>, 0x05, 0x784648
870 
    mcall 8,  <150,50>, <100,100>, 0x06, 0x885658
 874 
    mcall 8,  , <100,100>, 0x06, 0x885658
871 
    mcall 8,  <200,50>, <100,100>, 0x08, 0x986668
 875 
    mcall 8,  , <100,100>, 0x08, 0x986668
872 
    mcall 8,  <250,50>, <100,100>, 0x0a, 0xa87678
 876 
    mcall 8,  , <100,100>, 0x0a, 0xa87678
873 
    mcall 8,  <300,50>, <100,100>, 0x0c, 0xb88688
 877 
    mcall 8,  , <100,100>, 0x0c, 0xb88688
874 
    mcall 8,  <350,50>, <100,100>, 0x11, 0x880040
 878 
    mcall 8,  , <100,100>, 0x11, 0x880040
875 
    mcall 8,  <400,50>, <100,100>, 0x13, 0x90622b
 879 
    mcall 8,  , <100,100>, 0x13, 0x90622b
876 
    mcall 8,  <450,50>, <100,100>, 0x15, 0xa0723b
 880 
    mcall 8,  , <100,100>, 0x15, 0xa0723b
877 
    mcall 8,  <500,50>, <100,100>, 0x16, 0xb0824b
 881 
    mcall 8,  , <100,100>, 0x16, 0xb0824b
878 
    mcall 8,  <550,50>, <100,100>, 0x18, 0xc0925b
 882 
    mcall 8,  , <100,100>, 0x18, 0xc0925b
879 
    mcall 8,  <600,50>, <100,100>, 0x1a, 0xd0a26b
 883 
    mcall 8,  , <100,100>, 0x1a, 0xd0a26b
880 
    mcall 8,  <650,50>, <100,100>, 0x1c, 0xe0b27b
 884 
    mcall 8,  , <100,100>, 0x1c, 0xe0b27b
881 
    mcall 8,  <700,50>, <100,100>, 0x21, 0xff7a74
 885 
    mcall 8,  , <100,100>, 0x21, 0xff7a74
882 
 
 886 
 
883 
    mcall 8,  <35,30>, <100,50>, 0x02, 0x221100
 887 
    mcall 8,  , <100,50>, 0x02, 0x221100
884 
    mcall 8,  <85,30>, <100,50>, 0x04, 0x221100
 888 
    mcall 8,  , <100,50>, 0x04, 0x221100
885 
    mcall 8,  <185,30>, <100,50>, 0x07, 0x221100
 889 
    mcall 8,  , <100,50>, 0x07, 0x221100
886 
    mcall 8,  <235,30>, <100,50>, 0x09, 0x221100
 890 
    mcall 8,  , <100,50>, 0x09, 0x221100
887 
    mcall 8,  <285,30>, <100,50>, 0x0b, 0x221100
 891 
    mcall 8,  , <100,50>, 0x0b, 0x221100
888 
    mcall 8,  <385,30>, <100,50>, 0x12, 0x221100
 892 
    mcall 8,  , <100,50>, 0x12, 0x221100
889 
    mcall 8,  <435,30>, <100,50>, 0x14, 0x221100
 893 
    mcall 8,  , <100,50>, 0x14, 0x221100
890 
    mcall 8,  <535,30>, <100,50>, 0x17, 0x221100
 894 
    mcall 8,  , <100,50>, 0x17, 0x221100
Line 891... Line 895...
891 
    mcall 8,  <585,30>, <100,50>, 0x19, 0x221100
 895 
    mcall 8,  , <100,50>, 0x19, 0x221100
892 
    mcall 8,  <635,30>, <100,50>, 0x1b, 0x221100
 896 
    mcall 8,  , <100,50>, 0x1b, 0x221100
893 
 
 897 
 
894 
 
 898 
 
895 
    ; ¢ë¢®¤ ⥪á⮢®© áâப¨
 899 
    ; ¢ë¢®¤ ⥪á⮢®© áâப¨
896 
    mov   ecx, [sc.work_text]	 ; 梥â ä®­ 
 900 
    mov   ecx, [sc.work_text]	 ; 梥â ä®­ 
897 
    or	  ecx, 0x90000000	 ; ¨ ⨯ áâப¨
 901 
    or	  ecx, 0x90000000	 ; ¨ ⨯ áâப¨
898 
    mcall 4, <50, 205>, , message
 902 
    mcall 4, <50, 205>, , message
899 
    mcall 4, <10, 235>, , message1
 - 
 
900 
    mcall 4, <10, 260>, , message2
 - 
 
901 
    mcall 4, <10, 285>, , message3
 - 
 
902 
    mcall 4, <10, 310>, , message4
 903 
    mcall 4, <10, 235>, , message1
903 
    mcall 4, <15, 185>, , message5
 - 
 
904 
    mcall 4, <65, 185>, , message6
 - 
 
905 
    mcall 4, <115, 185>, , message7
 - 
 
906 
    mcall 4, <165, 185>, , message8
 - 
 
Line 907... Line 904...
907 
    mcall 4, <210, 185>, , message9
 904 
    mcall 4, <10, 260>, , message2
Line 908... Line 905...
908 
    mcall 4, <265, 185>, , message10
 905 
    mcall 4, <10, 285>, , message3
Line 927... Line 924...
927 
 
 924 
 
Line 928... Line 925...
928 
sc system_colors
 925 
sc system_colors
929 
 
 926 
 
930 
message db '‘¯à ¢ª : éñ«ª­¨â¥ 2 à §  ­  § £®«®¢ª¥.',0
 927 
message db '‘¯à ¢ª : éñ«ª­¨â¥ 2 à §  ­  § £®«®¢ª¥.',0
931 
message1 db ' ¦¬¨â¥ «î¡ãî ª« ¢¨èã ¢  ­£«¨©áª®© à áª« ¤ª¥ - ',0
 928 
message1 db ' ¦¬¨â¥ «î¡ãî ª« ¢¨èã ¢  ­£«¨©áª®© à áª« ¤ª¥ - ',0
932 
message2  db '¤®«¦¥­ §¢ãç âì ¤¨­ ¬¨ª ª®¬¯ìîâ¥à .',0
 929 
message2  db '¤®«¦¥­ §¢ãç âì ¢áâ஥­­ë© ¤¨­ ¬¨ª ª®¬¯ìîâ¥à  (­¥ ª®«®­ª¨!)',0
933 
message3  db '®â  "„®" - ª« ¢¨è¨ V,Tab,U,Enter, ¯à¨ ¢ª«î祭¨¨',0
 - 
 
934 
message4  db 'Caps Lock - ª« ¢¨è¨ V,Q,I.',0
 - 
 
935 
message5  db '„Ž',0
 - 
 
936 
message6  db '…',0
 - 
 
937 
message7  db 'Œˆ',0
 930 
message3  db '®â  "„®" - ª« ¢¨è¨ V,Tab,U,Enter, ¯à¨ ¢ª«î祭¨¨',0
938 
message8  db '”€',0
 - 
 
939 
message9  db '‘Ž‹œ',0
 - 
 
940 
message10  db '‹Ÿ',0
 931 
message4  db 'Caps Lock - ª« ¢¨è¨ V,Q,I.',0
Line 941... Line 932...
941 
message11  db '‘ˆ',0
 932 
t_notes  db '„Ž    …    Œˆ    ”€   ‘Ž‹œ   ‹Ÿ    ‘ˆ    „Ž',0
Line 942... Line 933...
942 
title db '„¥â᪮¥ ¯¨ ­¨­®',0
 933 
title db '„¥â᪮¥ ¯¨ ­¨­®',0