Subversion Repositories Kolibri OS

Rev

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

Rev 1432 Rev 1441
Line 1... Line 1...
1
; ìàêðîñ äëÿ ñèñòåìíîé áèáëèîòåêè box_lib.obj
1
; ìàêðîñ äëÿ ñèñòåìíîé áèáëèîòåêè box_lib.obj
2
; ýëåìåíò TreeList äëÿ Kolibri OS
2
; ýëåìåíò TreeList äëÿ Kolibri OS
3
; ôàéë ïîñëåäíèé ðàç èçìåíÿëñÿ 10.02.2010 IgorA
3
; ôàéë ïîñëåäíèé ðàç èçìåíÿëñÿ 26.03.2010 IgorA
4
; íà êîä ïðèìåíåíà GPL2 ëèöåíçèÿ
4
; íà êîä ïðèìåíåíà GPL2 ëèöåíçèÿ
Line 5... Line 5...
5
 
5
 
6
 
6
 
Line 95... Line 95...
95
  push eax ecx edi
95
  push eax ecx edi
96
    mov edi,dword[ebp+8]
96
    mov edi,dword[ebp+8]
Line 97... Line 97...
97
 
97
 
98
    xor ecx,ecx
98
    xor ecx,ecx
99
    mov cx,tl_info_size
99
    mov cx,tl_info_size
100
    imul ecx,dword[edi+6]
100
    imul ecx,tl_info_max_count
101
    call mem_Alloc
101
    call mem_Alloc
102
    mov dword[edi],eax ;êîïèðóåì óêàçàòåëü íà ïîëó÷åíóþ ïàìÿòü â ñòðóêòóðó
102
    mov dword[edi],eax ;êîïèðóåì óêàçàòåëü íà ïîëó÷åíóþ ïàìÿòü â ñòðóêòóðó
103
    mov tl_data_img,0  ;îáíóëÿåì óêàçàòåëü 'data_img'
103
    mov tl_data_img,0  ;îáíóëÿåì óêàçàòåëü 'data_img'
Line 104... Line 104...
104
    mov tl_data_img_sys,0 ;îáíóëÿåì óêàçàòåëü 'data_img_sys'
104
    mov tl_data_img_sys,0 ;îáíóëÿåì óêàçàòåëü 'data_img_sys'
105
 
105
 
106
    mov ecx,sizeof.TreeList
106
    mov ecx,sizeof.TreeList
107
    imul ecx,dword[edi+6]
107
    imul ecx,tl_info_max_count
Line 108... Line 108...
108
    call mem_Alloc
108
    call mem_Alloc
109
    mov tl_data_nodes,eax ;êîïèðóåì óêàçàòåëü íà ïîëó÷åíóþ ïàìÿòü â ñòðóêòóðó
109
    mov tl_data_nodes,eax ;êîïèðóåì óêàçàòåëü íà ïîëó÷åíóþ ïàìÿòü â ñòðóêòóðó
Line 141... Line 141...
141
  mov ebp,esp
141
  mov ebp,esp
142
    push ecx edi
142
    push ecx edi
143
    mov edi,dword[ebp+8]
143
    mov edi,dword[ebp+8]
144
    cmp tl_data_img,0
144
    cmp tl_data_img,0
145
    je @f
145
    je @f
146
      mov ecx,dword[edi+18]
146
      mov ecx,tl_data_img
147
      call mem_Free ;÷èñòêà ñèñòåìíûõ èêîíîê
147
      call mem_Free ;÷èñòêà ñèñòåìíûõ èêîíîê
148
    @@:
148
    @@:
149
    cmp tl_data_img_sys,0
149
    cmp tl_data_img_sys,0
150
    je @f
150
    je @f
151
      mov ecx,tl_data_img_sys
151
      mov ecx,tl_data_img_sys
Line 170... Line 170...
170
    mov dword[edi+34],0 ;ls_tim
170
    mov dword[edi+34],0 ;ls_tim
171
    mov tl_tim_undo,0
171
    mov tl_tim_undo,0
172
    mov tl_cur_pos,0
172
    mov tl_cur_pos,0
173
    ;xor ecx,ecx
173
    ;xor ecx,ecx
174
    mov ecx,sizeof.TreeList
174
    mov ecx,sizeof.TreeList
175
    imul ecx,dword[edi+6]
175
    imul ecx,tl_info_max_count
176
    mov eax,tl_data_nodes
176
    mov eax,tl_data_nodes
177
    @@:
177
    @@:
178
      mov byte[eax],0 ;÷èñòèì óçëû 0-ìè
178
      mov byte[eax],0 ;÷èñòèì óçëû 0-ìè
179
      inc eax
179
      inc eax
180
      loop @b
180
      loop @b
Line 1361... Line 1361...
1361
    mov edi,dword[ebp+16]
1361
    mov edi,dword[ebp+16]
Line 1362... Line 1362...
1362
 
1362
 
Line 1363... Line 1363...
1363
    call tl_info_set_undo
1363
    call tl_info_set_undo
1364
 
1364
 
1365
    mov ebx,sizeof.TreeList
1365
    mov ebx,sizeof.TreeList
1366
    imul ebx,dword[edi+6] ;+6 ìàêñ. êîëè÷åñòâî óçëîâ
1366
    imul ebx,tl_info_max_count
1367
    add ebx,tl_data_nodes
1367
    add ebx,tl_data_nodes
1368
;--
1368
;--
1369
    call tl_get_cur_node_index ;eax=po_t
1369
    call tl_get_cur_node_index ;eax=po_t