Subversion Repositories Kolibri OS

Rev

Rev 327 | Rev 617 | Go to most recent revision | Show entire file | Regard 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