tinypad 4.0.9 : save/load settings to/from ini file

git-svn-id: svn://kolibrios.org@5240 a494cfbc-eb01-0410-851d-a64ba20cac60

programs/develop/tinypad/trunk/history.txt

@@ -1,6 +1,10 @@
 
 HISTORY:
 
+4.0.9 (18/12/2014, Sergej Sakhno aka Punk_Joker)
+  new features:
+    - save/load settings to/from ini file
+
 4.0.8 (22/01/2014, Marat Zakiyanov aka Mario79, aka Mario)
   new features:
     - Support for kernel clipboard (f.54)

programs/develop/tinypad/trunk/tinypad.asm

@@ -1,9 +1,9 @@
 ;-----------------------------------------------------------------------------
 ; project name:      TINYPAD
-; compiler:          flat assembler 1.67.21
+; compiler:          flat assembler 1.71.16
 ; memory to compile: 3.0/9.0 MBytes (without/with size optimizations)
-; version:           SVN (4.0.8)
-; last update:       2014-01-22 (Jan 22, 2014)
+; version:           SVN (4.0.9)
+; last update:       2014-12-22 (Dec 18, 2014)
 ; minimal kernel:    revision #4199 (svn://kolibrios.org/kernel/trunk)
 ;-----------------------------------------------------------------------------
 ; originally by:     Ville Michael Turjanmaa >> villemt@aton.co.jyu.fi
@@ -34,9 +34,9 @@ include 'tinypad.inc'
 
 ;purge mov,add,sub            ;  SPEED
 
-header '01',1,@CODE,TINYPAD_END,STATIC_MEM_END,MAIN_STACK,@PARAMS,ini_path
+header '01',1,@CODE,TINYPAD_END,STATIC_MEM_END,MAIN_STACK,@PARAMS, 0x0;,ini_path
 
-APP_VERSION equ 'SVN (4.0.8)'
+APP_VERSION equ 'SVN (4.0.9)'
 
 TRUE = 1
 FALSE = 0
@@ -78,12 +78,12 @@ section @CODE ;:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
         or      eax,eax
         jnz     key.alt_x.close
 
-	mov	edi,ini_path
-	xor	al,al
-	mov	ecx,PATHL
-	repne	scasb
-	mov	dword[edi-1],'.ini'
-	mov	byte[edi+3],0
+        ;mov     edi,ini_path
+        ;xor     al,al
+        ;mov     ecx,PATHL
+        ;repne   scasb
+        ;mov     dword[edi-1],'.ini'
+        ;mov     byte[edi+3],0
 
         stdcall load_settings
 
@@ -696,7 +696,7 @@ p_info	process_information
 p_info2 process_information
 sc      system_colors
 
-ini_path rb PATHL
+ini_path db '/rd/1/settings/tinypad.ini',0
 
 ;---------------------------------------------------------------------
 temp_dir_pach:

programs/develop/tinypad/trunk/tp-popup.asm

@@ -280,7 +280,8 @@ onshow:
 	test	[line_nums],1
 	jnz	@f
 	and	byte[mm.Options+8],0xFD
-    @@: ret
+    @@: stdcall save_settings
+	ret
 
 pi_sel	 dd ?
 pi_cur	 dd ?