/programs/develop/tinypad/trunk/tp-common.asm |
---|
609,12 → 609,10 |
jz @f |
add edx,-4 |
@@: mcall 68,20 |
or eax,eax |
jz @f |
add ecx,-4 |
mov [eax],ecx |
add eax,4 |
@@: pop edx ecx ebx |
pop edx ecx ebx |
ret |
endp |
/programs/develop/tinypad/trunk/data/tp-tables.inc |
---|
101,7 → 101,6 |
accel_table2 dd \ |
1 ,key.alt_x ,\ |
2 ,key.ctrl_f4 ,\ |
'VSL',btn.vscroll_up ,\ |
'VSG',btn.vscroll_down ,\ |
'HSL',btn.hscroll_up ,\ |
118,7 → 117,6 |
20002,btn.bot.opensave ,\ |
20003,btn.bot.find ,\ |
20004,btn.bot.appearance,\ |
20007,btn.bot.no ,\ |
21001,btn.bot.tabpos ,\ |
0 |
/programs/develop/tinypad/trunk/data/tp-udata.inc |
---|
52,7 → 52,6 |
in_sel db ? |
do_not_draw db ? ; draw top and bottom buttons? |
main_closing db ? ; main window closing? |
main_closed db ? ; main window closed? |
tb_casesen db ? ; focused textbox is case-sensitive? |
96,13 → 95,11 |
just_from_popup db ? |
bot_mode db ? |
bot_mode2 db ? |
align 4 |
bot_dlg_height dd ? |
exit_tab_item dd ? |
exit_tab_num dd ? |
bot_dlg_mode2 db ? |
temp_buf dd ? |
copy_buf dd ? |
/programs/develop/tinypad/trunk/history.txt |
---|
7,8 → 7,8 |
(was opening in current tab if there was a new file, even modified) |
- show "save file" dialog for new files or files from Tinypad's home folder |
new features: |
- prompt to save modified file before closing (+fixes) |
- button to close current tab (+fixes) |
- prompt to save modified file before closing |
- button to close current tab |
- mouse scroll wheel support |
4.0.4 (mike.dld) |
/programs/develop/tinypad/trunk/tinypad.asm |
---|
1,9 → 1,9 |
;----------------------------------------------------------------------------- |
; project name: TINYPAD |
; compiler: flat assembler 1.67.21 |
; compiler: flat assembler 1.67.18 |
; memory to compile: 3.0/9.0 MBytes (without/with size optimizations) |
; version: 4.0.5 |
; last update: 2007-09-18 (Sep 18, 2007) |
; version: 4.0.4 |
; last update: 2007-02-08 (Feb 08, 2007) |
; minimal kernel: revision #270 (svn://kolibrios.org/kernel/trunk) |
;----------------------------------------------------------------------------- |
; originally by: Ville Michael Turjanmaa >> villemt@aton.co.jyu.fi |
34,7 → 34,7 |
header '01',1,@CODE,TINYPAD_END,STATIC_MEM_END,MAIN_STACK,@PARAMS,self_path |
APP_VERSION equ '4.0.5' |
APP_VERSION equ '4.0.4' |
TRUE = 1 |
FALSE = 0 |
/programs/develop/tinypad/trunk/tinypad.inc |
---|
108,7 → 108,7 |
if (lang eq _lang) | (_lang eq @!) |
if _title eq '-' |
db 1,'-' |
c2 = c2+2 |
c2 = c2+1 |
else |
virtual at 0 |
db _title |
150,7 → 150,7 |
m2 = -2 |
end if |
store word (m1*6+m2*6+6*8) at _name+POPUP.width |
store word (c1*POP_IHEIGHT+c2*POP_SHEIGHT+4) at _name+POPUP.height |
store word (c1*POP_IHEIGHT+c2*POP_SHEIGHT+3) at _name+POPUP.height |
store dword (((m1+2)*6-1)*65536) at _name+POPUP.acc_ofs |
end if |
} |
/programs/develop/tinypad/trunk/tp-dialog.asm |
---|
46,7 → 46,7 |
add ecx,(3+17)*65536+15 |
push ecx |
cmp [bot_mode2],0 |
cmp [bot_dlg_mode2],0 |
je @f |
add ebx,18 |
mcall 4,,[sc.work_text],s_2replace,s_2replace.size+1 |
58,7 → 58,7 |
shl ebx,16 |
push 20003 |
cmp [bot_mode2],0 |
cmp [bot_dlg_mode2],0 |
jne .draw.lp1 |
add ebx,-(2+6*(s_2find.size+2))*65536+6*(s_2find.size+2) |
push s_2find s_2find.size |
87,7 → 87,7 |
pop ecx |
cmp [bot_mode2],0 |
cmp [bot_dlg_mode2],0 |
je @f |
mov ebp,tb_replace |
mov eax,[p_info.client_box.width] |
114,7 → 114,7 |
ret |
..tab: |
cmp [bot_mode2],0 |
cmp [bot_dlg_mode2],0 |
je @f |
mov eax,tb_replace |
cmp eax,[focused_tb] |
145,7 → 145,7 |
add ecx,(2+18)*65536+15 |
push 20002 |
cmp [bot_mode2],0 |
cmp [bot_dlg_mode2],0 |
jne .draw.lp1 |
add ebx,-(2+6*(s_2open.size+2))*65536+6*(s_2open.size+2) |
push s_2open s_2open.size |
160,7 → 160,7 |
push 20001 s_2cancel s_2cancel.size |
call define_3d_button |
cmp [bot_mode2], 2 ; exit-save dialog |
cmp [bot_dlg_mode2], 2 ; exit-save dialog |
jne @f |
sub ebx,(6*(s_2save_no.size+2)+3)*65536 |
209,7 → 209,7 |
add ecx,(2+18)*65536+15 |
push 20002 |
cmp [bot_mode2],0 |
cmp [bot_dlg_mode2],0 |
jne .draw.lp1 |
add ebx,-(2+6*(s_2open.size+2))*65536+6*(s_2open.size+2) |
push s_2open s_2open.size |
590,7 → 590,6 |
btn.bot.cancel: |
xor eax,eax |
mov [bot_mode],al |
mov [main_closing],al |
mov [bot_dlg_height],eax |
mov [s_status],eax |
call drawwindow |
597,7 → 596,7 |
ret |
btn.bot.opensave: |
cmp [bot_mode2],0 |
cmp [bot_dlg_mode2],0 |
je .lp1 |
call save_file |
jnc @f |
614,18 → 613,13 |
ret |
btn.bot.no: |
call key.ctrl_f4.close |
xor eax,eax |
mov [bot_mode],al |
mov [bot_dlg_height],eax |
mov [s_status],eax |
call drawwindow |
cmp [main_closing],0 |
je @f |
add [exit_tab_item],sizeof.TABITEM |
jmp key.alt_x.direct |
ret |
@@: call key.ctrl_f4.close |
ret |
btn.bot.find: |
movzx ecx,[tb_find.length] |
635,7 → 629,7 |
cld |
rep movsb |
cmp [bot_mode2],0 |
cmp [bot_dlg_mode2],0 |
je @f |
call search |
jnc .found |
/programs/develop/tinypad/trunk/tp-draw.asm |
---|
209,20 → 209,30 |
jmp @b |
.exit: |
mov ebx,[mainwnd_pos.w] |
add ebx,-10-(ATOPH-6)-3 |
push ebx 2 (ATOPH-6) (ATOPH-6) |
call draw_3d_panel |
mov eax, 8 |
mov bx, word [mainwnd_pos.w] |
sub bx, 25 |
shl ebx,16 |
add ebx,ATOPH-6 |
mcall 8,,<2,ATOPH-6>,<0x4000,2> |
and ebx,0xFFFF0000 |
add ebx,(ATOPH-8)/2*65536+(ATOPH-8)/2 |
mcall 4,,[sc.work_text],.cross,1 |
add ebx, 12 |
mov ecx, 3 * 65536 + 12 |
mov edx, 177 |
mov esi, 0x00bcbec6 |
int 0x40 |
;mov eax, 4 |
shr eax, 1 |
sub ebx, -4 * 65536 |
mov bx, 6 |
mov ecx, 0 |
mov edx, cross |
mov esi, 1 |
int 0x40 |
ret |
.cross db 'x' |
cross: |
db 'X' |
endp |
;----------------------------------------------------------------------------- |
/programs/develop/tinypad/trunk/tp-key.asm |
---|
127,10 → 127,10 |
;----------------------------------------------------------------------------- |
proc key.ctrl_o ;///// ENTER OPEN FILENAME /////////////////////////////////// |
;----------------------------------------------------------------------------- |
mov [bot_mode2],0 |
mov [bot_dlg_mode2],0 |
.direct: |
cmp [bot_mode2], 2 |
cmp [bot_dlg_mode2], 2 |
je .ask |
mov [s_status],s_enter_filename |
jmp .ask1 |
164,7 → 164,7 |
ret |
key.shift_ctrl_s: |
mov [bot_mode2],1 |
mov [bot_dlg_mode2],1 |
jmp key.ctrl_o.direct |
endp |
178,7 → 178,7 |
;----------------------------------------------------------------------------- |
proc key.ctrl_f ;///// ENTER KEYWORD TO FIND ///////////////////////////////// |
;----------------------------------------------------------------------------- |
mov [bot_mode2],0 |
mov [bot_dlg_mode2],0 |
mov [bot_dlg_height],16*2+4*2-1 |
mov [s_status],s_enter_text_to_find |
205,7 → 205,7 |
endp |
proc key.ctrl_h |
mov [bot_mode2],1 |
mov [bot_dlg_mode2],1 |
mov [bot_dlg_height],16*3+4*2+1 |
mov [s_status],s_enter_text_to_replace |
216,7 → 216,7 |
proc key.ctrl_g |
ret |
@^ |
mov [bot_mode2],0 |
mov [bot_dlg_mode2],0 |
mov [bot_dlg_height],16*2+4*2-1 |
mov [bot_mode],1 |
1492,7 → 1492,7 |
;----------------------------------------------------------------------------- |
cmp [cur_editor.Modified],0 |
je .close |
mov [bot_mode2],2 |
mov [bot_dlg_mode2], 2 |
jmp key.ctrl_o.direct |
.close: |
mov [do_not_draw],1 |
1556,19 → 1556,6 |
;----------------------------------------------------------------------------- |
proc key.alt_x ;///// EXIT PROGRAM /////////////////////////////////////////// |
;----------------------------------------------------------------------------- |
mov [main_closing],1 |
mov eax,[tab_bar.Items] |
mov [exit_tab_item],eax |
mov eax,[tab_bar.Items.Count] |
mov [exit_tab_num],eax |
.direct: |
call try_to_close_tabs |
or eax,eax |
jz .close |
mov [bot_mode2],2 |
jmp key.ctrl_o.direct |
.close: |
mov esi,self_path |
mov byte[esi+PATHL-1],0 |
mov edi,f_info.path |
1587,30 → 1574,11 |
mov [f_info70+21],f_info.path |
mcall 70,f_info70 |
.bgn_rp: |
call key.ctrl_f4 |
.close: |
cmp [tab_bar.Items.Count],1 |
jne .bgn_rp |
mov [main_closed],1 |
mcall -1 |
endp |
;----------------------------------------------------------------------------- |
proc try_to_close_tabs ;///// FIND TABS TO BE SAVED BEFORE CLOSE ///////////// |
;----------------------------------------------------------------------------- |
push ecx ebp |
call flush_cur_tab |
mov ebp,[exit_tab_item] ; [tab_bar.Items] |
add ebp,-sizeof.TABITEM |
@@: dec [exit_tab_num] |
js .ok |
add ebp,sizeof.TABITEM |
mov al,[ebp+TABITEM.Editor.Modified] |
cmp [ebp+TABITEM.Editor.Modified],0 |
je @b |
mov [exit_tab_item],ebp |
call set_cur_tab |
call make_tab_visible |
xor eax,eax |
inc eax |
@@: pop ebp ecx |
ret |
.ok: xor eax,eax |
jmp @b |
endp |
/programs/develop/tinypad/trunk/tp-popup.asm |
---|
1,7 → 1,7 |
;POP_WIDTH = (popup_text.max_title+popup_text.max_accel+6)*6 |
POP_IHEIGHT = 16 |
POP_SHEIGHT = 2 |
POP_SHEIGHT = 3 |
;POP_HEIGHT = popup_text.cnt_item*POP_IHEIGHT+popup_text.cnt_sep*4+4 |
popup_thread_start: |
/programs/develop/tinypad/trunk/tp-tabctl.asm |
---|
4,14 → 4,12 |
; EBP = TABITEM* |
;----------------------------------------------------------------------------- |
push ecx esi edi |
mov esi,cur_tab |
mov edi,[tab_bar.Current.Ptr] |
or edi,edi |
jz @f |
mov esi,cur_tab |
mov ecx,sizeof.TABITEM/4 |
cld |
rep movsd |
@@: pop edi esi ecx |
pop edi esi ecx |
ret |
endp |
21,8 → 19,10 |
; EBP = TABITEM* |
;----------------------------------------------------------------------------- |
push ecx esi edi |
cmp [tab_bar.Current.Ptr],0 |
je @f |
call flush_cur_tab |
mov esi,ebp |
@@: mov esi,ebp |
mov edi,cur_tab |
mov ecx,sizeof.TABITEM/4 |
rep movsd |