![]() | ||
| Home | SwiftX Archive | SwiftForth Archive | |

I have been running SwiftX for the 68S12s for nearly a year now, here is
how i did it.
1. Found out the values of a number of environment variables that are
needed by SwiftX and created a file swine.f with these variables
defined, see below. At the end of the file is the INCLUDE for the
standard SwiftX startup file. There is probably a more elegant way of
doing this.
{ SWINE.f SwiftX cross compiler with extra equates to work with WINE
Missing Definitions when trying to run SwiftX under Wine }
\ SWIFTX\XCOMP\SERIAL
260 CONSTANT MAX_PATH
-21474836648 CONSTANT GENERIC_READ
1073741824 CONSTANT GENERIC_WRITE
-2147483646 CONSTANT HKEY_LOCAL_MACHINE
131097 CONSTANT KEY_READ
2 CONSTANT LBS_SORT
256 CONSTANT LBS_NOINTEGRALHEIGHT
384 CONSTANT LB_ADDSTRING
390 CONSTANT LB_SETCURSEL
392 CONSTANT LB_GETCURSEL
393 CONSTANT LB_GETTEXT
1 CONSTANT IDOK
2 CONSTANT IDCANCEL
273 CONSTANT WM_COMMAND
272 CONSTANT WM_INITDIALOG
8 CONSTANT PURGE_RXCLEAR
3 CONSTANT OPEN_EXISTING
\ SWIFT\XCOMP\PROGRESS
32 CONSTANT CS_OWNDC
2 CONSTANT CS_HREDRAW
1 CONSTANT CS_VREDRAW
30 CONSTANT DLGWINDOWEXTRA
0 CONSTANT NULL
32512 CONSTANT IDC_ARROW
15 CONSTANT COLOR_BTNFACE
0 CONSTANT WS_SYSMENU \ 524288
1 CONSTANT PBS_SMOOTH
2 CONSTANT IDCANCEL
16 CONSTANT WM_CLOSE
10 CONSTANT SW_SHOWDEFAULT
1026 CONSTANT PBM_SETPOS
\ SWIFTX\XCOMP\STEPPER
2 CONSTANT WM_DESTROY
128 CONSTANT WS_EX_TOOLWINDOW
8 CONSTANT WS_EX_TOPMOST
0 CONSTANT WS_OVERLAPPEDWINDOW \ 13565952
1 CONSTANT SW_NORMAL
45 CONSTANT SM_CXEDGE
2 CONSTANT SM_CXVSCROLL
46 CONSTANT SM_CYEDGE
3 CONSTANT SM_CYHSCROLL
4 CONSTANT SM_CYCAPTION
0 CONSTANT WS_CHILD \ 1073741824
0 CONSTANT WS_VISIBLE \ 268435456
0 CONSTANT WS_BORDER \ 8388608
0 CONSTANT WS_HSCROLL \ 1048576
0 CONSTANT WS_VSCROLL \ 2097152
2048 CONSTANT ES_READONLY
256 CONSTANT ES_NOHIDESEL
0 CONSTANT ES_LEFT
128 CONSTANT ES_AUTOHSCROLL
64 CONSTANT ES_AUTOVSCROLL
4 CONSTANT ES_MULTILINE
1026 CONSTANT SB_GETTEXTA
1025 CONSTANT SB_SETTEXTA
512 CONSTANT SBT_POPOUT
1028 CONSTANT SB_SETPARTS
1024 CONSTANT WM_USER
513 CONSTANT WM_LBUTTONDOWN
516 CONSTANT WM_RBUTTONDOWN
514 CONSTANT WM_LBUTTONUP
517 CONSTANT WM_RBUTTONUP
5 CONSTANT WM_SIZE
0 CONSTANT WS_CLIPSIBLINGS \ 67108864
3 CONSTANT CCS_BOTTOM
-4 CONSTANT GWL_WNDPROC
10 CONSTANT OEM_FIXED_FONT
48 CONSTANT WM_SETFONT
1 CONSTANT WM_CREATE
3 CONSTANT WM_MOVE
177 CONSTANT EM_SETSEL
183 CONSTANT EM_SCROLLCARET
12 CONSTANT WM_SETTEXT
\ SWIFTX\XCOMP\GUI
0 CONSTANT MF_STRING
INCLUDE %SWIFTX\XCOMP\68HC12\SwiftX.f
2. Use regedit to put swiftx\bin in your path (key name is
MyComputer/HKEY_CURRENT_USER/Environment/PATH) if it not already there
3. Edit project.swx file to include SWINE.F instead of SwiftX.F
4. I have created a number of script files that log me into the project
area and start swiftx. For an example see below.
cd ~/forth/sys/callerid
wine sf -p ./project.swx
5. The newer versions of Wine set the DOS port definitions as symbolic
links in the directory ~/.wine/dosdevices. As an example to set up com1
as /dev/ttyUSB1 change directory to ~/.wine/dosdevices and use the
command ln -s /dev/ttyUSB1 com1
I haven't bothered trying to run an external editor.
I hope this is of use
Simon Matthews
On Wed, 2006-08-09 at 19:21 -0500, Dwight Schauer wrote:
----------------------------------------------------------------------
swiftx_at_forth.com The SwiftX programming discussion email list
To unsubscribe, send subject "unsubscribe" to swiftx-request_at_forth.com
For list command help, send subject "help" to swiftx-request_at_forth.com
Message archives are located at http://www.forth.com/archive/swiftx
----------------------------------------------------------------------
This list is a forum for SwiftX users. For product support and bug
reports, please send email to support_at_forth.com
----------------------------------------------------------------------
Received on Wed Aug 09 2006 - 19:39:31 PDT
This archive was generated by hypermail 2.2.0 : Tue Dec 02 2008 - 03:04:51 PST