Context Navigation

mainWindow.rbfrm @ 34

Revision 34, 115.4 KB checked in by pinwc4, 15 years ago (diff)
Corrected spelling mistakes

Line
1	#tag Window
2	Begin Window mainWindow
3	BackColor = &hFFFFFF
4	Backdrop = 1384026073
5	CloseButton = True
6	Composite = True
7	Frame = 0
8	FullScreen = False
9	HasBackColor = False
10	Height = 428
11	ImplicitInstance= True
12	LiveResize = True
13	MacProcID = 0
14	MaxHeight = 32000
15	MaximizeButton = False
16	MaxWidth = 32000
17	MenuBar = 1097909413
18	MenuBarVisible = True
19	MinHeight = 64
20	MinimizeButton = True
21	MinWidth = 64
22	Placement = 0
23	Resizeable = False
24	Title = "Flip Side ICS"
25	Visible = True
26	Width = 720
27	Begin PushButton PushButton_Read
28	AutoDeactivate = True
29	Bold = ""
30	Cancel = ""
31	Caption = "Read"
32	Default = ""
33	Enabled = False
34	Height = 20
35	HelpTag = ""
36	Index = -2147483648
37	InitialParent = ""
38	Italic = ""
39	Left = 413
40	LockBottom = True
41	LockedInPosition= False
42	LockLeft = ""
43	LockRight = ""
44	LockTop = ""
45	Scope = 0
46	TabIndex = 4
47	TabPanelIndex = 0
48	TabStop = True
49	TextFont = "System"
50	TextSize = 0
51	Top = 388
52	Underline = ""
53	Visible = True
54	Width = 88
55	End
56	Begin PushButton PushButton_Write
57	AutoDeactivate = True
58	Bold = ""
59	Cancel = ""
60	Caption = "Write"
61	Default = False
62	Enabled = False
63	Height = 20
64	HelpTag = ""
65	Index = -2147483648
66	InitialParent = ""
67	Italic = ""
68	Left = 512
69	LockBottom = True
70	LockedInPosition= False
71	LockLeft = ""
72	LockRight = ""
73	LockTop = ""
74	Scope = 0
75	TabIndex = 5
76	TabPanelIndex = 0
77	TabStop = True
78	TextFont = "System"
79	TextSize = 0
80	Top = 388
81	Underline = ""
82	Visible = True
83	Width = 88
84	End
85	Begin TabPanel TabPanel1
86	AutoDeactivate = True
87	Bold = ""
88	Enabled = True
89	Height = 366
90	HelpTag = ""
91	Index = -2147483648
92	InitialParent = ""
93	Italic = ""
94	Left = 195
95	LockBottom = ""
96	LockedInPosition= False
97	LockLeft = ""
98	LockRight = ""
99	LockTop = ""
100	Panels = ""
101	Scope = 0
102	SmallTabs = False
103	TabDefinition = "Car\rCustom"
104	TabIndex = 43
105	TabPanelIndex = 0
106	TabStop = True
107	TextFont = "System"
108	TextSize = 0
109	Top = 0
110	Underline = ""
111	Value = 1
112	Visible = True
113	Width = 525
114	Begin EditField EditField_Byte1
115	AcceptTabs = ""
116	Alignment = 0
117	AutoDeactivate = True
118	BackColor = &hFFFFFF
119	Bold = ""
120	Border = True
121	DataField = ""
122	DataSource = ""
123	Enabled = False
124	Format = ""
125	Height = 22
126	HelpTag = ""
127	Index = -2147483648
128	InitialParent = "TabPanel1"
129	Italic = ""
130	Left = 221
131	LimitText = 0
132	LockBottom = ""
133	LockedInPosition= False
134	LockLeft = ""
135	LockRight = ""
136	LockTop = ""
137	Mask = "###"
138	Multiline = ""
139	Password = ""
140	ReadOnly = ""
141	Scope = 0
142	ScrollbarHorizontal= ""
143	ScrollbarVertical= True
144	Styled = ""
145	TabIndex = 2
146	TabPanelIndex = 2
147	TabStop = True
148	Text = ""
149	TextColor = &h000000
150	TextFont = "System"
151	TextSize = 0
152	Top = 58
153	Underline = ""
154	UseFocusRing = True
155	Visible = True
156	Width = 32
157	End
158	Begin EditField EditField_Byte9
159	AcceptTabs = ""
160	Alignment = 0
161	AutoDeactivate = True
162	BackColor = &hFFFFFF
163	Bold = ""
164	Border = True
165	DataField = ""
166	DataSource = ""
167	Enabled = True
168	Format = ""
169	Height = 22
170	HelpTag = ""
171	Index = -2147483648
172	InitialParent = "TabPanel1"
173	Italic = ""
174	Left = 221
175	LimitText = 0
176	LockBottom = ""
177	LockedInPosition= False
178	LockLeft = ""
179	LockRight = ""
180	LockTop = ""
181	Mask = "###"
182	Multiline = ""
183	Password = ""
184	ReadOnly = ""
185	Scope = 0
186	ScrollbarHorizontal= ""
187	ScrollbarVertical= True
188	Styled = ""
189	TabIndex = 12
190	TabPanelIndex = 2
191	TabStop = True
192	Text = ""
193	TextColor = &h000000
194	TextFont = "System"
195	TextSize = 0
196	Top = 331
197	Underline = ""
198	UseFocusRing = True
199	Visible = True
200	Width = 32
201	End
202	Begin EditField EditField_Byte8
203	AcceptTabs = ""
204	Alignment = 0
205	AutoDeactivate = True
206	BackColor = &hFFFFFF
207	Bold = ""
208	Border = True
209	DataField = ""
210	DataSource = ""
211	Enabled = True
212	Format = ""
213	Height = 22
214	HelpTag = ""
215	Index = -2147483648
216	InitialParent = "TabPanel1"
217	Italic = ""
218	Left = 221
219	LimitText = 0
220	LockBottom = ""
221	LockedInPosition= False
222	LockLeft = ""
223	LockRight = ""
224	LockTop = ""
225	Mask = "###"
226	Multiline = ""
227	Password = ""
228	ReadOnly = ""
229	Scope = 0
230	ScrollbarHorizontal= ""
231	ScrollbarVertical= True
232	Styled = ""
233	TabIndex = 13
234	TabPanelIndex = 2
235	TabStop = True
236	Text = ""
237	TextColor = &h000000
238	TextFont = "System"
239	TextSize = 0
240	Top = 296
241	Underline = ""
242	UseFocusRing = True
243	Visible = True
244	Width = 32
245	End
246	Begin EditField EditField_Byte7
247	AcceptTabs = ""
248	Alignment = 0
249	AutoDeactivate = True
250	BackColor = &hFFFFFF
251	Bold = ""
252	Border = True
253	DataField = ""
254	DataSource = ""
255	Enabled = True
256	Format = ""
257	Height = 22
258	HelpTag = ""
259	Index = -2147483648
260	InitialParent = "TabPanel1"
261	Italic = ""
262	Left = 221
263	LimitText = 0
264	LockBottom = ""
265	LockedInPosition= False
266	LockLeft = ""
267	LockRight = ""
268	LockTop = ""
269	Mask = "###"
270	Multiline = ""
271	Password = ""
272	ReadOnly = ""
273	Scope = 0
274	ScrollbarHorizontal= ""
275	ScrollbarVertical= True
276	Styled = ""
277	TabIndex = 14
278	TabPanelIndex = 2
279	TabStop = True
280	Text = ""
281	TextColor = &h000000
282	TextFont = "System"
283	TextSize = 0
284	Top = 262
285	Underline = ""
286	UseFocusRing = True
287	Visible = True
288	Width = 32
289	End
290	Begin EditField EditField_Byte6
291	AcceptTabs = ""
292	Alignment = 0
293	AutoDeactivate = True
294	BackColor = &hFFFFFF
295	Bold = ""
296	Border = True
297	DataField = ""
298	DataSource = ""
299	Enabled = True
300	Format = ""
301	Height = 22
302	HelpTag = ""
303	Index = -2147483648
304	InitialParent = "TabPanel1"
305	Italic = ""
306	Left = 221
307	LimitText = 0
308	LockBottom = ""
309	LockedInPosition= False
310	LockLeft = ""
311	LockRight = ""
312	LockTop = ""
313	Mask = "###"
314	Multiline = ""
315	Password = ""
316	ReadOnly = ""
317	Scope = 0
318	ScrollbarHorizontal= ""
319	ScrollbarVertical= True
320	Styled = ""
321	TabIndex = 15
322	TabPanelIndex = 2
323	TabStop = True
324	Text = ""
325	TextColor = &h000000
326	TextFont = "System"
327	TextSize = 0
328	Top = 228
329	Underline = ""
330	UseFocusRing = True
331	Visible = True
332	Width = 32
333	End
334	Begin EditField EditField_Byte5
335	AcceptTabs = ""
336	Alignment = 0
337	AutoDeactivate = True
338	BackColor = &hFFFFFF
339	Bold = ""
340	Border = True
341	DataField = ""
342	DataSource = ""
343	Enabled = True
344	Format = ""
345	Height = 22
346	HelpTag = ""
347	Index = -2147483648
348	InitialParent = "TabPanel1"
349	Italic = ""
350	Left = 221
351	LimitText = 0
352	LockBottom = ""
353	LockedInPosition= False
354	LockLeft = ""
355	LockRight = ""
356	LockTop = ""
357	Mask = "###"
358	Multiline = ""
359	Password = ""
360	ReadOnly = ""
361	Scope = 0
362	ScrollbarHorizontal= ""
363	ScrollbarVertical= True
364	Styled = ""
365	TabIndex = 16
366	TabPanelIndex = 2
367	TabStop = True
368	Text = ""
369	TextColor = &h000000
370	TextFont = "System"
371	TextSize = 0
372	Top = 195
373	Underline = ""
374	UseFocusRing = True
375	Visible = True
376	Width = 32
377	End
378	Begin EditField EditField_Byte4
379	AcceptTabs = ""
380	Alignment = 0
381	AutoDeactivate = True
382	BackColor = &hFFFFFF
383	Bold = ""
384	Border = True
385	DataField = ""
386	DataSource = ""
387	Enabled = True
388	Format = ""
389	Height = 22
390	HelpTag = ""
391	Index = -2147483648
392	InitialParent = "TabPanel1"
393	Italic = ""
394	Left = 221
395	LimitText = 0
396	LockBottom = ""
397	LockedInPosition= False
398	LockLeft = ""
399	LockRight = ""
400	LockTop = ""
401	Mask = "###"
402	Multiline = ""
403	Password = ""
404	ReadOnly = ""
405	Scope = 0
406	ScrollbarHorizontal= ""
407	ScrollbarVertical= True
408	Styled = ""
409	TabIndex = 17
410	TabPanelIndex = 2
411	TabStop = True
412	Text = ""
413	TextColor = &h000000
414	TextFont = "System"
415	TextSize = 0
416	Top = 161
417	Underline = ""
418	UseFocusRing = True
419	Visible = True
420	Width = 32
421	End
422	Begin EditField EditField_Byte3
423	AcceptTabs = ""
424	Alignment = 0
425	AutoDeactivate = True
426	BackColor = &hFFFFFF
427	Bold = ""
428	Border = True
429	DataField = ""
430	DataSource = ""
431	Enabled = True
432	Format = ""
433	Height = 22
434	HelpTag = ""
435	Index = -2147483648
436	InitialParent = "TabPanel1"
437	Italic = ""
438	Left = 221
439	LimitText = 0
440	LockBottom = ""
441	LockedInPosition= False
442	LockLeft = ""
443	LockRight = ""
444	LockTop = ""
445	Mask = "###"
446	Multiline = ""
447	Password = ""
448	ReadOnly = ""
449	Scope = 0
450	ScrollbarHorizontal= ""
451	ScrollbarVertical= True
452	Styled = ""
453	TabIndex = 18
454	TabPanelIndex = 2
455	TabStop = True
456	Text = ""
457	TextColor = &h000000
458	TextFont = "System"
459	TextSize = 0
460	Top = 126
461	Underline = ""
462	UseFocusRing = True
463	Visible = True
464	Width = 32
465	End
466	Begin EditField EditField_Byte2
467	AcceptTabs = ""
468	Alignment = 0
469	AutoDeactivate = True
470	BackColor = &hFFFFFF
471	Bold = ""
472	Border = True
473	DataField = ""
474	DataSource = ""
475	Enabled = False
476	Format = ""
477	Height = 22
478	HelpTag = ""
479	Index = -2147483648
480	InitialParent = "TabPanel1"
481	Italic = ""
482	Left = 221
483	LimitText = 0
484	LockBottom = ""
485	LockedInPosition= False
486	LockLeft = ""
487	LockRight = ""
488	LockTop = ""
489	Mask = "###"
490	Multiline = ""
491	Password = ""
492	ReadOnly = ""
493	Scope = 0
494	ScrollbarHorizontal= ""
495	ScrollbarVertical= True
496	Styled = ""
497	TabIndex = 19
498	TabPanelIndex = 2
499	TabStop = True
500	Text = ""
501	TextColor = &h000000
502	TextFont = "System"
503	TextSize = 0
504	Top = 92
505	Underline = ""
506	UseFocusRing = True
507	Visible = True
508	Width = 32
509	End
510	Begin StaticText StaticText_Byte1
511	AutoDeactivate = True
512	Bold = ""
513	DataField = ""
514	DataSource = ""
515	Enabled = True
516	Height = 20
517	HelpTag = ""
518	Index = -2147483648
519	InitialParent = "TabPanel1"
520	Italic = ""
521	Left = 265
522	LockBottom = ""
523	LockedInPosition= False
524	LockLeft = ""
525	LockRight = ""
526	LockTop = ""
527	Multiline = ""
528	Scope = 0
529	TabIndex = 21
530	TabPanelIndex = 2
531	Text = "Header"
532	TextAlign = 0
533	TextColor = "&cB8B8B8"
534	TextFont = "System"
535	TextSize = 0
536	Top = 58
537	Underline = ""
538	Visible = True
539	Width = 106
540	End
541	Begin StaticText StaticText_Byte6
542	AutoDeactivate = True
543	Bold = ""
544	DataField = ""
545	DataSource = ""
546	Enabled = True
547	Height = 20
548	HelpTag = ""
549	Index = -2147483648
550	InitialParent = "TabPanel1"
551	Italic = ""
552	Left = 265
553	LockBottom = ""
554	LockedInPosition= False
555	LockLeft = ""
556	LockRight = ""
557	LockTop = ""
558	Multiline = ""
559	Scope = 0
560	TabIndex = 22
561	TabPanelIndex = 2
562	Text = "Drive Band"
563	TextAlign = 0
564	TextColor = "&cB8B8B8"
565	TextFont = "System"
566	TextSize = 0
567	Top = 228
568	Underline = ""
569	Visible = True
570	Width = 106
571	End
572	Begin StaticText StaticText_Byte5
573	AutoDeactivate = True
574	Bold = ""
575	DataField = ""
576	DataSource = ""
577	Enabled = True
578	Height = 20
579	HelpTag = ""
580	Index = -2147483648
581	InitialParent = "TabPanel1"
582	Italic = ""
583	Left = 265
584	LockBottom = ""
585	LockedInPosition= False
586	LockLeft = ""
587	LockRight = ""
588	LockTop = ""
589	Multiline = ""
590	Scope = 0
591	TabIndex = 23
592	TabPanelIndex = 2
593	Text = "Punch"
594	TextAlign = 0
595	TextColor = "&cB8B8B8"
596	TextFont = "System"
597	TextSize = 0
598	Top = 194
599	Underline = ""
600	Visible = True
601	Width = 106
602	End
603	Begin StaticText StaticText_Byte4
604	AutoDeactivate = True
605	Bold = ""
606	DataField = ""
607	DataSource = ""
608	Enabled = True
609	Height = 20
610	HelpTag = ""
611	Index = -2147483648
612	InitialParent = "TabPanel1"
613	Italic = ""
614	Left = 265
615	LockBottom = ""
616	LockedInPosition= False
617	LockLeft = ""
618	LockRight = ""
619	LockTop = ""
620	Multiline = ""
621	Scope = 0
622	TabIndex = 24
623	TabPanelIndex = 2
624	Text = "Speed"
625	TextAlign = 0
626	TextColor = "&cB8B8B8"
627	TextFont = "System"
628	TextSize = 0
629	Top = 162
630	Underline = ""
631	Visible = True
632	Width = 106
633	End
634	Begin StaticText StaticText_Byte3
635	AutoDeactivate = True
636	Bold = ""
637	DataField = ""
638	DataSource = ""
639	Enabled = True
640	Height = 20
641	HelpTag = ""
642	Index = -2147483648
643	InitialParent = "TabPanel1"
644	Italic = ""
645	Left = 265
646	LockBottom = ""
647	LockedInPosition= False
648	LockLeft = ""
649	LockRight = ""
650	LockTop = ""
651	Multiline = ""
652	Scope = 0
653	TabIndex = 25
654	TabPanelIndex = 2
655	Text = "Gain"
656	TextAlign = 0
657	TextColor = "&cB8B8B8"
658	TextFont = "System"
659	TextSize = 0
660	Top = 126
661	Underline = ""
662	Visible = True
663	Width = 106
664	End
665	Begin StaticText StaticText_Byte2
666	AutoDeactivate = True
667	Bold = ""
668	DataField = ""
669	DataSource = ""
670	Enabled = True
671	Height = 20
672	HelpTag = ""
673	Index = -2147483648
674	InitialParent = "TabPanel1"
675	Italic = ""
676	Left = 265
677	LockBottom = ""
678	LockedInPosition= False
679	LockLeft = ""
680	LockRight = ""
681	LockTop = ""
682	Multiline = ""
683	Scope = 0
684	TabIndex = 26
685	TabPanelIndex = 2
686	Text = "Header"
687	TextAlign = 0
688	TextColor = "&cB8B8B8"
689	TextFont = "System"
690	TextSize = 0
691	Top = 92
692	Underline = ""
693	Visible = True
694	Width = 106
695	End
696	Begin StaticText StaticText_Byte7
697	AutoDeactivate = True
698	Bold = ""
699	DataField = ""
700	DataSource = ""
701	Enabled = True
702	Height = 20
703	HelpTag = ""
704	Index = -2147483648
705	InitialParent = "TabPanel1"
706	Italic = ""
707	Left = 267
708	LockBottom = ""
709	LockedInPosition= False
710	LockLeft = ""
711	LockRight = ""
712	LockTop = ""
713	Multiline = ""
714	Scope = 0
715	TabIndex = 27
716	TabPanelIndex = 2
717	Text = "Dump"
718	TextAlign = 0
719	TextColor = "&cB8B8B8"
720	TextFont = "System"
721	TextSize = 0
722	Top = 264
723	Underline = ""
724	Visible = True
725	Width = 106
726	End
727	Begin StaticText StaticText_Byte8
728	AutoDeactivate = True
729	Bold = ""
730	DataField = ""
731	DataSource = ""
732	Enabled = True
733	Height = 20
734	HelpTag = ""
735	Index = -2147483648
736	InitialParent = "TabPanel1"
737	Italic = ""
738	Left = 267
739	LockBottom = ""
740	LockedInPosition= False
741	LockLeft = ""
742	LockRight = ""
743	LockTop = ""
744	Multiline = ""
745	Scope = 0
746	TabIndex = 28
747	TabPanelIndex = 2
748	Text = "Drive Frequency"
749	TextAlign = 0
750	TextColor = "&cB8B8B8"
751	TextFont = "System"
752	TextSize = 0
753	Top = 297
754	Underline = ""
755	Visible = True
756	Width = 106
757	End
758	Begin StaticText StaticText_Byte9
759	AutoDeactivate = True
760	Bold = ""
761	DataField = ""
762	DataSource = ""
763	Enabled = True
764	Height = 20
765	HelpTag = ""
766	Index = -2147483648
767	InitialParent = "TabPanel1"
768	Italic = ""
769	Left = 265
770	LockBottom = ""
771	LockedInPosition= False
772	LockLeft = ""
773	LockRight = ""
774	LockTop = ""
775	Multiline = ""
776	Scope = 0
777	TabIndex = 29
778	TabPanelIndex = 2
779	Text = "Unknown"
780	TextAlign = 0
781	TextColor = "&cB8B8B8"
782	TextFont = "System"
783	TextSize = 0
784	Top = 333
785	Underline = ""
786	Visible = True
787	Width = 106
788	End
789	Begin Slider Slider_THGain
790	AutoDeactivate = True
791	Enabled = True
792	Height = 16
793	HelpTag = ""
794	Index = -2147483648
795	InitialParent = "TabPanel1"
796	Left = 448
797	LineStep = 1
798	LiveScroll = ""
799	LockBottom = ""
800	LockedInPosition= False
801	LockLeft = ""
802	LockRight = ""
803	LockTop = ""
804	Maximum = 255
805	Minimum = 1
806	PageStep = 20
807	Scope = 0
808	TabIndex = 0
809	TabPanelIndex = 1
810	TabStop = True
811	Top = 218
812	Value = 0
813	Visible = True
814	Width = 100
815	End
816	Begin EditField EditField_THGain
817	AcceptTabs = ""
818	Alignment = 0
819	AutoDeactivate = True
820	BackColor = &hFFFFFF
821	Bold = ""
822	Border = True
823	DataField = ""
824	DataSource = ""
825	Enabled = True
826	Format = ""
827	Height = 22
828	HelpTag = ""
829	Index = -2147483648
830	InitialParent = "TabPanel1"
831	Italic = ""
832	Left = 560
833	LimitText = 0
834	LockBottom = ""
835	LockedInPosition= False
836	LockLeft = ""
837	LockRight = ""
838	LockTop = ""
839	Mask = "###"
840	Multiline = ""
841	Password = ""
842	ReadOnly = ""
843	Scope = 0
844	ScrollbarHorizontal= ""
845	ScrollbarVertical= True
846	Styled = ""
847	TabIndex = 1
848	TabPanelIndex = 1
849	TabStop = True
850	Text = ""
851	TextColor = &h000000
852	TextFont = "System"
853	TextSize = 0
854	Top = 218
855	Underline = ""
856	UseFocusRing = True
857	Visible = True
858	Width = 32
859	End
860	Begin StaticText StaticText_THGain
861	AutoDeactivate = True
862	Bold = ""
863	DataField = ""
864	DataSource = ""
865	Enabled = True
866	Height = 20
867	HelpTag = ""
868	Index = -2147483648
869	InitialParent = "TabPanel1"
870	Italic = ""
871	Left = 604
872	LockBottom = ""
873	LockedInPosition= False
874	LockLeft = ""
875	LockRight = ""
876	LockTop = ""
877	Multiline = ""
878	Scope = 0
879	TabIndex = 2
880	TabPanelIndex = 1
881	Text = "Throttle Gain"
882	TextAlign = 0
883	TextColor = "&cB8B8B8"
884	TextFont = "System"
885	TextSize = 0
886	Top = 218
887	Underline = ""
888	Visible = True
889	Width = 128
890	End
891	Begin Slider Slider_STGain
892	AutoDeactivate = True
893	Enabled = True
894	Height = 16
895	HelpTag = ""
896	Index = -2147483648
897	InitialParent = "TabPanel1"
898	Left = 448
899	LineStep = 1
900	LiveScroll = ""
901	LockBottom = ""
902	LockedInPosition= False
903	LockLeft = ""
904	LockRight = ""
905	LockTop = ""
906	Maximum = 255
907	Minimum = 1
908	PageStep = 20
909	Scope = 0
910	TabIndex = 3
911	TabPanelIndex = 1
912	TabStop = True
913	Top = 186
914	Value = 0
915	Visible = True
916	Width = 100
917	End
918	Begin EditField EditField_STGain
919	AcceptTabs = ""
920	Alignment = 0
921	AutoDeactivate = True
922	BackColor = &hFFFFFF
923	Bold = ""
924	Border = True
925	DataField = ""
926	DataSource = ""
927	Enabled = True
928	Format = ""
929	Height = 22
930	HelpTag = ""
931	Index = -2147483648
932	InitialParent = "TabPanel1"
933	Italic = ""
934	Left = 560
935	LimitText = 0
936	LockBottom = ""
937	LockedInPosition= False
938	LockLeft = ""
939	LockRight = ""
940	LockTop = ""
941	Mask = "###"
942	Multiline = ""
943	Password = ""
944	ReadOnly = ""
945	Scope = 0
946	ScrollbarHorizontal= ""
947	ScrollbarVertical= True
948	Styled = ""
949	TabIndex = 4
950	TabPanelIndex = 1
951	TabStop = True
952	Text = ""
953	TextColor = &h000000
954	TextFont = "System"
955	TextSize = 0
956	Top = 186
957	Underline = ""
958	UseFocusRing = True
959	Visible = True
960	Width = 32
961	End
962	Begin StaticText StaticText_STGain
963	AutoDeactivate = True
964	Bold = ""
965	DataField = ""
966	DataSource = ""
967	Enabled = True
968	Height = 20
969	HelpTag = ""
970	Index = -2147483648
971	InitialParent = "TabPanel1"
972	Italic = ""
973	Left = 604
974	LockBottom = ""
975	LockedInPosition= False
976	LockLeft = ""
977	LockRight = ""
978	LockTop = ""
979	Multiline = ""
980	Scope = 0
981	TabIndex = 5
982	TabPanelIndex = 1
983	Text = "Steering Gain"
984	TextAlign = 0
985	TextColor = "&cB8B8B8"
986	TextFont = "System"
987	TextSize = 0
988	Top = 186
989	Underline = ""
990	Visible = True
991	Width = 128
992	End
993	Begin PopupMenu PopupMenu_BackTiming
994	AutoDeactivate = True
995	Bold = ""
996	DataField = ""
997	DataSource = ""
998	Enabled = True
999	Height = 20
1000	HelpTag = ""
1001	Index = -2147483648
1002	InitialParent = "TabPanel1"
1003	InitialValue = "1\r2\r3\r4\r5\rCustom"
1004	Italic = ""
1005	Left = 448
1006	ListIndex = 0
1007	LockBottom = ""
1008	LockedInPosition= False
1009	LockLeft = ""
1010	LockRight = ""
1011	LockTop = ""
1012	Scope = 0
1013	TabIndex = 6
1014	TabPanelIndex = 1
1015	TabStop = True
1016	TextFont = "System"
1017	TextSize = 0
1018	Top = 154
1019	Underline = ""
1020	Visible = True
1021	Width = 144
1022	End
1023	Begin StaticText StaticText_BackTiming
1024	AutoDeactivate = True
1025	Bold = ""
1026	DataField = ""
1027	DataSource = ""
1028	Enabled = True
1029	Height = 20
1030	HelpTag = ""
1031	Index = -2147483648
1032	InitialParent = "TabPanel1"
1033	Italic = ""
1034	Left = 604
1035	LockBottom = ""
1036	LockedInPosition= False
1037	LockLeft = ""
1038	LockRight = ""
1039	LockTop = ""
1040	Multiline = ""
1041	Scope = 0
1042	TabIndex = 7
1043	TabPanelIndex = 1
1044	Text = "Back Timing"
1045	TextAlign = 0
1046	TextColor = "&cB8B8B8"
1047	TextFont = "System"
1048	TextSize = 0
1049	Top = 154
1050	Underline = ""
1051	Visible = True
1052	Width = 128
1053	End
1054	Begin PopupMenu PopupMenu_VerticalInteria
1055	AutoDeactivate = True
1056	Bold = ""
1057	DataField = ""
1058	DataSource = ""
1059	Enabled = True
1060	Height = 20
1061	HelpTag = ""
1062	Index = -2147483648
1063	InitialParent = "TabPanel1"
1064	InitialValue = "Strong\r2\r3\r4\rOff\rCustom"
1065	Italic = ""
1066	Left = 448
1067	ListIndex = 0
1068	LockBottom = ""
1069	LockedInPosition= False
1070	LockLeft = ""
1071	LockRight = ""
1072	LockTop = ""
1073	Scope = 0
1074	TabIndex = 8
1075	TabPanelIndex = 1
1076	TabStop = True
1077	TextFont = "System"
1078	TextSize = 0
1079	Top = 122
1080	Underline = ""
1081	Visible = True
1082	Width = 144
1083	End
1084	Begin StaticText StaticText_VerticalIntertia
1085	AutoDeactivate = True
1086	Bold = ""
1087	DataField = ""
1088	DataSource = ""
1089	Enabled = True
1090	Height = 20
1091	HelpTag = ""
1092	Index = -2147483648
1093	InitialParent = "TabPanel1"
1094	Italic = ""
1095	Left = 604
1096	LockBottom = ""
1097	LockedInPosition= False
1098	LockLeft = ""
1099	LockRight = ""
1100	LockTop = ""
1101	Multiline = ""
1102	Scope = 0
1103	TabIndex = 9
1104	TabPanelIndex = 1
1105	Text = "Virtual Intertia"
1106	TextAlign = 0
1107	TextColor = "&cB8B8B8"
1108	TextFont = "System"
1109	TextSize = 0
1110	Top = 122
1111	Underline = ""
1112	Visible = True
1113	Width = 128
1114	End
1115	Begin PopupMenu PopupMenu_Nuetral
1116	AutoDeactivate = True
1117	Bold = ""
1118	DataField = ""
1119	DataSource = ""
1120	Enabled = True
1121	Height = 20
1122	HelpTag = ""
1123	Index = -2147483648
1124	InitialParent = "TabPanel1"
1125	InitialValue = "Narrow\rMid\rWide\rCustom"
1126	Italic = ""
1127	Left = 448
1128	ListIndex = 0
1129	LockBottom = ""
1130	LockedInPosition= False
1131	LockLeft = ""
1132	LockRight = ""
1133	LockTop = ""
1134	Scope = 0
1135	TabIndex = 10
1136	TabPanelIndex = 1
1137	TabStop = True
1138	TextFont = "System"
1139	TextSize = 0
1140	Top = 90
1141	Underline = ""
1142	Visible = True
1143	Width = 144
1144	End
1145	Begin StaticText StaticText_Nuetral
1146	AutoDeactivate = True
1147	Bold = ""
1148	DataField = ""
1149	DataSource = ""
1150	Enabled = True
1151	Height = 20
1152	HelpTag = ""
1153	Index = -2147483648
1154	InitialParent = "TabPanel1"
1155	Italic = ""
1156	Left = 604
1157	LockBottom = ""
1158	LockedInPosition= False
1159	LockLeft = ""
1160	LockRight = ""
1161	LockTop = ""
1162	Multiline = ""
1163	Scope = 0
1164	TabIndex = 11
1165	TabPanelIndex = 1
1166	Text = "Neutral"
1167	TextAlign = 0
1168	TextColor = "&cB8B8B8"
1169	TextFont = "System"
1170	TextSize = 0
1171	Top = 90
1172	Underline = ""
1173	Visible = True
1174	Width = 128
1175	End
1176	Begin PopupMenu PopupMenu_DFreq
1177	AutoDeactivate = True
1178	Bold = ""
1179	DataField = ""
1180	DataSource = ""
1181	Enabled = True
1182	Height = 20
1183	HelpTag = ""
1184	Index = -2147483648
1185	InitialParent = "TabPanel1"
1186	InitialValue = "High\rMedium\rLow\rCustom"
1187	Italic = ""
1188	Left = 448
1189	ListIndex = 0
1190	LockBottom = ""
1191	LockedInPosition= False
1192	LockLeft = ""
1193	LockRight = ""
1194	LockTop = ""
1195	Scope = 0
1196	TabIndex = 12
1197	TabPanelIndex = 1
1198	TabStop = True
1199	TextFont = "System"
1200	TextSize = 0
1201	Top = 58
1202	Underline = ""
1203	Visible = True
1204	Width = 144
1205	End
1206	Begin StaticText StaticText_DFreq
1207	AutoDeactivate = True
1208	Bold = ""
1209	DataField = ""
1210	DataSource = ""
1211	Enabled = True
1212	Height = 20
1213	HelpTag = ""
1214	Index = -2147483648
1215	InitialParent = "TabPanel1"
1216	Italic = ""
1217	Left = 604
1218	LockBottom = ""
1219	LockedInPosition= False
1220	LockLeft = ""
1221	LockRight = ""
1222	LockTop = ""
1223	Multiline = ""
1224	Scope = 0
1225	TabIndex = 13
1226	TabPanelIndex = 1
1227	Text = "Drive Frequency"
1228	TextAlign = 0
1229	TextColor = "&cB8B8B8"
1230	TextFont = "System"
1231	TextSize = 0
1232	Top = 58
1233	Underline = ""
1234	Visible = True
1235	Width = 106
1236	End
1237	Begin PopupMenu PopupMenu_Dump
1238	AutoDeactivate = True
1239	Bold = ""
1240	DataField = ""
1241	DataSource = ""
1242	Enabled = True
1243	Height = 20
1244	HelpTag = ""
1245	Index = -2147483648
1246	InitialParent = "TabPanel1"
1247	InitialValue = "Over\rSmooth\rCustom"
1248	Italic = ""
1249	Left = 209
1250	ListIndex = 0
1251	LockBottom = ""
1252	LockedInPosition= False
1253	LockLeft = ""
1254	LockRight = ""
1255	LockTop = ""
1256	Scope = 0
1257	TabIndex = 14
1258	TabPanelIndex = 1
1259	TabStop = True
1260	TextFont = "System"
1261	TextSize = 0
1262	Top = 218
1263	Underline = ""
1264	Visible = True
1265	Width = 144
1266	End
1267	Begin StaticText StaticText_Dump
1268	AutoDeactivate = True
1269	Bold = ""
1270	DataField = ""
1271	DataSource = ""
1272	Enabled = True
1273	Height = 20
1274	HelpTag = ""
1275	Index = -2147483648
1276	InitialParent = "TabPanel1"
1277	Italic = ""
1278	Left = 365
1279	LockBottom = ""
1280	LockedInPosition= False
1281	LockLeft = ""
1282	LockRight = ""
1283	LockTop = ""
1284	Multiline = ""
1285	Scope = 0
1286	TabIndex = 15
1287	TabPanelIndex = 1
1288	Text = "Dump"
1289	TextAlign = 0
1290	TextColor = "&cB8B8B8"
1291	TextFont = "System"
1292	TextSize = 0
1293	Top = 218
1294	Underline = ""
1295	Visible = True
1296	Width = 128
1297	End
1298	Begin PopupMenu PopupMenu_DBand
1299	AutoDeactivate = True
1300	Bold = ""
1301	DataField = ""
1302	DataSource = ""
1303	Enabled = True
1304	Height = 20
1305	HelpTag = ""
1306	Index = -2147483648
1307	InitialParent = "TabPanel1"
1308	InitialValue = "Narrow\rMid\rWide\rCustom"
1309	Italic = ""
1310	Left = 209
1311	ListIndex = 0
1312	LockBottom = ""
1313	LockedInPosition= False
1314	LockLeft = ""
1315	LockRight = ""
1316	LockTop = ""
1317	Scope = 0
1318	TabIndex = 16
1319	TabPanelIndex = 1
1320	TabStop = True
1321	TextFont = "System"
1322	TextSize = 0
1323	Top = 186
1324	Underline = ""
1325	Visible = True
1326	Width = 144
1327	End
1328	Begin StaticText StaticText_DBand
1329	AutoDeactivate = True
1330	Bold = ""
1331	DataField = ""
1332	DataSource = ""
1333	Enabled = True
1334	Height = 20
1335	HelpTag = ""
1336	Index = -2147483648
1337	InitialParent = "TabPanel1"
1338	Italic = ""
1339	Left = 365
1340	LockBottom = ""
1341	LockedInPosition= False
1342	LockLeft = ""
1343	LockRight = ""
1344	LockTop = ""
1345	Multiline = ""
1346	Scope = 0
1347	TabIndex = 17
1348	TabPanelIndex = 1
1349	Text = "Drive Band"
1350	TextAlign = 0
1351	TextColor = "&cB8B8B8"
1352	TextFont = "System"
1353	TextSize = 0
1354	Top = 182
1355	Underline = ""
1356	Visible = True
1357	Width = 128
1358	End
1359	Begin Slider Slider_Punch
1360	AutoDeactivate = True
1361	Enabled = True
1362	Height = 16
1363	HelpTag = ""
1364	Index = -2147483648
1365	InitialParent = "TabPanel1"
1366	Left = 209
1367	LineStep = 1
1368	LiveScroll = ""
1369	LockBottom = ""
1370	LockedInPosition= False
1371	LockLeft = ""
1372	LockRight = ""
1373	LockTop = ""
1374	Maximum = 10
1375	Minimum = 1
1376	PageStep = 20
1377	Scope = 0
1378	TabIndex = 18
1379	TabPanelIndex = 1
1380	TabStop = True
1381	Top = 154
1382	Value = 0
1383	Visible = True
1384	Width = 100
1385	End
1386	Begin EditField EditField_Punch
1387	AcceptTabs = ""
1388	Alignment = 0
1389	AutoDeactivate = True
1390	BackColor = &hFFFFFF
1391	Bold = ""
1392	Border = True
1393	DataField = ""
1394	DataSource = ""
1395	Enabled = True
1396	Format = ""
1397	Height = 22
1398	HelpTag = ""
1399	Index = -2147483648
1400	InitialParent = "TabPanel1"
1401	Italic = ""
1402	Left = 321
1403	LimitText = 0
1404	LockBottom = ""
1405	LockedInPosition= False
1406	LockLeft = ""
1407	LockRight = ""
1408	LockTop = ""
1409	Mask = "###"
1410	Multiline = ""
1411	Password = ""
1412	ReadOnly = ""
1413	Scope = 0
1414	ScrollbarHorizontal= ""
1415	ScrollbarVertical= True
1416	Styled = ""
1417	TabIndex = 19
1418	TabPanelIndex = 1
1419	TabStop = True
1420	Text = ""
1421	TextColor = &h000000
1422	TextFont = "System"
1423	TextSize = 0
1424	Top = 153
1425	Underline = ""
1426	UseFocusRing = True
1427	Visible = True
1428	Width = 32
1429	End
1430	Begin StaticText StaticText_Punch
1431	AutoDeactivate = True
1432	Bold = ""
1433	DataField = ""
1434	DataSource = ""
1435	Enabled = True
1436	Height = 20
1437	HelpTag = ""
1438	Index = -2147483648
1439	InitialParent = "TabPanel1"
1440	Italic = ""
1441	Left = 365
1442	LockBottom = ""
1443	LockedInPosition= False
1444	LockLeft = ""
1445	LockRight = ""
1446	LockTop = ""
1447	Multiline = ""
1448	Scope = 0
1449	TabIndex = 20
1450	TabPanelIndex = 1
1451	Text = "Punch"
1452	TextAlign = 0
1453	TextColor = "&cB8B8B8"
1454	TextFont = "System"
1455	TextSize = 0
1456	Top = 153
1457	Underline = ""
1458	Visible = True
1459	Width = 81
1460	End
1461	Begin PopupMenu PopupMenu_Speed
1462	AutoDeactivate = True
1463	Bold = ""
1464	DataField = ""
1465	DataSource = ""
1466	Enabled = True
1467	Height = 20
1468	HelpTag = ""
1469	Index = -2147483648
1470	InitialParent = "TabPanel1"
1471	InitialValue = "Slow\r2\r3\r4\rFast\rCustom"
1472	Italic = ""
1473	Left = 209
1474	ListIndex = 0
1475	LockBottom = ""
1476	LockedInPosition= False
1477	LockLeft = ""
1478	LockRight = ""
1479	LockTop = ""
1480	Scope = 0
1481	TabIndex = 21
1482	TabPanelIndex = 1
1483	TabStop = True
1484	TextFont = "System"
1485	TextSize = 0
1486	Top = 122
1487	Underline = ""
1488	Visible = True
1489	Width = 144
1490	End
1491	Begin StaticText StaticText_Speed
1492	AutoDeactivate = True
1493	Bold = ""
1494	DataField = ""
1495	DataSource = ""
1496	Enabled = True
1497	Height = 20
1498	HelpTag = ""
1499	Index = -2147483648
1500	InitialParent = "TabPanel1"
1501	Italic = ""
1502	Left = 365
1503	LockBottom = ""
1504	LockedInPosition= False
1505	LockLeft = ""
1506	LockRight = ""
1507	LockTop = ""
1508	Multiline = ""
1509	Scope = 0
1510	TabIndex = 22
1511	TabPanelIndex = 1
1512	Text = "Speed"
1513	TextAlign = 0
1514	TextColor = "&cB8B8B8"
1515	TextFont = "System"
1516	TextSize = 0
1517	Top = 122
1518	Underline = ""
1519	Visible = True
1520	Width = 100
1521	End
1522	Begin PopupMenu PopupMenu_Gain
1523	AutoDeactivate = True
1524	Bold = ""
1525	DataField = ""
1526	DataSource = ""
1527	Enabled = True
1528	Height = 20
1529	HelpTag = ""
1530	Index = -2147483648
1531	InitialParent = "TabPanel1"
1532	InitialValue = "Min\rMid\rStrong\rCustom"
1533	Italic = ""
1534	Left = 209
1535	ListIndex = 0
1536	LockBottom = ""
1537	LockedInPosition= False
1538	LockLeft = ""
1539	LockRight = ""
1540	LockTop = ""
1541	Scope = 0
1542	TabIndex = 23
1543	TabPanelIndex = 1
1544	TabStop = True
1545	TextFont = "System"
1546	TextSize = 0
1547	Top = 90
1548	Underline = ""
1549	Visible = True
1550	Width = 144
1551	End
1552	Begin StaticText StaticText_Gain
1553	AutoDeactivate = True
1554	Bold = ""
1555	DataField = ""
1556	DataSource = ""
1557	Enabled = True
1558	Height = 20
1559	HelpTag = ""
1560	Index = -2147483648
1561	InitialParent = "TabPanel1"
1562	Italic = ""
1563	Left = 365
1564	LockBottom = ""
1565	LockedInPosition= False
1566	LockLeft = ""
1567	LockRight = ""
1568	LockTop = ""
1569	Multiline = ""
1570	Scope = 0
1571	TabIndex = 24
1572	TabPanelIndex = 1
1573	Text = "Gain"
1574	TextAlign = 0
1575	TextColor = "&cB8B8B8"
1576	TextFont = "System"
1577	TextSize = 0
1578	Top = 91
1579	Underline = ""
1580	Visible = True
1581	Width = 100
1582	End
1583	Begin StaticText StaticText_CarType
1584	AutoDeactivate = True
1585	Bold = ""
1586	DataField = ""
1587	DataSource = ""
1588	Enabled = True
1589	Height = 20
1590	HelpTag = ""
1591	Index = -2147483648
1592	InitialParent = "TabPanel1"
1593	Italic = ""
1594	Left = 365
1595	LockBottom = ""
1596	LockedInPosition= False
1597	LockLeft = ""
1598	LockRight = ""
1599	LockTop = ""
1600	Multiline = ""
1601	Scope = 0
1602	TabIndex = 25
1603	TabPanelIndex = 1
1604	Text = "Car Type"
1605	TextAlign = 0
1606	TextColor = "&cB8B8B8"
1607	TextFont = "System"
1608	TextSize = 0
1609	Top = 58
1610	Underline = ""
1611	Visible = True
1612	Width = 100
1613	End
1614	Begin PopupMenu PopupMenu_CarType
1615	AutoDeactivate = True
1616	Bold = ""
1617	DataField = ""
1618	DataSource = ""
1619	Enabled = True
1620	Height = 20
1621	HelpTag = ""
1622	Index = -2147483648
1623	InitialParent = "TabPanel1"
1624	InitialValue = "MR-03\rdNaNo\rASF"
1625	Italic = ""
1626	Left = 209
1627	ListIndex = 0
1628	LockBottom = ""
1629	LockedInPosition= False
1630	LockLeft = ""
1631	LockRight = ""
1632	LockTop = ""
1633	Scope = 0
1634	TabIndex = 26
1635	TabPanelIndex = 1
1636	TabStop = True
1637	TextFont = "System"
1638	TextSize = 0
1639	Top = 58
1640	Underline = ""
1641	Visible = True
1642	Width = 144
1643	End
1644	Begin EditField EditField_Byte12
1645	AcceptTabs = ""
1646	Alignment = 0
1647	AutoDeactivate = True
1648	BackColor = &hFFFFFF
1649	Bold = ""
1650	Border = True
1651	DataField = ""
1652	DataSource = ""
1653	Enabled = True
1654	Format = ""
1655	Height = 22
1656	HelpTag = ""
1657	Index = -2147483648
1658	InitialParent = "TabPanel1"
1659	Italic = ""
1660	Left = 380
1661	LimitText = 0
1662	LockBottom = ""
1663	LockedInPosition= False
1664	LockLeft = ""
1665	LockRight = ""
1666	LockTop = ""
1667	Mask = "###"
1668	Multiline = ""
1669	Password = ""
1670	ReadOnly = ""
1671	Scope = 0
1672	ScrollbarHorizontal= ""
1673	ScrollbarVertical= True
1674	Styled = ""
1675	TabIndex = 41
1676	TabPanelIndex = 2
1677	TabStop = True
1678	Text = ""
1679	TextColor = &h000000
1680	TextFont = "System"
1681	TextSize = 0
1682	Top = 126
1683	Underline = ""
1684	UseFocusRing = True
1685	Visible = True
1686	Width = 32
1687	End
1688	Begin EditField EditField_Byte11
1689	AcceptTabs = ""
1690	Alignment = 0
1691	AutoDeactivate = True
1692	BackColor = &hFFFFFF
1693	Bold = ""
1694	Border = True
1695	DataField = ""
1696	DataSource = ""
1697	Enabled = True
1698	Format = ""
1699	Height = 22
1700	HelpTag = ""
1701	Index = -2147483648
1702	InitialParent = "TabPanel1"
1703	Italic = ""
1704	Left = 380
1705	LimitText = 0
1706	LockBottom = ""
1707	LockedInPosition= False
1708	LockLeft = ""
1709	LockRight = ""
1710	LockTop = ""
1711	Mask = "###"
1712	Multiline = ""
1713	Password = ""
1714	ReadOnly = ""
1715	Scope = 0
1716	ScrollbarHorizontal= ""
1717	ScrollbarVertical= True
1718	Styled = ""
1719	TabIndex = 42
1720	TabPanelIndex = 2
1721	TabStop = True
1722	Text = ""
1723	TextColor = &h000000
1724	TextFont = "System"
1725	TextSize = 0
1726	Top = 92
1727	Underline = ""
1728	UseFocusRing = True
1729	Visible = True
1730	Width = 32
1731	End
1732	Begin EditField EditField_Byte10
1733	AcceptTabs = ""
1734	Alignment = 0
1735	AutoDeactivate = True
1736	BackColor = &hFFFFFF
1737	Bold = ""
1738	Border = True
1739	DataField = ""
1740	DataSource = ""
1741	Enabled = True
1742	Format = ""
1743	Height = 22
1744	HelpTag = ""
1745	Index = -2147483648
1746	InitialParent = "TabPanel1"
1747	Italic = ""
1748	Left = 380
1749	LimitText = 0
1750	LockBottom = ""
1751	LockedInPosition= False
1752	LockLeft = ""
1753	LockRight = ""
1754	LockTop = ""
1755	Mask = "###"
1756	Multiline = ""
1757	Password = ""
1758	ReadOnly = ""
1759	Scope = 0
1760	ScrollbarHorizontal= ""
1761	ScrollbarVertical= True
1762	Styled = ""
1763	TabIndex = 43
1764	TabPanelIndex = 2
1765	TabStop = True
1766	Text = ""
1767	TextColor = &h000000
1768	TextFont = "System"
1769	TextSize = 0
1770	Top = 58
1771	Underline = ""
1772	UseFocusRing = True
1773	Visible = True
1774	Width = 32
1775	End
1776	Begin StaticText StaticText_Byte10
1777	AutoDeactivate = True
1778	Bold = ""
1779	DataField = ""
1780	DataSource = ""
1781	Enabled = True
1782	Height = 20
1783	HelpTag = ""
1784	Index = -2147483648
1785	InitialParent = "TabPanel1"
1786	Italic = ""
1787	Left = 426
1788	LockBottom = ""
1789	LockedInPosition= False
1790	LockLeft = ""
1791	LockRight = ""
1792	LockTop = ""
1793	Multiline = ""
1794	Scope = 0
1795	TabIndex = 44
1796	TabPanelIndex = 2
1797	Text = "Unknown"
1798	TextAlign = 0
1799	TextColor = "&cB8B8B8"
1800	TextFont = "System"
1801	TextSize = 0
1802	Top = 60
1803	Underline = ""
1804	Visible = True
1805	Width = 106
1806	End
1807	Begin StaticText StaticText_Byte11
1808	AutoDeactivate = True
1809	Bold = ""
1810	DataField = ""
1811	DataSource = ""
1812	Enabled = True
1813	Height = 20
1814	HelpTag = ""
1815	Index = -2147483648
1816	InitialParent = "TabPanel1"
1817	Italic = ""
1818	Left = 424
1819	LockBottom = ""
1820	LockedInPosition= False
1821	LockLeft = ""
1822	LockRight = ""
1823	LockTop = ""
1824	Multiline = ""
1825	Scope = 0
1826	TabIndex = 45
1827	TabPanelIndex = 2
1828	Text = "Neutral High"
1829	TextAlign = 0
1830	TextColor = "&cB8B8B8"
1831	TextFont = "System"
1832	TextSize = 0
1833	Top = 93
1834	Underline = ""
1835	Visible = True
1836	Width = 106
1837	End
1838	Begin StaticText StaticText_Byte12
1839	AutoDeactivate = True
1840	Bold = ""
1841	DataField = ""
1842	DataSource = ""
1843	Enabled = True
1844	Height = 20
1845	HelpTag = ""
1846	Index = -2147483648
1847	InitialParent = "TabPanel1"
1848	Italic = ""
1849	Left = 424
1850	LockBottom = ""
1851	LockedInPosition= False
1852	LockLeft = ""
1853	LockRight = ""
1854	LockTop = ""
1855	Multiline = ""
1856	Scope = 0
1857	TabIndex = 46
1858	TabPanelIndex = 2
1859	Text = "Neutral Low"
1860	TextAlign = 0
1861	TextColor = "&cB8B8B8"
1862	TextFont = "System"
1863	TextSize = 0
1864	Top = 126
1865	Underline = ""
1866	Visible = True
1867	Width = 106
1868	End
1869	Begin EditField EditField_Byte18
1870	AcceptTabs = ""
1871	Alignment = 0
1872	AutoDeactivate = True
1873	BackColor = &hFFFFFF
1874	Bold = ""
1875	Border = True
1876	DataField = ""
1877	DataSource = ""
1878	Enabled = False
1879	Format = ""
1880	Height = 22
1881	HelpTag = ""
1882	Index = -2147483648
1883	InitialParent = "TabPanel1"
1884	Italic = ""
1885	Left = 380
1886	LimitText = 0
1887	LockBottom = ""
1888	LockedInPosition= False
1889	LockLeft = ""
1890	LockRight = ""
1891	LockTop = ""
1892	Mask = "###"
1893	Multiline = ""
1894	Password = ""
1895	ReadOnly = ""
1896	Scope = 0
1897	ScrollbarHorizontal= ""
1898	ScrollbarVertical= True
1899	Styled = ""
1900	TabIndex = 47
1901	TabPanelIndex = 2
1902	TabStop = True
1903	Text = ""
1904	TextColor = &h000000
1905	TextFont = "System"
1906	TextSize = 0
1907	Top = 329
1908	Underline = ""
1909	UseFocusRing = True
1910	Visible = False
1911	Width = 32
1912	End
1913	Begin EditField EditField_Byte17
1914	AcceptTabs = ""
1915	Alignment = 0
1916	AutoDeactivate = True
1917	BackColor = &hFFFFFF
1918	Bold = ""
1919	Border = True
1920	DataField = ""
1921	DataSource = ""
1922	Enabled = True
1923	Format = ""
1924	Height = 22
1925	HelpTag = ""
1926	Index = -2147483648
1927	InitialParent = "TabPanel1"
1928	Italic = ""
1929	Left = 380
1930	LimitText = 0
1931	LockBottom = ""
1932	LockedInPosition= False
1933	LockLeft = ""
1934	LockRight = ""
1935	LockTop = ""
1936	Mask = "###"
1937	Multiline = ""
1938	Password = ""
1939	ReadOnly = ""
1940	Scope = 0
1941	ScrollbarHorizontal= ""
1942	ScrollbarVertical= True
1943	Styled = ""
1944	TabIndex = 48
1945	TabPanelIndex = 2
1946	TabStop = True
1947	Text = ""
1948	TextColor = &h000000
1949	TextFont = "System"
1950	TextSize = 0
1951	Top = 295
1952	Underline = ""
1953	UseFocusRing = True
1954	Visible = True
1955	Width = 32
1956	End
1957	Begin EditField EditField_Byte16
1958	AcceptTabs = ""
1959	Alignment = 0
1960	AutoDeactivate = True
1961	BackColor = &hFFFFFF
1962	Bold = ""
1963	Border = True
1964	DataField = ""
1965	DataSource = ""
1966	Enabled = True
1967	Format = ""
1968	Height = 22
1969	HelpTag = ""
1970	Index = -2147483648
1971	InitialParent = "TabPanel1"
1972	Italic = ""
1973	Left = 380
1974	LimitText = 0
1975	LockBottom = ""
1976	LockedInPosition= False
1977	LockLeft = ""
1978	LockRight = ""
1979	LockTop = ""
1980	Mask = "###"
1981	Multiline = ""
1982	Password = ""
1983	ReadOnly = ""
1984	Scope = 0
1985	ScrollbarHorizontal= ""
1986	ScrollbarVertical= True
1987	Styled = ""
1988	TabIndex = 49
1989	TabPanelIndex = 2
1990	TabStop = True
1991	Text = ""
1992	TextColor = &h000000
1993	TextFont = "System"
1994	TextSize = 0
1995	Top = 261
1996	Underline = ""
1997	UseFocusRing = True
1998	Visible = True
1999	Width = 32
2000	End
2001	Begin EditField EditField_Byte15
2002	AcceptTabs = ""
2003	Alignment = 0
2004	AutoDeactivate = True
2005	BackColor = &hFFFFFF
2006	Bold = ""
2007	Border = True
2008	DataField = ""
2009	DataSource = ""
2010	Enabled = True
2011	Format = ""
2012	Height = 22
2013	HelpTag = ""
2014	Index = -2147483648
2015	InitialParent = "TabPanel1"
2016	Italic = ""
2017	Left = 380
2018	LimitText = 0
2019	LockBottom = ""
2020	LockedInPosition= False
2021	LockLeft = ""
2022	LockRight = ""
2023	LockTop = ""
2024	Mask = "###"
2025	Multiline = ""
2026	Password = ""
2027	ReadOnly = ""
2028	Scope = 0
2029	ScrollbarHorizontal= ""
2030	ScrollbarVertical= True
2031	Styled = ""
2032	TabIndex = 50
2033	TabPanelIndex = 2
2034	TabStop = True
2035	Text = ""
2036	TextColor = &h000000
2037	TextFont = "System"
2038	TextSize = 0
2039	Top = 227
2040	Underline = ""
2041	UseFocusRing = True
2042	Visible = True
2043	Width = 32
2044	End
2045	Begin EditField EditField_Byte14
2046	AcceptTabs = ""
2047	Alignment = 0
2048	AutoDeactivate = True
2049	BackColor = &hFFFFFF
2050	Bold = ""
2051	Border = True
2052	DataField = ""
2053	DataSource = ""
2054	Enabled = True
2055	Format = ""
2056	Height = 22
2057	HelpTag = ""
2058	Index = -2147483648
2059	InitialParent = "TabPanel1"
2060	Italic = ""
2061	Left = 380
2062	LimitText = 0
2063	LockBottom = ""
2064	LockedInPosition= False
2065	LockLeft = ""
2066	LockRight = ""
2067	LockTop = ""
2068	Mask = "###"
2069	Multiline = ""
2070	Password = ""
2071	ReadOnly = ""
2072	Scope = 0
2073	ScrollbarHorizontal= ""
2074	ScrollbarVertical= True
2075	Styled = ""
2076	TabIndex = 51
2077	TabPanelIndex = 2
2078	TabStop = True
2079	Text = ""
2080	TextColor = &h000000
2081	TextFont = "System"
2082	TextSize = 0
2083	Top = 193
2084	Underline = ""
2085	UseFocusRing = True
2086	Visible = True
2087	Width = 32
2088	End
2089	Begin EditField EditField_Byte13
2090	AcceptTabs = ""
2091	Alignment = 0
2092	AutoDeactivate = True
2093	BackColor = &hFFFFFF
2094	Bold = ""
2095	Border = True
2096	DataField = ""
2097	DataSource = ""
2098	Enabled = True
2099	Format = ""
2100	Height = 22
2101	HelpTag = ""
2102	Index = -2147483648
2103	InitialParent = "TabPanel1"
2104	Italic = ""
2105	Left = 380
2106	LimitText = 0
2107	LockBottom = ""
2108	LockedInPosition= False
2109	LockLeft = ""
2110	LockRight = ""
2111	LockTop = ""
2112	Mask = "###"
2113	Multiline = ""
2114	Password = ""
2115	ReadOnly = ""
2116	Scope = 0
2117	ScrollbarHorizontal= ""
2118	ScrollbarVertical= True
2119	Styled = ""
2120	TabIndex = 52
2121	TabPanelIndex = 2
2122	TabStop = True
2123	Text = ""
2124	TextColor = &h000000
2125	TextFont = "System"
2126	TextSize = 0
2127	Top = 158
2128	Underline = ""
2129	UseFocusRing = True
2130	Visible = True
2131	Width = 32
2132	End
2133	Begin StaticText StaticText_Byte13
2134	AutoDeactivate = True
2135	Bold = ""
2136	DataField = ""
2137	DataSource = ""
2138	Enabled = True
2139	Height = 20
2140	HelpTag = ""
2141	Index = -2147483648
2142	InitialParent = "TabPanel1"
2143	Italic = ""
2144	Left = 424
2145	LockBottom = ""
2146	LockedInPosition= False
2147	LockLeft = ""
2148	LockRight = ""
2149	LockTop = ""
2150	Multiline = ""
2151	Scope = 0
2152	TabIndex = 53
2153	TabPanelIndex = 2
2154	Text = "Virtual Inertia"
2155	TextAlign = 0
2156	TextColor = "&cB8B8B8"
2157	TextFont = "System"
2158	TextSize = 0
2159	Top = 160
2160	Underline = ""
2161	Visible = True
2162	Width = 106
2163	End
2164	Begin StaticText StaticText_Byte14
2165	AutoDeactivate = True
2166	Bold = ""
2167	DataField = ""
2168	DataSource = ""
2169	Enabled = True
2170	Height = 20
2171	HelpTag = ""
2172	Index = -2147483648
2173	InitialParent = "TabPanel1"
2174	Italic = ""
2175	Left = 424
2176	LockBottom = ""
2177	LockedInPosition= False
2178	LockLeft = ""
2179	LockRight = ""
2180	LockTop = ""
2181	Multiline = False
2182	Scope = 0
2183	TabIndex = 54
2184	TabPanelIndex = 2
2185	Text = "Unknown"
2186	TextAlign = 0
2187	TextColor = "&cB8B8B8"
2188	TextFont = "System"
2189	TextSize = 0
2190	Top = 194
2191	Underline = ""
2192	Visible = True
2193	Width = 106
2194	End
2195	Begin StaticText StaticText_Byte15
2196	AutoDeactivate = True
2197	Bold = ""
2198	DataField = ""
2199	DataSource = ""
2200	Enabled = True
2201	Height = 20
2202	HelpTag = ""
2203	Index = -2147483648
2204	InitialParent = "TabPanel1"
2205	Italic = ""
2206	Left = 424
2207	LockBottom = ""
2208	LockedInPosition= False
2209	LockLeft = ""
2210	LockRight = ""
2211	LockTop = ""
2212	Multiline = ""
2213	Scope = 0
2214	TabIndex = 55
2215	TabPanelIndex = 2
2216	Text = "Back Timing"
2217	TextAlign = 0
2218	TextColor = "&cB8B8B8"
2219	TextFont = "System"
2220	TextSize = 0
2221	Top = 228
2222	Underline = ""
2223	Visible = True
2224	Width = 106
2225	End
2226	Begin StaticText StaticText_Byte16
2227	AutoDeactivate = True
2228	Bold = ""
2229	DataField = ""
2230	DataSource = ""
2231	Enabled = True
2232	Height = 20
2233	HelpTag = ""
2234	Index = -2147483648
2235	InitialParent = "TabPanel1"
2236	Italic = ""
2237	Left = 424
2238	LockBottom = ""
2239	LockedInPosition= False
2240	LockLeft = ""
2241	LockRight = ""
2242	LockTop = ""
2243	Multiline = ""
2244	Scope = 0
2245	TabIndex = 56
2246	TabPanelIndex = 2
2247	Text = "Steering Gain"
2248	TextAlign = 0
2249	TextColor = "&cB8B8B8"
2250	TextFont = "System"
2251	TextSize = 0
2252	Top = 262
2253	Underline = ""
2254	Visible = True
2255	Width = 106
2256	End
2257	Begin StaticText StaticText_Byte17
2258	AutoDeactivate = True
2259	Bold = ""
2260	DataField = ""
2261	DataSource = ""
2262	Enabled = True
2263	Height = 20
2264	HelpTag = ""
2265	Index = -2147483648
2266	InitialParent = "TabPanel1"
2267	Italic = ""
2268	Left = 424
2269	LockBottom = ""
2270	LockedInPosition= False
2271	LockLeft = ""
2272	LockRight = ""
2273	LockTop = ""
2274	Multiline = ""
2275	Scope = 0
2276	TabIndex = 57
2277	TabPanelIndex = 2
2278	Text = "Throttle Gain"
2279	TextAlign = 0
2280	TextColor = "&cB8B8B8"
2281	TextFont = "System"
2282	TextSize = 0
2283	Top = 296
2284	Underline = ""
2285	Visible = True
2286	Width = 106
2287	End
2288	Begin StaticText StaticText_Byte18
2289	AutoDeactivate = True
2290	Bold = ""
2291	DataField = ""
2292	DataSource = ""
2293	Enabled = True
2294	Height = 20
2295	HelpTag = ""
2296	Index = -2147483648
2297	InitialParent = "TabPanel1"
2298	Italic = ""
2299	Left = 424
2300	LockBottom = ""
2301	LockedInPosition= False
2302	LockLeft = ""
2303	LockRight = ""
2304	LockTop = ""
2305	Multiline = ""
2306	Scope = 0
2307	TabIndex = 58
2308	TabPanelIndex = 2
2309	Text = "Checksum"
2310	TextAlign = 0
2311	TextColor = "&cB8B8B8"
2312	TextFont = "System"
2313	TextSize = 0
2314	Top = 330
2315	Underline = ""
2316	Visible = False
2317	Width = 106
2318	End
2319	Begin StaticText StaticText_Warning
2320	AutoDeactivate = True
2321	Bold = True
2322	DataField = ""
2323	DataSource = ""
2324	Enabled = True
2325	Height = 36
2326	HelpTag = ""
2327	Index = -2147483648
2328	InitialParent = "TabPanel1"
2329	Italic = ""
2330	Left = 542
2331	LockBottom = ""
2332	LockedInPosition= False
2333	LockLeft = ""
2334	LockRight = ""
2335	LockTop = ""
2336	Multiline = ""
2337	Scope = 0
2338	TabIndex = 59
2339	TabPanelIndex = 2
2340	Text = "WARNING:"
2341	TextAlign = 0
2342	TextColor = &hFF0000
2343	TextFont = "System"
2344	TextSize = 22
2345	Top = 57
2346	Underline = True
2347	Visible = True
2348	Width = 142
2349	End
2350	Begin StaticText StaticText_WarningMessage
2351	AutoDeactivate = True
2352	Bold = ""
2353	DataField = ""
2354	DataSource = ""
2355	Enabled = True
2356	Height = 155
2357	HelpTag = ""
2358	Index = -2147483648
2359	InitialParent = "TabPanel1"
2360	Italic = ""
2361	Left = 542
2362	LockBottom = ""
2363	LockedInPosition= False
2364	LockLeft = ""
2365	LockRight = ""
2366	LockTop = ""
2367	Multiline = True
2368	Scope = 0
2369	TabIndex = 60
2370	TabPanelIndex = 2
2371	Text = "Each register can have a value between 0 and 255. Modifying values on this screen can have unpredictable results, do so at your own risk. "
2372	TextAlign = 0
2373	TextColor = &hFF0000
2374	TextFont = "System"
2375	TextSize = 0
2376	Top = 93
2377	Underline = ""
2378	Visible = True
2379	Width = 150
2380	End
2381	End
2382	Begin ICSSerialPort ICSSerialPort1
2383	Baud = 8
2384	Bits = 3
2385	byte01 = &hFF
2386	carType = "MR-03"
2387	CTS = ""
2388	DTR = ""
2389	Height = 32
2390	Index = -2147483648
2391	Left = 786
2392	LockedInPosition= False
2393	Parity = 0
2394	Scope = 0
2395	Stop = 0
2396	TabPanelIndex = 0
2397	Top = -16
2398	Width = 32
2399	XON = ""
2400	End
2401	Begin PushButton PushButton_Default
2402	AutoDeactivate = True
2403	Bold = ""
2404	Cancel = ""
2405	Caption = "Default"
2406	Default = ""
2407	Enabled = True
2408	Height = 20
2409	HelpTag = ""
2410	Index = -2147483648
2411	InitialParent = ""
2412	Italic = ""
2413	Left = 612
2414	LockBottom = True
2415	LockedInPosition= False
2416	LockLeft = ""
2417	LockRight = ""
2418	LockTop = ""
2419	Scope = 0
2420	TabIndex = 44
2421	TabPanelIndex = 0
2422	TabStop = True
2423	TextFont = "System"
2424	TextSize = 0
2425	Top = 388
2426	Underline = ""
2427	Visible = True
2428	Width = 88
2429	End
2430	Begin StaticText StaticText_SerialPort
2431	AutoDeactivate = True
2432	Bold = ""
2433	DataField = ""
2434	DataSource = ""
2435	Enabled = True
2436	Height = 20
2437	HelpTag = ""
2438	Index = -2147483648
2439	InitialParent = ""
2440	Italic = ""
2441	Left = 20
2442	LockBottom = ""
2443	LockedInPosition= False
2444	LockLeft = ""
2445	LockRight = ""
2446	LockTop = ""
2447	Multiline = ""
2448	Scope = 0
2449	TabIndex = 46
2450	TabPanelIndex = 0
2451	Text = "COM Port"
2452	TextAlign = 0
2453	TextColor = "&cB8B8B8"
2454	TextFont = "System"
2455	TextSize = 0
2456	Top = 58
2457	Underline = ""
2458	Visible = True
2459	Width = 100
2460	End
2461	Begin PopupMenu PopupMenu_SerialPort
2462	AutoDeactivate = True
2463	Bold = ""
2464	DataField = ""
2465	DataSource = ""
2466	Enabled = True
2467	Height = 20
2468	HelpTag = ""
2469	Index = -2147483648
2470	InitialParent = ""
2471	InitialValue = ""
2472	Italic = ""
2473	Left = 20
2474	ListIndex = 0
2475	LockBottom = ""
2476	LockedInPosition= False
2477	LockLeft = ""
2478	LockRight = ""
2479	LockTop = ""
2480	Scope = 0
2481	TabIndex = 47
2482	TabPanelIndex = 0
2483	TabStop = True
2484	TextFont = "System"
2485	TextSize = 0
2486	Top = 90
2487	Underline = ""
2488	Visible = True
2489	Width = 128
2490	End
2491	Begin StaticText StaticText_Version
2492	AutoDeactivate = True
2493	Bold = ""
2494	DataField = ""
2495	DataSource = ""
2496	Enabled = True
2497	Height = 20
2498	HelpTag = ""
2499	Index = -2147483648
2500	InitialParent = ""
2501	Italic = ""
2502	Left = 20
2503	LockBottom = True
2504	LockedInPosition= False
2505	LockLeft = ""
2506	LockRight = ""
2507	LockTop = ""
2508	Multiline = ""
2509	Scope = 0
2510	TabIndex = 48
2511	TabPanelIndex = 0
2512	Text = "Version "
2513	TextAlign = 0
2514	TextColor = "&cB8B8B8"
2515	TextFont = "System"
2516	TextSize = 0
2517	Top = 388
2518	Underline = ""
2519	Visible = True
2520	Width = 100
2521	End
2522	Begin StaticText StaticText_Profiles
2523	AutoDeactivate = True
2524	Bold = ""
2525	DataField = ""
2526	DataSource = ""
2527	Enabled = True
2528	Height = 20
2529	HelpTag = ""
2530	Index = -2147483648
2531	InitialParent = ""
2532	Italic = ""
2533	Left = 20
2534	LockBottom = ""
2535	LockedInPosition= False
2536	LockLeft = ""
2537	LockRight = ""
2538	LockTop = ""
2539	Multiline = ""
2540	Scope = 0
2541	TabIndex = 51
2542	TabPanelIndex = 0
2543	Text = "Profiles"
2544	TextAlign = 0
2545	TextColor = "&cB8B8B8"
2546	TextFont = "System"
2547	TextSize = 0
2548	Top = 122
2549	Underline = ""
2550	Visible = True
2551	Width = 100
2552	End
2553	Begin PopupMenu PopupMenu_Profile
2554	AutoDeactivate = True
2555	Bold = ""
2556	DataField = ""
2557	DataSource = ""
2558	Enabled = True
2559	Height = 20
2560	HelpTag = ""
2561	Index = -2147483648
2562	InitialParent = ""
2563	InitialValue = ""
2564	Italic = ""
2565	Left = 20
2566	ListIndex = 0
2567	LockBottom = ""
2568	LockedInPosition= False
2569	LockLeft = ""
2570	LockRight = ""
2571	LockTop = ""
2572	Scope = 0
2573	TabIndex = 54
2574	TabPanelIndex = 0
2575	TabStop = True
2576	TextFont = "System"
2577	TextSize = 0
2578	Top = 154
2579	Underline = ""
2580	Visible = True
2581	Width = 128
2582	End
2583	Begin PushButton PushButton_SaveProfile
2584	AutoDeactivate = True
2585	Bold = ""
2586	Cancel = ""
2587	Caption = "Save"
2588	Default = ""
2589	Enabled = False
2590	Height = 20
2591	HelpTag = ""
2592	Index = -2147483648
2593	InitialParent = ""
2594	Italic = ""
2595	Left = 20
2596	LockBottom = ""
2597	LockedInPosition= False
2598	LockLeft = ""
2599	LockRight = ""
2600	LockTop = ""
2601	Scope = 0
2602	TabIndex = 55
2603	TabPanelIndex = 0
2604	TabStop = True
2605	TextFont = "System"
2606	TextSize = 0
2607	Top = 250
2608	Underline = ""
2609	Visible = True
2610	Width = 88
2611	End
2612	Begin PushButton PushButton_Delete
2613	AutoDeactivate = True
2614	Bold = ""
2615	Cancel = ""
2616	Caption = "Delete"
2617	Default = ""
2618	Enabled = False
2619	Height = 20
2620	HelpTag = ""
2621	Index = -2147483648
2622	InitialParent = ""
2623	Italic = ""
2624	Left = 20
2625	LockBottom = ""
2626	LockedInPosition= False
2627	LockLeft = ""
2628	LockRight = ""
2629	LockTop = ""
2630	Scope = 0
2631	TabIndex = 56
2632	TabPanelIndex = 0
2633	TabStop = True
2634	TextFont = "System"
2635	TextSize = 0
2636	Top = 282
2637	Underline = ""
2638	Visible = True
2639	Width = 88
2640	End
2641	Begin PushButton PushButton_Create
2642	AutoDeactivate = True
2643	Bold = ""
2644	Cancel = ""
2645	Caption = "Create"
2646	Default = ""
2647	Enabled = True
2648	Height = 20
2649	HelpTag = ""
2650	Index = -2147483648
2651	InitialParent = ""
2652	Italic = ""
2653	Left = 20
2654	LockBottom = ""
2655	LockedInPosition= False
2656	LockLeft = ""
2657	LockRight = ""
2658	LockTop = ""
2659	Scope = 0
2660	TabIndex = 57
2661	TabPanelIndex = 0
2662	TabStop = True
2663	TextFont = "System"
2664	TextSize = 0
2665	Top = 186
2666	Underline = ""
2667	Visible = True
2668	Width = 88
2669	End
2670	Begin PushButton PushButton_Import
2671	AutoDeactivate = True
2672	Bold = ""
2673	Cancel = ""
2674	Caption = "Import"
2675	Default = ""
2676	Enabled = True
2677	Height = 20
2678	HelpTag = ""
2679	Index = -2147483648
2680	InitialParent = ""
2681	Italic = ""
2682	Left = 20
2683	LockBottom = ""
2684	LockedInPosition= False
2685	LockLeft = ""
2686	LockRight = ""
2687	LockTop = ""
2688	Scope = 0
2689	TabIndex = 58
2690	TabPanelIndex = 0
2691	TabStop = True
2692	TextFont = "System"
2693	TextSize = 0
2694	Top = 218
2695	Underline = ""
2696	Visible = True
2697	Width = 88
2698	End
2699	Begin PushButton PushButton_Export
2700	AutoDeactivate = True
2701	Bold = ""
2702	Cancel = ""
2703	Caption = "Export"
2704	Default = ""
2705	Enabled = False
2706	Height = 20
2707	HelpTag = ""
2708	Index = -2147483648
2709	InitialParent = ""
2710	Italic = ""
2711	Left = 20
2712	LockBottom = ""
2713	LockedInPosition= False
2714	LockLeft = ""
2715	LockRight = ""
2716	LockTop = ""
2717	Scope = 0
2718	TabIndex = 59
2719	TabPanelIndex = 0
2720	TabStop = True
2721	TextFont = "System"
2722	TextSize = 0
2723	Top = 314
2724	Underline = ""
2725	Visible = True
2726	Width = 88
2727	End
2728	End
2729	#tag EndWindow
2730
2731	#tag WindowCode
2732	#tag Event
2733	Sub Open()
2734	StaticText_Version.Text = "Version " + str(app.NonReleaseVersion/100)
2735
2736	//Set the default car type
2737	ICSSerialPort1.setCarType("MR-03")
2738
2739	readPreferences()
2740
2741	#if TargetLinux
2742	resizeLinuxControls()
2743	#endif
2744
2745	//Set and open the COM Port
2746	dim i, count as integer
2747	count = System.SerialPortCount
2748
2749	for i = 0 to count - 1
2750	PopupMenu_SerialPort.AddRow( System.SerialPort(i).Name )
2751	next
2752
2753	if comPort <> "" then
2754	//We can try opening the com port and set the popup menu to that port
2755
2756	for i = 0 to PopupMenu_SerialPort.ListCount - 1
2757
2758	if PopupMenu_SerialPort.list(i) = comPort then
2759	//Found a match, set and open
2760	PopupMenu_SerialPort.ListIndex = i
2761	ICSSerialPort1.SerialPort = System.SerialPort(i)
2762
2763	if not ICSSerialPort1.Open then
2764	//Could not open
2765	MsgBox "Error opening defined com port"
2766	else
2767	//Enable buttons
2768	PushButton_Read.Enabled = True
2769	PushButton_Write.Enabled = True
2770
2771	end if
2772	//No need to continue loop
2773	exit
2774	end if
2775
2776	next
2777
2778	end if
2779
2780	#if TargetWin32
2781	//Have to change text colors since Windows does not allow for transparancy of the tab panel
2782	StaticText_BackTiming.TextColor = &c000000
2783	StaticText_Byte1.TextColor = &c000000
2784	StaticText_Byte10.TextColor = &c000000
2785	StaticText_Byte11.TextColor = &c000000
2786	StaticText_Byte12.TextColor = &c000000
2787	StaticText_Byte13.TextColor = &c000000
2788	StaticText_Byte14.TextColor = &c000000
2789	StaticText_Byte15.TextColor = &c000000
2790	StaticText_Byte16.TextColor = &c000000
2791	StaticText_Byte17.TextColor = &c000000
2792	StaticText_Byte18.TextColor = &c000000
2793	StaticText_Byte2.TextColor = &c000000
2794	StaticText_Byte3.TextColor = &c000000
2795	StaticText_Byte4.TextColor = &c000000
2796	StaticText_Byte5.TextColor = &c000000
2797	StaticText_Byte6.TextColor = &c000000
2798	StaticText_Byte7.TextColor = &c000000
2799	StaticText_Byte8.TextColor = &c000000
2800	StaticText_Byte9.TextColor = &c000000
2801	StaticText_CarType.TextColor = &c000000
2802	StaticText_DBand.TextColor = &c000000
2803	StaticText_DFreq.TextColor = &c000000
2804	StaticText_Dump.TextColor = &c000000
2805	StaticText_Gain.TextColor = &c000000
2806	StaticText_Nuetral.TextColor = &c000000
2807	//StaticText_Profiles.TextColor = &c000000
2808	StaticText_Punch.TextColor = &c000000
2809	//StaticText_SerialPort.TextColor = &c000000
2810	StaticText_Speed.TextColor = &c000000
2811	StaticText_STGain.TextColor = &c000000
2812	StaticText_THGain.TextColor = &c000000
2813	//StaticText_Version.TextColor = &c000000
2814	StaticText_VerticalIntertia.TextColor = &c000000
2815
2816	#endif
2817
2818	End Sub
2819	#tag EndEvent
2820
2821
2822	#tag Method, Flags = &h21
2823	Private Sub disableControls()
2824	select case ICSSerialPort1.carType
2825
2826	Case "MR-03"
2827	//Enable any controls that may have been disabled
2828	PopupMenu_BackTiming.Enabled = True
2829	StaticText_BackTiming.Enabled = True
2830
2831	Slider_STGain.Enabled = True
2832	StaticText_STGain.Enabled = True
2833	EditField_STGain.Enabled = True
2834
2835	Slider_THGain.Enabled = True
2836	StaticText_THGain.Enabled = True
2837	EditField_THGain.Enabled = True
2838
2839	Case "dNaNo"
2840	//Disable unused controls and set them to custom
2841	PopupMenu_BackTiming.Enabled = False
2842	StaticText_BackTiming.Enabled = False
2843	PopupMenu_BackTiming.ListIndex = PopupMenu_BackTiming.ListCount
2844
2845	//Enable any controls that may have been disabled
2846	Slider_STGain.Enabled = True
2847	StaticText_STGain.Enabled = True
2848	EditField_STGain.Enabled = True
2849
2850	Slider_THGain.Enabled = True
2851	StaticText_THGain.Enabled = True
2852	EditField_THGain.Enabled = True
2853
2854	Case "ASF"
2855	//Disable unused controls and set them to custom
2856	PopupMenu_BackTiming.Enabled = False
2857	StaticText_BackTiming.Enabled = False
2858	PopupMenu_BackTiming.ListIndex = PopupMenu_BackTiming.ListCount
2859
2860	Slider_STGain.Enabled = False
2861	StaticText_STGain.Enabled = False
2862	Slider_STGain.Value = 255
2863	EditField_STGain.Enabled = False
2864
2865	Slider_THGain.Enabled = False
2866	StaticText_THGain.Enabled = False
2867	Slider_THGain.Value = 255
2868	EditField_THGain.Enabled = False
2869
2870	end select
2871	End Sub
2872	#tag EndMethod
2873
2874	#tag Method, Flags = &h21
2875	Private Sub readPreferences()
2876	dim filePreference as FolderItem = GetFolderItem("icspref.xml")
2877	dim xdoc as XmlDocument
2878	dim root as XmlNode
2879	dim i as Integer
2880	dim count as integer
2881	dim item as string
2882
2883	//Read the settings from the preferences file
2884	if filePreference <> Nil then
2885	if filePreference.Exists then
2886	xdoc = New XmlDocument(filePreference)
2887
2888	count = xdoc.DocumentElement.ChildCount
2889
2890	for i = 0 to count - 1
2891	root = xdoc.DocumentElement.Child(i)
2892
2893	item = root.FirstChild.Value
2894
2895	select case root.Name
2896	case "comPort"
2897	comPort = item
2898	end select
2899	next
2900	end if
2901	end if
2902
2903
2904	End Sub
2905	#tag EndMethod
2906
2907	#tag Method, Flags = &h21
2908	Private Sub resizeLinuxControls()
2909	//Resize controls for Linux
2910
2911	PushButton_Create.Height = 24
2912	PushButton_Default.Height = 24
2913	PushButton_Delete.Height = 24
2914	PushButton_Export.Height = 24
2915	PushButton_Import.Height = 24
2916	PushButton_Read.Height = 24
2917	PushButton_SaveProfile.Height = 24
2918	PushButton_Write.Height = 24
2919
2920	PopupMenu_BackTiming.Height = 26
2921	PopupMenu_CarType.Height = 26
2922	PopupMenu_DBand.Height = 26
2923	PopupMenu_DFreq.Height = 26
2924	PopupMenu_Dump.Height = 26
2925	PopupMenu_Gain.Height = 26
2926	PopupMenu_Nuetral.Height = 26
2927	PopupMenu_Profile.Height = 26
2928	PopupMenu_SerialPort.Height = 26
2929	PopupMenu_Speed.Height = 26
2930	PopupMenu_VerticalInteria.Height = 26
2931	End Sub
2932	#tag EndMethod
2933
2934	#tag Method, Flags = &h21
2935	Private Sub savePreferences()
2936	dim xml as XmlDocument
2937	dim root as XMLNode
2938	dim comPortXML as XmlNode
2939	dim f as FolderItem
2940
2941	//Save the preferences
2942
2943	f = GetFolderItem("icspref.xml")
2944
2945	if f <> Nil then
2946	//Create a new XML document
2947	xml = New XmlDocument
2948	root = xml.AppendChild(xml.CreateElement("icspref"))
2949
2950	//Add elements
2951	comPortXML = root.AppendChild(xml.CreateElement("comPort"))
2952	comPortXML.AppendChild(xml.CreateTextNode(comPort))
2953
2954	//Save the output
2955	xml.SaveXml(f)
2956	end if
2957
2958	End Sub
2959	#tag EndMethod
2960
2961	#tag Method, Flags = &h21
2962	Private Sub updateAdvancedScreen()
2963	//Update the fields on the advanced screen to match current values
2964	EditField_Byte1.Text = str(asc(ICSSerialPort1.byte01))
2965	EditField_Byte2.Text = str(asc(ICSSerialPort1.byte02))
2966	EditField_Byte3.Text = str(asc(ICSSerialPort1.byte03))
2967	EditField_Byte4.Text = str(asc(ICSSerialPort1.byte04))
2968	EditField_Byte5.Text = str(asc(ICSSerialPort1.byte05))
2969	EditField_Byte6.Text = str(asc(ICSSerialPort1.byte06))
2970	EditField_Byte7.Text = str(asc(ICSSerialPort1.byte07))
2971	EditField_Byte8.Text = str(asc(ICSSerialPort1.byte08))
2972	EditField_Byte9.Text = str(asc(ICSSerialPort1.byte09))
2973	EditField_Byte10.Text = str(asc(ICSSerialPort1.byte10))
2974	EditField_Byte11.Text = str(asc(ICSSerialPort1.byte11))
2975	EditField_Byte12.Text = str(asc(ICSSerialPort1.byte12))
2976	EditField_Byte13.Text = str(asc(ICSSerialPort1.byte13))
2977	EditField_Byte14.Text = str(asc(ICSSerialPort1.byte14))
2978	EditField_Byte15.Text = str(asc(ICSSerialPort1.byte15))
2979	EditField_Byte16.Text = str(asc(ICSSerialPort1.byte16))
2980	EditField_Byte17.Text = str(asc(ICSSerialPort1.byte17))
2981	EditField_Byte18.Text = str(asc(ICSSerialPort1.byte18))
2982	End Sub
2983	#tag EndMethod
2984
2985	#tag Method, Flags = &h21
2986	Private Sub updateCarScreen()
2987	//Use this method to update the car screen
2988
2989	//Update Gain
2990	Select Case ICSSerialPort1.byte03
2991
2992	Case chrb(&h32)
2993	PopupMenu_Gain.ListIndex = 0
2994
2995	Case chrb(&h64)
2996	PopupMenu_Gain.ListIndex = 1
2997
2998	Case chrb(&hFF)
2999	PopupMenu_Gain.ListIndex = 2
3000
3001	Else
3002	PopupMenu_Gain.ListIndex = 3
3003
3004	End Select
3005
3006	//Update Speed
3007	Select Case ICSSerialPort1.Byte04
3008
3009	Case chrb(&h0A)
3010	PopupMenu_Speed.ListIndex = 0
3011
3012	Case chrb(&h14)
3013	PopupMenu_Speed.ListIndex = 1
3014
3015	Case chrb(&h1E)
3016	PopupMenu_Speed.ListIndex = 2
3017
3018	Case chrb(&h28)
3019	PopupMenu_Speed.ListIndex = 3
3020
3021	Case chrb(&hFF)
3022	PopupMenu_Speed.ListIndex = 4
3023
3024	Else
3025	PopupMenu_Speed.ListIndex = 5
3026
3027	End Select
3028
3029	//Update punch
3030	Slider_Punch.Value = asc(ICSSerialPort1.Byte05)
3031	EditField_Punch.Text = str(asc(ICSSerialPort1.Byte05))
3032
3033	//Update DBAND
3034	Select Case ICSSerialPort1.Byte06
3035
3036	Case chrb(&h01)
3037	PopupMenu_DBand.ListIndex = 0
3038
3039	Case chrb(&h02)
3040	PopupMenu_DBand.ListIndex = 1
3041
3042	Case chrb(&h03)
3043	PopupMenu_DBand.ListIndex = 2
3044
3045	Else
3046	PopupMenu_DBand.ListIndex = 3
3047
3048	End Select
3049
3050	//Update Dump
3051	Select Case ICSSerialPort1.Byte07
3052
3053	Case chrb(&h01)
3054	PopupMenu_Dump.ListIndex = 0
3055
3056	Case chrb(&h02)
3057	PopupMenu_Dump.ListIndex = 1
3058
3059	Else
3060	PopupMenu_Dump.ListIndex = 2
3061
3062	End Select
3063
3064	//Update DFREQ
3065	Select Case ICSSerialPort1.Byte08
3066
3067	Case chrb(&h40)
3068	PopupMenu_DFreq.ListIndex = 0
3069
3070	Case chrb(&h78)
3071	PopupMenu_DFreq.ListIndex = 1
3072
3073	Case chrb(&hFF)
3074	PopupMenu_DFreq.ListIndex = 2
3075
3076	Else
3077	PopupMenu_DFreq.ListIndex = 3
3078
3079	End Select
3080
3081	//Update Nuetral
3082	//Nuetral is defined by 2 bytes
3083	Select Case ICSSerialPort1.Byte11
3084
3085	Case chrb(&h82)
3086	if ICSSerialPort1.Byte12 = chrb(&h7C) then
3087	PopupMenu_Nuetral.ListIndex = 0
3088	else
3089	PopupMenu_Nuetral.ListIndex = 3
3090	end if
3091
3092	Case chrb(&h88)
3093	if ICSSerialPort1.Byte12 = chrb(&h78) then
3094	PopupMenu_Nuetral.ListIndex = 1
3095	else
3096	PopupMenu_Nuetral.ListIndex = 3
3097	end if
3098
3099	Case chrb(&h94)
3100	if ICSSerialPort1.Byte12 = chrb(&h6C) then
3101	PopupMenu_Nuetral.ListIndex = 2
3102	else
3103	PopupMenu_Nuetral.ListIndex = 3
3104	end if
3105
3106	Else
3107	PopupMenu_Nuetral.ListIndex = 3
3108
3109	End Select
3110
3111	//Update Vertial Intertia
3112	Select Case ICSSerialPort1.Byte13
3113
3114	Case chrb(&h01)
3115	PopupMenu_VerticalInteria.ListIndex = 0
3116
3117	Case chrb(&h02)
3118	PopupMenu_VerticalInteria.ListIndex = 1
3119
3120	Case chrb(&h03)
3121	PopupMenu_VerticalInteria.ListIndex = 2
3122
3123	Case chrb(&h04)
3124	PopupMenu_VerticalInteria.ListIndex = 3
3125
3126	Case chrb(&hFF)
3127	PopupMenu_VerticalInteria.ListIndex = 4
3128
3129	Else
3130	PopupMenu_VerticalInteria.ListIndex = 5
3131
3132	End Select
3133
3134	//Update Back Timing
3135	Select Case ICSSerialPort1.Byte15
3136
3137	Case chrb(&h01)
3138	PopupMenu_BackTiming.ListIndex = 0
3139
3140	Case chrb(&h05)
3141	PopupMenu_BackTiming.ListIndex = 1
3142
3143	Case chrb(&h0A)
3144	PopupMenu_BackTiming.ListIndex = 2
3145
3146	Case chrb(&h14)
3147	PopupMenu_BackTiming.ListIndex = 3
3148
3149	Case chrb(&h28)
3150	PopupMenu_BackTiming.ListIndex = 4
3151
3152	Else
3153	PopupMenu_BackTiming.ListIndex = 5
3154
3155	End Select
3156
3157	//Update Steering Gain
3158	Slider_STGain.Value = asc(ICSSerialPort1.Byte16)
3159	EditField_STGain.Text = str(asc(ICSSerialPort1.Byte16))
3160
3161	//Update Throttle Gain
3162	Slider_THGain.Value = asc(ICSSerialPort1.Byte17)
3163	EditField_THGain.Text = str(asc(ICSSerialPort1.Byte17))
3164	End Sub
3165	#tag EndMethod
3166
3167
3168	#tag Note, Name = License
3169	Copyright 2010 Jeremy Auten
3170
3171	This file is part of Flip Side ICS Software.
3172
3173	Flip Side ICS Software is free software: you can redistribute it and/or modify
3174	it under the terms of the GNU General Public License as published by
3175	the Free Software Foundation, either version 3 of the License, or
3176	(at your option) any later version.
3177
3178	Flip Side ICS Software is distributed in the hope that it will be useful,
3179	but WITHOUT ANY WARRANTY; without even the implied warranty of
3180	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
3181	GNU General Public License for more details.
3182
3183	You should have received a copy of the GNU General Public License
3184	along with Flip Side ICS Software. If not, see <http://www.gnu.org/licenses/>.
3185	#tag EndNote
3186
3187
3188	#tag Property, Flags = &h0
3189	comPort As string
3190	#tag EndProperty
3191
3192
3193	#tag Constant, Name = defaultControlHeight, Type = Double, Dynamic = False, Default = \"20", Scope = Public
3194	#Tag Instance, Platform = Mac OS, Language = Default, Definition = \"20"
3195	#Tag Instance, Platform = Windows, Language = Default, Definition = \"22"
3196	#Tag Instance, Platform = Linux, Language = Default, Definition = \"24"
3197	#tag EndConstant
3198
3199
3200	#tag EndWindowCode
3201
3202	#tag Events PushButton_Read
3203	#tag Event
3204	Sub Action()
3205	ICSSerialPort1.readCar
3206	End Sub
3207	#tag EndEvent
3208	#tag EndEvents
3209	#tag Events PushButton_Write
3210	#tag Event
3211	Sub Action()
3212	ICSSerialPort1.writeCar
3213	End Sub
3214	#tag EndEvent
3215	#tag EndEvents
3216	#tag Events TabPanel1
3217	#tag Event
3218	Sub Change()
3219	updateAdvancedScreen
3220	updateCarScreen
3221	End Sub
3222	#tag EndEvent
3223	#tag EndEvents
3224	#tag Events EditField_Byte9
3225	#tag Event
3226	Sub TextChange()
3227	//Make sure we have a valid value if not then set it to something
3228	if me.Text <> "" then
3229	if val(me.Text) > 255 or val(me.Text) < 0 then
3230	me.Text = "255"
3231	end if
3232	end if
3233
3234	dim d as double
3235	dim i as integer
3236	d = val(me.Text)
3237	i = d
3238	ICSSerialPort1.Byte09 = chrb(i)
3239	End Sub
3240	#tag EndEvent
3241	#tag EndEvents
3242	#tag Events EditField_Byte8
3243	#tag Event
3244	Sub TextChange()
3245	//Make sure we have a valid value if not then set it to something
3246	if me.Text <> "" then
3247	if val(me.Text) > 255 or val(me.Text) < 0 then
3248	me.Text = "255"
3249	end if
3250	end if
3251
3252	dim d as double
3253	dim i as integer
3254	d = val(me.Text)
3255	i = d
3256	ICSSerialPort1.Byte08 = chrb(i)
3257	End Sub
3258	#tag EndEvent
3259	#tag EndEvents
3260	#tag Events EditField_Byte7
3261	#tag Event
3262	Sub TextChange()
3263	//Make sure we have a valid value if not then set it to something
3264	if me.Text <> "" then
3265	if val(me.Text) > 255 or val(me.Text) < 0 then
3266	me.Text = "255"
3267	end if
3268	end if
3269
3270	dim d as double
3271	dim i as integer
3272	d = val(me.Text)
3273	i = d
3274	ICSSerialPort1.Byte07 = chrb(i)
3275	End Sub
3276	#tag EndEvent
3277	#tag EndEvents
3278	#tag Events EditField_Byte6
3279	#tag Event
3280	Sub TextChange()
3281	//Make sure we have a valid value if not then set it to something
3282	if me.Text <> "" then
3283	if val(me.Text) > 255 or val(me.Text) < 0 then
3284	me.Text = "255"
3285	end if
3286	end if
3287
3288	dim d as double
3289	dim i as integer
3290	d = val(me.Text)
3291	i = d
3292	ICSSerialPort1.Byte06 = chrb(i)
3293	End Sub
3294	#tag EndEvent
3295	#tag EndEvents
3296	#tag Events EditField_Byte5
3297	#tag Event
3298	Sub TextChange()
3299	//Make sure we have a valid value if not then set it to something
3300	if me.Text <> "" then
3301	if val(me.Text) > 255 or val(me.Text) < 0 then
3302	me.Text = "255"
3303	end if
3304	end if
3305
3306	dim d as double
3307	dim i as integer
3308	d = val(me.Text)
3309	i = d
3310	ICSSerialPort1.Byte05 = chrb(i)
3311	End Sub
3312	#tag EndEvent
3313	#tag EndEvents
3314	#tag Events EditField_Byte4
3315	#tag Event
3316	Sub TextChange()
3317	//Make sure we have a valid value if not then set it to something
3318	if me.Text <> "" then
3319	if val(me.Text) > 255 or val(me.Text) < 0 then
3320	me.Text = "255"
3321	end if
3322	end if
3323
3324	dim d as double
3325	dim i as integer
3326	d = val(me.Text)
3327	i = d
3328	ICSSerialPort1.Byte04 = chrb(i)
3329	End Sub
3330	#tag EndEvent
3331	#tag EndEvents
3332	#tag Events EditField_Byte3
3333	#tag Event
3334	Sub TextChange()
3335	//Make sure we have a valid value if not then set it to something
3336	if me.Text <> "" then
3337	if val(me.Text) > 255 or val(me.Text) < 0 then
3338	me.Text = "255"
3339	end if
3340	end if
3341
3342	dim d as double
3343	dim i as integer
3344	d = val(me.Text)
3345	i = d
3346	ICSSerialPort1.Byte03 = chrb(i)
3347	End Sub
3348	#tag EndEvent
3349	#tag EndEvents
3350	#tag Events Slider_THGain
3351	#tag Event
3352	Sub ValueChanged()
3353	ICSSerialPort1.Byte17 = chrb(me.Value)
3354	//Check to see if we need to update the edit field
3355	//This prevents the edit field from triggering this event that then updates the edit field again
3356	//Causing the cursor to move to the begginning of the editfield
3357	if EditField_THGain.Text <> str(me.Value) then
3358	EditField_THGain.Text = str(me.Value)
3359	end if
3360
3361
3362	End Sub
3363	#tag EndEvent
3364	#tag EndEvents
3365	#tag Events EditField_THGain
3366	#tag Event
3367	Sub TextChange()
3368	//Make sure we have a valid value if not then set it to something
3369	if me.Text <> "" then
3370	if val(me.Text) > 255 or val(me.Text) < 1 then
3371	me.Text = "255"
3372	end if
3373	end if
3374
3375	dim d as double
3376	dim i as integer
3377	d = val(me.Text)
3378	i = d
3379	ICSSerialPort1.Byte17 = chrb(i)
3380
3381	Slider_THGain.Value = val(me.Text)
3382	End Sub
3383	#tag EndEvent
3384	#tag EndEvents
3385	#tag Events Slider_STGain
3386	#tag Event
3387	Sub ValueChanged()
3388	ICSSerialPort1.Byte16 = chrb(me.Value)
3389	//Check to see if we need to update the edit field
3390	//This prevents the edit field from triggering this event that then updates the edit field again
3391	//Causing the cursor to move to the begginning of the editfield
3392	if EditField_STGain.Text <> str(me.Value) then
3393	EditField_STGain.Text = str(me.Value)
3394	end if
3395	End Sub
3396	#tag EndEvent
3397	#tag EndEvents
3398	#tag Events EditField_STGain
3399	#tag Event
3400	Sub TextChange()
3401	//Make sure we have a valid value if not then set it to something
3402	if me.Text <> "" then
3403	if val(me.Text) > 255 or val(me.Text) < 1 then
3404	me.Text = "255"
3405	end if
3406	end if
3407
3408	dim d as double
3409	dim i as integer
3410	d = val(me.Text)
3411	i = d
3412	ICSSerialPort1.Byte16 = chrb(i)
3413
3414	Slider_STGain.Value = val(me.Text)
3415
3416
3417	End Sub
3418	#tag EndEvent
3419	#tag EndEvents
3420	#tag Events PopupMenu_BackTiming
3421	#tag Event
3422	Sub Change()
3423	Select Case me.ListIndex
3424
3425	Case 0
3426	ICSSerialPort1.Byte15 = chrb(&h01)
3427	Case 1
3428	ICSSerialPort1.Byte15 = chrb(&h05)
3429	Case 2
3430	ICSSerialPort1.Byte15 = chrb(&h0A)
3431	Case 3
3432	ICSSerialPort1.Byte15 = chrb(&h14)
3433	Case 4
3434	ICSSerialPort1.Byte15 = chrb(&h28)
3435	Case 5
3436
3437	End Select
3438	End Sub
3439	#tag EndEvent
3440	#tag EndEvents
3441	#tag Events PopupMenu_VerticalInteria
3442	#tag Event
3443	Sub Change()
3444	Select Case me.ListIndex
3445
3446	Case 0
3447	ICSSerialPort1.Byte13 = chrb(&h01)
3448	Case 1
3449	ICSSerialPort1.Byte13 = chrb(&h02)
3450	Case 2
3451	ICSSerialPort1.Byte13 = chrb(&h03)
3452	Case 3
3453	ICSSerialPort1.Byte13 = chrb(&h04)
3454	Case 4
3455	ICSSerialPort1.Byte13 = chrb(&hFF)
3456	Case 5
3457
3458	End Select
3459	End Sub
3460	#tag EndEvent
3461	#tag EndEvents
3462	#tag Events PopupMenu_Nuetral
3463	#tag Event
3464	Sub Change()
3465	Select Case me.ListIndex
3466
3467	Case 0
3468	ICSSerialPort1.Byte11 = chrb(&h82)
3469	ICSSerialPort1.Byte12 = chrb(&h7C)
3470
3471	Case 1
3472	ICSSerialPort1.Byte11 = chrb(&h88)
3473	ICSSerialPort1.Byte12 = chrb(&h78)
3474
3475	Case 2
3476	ICSSerialPort1.Byte11 = chrb(&h94)
3477	ICSSerialPort1.Byte12 = chrb(&h6C)
3478
3479	Case 3
3480
3481	End Select
3482	End Sub
3483	#tag EndEvent
3484	#tag EndEvents
3485	#tag Events PopupMenu_DFreq
3486	#tag Event
3487	Sub Change()
3488	Select Case me.ListIndex
3489
3490	Case 0
3491	ICSSerialPort1.Byte08 = chrb(&h40)
3492	Case 1
3493	ICSSerialPort1.Byte08 = chrb(&h78)
3494	Case 2
3495	ICSSerialPort1.Byte08 = chrb(&hFF)
3496	Case 3
3497
3498	End Select
3499	End Sub
3500	#tag EndEvent
3501	#tag EndEvents
3502	#tag Events PopupMenu_Dump
3503	#tag Event
3504	Sub Change()
3505	Select Case me.ListIndex
3506
3507	Case 0
3508	ICSSerialPort1.Byte07 = chrb(&h01)
3509	Case 1
3510	ICSSerialPort1.Byte07 = chrb(&h02)
3511	Case 2
3512
3513	End Select
3514	End Sub
3515	#tag EndEvent
3516	#tag EndEvents
3517	#tag Events PopupMenu_DBand
3518	#tag Event
3519	Sub Change()
3520	Select Case me.ListIndex
3521
3522	Case 0
3523	ICSSerialPort1.Byte06 = chrb(&h01)
3524	Case 1
3525	ICSSerialPort1.Byte06 = chrb(&h02)
3526	Case 2
3527	ICSSerialPort1.Byte06 = chrb(&h03)
3528	Case 3
3529
3530	End Select
3531	End Sub
3532	#tag EndEvent
3533	#tag EndEvents
3534	#tag Events Slider_Punch
3535	#tag Event
3536	Sub ValueChanged()
3537	ICSSerialPort1.Byte05 = chrb(me.Value)
3538	//Check to see if we need to update the edit field
3539	//This prevents the edit field from triggering this event that then updates the edit field again
3540	//Causing the cursor to move to the begginning of the editfield
3541	if EditField_Punch.Text <> str(me.Value) then
3542	EditField_Punch.Text = str(me.Value)
3543	end if
3544
3545
3546	End Sub
3547	#tag EndEvent
3548	#tag EndEvents
3549	#tag Events EditField_Punch
3550	#tag Event
3551	Sub TextChange()
3552	//Make sure we have a valid value if not then set it to something
3553	if me.Text <> "" then
3554	if val(me.Text) > 255 or val(me.Text) < 1 then
3555	me.Text = "255"
3556	end if
3557	end if
3558
3559	dim d as double
3560	dim i as integer
3561	d = val(me.Text)
3562	i = d
3563	ICSSerialPort1.Byte05 = chrb(i)
3564
3565	Slider_Punch.Value = val(me.Text)
3566	End Sub
3567	#tag EndEvent
3568	#tag EndEvents
3569	#tag Events PopupMenu_Speed
3570	#tag Event
3571	Sub Change()
3572	Select Case me.ListIndex
3573
3574	Case 0
3575	ICSSerialPort1.Byte04 = chrb(&h0A)
3576	Case 1
3577	ICSSerialPort1.Byte04 = chrb(&h14)
3578	Case 2
3579	ICSSerialPort1.Byte04 = chrb(&h1E)
3580	Case 3
3581	ICSSerialPort1.Byte04 = chrb(&h28)
3582	Case 4
3583	ICSSerialPort1.Byte04 = chrb(&hFF)
3584	Case 5
3585
3586	End Select
3587	End Sub
3588	#tag EndEvent
3589	#tag EndEvents
3590	#tag Events PopupMenu_Gain
3591	#tag Event
3592	Sub Change()
3593	Select Case me.ListIndex
3594
3595	case 0
3596	ICSSerialPort1.Byte03 = chrb(&h32)
3597
3598	case 1
3599	ICSSerialPort1.Byte03 = chrb(&h64)
3600
3601	case 2
3602	ICSSerialPort1.Byte03 = chrb(&hFF)
3603
3604	case 3
3605
3606	End Select
3607
3608	End Sub
3609	#tag EndEvent
3610	#tag EndEvents
3611	#tag Events PopupMenu_CarType
3612	#tag Event
3613	Sub Change()
3614	ICSSerialPort1.setCarType(me.Text)
3615	ICSSerialPort1.setDefaultValues
3616	disableControls
3617
3618	End Sub
3619	#tag EndEvent
3620	#tag EndEvents
3621	#tag Events EditField_Byte12
3622	#tag Event
3623	Sub TextChange()
3624	//Make sure we have a valid value if not then set it to something
3625	if me.Text <> "" then
3626	if val(me.Text) > 255 or val(me.Text) < 0 then
3627	me.Text = "255"
3628	end if
3629	end if
3630
3631	dim d as double
3632	dim i as integer
3633	d = val(me.Text)
3634	i = d
3635	ICSSerialPort1.Byte12 = chrb(i)
3636	End Sub
3637	#tag EndEvent
3638	#tag EndEvents
3639	#tag Events EditField_Byte11
3640	#tag Event
3641	Sub TextChange()
3642	//Make sure we have a valid value if not then set it to something
3643	if me.Text <> "" then
3644	if val(me.Text) > 255 or val(me.Text) < 0 then
3645	me.Text = "255"
3646	end if
3647	end if
3648
3649	dim d as double
3650	dim i as integer
3651	d = val(me.Text)
3652	i = d
3653	ICSSerialPort1.Byte11 = chrb(i)
3654	End Sub
3655	#tag EndEvent
3656	#tag EndEvents
3657	#tag Events EditField_Byte10
3658	#tag Event
3659	Sub TextChange()
3660	//Make sure we have a valid value if not then set it to something
3661	if me.Text <> "" then
3662	if val(me.Text) > 255 or val(me.Text) < 0 then
3663	me.Text = "255"
3664	end if
3665	end if
3666
3667	dim d as double
3668	dim i as integer
3669	d = val(me.Text)
3670	i = d
3671	ICSSerialPort1.Byte10 = chrb(i)
3672	End Sub
3673	#tag EndEvent
3674	#tag EndEvents
3675	#tag Events EditField_Byte17
3676	#tag Event
3677	Sub TextChange()
3678	//Make sure we have a valid value if not then set it to something
3679	if me.Text <> "" then
3680	if val(me.Text) > 255 or val(me.Text) < 0 then
3681	me.Text = "255"
3682	end if
3683	end if
3684
3685	dim d as double
3686	dim i as integer
3687	d = val(me.Text)
3688	i = d
3689	ICSSerialPort1.Byte17 = chrb(i)
3690	End Sub
3691	#tag EndEvent
3692	#tag EndEvents
3693	#tag Events EditField_Byte16
3694	#tag Event
3695	Sub TextChange()
3696	//Make sure we have a valid value if not then set it to something
3697	if me.Text <> "" then
3698	if val(me.Text) > 255 or val(me.Text) < 0 then
3699	me.Text = "255"
3700	end if
3701	end if
3702
3703	dim d as double
3704	dim i as integer
3705	d = val(me.Text)
3706	i = d
3707	ICSSerialPort1.Byte16 = chrb(i)
3708	End Sub
3709	#tag EndEvent
3710	#tag EndEvents
3711	#tag Events EditField_Byte15
3712	#tag Event
3713	Sub TextChange()
3714	//Make sure we have a valid value if not then set it to something
3715	if me.Text <> "" then
3716	if val(me.Text) > 255 or val(me.Text) < 0 then
3717	me.Text = "255"
3718	end if
3719	end if
3720
3721	dim d as double
3722	dim i as integer
3723	d = val(me.Text)
3724	i = d
3725	ICSSerialPort1.Byte15 = chrb(i)
3726	End Sub
3727	#tag EndEvent
3728	#tag EndEvents
3729	#tag Events EditField_Byte14
3730	#tag Event
3731	Sub TextChange()
3732	//Make sure we have a valid value if not then set it to something
3733	if me.Text <> "" then
3734	if val(me.Text) > 255 or val(me.Text) < 0 then
3735	me.Text = "255"
3736	end if
3737	end if
3738
3739	dim d as double
3740	dim i as integer
3741	d = val(me.Text)
3742	i = d
3743	ICSSerialPort1.Byte14 = chrb(i)
3744	End Sub
3745	#tag EndEvent
3746	#tag EndEvents
3747	#tag Events EditField_Byte13
3748	#tag Event
3749	Sub TextChange()
3750	//Make sure we have a valid value if not then set it to something
3751	if me.Text <> "" then
3752	if val(me.Text) > 255 or val(me.Text) < 0 then
3753	me.Text = "255"
3754	end if
3755	end if
3756
3757	dim d as double
3758	dim i as integer
3759	d = val(me.Text)
3760	i = d
3761	ICSSerialPort1.Byte13 = chrb(i)
3762	End Sub
3763	#tag EndEvent
3764	#tag EndEvents
3765	#tag Events ICSSerialPort1
3766	#tag Event
3767	Sub valuesChanged()
3768	//Update the screens with the new values
3769	updateAdvancedScreen
3770	updateCarScreen
3771	End Sub
3772	#tag EndEvent
3773	#tag Event
3774	Sub profileImported(profileName as string)
3775	PopupMenu_Profile.AddRow(profileName)
3776
3777	//Make sure to switch to the new profile
3778	PopupMenu_Profile.ListIndex = PopupMenu_Profile.ListCount
3779
3780	//Update the screens with the new values
3781	updateAdvancedScreen
3782	updateCarScreen
3783	End Sub
3784	#tag EndEvent
3785	#tag EndEvents
3786	#tag Events PushButton_Default
3787	#tag Event
3788	Sub Action()
3789	ICSSerialPort1.setDefaultValues
3790	End Sub
3791	#tag EndEvent
3792	#tag EndEvents
3793	#tag Events PopupMenu_SerialPort
3794	#tag Event
3795	Sub Change()
3796	//Set and open the COM Port
3797	dim i, count as integer
3798	count = System.SerialPortCount
3799
3800	if PopupMenu_SerialPort.Text <> "" then
3801	//We can try opening the com port and set the popup menu to that port
3802
3803	for i = 0 to PopupMenu_SerialPort.ListCount - 1
3804
3805	if PopupMenu_SerialPort.list(i) = me.Text then
3806	//Found a match, set and open
3807	ICSSerialPort1.SerialPort = System.SerialPort(i)
3808	ICSSerialPort1.Close
3809
3810
3811	if not ICSSerialPort1.Open then
3812	//Could not open
3813	MsgBox "Error opening defined com port"
3814	//Disable buttons
3815	PushButton_Read.Enabled = False
3816	PushButton_Write.Enabled = False
3817	else
3818	//Enable buttons
3819	PushButton_Read.Enabled = True
3820	PushButton_Write.Enabled = True
3821
3822	end if
3823	//Save and exit
3824	comPort = me.Text
3825	savePreferences
3826	exit
3827	end if
3828
3829	next
3830
3831	end if
3832	End Sub
3833	#tag EndEvent
3834	#tag EndEvents
3835	#tag Events PopupMenu_Profile
3836	#tag Event
3837	Sub Change()
3838	if me.Text <> "" then
3839	PushButton_SaveProfile.Enabled = true
3840	PushButton_Delete.Enabled = true
3841	PushButton_Export.Enabled = true
3842	ICSSerialPort1.loadProfile(me.Text)
3843	end if
3844	End Sub
3845	#tag EndEvent
3846	#tag Event
3847	Sub Open()
3848	dim s() as string
3849
3850	s = ICSSerialPort1.listProfiles
3851
3852	if UBound(s) > -1 then
3853	for each element as string in s
3854	me.AddRow(element)
3855	next
3856	end if
3857	End Sub
3858	#tag EndEvent
3859	#tag EndEvents
3860	#tag Events PushButton_SaveProfile
3861	#tag Event
3862	Sub Action()
3863	if PopupMenu_Profile.Text <> "" then
3864	ICSSerialPort1.saveProfile(PopupMenu_Profile.Text)
3865	end if
3866	End Sub
3867	#tag EndEvent
3868	#tag EndEvents
3869	#tag Events PushButton_Delete
3870	#tag Event
3871	Sub Action()
3872	if PopupMenu_Profile.Text <> "" then
3873	ICSSerialPort1.deleteProfile(PopupMenu_Profile.Text)
3874
3875	PopupMenu_Profile.RemoveRow(PopupMenu_Profile.ListIndex)
3876
3877	//Make sure to hide the save and delete profile buttons since no profile will be selected after this has been deleted
3878	PushButton_SaveProfile.Enabled = False
3879	PushButton_Delete.Enabled = False
3880	PushButton_Export.Enabled = False
3881
3882	end if
3883	End Sub
3884	#tag EndEvent
3885	#tag EndEvents
3886	#tag Events PushButton_Create
3887	#tag Event
3888	Sub Action()
3889	dim tempProfWindow as new createProfile
3890	tempProfWindow.Show
3891	End Sub
3892	#tag EndEvent
3893	#tag EndEvents
3894	#tag Events PushButton_Import
3895	#tag Event
3896	Sub Action()
3897	dim success as Boolean
3898
3899	success = ICSSerialPort1.importProfile
3900
3901	if success = false then
3902	MsgBox "Error importing profile"
3903	end if
3904	End Sub
3905	#tag EndEvent
3906	#tag EndEvents
3907	#tag Events PushButton_Export
3908	#tag Event
3909	Sub Action()
3910	if PopupMenu_Profile.Text <> "" then
3911	ICSSerialPort1.exportProfile(PopupMenu_Profile.Text)
3912	end if
3913	End Sub
3914	#tag EndEvent
3915	#tag EndEvents

Note: See TracBrowser for help on using the repository browser.