Subversion Repositories Kolibri OS

Rev

Rev 327 | Rev 617 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 327 Rev 595
Line 128... Line 128...
128
func key.ctrl_o ;///// ENTER OPEN FILENAME ///////////////////////////////////
128
func key.ctrl_o ;///// ENTER OPEN FILENAME ///////////////////////////////////
129
;-----------------------------------------------------------------------------
129
;-----------------------------------------------------------------------------
130
	mov	[bot_dlg_mode2],0
130
	mov	[bot_dlg_mode2],0
Line 131... Line 131...
131
 
131
 
-
 
132
  .direct:
-
 
133
	cmp	[bot_dlg_mode2], 2
132
  .direct:
134
	je	.ask
-
 
135
	mov	[s_status],s_enter_filename
Line -... Line 136...
-
 
136
	jmp	.ask1
-
 
137
 
-
 
138
   .ask:
133
	mov	[s_status],s_enter_filename
139
	mov	[s_status],s_ask_save
134
 
140
  .ask1:
135
	mov	[bot_mode],1
141
	mov	[bot_mode],1
136
	mov	[bot_dlg_height],16*2+4*2-1
142
	mov	[bot_dlg_height],16*2+4*2-1
Line 146... Line 152...
146
endf
152
endf
Line 147... Line 153...
147
 
153
 
148
;-----------------------------------------------------------------------------
154
;-----------------------------------------------------------------------------
149
func key.ctrl_s ;///// ENTER SAVE FILENAME ///////////////////////////////////
155
func key.ctrl_s ;///// ENTER SAVE FILENAME ///////////////////////////////////
150
;-----------------------------------------------------------------------------
156
;-----------------------------------------------------------------------------
151
	cmp	[cur_editor.FilePath],'/'
157
	cmp	[cur_editor.FilePath], 0
152
	jne	key.shift_ctrl_s
158
	je	key.shift_ctrl_s
153
	cmp	[cur_editor.Modified],0
159
	cmp	[cur_editor.Modified],0
154
	je	.exit
160
	je	.exit
155
	call	save_file
161
	call	save_file
156
	call	drawwindow
162
	call	drawwindow
Line 1484... Line 1490...
1484
endf
1490
endf
Line 1485... Line 1491...
1485
 
1491
 
1486
;-----------------------------------------------------------------------------
1492
;-----------------------------------------------------------------------------
1487
func key.ctrl_f4 ;///// CLOSE CURRENT TAB ////////////////////////////////////
1493
func key.ctrl_f4 ;///// CLOSE CURRENT TAB ////////////////////////////////////
-
 
1494
;-----------------------------------------------------------------------------
-
 
1495
	cmp	[cur_editor.Modified], 0
-
 
1496
	je	.close
-
 
1497
	mov	[bot_dlg_mode2], 2
-
 
1498
	jmp	key.ctrl_o.direct
1488
;-----------------------------------------------------------------------------
1499
 .close:
1489
	mov	[do_not_draw],1
1500
	mov	[do_not_draw],1
1490
	push	[tab_bar.Current.Ptr]
1501
	push	[tab_bar.Current.Ptr]
1491
	cmp	[tab_bar.Items.Count],1
1502
	cmp	[tab_bar.Items.Count],1
1492
	jne	@f
1503
	jne	@f
-
 
1504
	;call    create_tab
1493
	call	create_tab
1505
	jmp	key.alt_x.close 	; close program
1494
    @@: pop	ebp
1506
    @@: pop	ebp
1495
	call	delete_tab
1507
	call	delete_tab
1496
	dec	[do_not_draw]
1508
	dec	[do_not_draw]
1497
	call	align_editor_in_tab
1509
	call	align_editor_in_tab
Line 1562... Line 1574...
1562
	mov	[f_info70+16],0
1574
	mov	[f_info70+16],0
1563
	mov	byte[f_info70+20],0
1575
	mov	byte[f_info70+20],0
1564
	mov	[f_info70+21],f_info.path
1576
	mov	[f_info70+21],f_info.path
1565
	mcall	70,f_info70
1577
	mcall	70,f_info70
Line -... Line 1578...
-
 
1578
 
-
 
1579
  .bgn_rp:
1566
 
1580
	call	key.ctrl_f4
-
 
1581
  .close:
-
 
1582
	cmp	[tab_bar.Items.Count],1
1567
  .close:
1583
	jne	.bgn_rp
1568
	mov	[main_closed],1
1584
	mov	[main_closed],1
1569
	mcall	-1
1585
	mcall	-1