Subversion Repositories Kolibri OS

Rev

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

Rev 2102 Rev 2324
Line 57... Line 57...
57
 
57
 
Line 58... Line 58...
58
ted_symbol_tab db 26 ;ascii ª®¤ áâ५ª¨ ¢¯à ¢®, ¨á¯®«ì§ã¥âáï ¤«ï à¨á®¢ ­¨ï â ¡ã«ï樨 ¢ ०¨¬¥ ¯®ª §  ­¥¢¨¤¨¬ëå ᨬ¢®«®¢
58
ted_symbol_tab db 26 ;ascii ª®¤ áâ५ª¨ ¢¯à ¢®, ¨á¯®«ì§ã¥âáï ¤«ï à¨á®¢ ­¨ï â ¡ã«ï樨 ¢ ०¨¬¥ ¯®ª §  ­¥¢¨¤¨¬ëå ᨬ¢®«®¢
Line 59... Line -...
59
 
-
 
60
if lang eq ru
-
 
61
 
-
 
62
txtFindCapt db '®¨áª',0
-
 
63
txtFindNext db ' ©â¨ ¤ «¥¥',0
59
 
64
txtFormatCapt db '”®à¬ â',0
60
if lang eq ru
65
txtFormatApply db 'à¨¬¥­¨âì',0
61
 
66
txtRow db '‘âப ',0
62
txtRow db '‘âப ',0
Line 67... Line 63...
67
txtCol db '‡­ ª',0
63
txtCol db '‡­ ª',0
Line 68... Line -...
68
txtOtm db 'Žâ¬¥­ë',0
-
 
69
txtBuf db 'ãä¥à:',0
-
 
70
 
-
 
71
else
-
 
72
 
64
txtOtm db 'Žâ¬¥­ë',0
73
txtFindCapt db 'Search',0
65
txtBuf db 'ãä¥à:',0
74
txtFindNext db 'Find next',0
66
 
75
txtFormatCapt db 'Format',0
67
else
Line 97... Line 89...
97
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
89
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
98
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
90
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
99
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
91
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
100
    db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
92
    db 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
101
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
93
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
102
;EvUpper - â ¡«¨æ  ¤«ï ¯à¥®¡à §®¢ ­¨ï ᨬ¢®«®¢ ª ¢¥àå­¥¬ã ॣ¨áâàã
-
 
103
EvUpper db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
104
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
105
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
106
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
107
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
108
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
109
    db 0,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79
-
 
110
    db 80,81,82,83,84,85,86,87,88,89,90,0,0,0,0,0
-
 
111
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
112
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
113
    db 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143
-
 
114
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
115
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
116
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
117
    db 144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159
-
 
118
    db 0,240,0,242,0,244,0,246,0,0,0,0,0,0,0,0
-
 
119
;EvLover - â ¡«¨æ  ¤«ï ¯à¥®¡à §®¢ ­¨ï ᨬ¢®«®¢ ª ­¨¦­¥¬ã ॣ¨áâàã
-
 
120
EvLover db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
121
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
122
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
123
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
124
    db 0,97,98,99,100,101,102,103,104,105,106,107,108,109,110,111
-
 
125
    db 112,113,114,115,116,117,118,119,120,121,122,0,0,0,0,0
-
 
126
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
127
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
128
    db 160,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175
-
 
129
    db 224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239
-
 
130
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
131
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
132
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
133
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
134
    db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-
 
135
    db 241,0,243,0,245,0,247,0,0,0,0,0,0,0,0,0
-
 
136
conv_table dd 0
-
 
137
 
-
 
Line 138... Line 94...
138
 
94
 
139
KM_SHIFT equ 0x00010000
95
KM_SHIFT equ 0x00010000
140
KM_CTRL equ 0x00020000
96
KM_CTRL equ 0x00020000
141
KM_ALT equ 0x00040000
97
KM_ALT equ 0x00040000
Line 1234... Line 1190...
1234
endp
1190
endp
Line 1235... Line 1191...
1235
 
1191
 
1236
;input:
1192
;input:
1237
;  ecx = position to free insert cell
1193
;  ecx = position to free insert cell
1238
;  edx = pointer to sumbol, when insert
1194
;  edx = pointer to sumbol, when insert
1239
;  esi = pointer to added symbol
1195
;  esi = added symbol
1240
;  edi = pointer to tedit struct
1196
;  edi = pointer to tedit struct
1241
;output:
1197
;output:
1242
;  ecx = position to inserted cell
1198
;  ecx = position to inserted cell
1243
align 4
1199
align 4
Line 1256... Line 1212...
1256
  .loop_e:
1212
  .loop_e:
Line 1257... Line 1213...
1257
 
1213
 
1258
  push eax ebx
1214
  push eax ebx
1259
  mov eax,ted_tim_ch
1215
  mov eax,ted_tim_ch
1260
  mov dword[ecx+10],eax
1216
  mov dword[ecx+10],eax
1261
  mov al,byte[esi]
1217
  mov ax,si
Line 1262... Line 1218...
1262
  mov byte[ecx],al
1218
  mov byte[ecx],al
1263
 
1219
 
1264
  call ted_get_text_arr_index ; *** eax=pos ***
1220
  call ted_get_text_arr_index ; *** eax=pos ***
Line 1280... Line 1236...
1280
  call ted_text_colored
1236
  call ted_text_colored
1281
  ret
1237
  ret
Line 1282... Line 1238...
1282
 
1238
 
1283
 
-
 
1284
;input:
1239
 
1285
; conv_table = pointert to convert table
1240
;input:
1286
; edi = pointer to tedit struct
1241
; edi = pointer to tedit struct
1287
;output:
1242
;output:
1288
; esi = count converted symbols
1243
; esi = count converted symbols
1289
;description:
1244
;description:
1290
; ”ã­ªæ¨ï ¨á¯®«ì§ã¥âáï ¤«ï ᬥ­ë ॣ¨áâà  ¢ë¡à ­­ëå ᨬ¢®«®¢
1245
; ”ã­ªæ¨ï ¨á¯®«ì§ã¥âáï ¤«ï ᬥ­ë ॣ¨áâà  ¢ë¡à ­­ëå ᨬ¢®«®¢
1291
align 4
1246
align 4
1292
proc ted_convert_sel_text
1247
proc ted_convert_sel_text, conv_fun:dword
1293
  locals
1248
  locals
1294
    conv_cou dd ?
1249
    conv_cou dd ?
1295
  endl
1250
  endl
Line 1317... Line 1272...
1317
 
1272
 
1318
    inc ted_tim_ch
1273
    inc ted_tim_ch
1319
    mov edx,eax ;i=p0;
1274
    mov edx,eax ;i=p0;
1320
    mov ecx,ted_ptr_free_symb
1275
    mov ecx,ted_ptr_free_symb
-
 
1276
    @@:
1321
    @@:
1277
      push eax
-
 
1278
      mov al,byte[edx]
1322
      mov esi,[edx]
1279
      call dword[conv_fun] ;¯à¥®¡à §®¢ ­¨¥ ᨬ¢®« 
1323
      and esi,0xff
1280
      mov esi,eax
1324
      add esi,[conv_table] ;EvUpper
1281
      cmp byte[edx],al
1325
      cmp byte [esi],0
1282
      pop eax
1326
      je .no_change
1283
      je .no_change
1327
	m2m dword [edx+14],ted_tim_ch
1284
	m2m dword [edx+14],ted_tim_ch
1328
	call ted_char_add ;b_pos=ted_char_add(tex[i].c^32,i,false,b_pos);
1285
	call ted_char_add ;b_pos=ted_char_add(tex[i].c^32,i,false,b_pos);
1329
	call ted_get_text_next_pos ;go to added symbol
1286
	call ted_get_text_next_pos ;go to added symbol
Line 2560... Line 2517...
2560
	pop edi esi ebx eax
2517
	pop edi esi ebx eax
2561
	ret
2518
	ret
2562
endp
2519
endp
Line 2563... Line 2520...
2563
 
2520
 
2564
align 4
2521
align 4
2565
proc ted_but_sumb_upper, edit:dword
-
 
2566
  push edi esi
2522
proc ted_but_sumb_upper uses edi esi, edit:dword
Line 2567... Line -...
2567
  mov edi,dword[edit]
-
 
2568
 
2523
	mov edi,dword[edit]
2569
  mov [conv_table],EvUpper
2524
 
2570
  call ted_convert_sel_text
2525
	stdcall ted_convert_sel_text,fb_char_toupper
2571
  cmp esi,0
2526
	cmp esi,0
2572
  je @f
2527
	je @f
2573
    stdcall ted_draw,edi
-
 
2574
  @@:
2528
		stdcall ted_draw,edi
2575
  pop esi edi
2529
	@@:
Line 2576... Line 2530...
2576
  ret
2530
	ret
2577
endp
2531
endp
2578
 
-
 
2579
align 4
2532
 
Line 2580... Line -...
2580
proc ted_but_sumb_lover, edit:dword
-
 
2581
  push edi esi
2533
align 4
2582
  mov edi,dword[edit]
2534
proc ted_but_sumb_lover uses edi esi, edit:dword
2583
 
2535
	mov edi,dword[edit]
2584
  mov [conv_table],EvLover
2536
 
2585
  call ted_convert_sel_text
2537
	stdcall ted_convert_sel_text,fb_char_todown
2586
  cmp esi,0
-
 
2587
  je @f
2538
	cmp esi,0
2588
    stdcall ted_draw,edi
2539
	je @f
Line 2589... Line 2540...
2589
  @@:
2540
		stdcall ted_draw,edi
2590
  pop esi edi
2541
	@@: