[Win32forth-cvs] win32forth/demos WINBROWS.F, 1.4, 1.5 WINDEMO.F, 1.2, 1.3

[Jos v.d.V. <jo...@us...>]

Update of /cvsroot/win32forth/win32forth/demos
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv3900

Modified Files:
	WINBROWS.F WINDEMO.F 
Log Message:
Jos: Adapted for the new console.

Index: WINBROWS.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/demos/WINBROWS.F,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** WINBROWS.F	18 Jul 2008 23:05:41 -0000	1.4
--- WINBROWS.F	17 Aug 2008 12:31:11 -0000	1.5
***************
*** 576,581 ****
                  again   ;
  
! ' winbrowse turnkey winbrows \ save the new application program .EXE and .IMG
  
  5 pause-seconds         \ pause for user to see what happened
  
--- 576,584 ----
                  again   ;
  
! \ The keyboard is used, so it needs a hidden console in the program.
! 
! in-hidden-console   0 0 ' winbrowse APPLICATION winbrowse.exe
  
  5 pause-seconds         \ pause for user to see what happened
  
+ \s

Index: WINDEMO.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/demos/WINDEMO.F,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** WINDEMO.F	5 May 2005 09:43:29 -0000	1.2
--- WINDEMO.F	17 Aug 2008 12:31:11 -0000	1.3
***************
*** 1072,1082 ****
                  'C' +k_control          of  false copy-demo-bitmap      endof
                  'C' +k_control +k_shift of  true  copy-demo-bitmap      endof
!                 'X' +k_control          of  false copy-demo-bitmap      
                                              k_esc pushkey               endof
                          endcase
                  again   ;
  
! ' windemo turnkey windemo       \ build an application on disk
  5 pause-seconds
  
-